Chatroulette

08/19/2012 20:18 Crack-wtf#1
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"1120700, -1, -1)
$GUIActiveX    GUICtrlCreateObj$oRP1010 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