Jap es droppt wirklich nix mehr da :P schade is so ein einfacher wayout ^^
HotKeySet("{PAUSE}", "Script_pausieren") ;Hotkey: Pause
HotKeySet("{END}", "Script_Ende") ;Hotkey:Script beenden
Func Script_pausieren()
$Paused = NOT $Paused
While $Paused
sleep(100)
WEnd
EndFunc
Func Script_Ende()
Exit 0
EndFunc
Func selbstmord()
Sleep($1000)
$killyourself=Random(0,10)
If $killyourself<=5 Then
Call("resign")
ElseIf $killyourself>5 Then
Call("giveup")
EndIf
EndFunc
Func resign()
$x_back=Random(546,586)
$y_back=Random(537,540)
$kill=Random(0,10)
If $kill<=5 Then
Send("-")
ElseIf $kill>5 Then
Send("{enter}")
Sleep($100)
Send("/")
EndIf
Sleep($100)
Send("resign")
Sleep($50)
Send("{enter}")
sleep($5000)
mouseclick ( "left", $x_back, $y_back, 1 ,$mams);zum Außenposten
sleep($4000)
EndFunc
Func giveup()
$x_back=Random(546,586)
$y_back=Random(537,540)
$kill=Random(0,10)
If $kill<=5 Then
Send("-")
ElseIf $kill>5 Then
Send("{enter}")
Sleep($100)
Send("/")
EndIf
Sleep($100)
Send("giveup")
Sleep($50)
Send("{enter}")
sleep($5000)
mouseclick ( "left", $x_back, $y_back, 1 ,$mams);zum Außenposten
sleep($4000)
EndFunc