fliegt ohne zu schießen und so
Func Skaross_go()
WinActivate("Star Wars™: The Old Republic™")
Skaross_Main()
EndFunc
Func Skaross_Main()
$x1 = 0
$y1 = 0
$x2 = 0
$y2 = 0
$x3 = 0
$y3 = 0
Sleep(1000)
Send("{SPACE 1}")
Sleep(1000)
MouseMove(518, 600) ; Stuhl
Sleep(1200)
Sleep(300)
MouseClick("right")
Sleep(300)
MouseClick("right")
Sleep(5000)
MouseMove(571, 259) ; Galaxiekarte
Sleep(500)
MouseClick("left")
MouseClick("left")
Sleep(2000)
MouseMove(438, 337) ; Skaross
Sleep(2000)
MouseClick("left")
MouseClick("left")
MouseMove(861, 674) ; Jetzt Reisen
Sleep(2000)
MouseClick("left")
MouseClick("left")
MouseMove(475, 445) ; Ja
Sleep(1000)
MouseClick("left")
Sleep(25000)
If Not IsDeclared ("Skaross_start") Then $Skaross_start=0
If GUICtrlRead($Checkbox_Image) = $GUI_UNCHECKED Or $Skaross_start=1 Then
Sleep(11000)
$result=1
Else
Do
Sleep(300)
$result=_Imagesearcharea("pictures/space_start.png",1,838,553,1036,803,$x1,$y1,101) ; Starts
Until $result=1
Local $script_start = TimerInit()
Do
Sleep(100)
$result=_Imagesearcharea("pictures/space_aeten.png",1,700,1,1024,150,$x1,$y1,100) ; Starts
Local $timer_diff = TimerDiff( $script_start )
Until $result=1 Or $timer_diff > 50000
EndIf
If $result=0 Then
Global $Skaross_start=1
Send("{ESCAPE 1}")
space_ende()
Else
Sleep(6000) ;Adjust timing here if needed
If GUICtrlRead($Checkbox_barrel) = $GUI_CHECKED Then AdlibRegister ("Barrel",500)
AdlibRegister ("Scam",82000)
AdlibRegister ("Scam2",233000)
AdlibRegister ("EMP",83000)
MouseDown("left") ;shield aus
Send("{1 1}")
Local $script_start = TimerInit()
Do
Skaross1()
Local $timer_diff = TimerDiff( $script_start )
Until $timer_diff > 9000
MouseUp("left") ;shield an
Send("{2 1}")
Sleep(9000)
MouseDown("left") ;shield aus
Send("{1 1}")
Local $script_start7 = TimerInit()
Do
Skaross3()
Local $timer_diff7 = TimerDiff( $script_start7 )
Until $timer_diff7 > 30000
MouseUp("left") ;shield an
Send("{2 1}")
Sleep(11000)
MouseDown("left") ;shield aus
Send("{1 1}")
Local $script_start2 = TimerInit()
Do
Skaross1()
Local $timer_diff2 = TimerDiff( $script_start2 )
Until $timer_diff2 > 39000
MouseUp("left") ;shield an
Send("{2 1}")
Sleep(23000)
MouseDown("left") ;shield aus
Send("{1 1}")
Local $script_start3 = TimerInit()
Do
Skaross1()
Local $timer_diff3 = TimerDiff( $script_start3 )
Until $timer_diff3 > 30000
MouseUp("left") ;shield an
Send("{2 1}")
Sleep(14000)
MouseDown("left") ;shield aus
Send("{1 1}")
Local $script_start4 = TimerInit()
Do
Skaross1()
Local $timer_diff4 = TimerDiff( $script_start4 )
Until $timer_diff4 > 46000
MouseUp("left") ;shield an
Send("{2 1}")
Sleep(15000)
MouseDown("left") ;shield aus
Send("{1 1}")
Local $script_start5 = TimerInit()
Do
Skaross3()
Local $timer_diff5 = TimerDiff( $script_start5 )
Until $timer_diff5 > 5000
Local $script_start6 = TimerInit()
Do
Skaross2()
Local $timer_diff6 = TimerDiff( $script_start6 )
Until $timer_diff6 > 30000
MouseUp("left") ;shield an
Send("{2 1}")
Sleep (35000)
If GUICtrlRead($Checkbox_barrel) = $GUI_CHECKED Then AdlibUnRegister("Barrel")
AdlibUnRegister("Scam")
AdlibUnRegister("Scam2")
AdlibUnRegister("EMP")
Sleep(1000)
space_ende()
EndIf
EndFunc
Func Skaross1()
;variablen======================================== =======
$gelb1 = PixelSearch(264, 31, 770, 795, 0xB29F1E, 10)
$gelb2 = PixelSearch(264, 31, 770, 795, 0x896400, 10)
$gelb3 = PixelSearch(264, 31, 770, 795, 0xFDC625, 10)
;Variablen======================================== ========
If IsArray($gelb1) = True Then
MouseMove($gelb1 [0], $gelb1 [1], 1)
MouseClick("right")
EndIf
If IsArray($gelb2) = True Then
MouseMove($gelb2 [0], $gelb2 [1], 1)
MouseClick("right")
EndIf
If IsArray($gelb3) = True Then
MouseMove($gelb3 [0], $gelb3 [1], 1)
MouseClick("right")
EndIf
EndFunc
Func Skaross2()
;variablen======================================== =======
$gelb1 = PixelSearch(7, 320, 1029, 793, 0xB29F1E, 5)
$gelb2 = PixelSearch(7, 320, 1029, 793, 0x896400, 5)
$gelb3 = PixelSearch(7, 320, 1029, 793, 0xFDC625, 5)
;Variablen======================================== ========
If IsArray($gelb1) = True Then
MouseMove($gelb1 [0], $gelb1 [1], 1)
MouseClick("right")
EndIf
If IsArray($gelb2) = True Then
MouseMove($gelb2 [0], $gelb2 [1], 1)
MouseClick("right")
EndIf
If IsArray($gelb3) = True Then
MouseMove($gelb3 [0], $gelb3 [1], 1)
MouseClick("right")
EndIf
EndFunc
Func Skaross3()
;variablen======================================== =======
$gelb1 = PixelSearch(14, 50, 586, 788, 0xB29F1E, 5)
$gelb2 = PixelSearch(14, 50, 586, 788, 0x896400, 5)
$gelb3 = PixelSearch(14, 50, 586, 788, 0xFDC625, 5)
;Variablen======================================== ========
If IsArray($gelb1) = True Then
MouseMove($gelb1 [0], $gelb1 [1], 1)
MouseClick("right")
EndIf
If IsArray($gelb2) = True Then
MouseMove($gelb2 [0], $gelb2 [1], 1)
MouseClick("right")
EndIf
If IsArray($gelb3) = True Then
MouseMove($gelb3 [0], $gelb3 [1], 1)
MouseClick("right")
EndIf
EndFunc