mir war fad - bloxorz bot ;)

1. offizieller Beitrag

    ich denke nicht dass du einen Bot gemacht hast. Wenn doch, schreib doch mal den Code rein ;) Woher soll der Bot denn sonst wissen welcher Knopf welche Aktion ausführt? Außerdem läuft das Video mit doppelter Geschwindigkeit (warum? :D)

    Naja jedenfalls ist das Video trotzdem 1A :rofl:

    Nein das ist nur eine automation, welche schritt für schritt vorher aufgezeichnete cursor-tasten an das swf sendet, also nicht wirklich was großartiges -
    das mit bot war ein scherz ;)

    u das video läuft deshalb mit doppelter geschwindigkeit, da man bei youtube nur 10 min videos uploaden kann - und das ganze spiel hat nun mal fast 20 min gedauert!

    (ps.: oder soll ich doch behaupten, es handle sich um einen richtigen bot; und ich darf leider den code nicht posten, weil das bot-forum ja geschlossen wurde *lol*)

    [autoit]

    #include <ie.au3>
    ToolTip("bitte warten...")

    [/autoit][autoit][/autoit][autoit]

    Opt("SendKeyDelay",300)
    Opt("SendKeyDownDelay",120)
    Opt("TrayAutoPause",1)
    Opt("PixelCoordMode",2)
    Opt("MouseCoordMode",2)

    [/autoit][autoit][/autoit][autoit]

    Run("C:\Programme\Mozilla Firefox\firefox.exe http://www.albinoblacksheep.com/games/bloxorz")
    WinWait("Games » Bloxorz - Mozilla Firefox","",10)
    sleep(2000)
    WinActivate("Games » Bloxorz - Mozilla Firefox")
    WinWaitActive("Games » Bloxorz - Mozilla Firefox")
    $CPos=ControlGetPos("Games » Bloxorz - Mozilla Firefox","","[CLASS:MozillaWindowClass; INSTANCE:9]")
    ControlFocus("Games » Bloxorz - Mozilla Firefox","","[CLASS:MozillaWindowClass; INSTANCE:9]")

    [/autoit][autoit][/autoit][autoit]

    Do
    Sleep(500)
    ToolTip("bitte warten...")
    Until PixelGetColor($CPos[0]+204,$CPos[1]+183)>6000000
    Sleep(1000)
    MouseClick("left",$CPos[0]+204,$CPos[1]+183)

    [/autoit][autoit][/autoit][autoit]

    Do
    Sleep(500)
    Until PixelGetColor($CPos[0]+426,$CPos[1]+279)>6000000
    Sleep(1000)
    MouseClick("left",$CPos[0]+426,$CPos[1]+279)

    [/autoit][autoit][/autoit][autoit]

    Do
    Sleep(500)
    Until PixelGetColor($CPos[0]+2,$CPos[1]+2)>9000000
    Sleep(2000)
    MouseMove($CPos[0],$CPos[1]-70)

    [/autoit][autoit][/autoit][autoit][/autoit][autoit]

    For $x=1 to 33
    _Move($x)
    If $x<33 Then _WaitNextLevel($x+1)
    Next

    [/autoit][autoit][/autoit][autoit][/autoit][autoit]

    Func _WaitNextLevel($Lev)
    ToolTip("Waiting for Level " & $Lev)
    Do
    Sleep(500)
    Until PixelGetColor($CPos[0]+2,$CPos[1]+2)<100
    Do
    Sleep(500)
    Until PixelGetColor($CPos[0]+2,$CPos[1]+2)>9000000
    Sleep(2000)
    EndFunc

    [/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]

    Func _Move($Level)
    Local $Moves,$i,$j,$tip
    $Moves=IniRead(@ScriptDir & "\levelmoves.txt","Level","Level" & $Level,0)
    $Moves=StringSplit($Moves,",")
    For $i=1 to $Moves[0]
    $tip=""
    For $j=1 to $Moves[0]
    $tip=$tip & $Moves[$j]
    If $i=$j Then $tip=$tip & " "
    Next
    ToolTip($tip)
    If StringLen($Moves[$i])=1 Then
    _Send($Moves[$i])
    Else
    For $j=1 to StringTrimLeft($Moves[$i],1)
    _Send(StringLeft($Moves[$i],1))
    Next
    EndIf
    Next
    EndFunc

    [/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]

    Func _Send($Com)
    Select
    Case $Com="U"
    Send("{UP}")
    Case $Com="L"
    Send("{LEFT}")
    Case $Com="R"
    Send("{RIGHT}")
    Case $Com="D"
    Send("{DOWN}")
    Case $Com="S"
    Send("{SPACE}")
    Case $Com="W"
    Sleep(2000)
    Case Else
    Send($Com)
    EndSelect
    EndFunc

    [/autoit]

    Nett gemacht. Und eigentlich ist es schon ein Bot, schließlich führt es automatisch Aktionen in einem Spiel aus ;)

    Aber sag mal, womit hast Du eigentlich das Video aufgezeichnet? Ich interessiere mich für eine Freeware zum Aufzeichnen.

    Danke und Gruß,

    TrueMu

    Danke für den Link, habe bisher immer meine Videos mit der Demo Version vonCamtasia Studio 5 gemacht, aber Freeware ist mir lieber :)


    Edit: 09.03.2008

    So habe mir mal das CamStudio installiert, was hast du für Einstellungen genommen? Wenn ich ein Video als SWF konvertiere und es bei YouTube hochlade, kann er es nicht verarbeiten, Fehler (ungültiges Dateiformat)

    Wäre schön wenn du dazu noch was schreiben könntest.

    Mfg
    Jens (McPoldy)

    Twitter: jkroeger

    Denn die Dinge, die wir erst lernen müssen, bevor wir sie tun, lernen wir beim Tun.(Aristoteles)

    Einmal editiert, zuletzt von McPoldy (9. März 2008 um 09:15)

    youtube verwendet den videocodec flv, kann jedoch alle gängigen formate selbständig umwandeln, (wie es aussieht - kein swf ;)).
    ich hab noch nicht eindeutig herausgefunden, ob ein hochgeladenes flv-video direkt übernommen wird, oder nochmals in flv konvertiert!?
    (eine nochmalige flv-codierung würde einen qualitätsverlust bedeuten)

    ich nehm immer in avi auf und konvertiere es in mpeg2 (mit ffmpeg)

    du kannst auch ein anderes format wählen, ich hab bei youtube bereits erfolgreich xvid,divx,flv, avi & mpg hochgeladen.

    lgE