[Project] UW²Script [E/A]

04/20/2008 17:11 -Anthrax-#1
Aloha,

hab mal mit nem Script für UW² (Königsgrab in Proph) angefangen....
Betreten des Chaosrisses klappt, erste Runde angreifen auch nur danach nicht mehr so ganz.........finde keinen passenen weg den Char nach den Angriffen wieder 'gerade zu drehen'....am besten nach Möglichkeit einfach mal testen und am besten ein paar Lösungsvorschläge posten ;P

Verwendete Skillung war
[OgdTkY285J0pzwdGDe42wVMBBA]

Verwendete Waffen:
2 Hand Erd-Caster mit Halbiert fert. Wiederaufladung 20%

Interfacgröße: Normal
Auflösung: 1280*800
bis auf eine nicht funktionierende abfrage ob aufladung vom skill halbiert wurde, checkdeath und klick auf resign ist aber nichts
abzuändern bei anderen auflösungen ;P

Hier der Code:

------------------------------------ copy here -------------------------------------------
;Opt("WinTitleMatchMode", 2)
WinActivate ("Guild Wars")

HotKeySet("{ESC}","exitit")
$a=Random(500,1000)
$b=Random(20000,21000);Betreten+hinlaufen
$c=Random(700,800)
$c1=Random(300,400)
$c2=Random(1000,1200)
$c3=Random(100,150)
$c4=Random(800,900)
$d=Random(2000,2300) ; Zeit bis zur Gegnergruppe teil 1
$d1=Random(2000,2300) ; Zeit bis zur Gegnergruppe teil 1
$e=Random(4100,4400) ; teil 2
$f=Random(1200,1300) ; Glyphe der Elementarkraft, Schattenform, Splitterrüstung
$g=Random(1200,1500) ; Schattenschritt zum gegner
$h=Random(14500,15000)

$m=Random(6,7,1)

$x=Random(540,730) ; Resign-x
$y=Random(395,410) ; Resign-y

;Stadt
Sleep(5000)
Send ("o");Anvisieren von Chaosriss
Sleep($a)
Send("{SPACE}");Hinlaufen
Sleep($b)
;Ende-Stadt
Call("Fight")

Func Fight()
Send("1")
Sleep($c)
Send("r")
Sleep($d)
send("{d down}")
Sleep($c)
Send("{d up}")
Sleep($e)
Send("4")
Sleep($f)
Sleep($c+100)
Send("2")
Sleep($f+100)
Send("r")
Sleep($c4+200)
Send("r")
Sleep(Random(200,300))
Send("{TAB}")
Sleep($c)
Send("3")
Sleep($g)
Send("5")
Sleep($h/2)
Send($m)
Sleep($h/2)
Send("{TAB}")
Sleep($c)
Send("8")
Sleep(3000)
Call("checkdeath")
EndFunc



Func checkdeath()
If PixelGetColor(424,667) <> 14172224 then
sleep(1500)
MouseClick("left",$x,$y)
Else
Call("warten")
EndIf
EndFunc

Func warten()
$i=1
sleep(25000)
If PixelGetColor(482,701) <> 16772607 Then;Abfrage ob fert. wiederaufladung halbiert
Sleep(10000)
Call ("Fight1")
Else
Call("Fight1")
EndIf
EndFunc

Func Fight1()
Send("1")
Sleep($c)
Send("{SPACE}")
Sleep($c2)
Send("r")
Sleep($c1/2)
Send("{w down}")
Sleep(Random(50, 100))
Send("{a down}")
Sleep(Random(200, 250))
Send("{w up}")
Sleep(Random(50,100))
Send("r")
Send("{a up}")
Sleep($c1/2)
Sleep($d1-1000)
Sleep(400)
send("{d down}")
Sleep($c3)
Send("{d up}")
Sleep($e-1000)
;If PixelGetColor(484,690) <> 0xD84040 Then ;Interruptüberprüfung
; Send("8")
; Sleep(5000)
; Call("checkdeath")
;EndIf
Send("4")
Sleep($f)
Send("2")
Sleep($f)
Send("r")
Sleep($c2)
Send("r")
Sleep($c)
Send("3")
Sleep($g)
Send("5")
Sleep($h/2)
Send($m)
Sleep($h/2)
Send("{TAB}")
Sleep($c)
Send("8")
Sleep(3000)
;$i=($i+1)
Call("checkdeath")
EndFunc

Func exitit()
Exit
EndFunc

Exit
------------------------------------ copy here -------------------------------------------
04/22/2008 13:43 Jacob_G#2
die lösung von dem prob ist das ganze mit texmod und kompas zu machen^^
04/22/2008 20:46 -Anthrax-#3
würde aber gerne auf zusatzprogs wie texmod verzichten......muss ja wohl auch so iwie gehen ^^