elitepvpers - Chatroulette

Hab mal nen Script geschrieben um Chatroulette ohne Browser zu starten.
Vorteil?
Lokal gespeicherte Bans werden Ignoriert.
Sollte die IP gebannt sein, muss man diese eben ändern.

PHP Code:


		
			
#include <GUIConstants.au3>

#include <String.au3>



$html = BinaryToString(InetRead("http://chatroulette.com/"))

$path = _StringBetween($html, '.embedSWF("', '",')

$filename = _StringBetween($path[0], "cr/", ".swf")



If Not FileExists(@scriptdir&"\"&$filename[0]&".swf") Then

    FileDelete(@scriptdir&"\*.swf")

    InetGet("http://www.chatroulette.com"&$path[0], @ScriptDir&"\"&$filename[0]&".swf")

EndIf



Global $oRP = ObjCreate("ShockwaveFlash.ShockwaveFlash.1")

GUICreate ("Flash", 1120, 700, -1, -1)

$GUIActiveX    = GUICtrlCreateObj( $oRP, 10, 10 , 1100 , 680)



With $oRP

    .bgcolor = "#ffffff"

    .Movie = @ScriptDir &"\"&$filename[0]&".swf";

    .Loop = True

    .wmode = "Opaque"

    .FlashVars = ""

EndWith



GUISetState ()



While 1

    $msg = GUIGetMsg()

    Select

        Case $msg = $GUI_EVENT_CLOSE

            ExitLoop

    EndSelect

WEnd



$oRP = 0

GUIDelete ()

Exit