Code:
Func Sullust_go()
WinActivate("Star Warsâ„¢: The Old Republicâ„¢")
Sullust_Main()
EndFunc
Func Sullust_Main()
$x1 = 0
$y1 = 0
$x2 = 0
$y2 = 0
$x3 = 0
$y3 = 0
$x4 = 0
$y4 = 0
$timer3 = GUICtrlRead($time3)
$timer4 = GUICtrlRead($time4)
Sleep(1000)
Send("{SPACE 1}")
Sleep(1000)
MouseMove(518, 600) ; Stuhl
Sleep(1200)
Sleep(300)
MouseClick("right")
Sleep(300)
MouseClick("right")
Sleep(5000)
MouseMove(500, 600) ; Galaxiekarte
Sleep(500)
MouseClick("left")
MouseClick("left")
Sleep(2000)
MouseMove(565, 444) ; Sullust
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")
Local $script_start = TimerInit()
Do
Sleep(100)
$result=_Imagesearcharea("pictures/10sec.png",1,700,1,1200,200,$x1,$y1,101) ; Starts
Local $timer_diff = TimerDiff( $script_start )
Until $result=1 Or $timer_diff > 250000
Send("{1 1}")
If GUICtrlRead($Checkbox_barrel) = $GUI_CHECKED Then AdlibRegister ("Barrel",500)
Local $script_start = TimerInit()
Do
Sullust3()
Local $timer_diff = TimerDiff( $script_start )
Until $timer_diff > 50000
MouseUp("left") ;shield an
MouseMove(523, 706)
MouseClick("left")
sleep(1000)
MouseDown("left")
Local $script_start = TimerInit()
Do
Sullust3()
Local $timer_diff = TimerDiff( $script_start )
Until $timer_diff > 20100
MouseUp("left") ;shield an
Send("{2 1}")
MouseMove(383, 430) ;2:59
MouseClick("left")
Sleep(3000)
MouseMove(288, 640) ;2:56
MouseClick("left")
Sleep(1000)
MouseMove(523, 706) ;2:55
MouseClick("left")
Sleep(2000)
MouseMove(174, 665) ;2:53
MouseClick("left")
Sleep(3000)
MouseDown("left") ;shield aus 2:50
Send("{1 1}")
Local $script_start = TimerInit()
Do
Sullust1()
Local $timer_diff = TimerDiff( $script_start )
Until $timer_diff > 12000
MouseUp("left") ;shield an
Send("{2 1}")
MouseMove(191, 619) ;2:38
Sleep(2000)
MouseMove(365, 319) ;2:36
Sleep(3000)
MouseMove(482, 524) ;2:33
Sleep(4000)
MouseMove(966, 653) ;2:29
Sleep(1000)
MouseMove(103, 653)
Sleep(1000)
MouseMove(966, 653)
Sleep(1000)
MouseMove(103, 653)
Sleep(1000)
MouseMove(966, 653) ;2:22
Sleep(1000)
MouseMove(103, 653)
Sleep(1000)
MouseMove(966, 653)
Sleep(1000)
MouseMove(103, 653)
Sleep(1000)
MouseMove(966, 653) ;2:15
Sleep(1000)
MouseMove(103, 653)
Sleep(1000)
MouseMove(966, 653)
Sleep(1000)
MouseMove(103, 653)
Sleep(1000)
MouseMove(966, 653) ;2:08
Sleep(1000)
MouseMove(103, 653)
Sleep(1000)
MouseMove(966, 653)
MouseDown("left") ;shield aus ;2:00
Send("{1 1}")
Local $script_start = TimerInit()
Do
Sullust2()
Local $timer_diff = TimerDiff( $script_start )
Until $timer_diff > 22000
Send("{3 1}");1:40 shield
Local $script_start = TimerInit()
Do
Sullust2()
Local $timer_diff = TimerDiff( $script_start )
Until $timer_diff > 21000
MouseUp("left") ;shield an
Send("{2 1}")
MouseMove(517, 700) ;1:19
MouseClick("left")
Sleep(2000)
MouseDown("left") ;shield aus 1:17
Send("{1 1}")
Local $script_start = TimerInit()
Do
Sullust2()
Local $timer_diff = TimerDiff( $script_start )
Until $timer_diff > 15000
MouseUp("left") ;shield an
Send("{2 1}")
MouseMove(521, 142) ;1:02
MouseClick("left")
Sleep(2000)
MouseDown("left") ;shield aus 1:00
Send("{1 1}")
Local $script_start = TimerInit()
Do
Sullust1()
Local $timer_diff = TimerDiff( $script_start )
Until $timer_diff > 32600
MouseUp("left") ;shield an
Send("{2 1}")
MouseMove(517, 103) ;0:28
MouseClick("left")
Sleep(2000)
MouseMove(517, 700) ;0:26
MouseClick("left")
Sleep(2000)
MouseMove(966, 653) ;0:24
MouseClick("left")
Sleep(1000)
MouseMove(103, 653)
MouseClick("left")
Sleep(1000)
MouseMove(966, 653)
MouseClick("left")
Sleep(1000)
MouseMove(103, 653)
MouseClick("left")
Sleep(1000)
MouseMove(966, 653)
MouseClick("left")
Sleep(16000)
AdlibUnRegister("Scam")
If GUICtrlRead($Checkbox_barrel) = $GUI_CHECKED Then AdlibUnRegister("Barrel")
MouseUp("left")
Sleep(1000)
space_ende()
EndFunc
Func Sullust3()
;variablen===============================================
$rot1 = PixelSearch(14, 55, 1024, 785, 0xFFA29D, 10)
;Variablen================================================
If IsArray($rot1) = True Then
MouseMove($rot1 [0], $rot1 [1], 1)
MouseDown("left")
EndIf
EndFunc
Func Sullust1()
;variablen===============================================
$rot1 = PixelSearch(14, 55, 1024, 785, 0xFFA29D, 10)
;Variablen================================================
If IsArray($rot1) = True Then
MouseMove($rot1 [0], $rot1 [1], 1)
MouseClick("right")
EndIf
EndFunc
Func Sullust2()
;variablen===============================================
$rot1 = PixelSearch(14, 55, 1024, 785, 0xFFA29D, 10)
$blau = PixelSearch(264, 31, 770, 795, 0x96FFFB, 4)
;Variablen================================================
If IsArray($rot1) = True Then
MouseMove($rot1 [0], $rot1 [1], 1)
MouseClick("right")
EndIf
If IsArray($blau ) = True Then
MouseMove($blau [0], $blau [1], 1)
MouseClick("right")
EndIf
EndFunc