[Help]How to join this 7 script

[santozoo]

hi all,
i just learn how to use autoit
so i made scripts for facebook flashgame using imagesearch and pixelsearch
i dont know how to put only in 1 file

this is example of few script

Script1

 Spoiler

#include <ImageSearch.au3>

HotKeySet("+1", "Start")
HotKeySet("!1", "_Exit")

$X = 0
$Y = 0

While 1
Sleep(4000)
WEnd

Func Start()
Sleep(4000)
While 1
$Search = _ImageSearch('cast.png', 0, $X, $Y, 0)
If $Search = 1 Then
MouseMove($X, $Y, 10)
Sleep(4000)
MouseClick("Left")
MouseMove(10, 200, 1)
Sleep(4000)
EndIf
WEnd
Sleep(4000)
EndFunc
Sleep(4000)

Func _Exit()
Exit
EndFunc

Script 2

 Spoiler

#include <ImageSearch.au3>

HotKeySet("+2", "Start")
HotKeySet("!2", "_Exit")

$X1 = 0
$Y1 = 0

While 1
Sleep(3000)
WEnd

Func Start()
While 1
$Search1 = _ImageSearch('strike.png', 0, $X1, $Y1, 0)
If $Search1 = 1 Then
MouseMove($X1, $Y1, 10)
MouseClick("Left")
MouseMove(10, 200, 10)
EndIf
WEnd
EndFunc

Func _Exit()
Exit
EndFunc

Script 3

 Spoiler

#include <ImageSearch.au3>

HotKeySet("+6", "Start")
HotKeySet("!6", "_Exit")

While 1
Sleep(100)
WEnd

Func Start()
Sleep(100)
While 1
$Search5 = PixelSearch(0, 0, 1440, 900, 0x3A9B28)
If IsArray($Search5) = True Then
MouseMove($Search5[0], $Search5[1], 10)
Sleep(100)
MouseClick("Left")
MouseMove(10, 200, 10)
Sleep(100)
EndIf
WEnd
Sleep(100)
EndFunc
Sleep(100)

Func _Exit()
Exit
EndFunc

so how to join them in 1 script
when i run all 7 script at flash game it got lag because use big memory
thx alot

[alpines]

Joining these scripts into one script is kinda easy.
Think about on what you want to have first, then look at how the first script ends and relate to the 2nd one by inserting in it and the same with the 3rd one.

But pay attention! Don't use the same variablenames or same includes over and over again, these will create errors.

[santozoo]

Ok now already join in 1 script
and now i want to make it to pause all function every 30 minutes for clearing my inventory...i got confuse with timerint() and timerdiff()

and also all command still running together what should i use ?
for example if ok.png show at screen i want to pause cast.png until ok.png done

here is my script

thx before for your help

 Spoiler

#include <ImageSearch.au3>

HotKeySet("+1", "Start")
HotKeySet("!1", "_Exit")

$X = 0
$Y = 0
$X1 = 0
$Y1 = 0
$X2 = 0
$Y2 = 0
$X3 = 0
$Y3 = 0

While 1
Sleep(100)
WEnd

Func Start()
While 1
$cast = _ImageSearch('cast.png', 0, $X, $Y, 0)
$strike = _ImageSearch('strike.png', 0, $X1, $Y1, 0)
$reward = PixelSearch(0, 0, 1370, 730, 0x7F5400)
$rewardok = _ImageSearch('OK.png', 0, $X2, $Y2, 0)
$hook = PixelSearch(0, 0, 1370, 730, 0x826740)
$collect = PixelSearch(0, 0, 1370, 730, 0x3A9B28)
$levelup = _ImageSearch('levelup.png', 0, $X3, $Y3, 0)
If $cast = 1 Then
_cast()
ElseIf $strike = 1 Then
MouseClick("Left", $X1, $Y1, 1, 10)
ElseIf IsArray($reward) = True Then
MouseClick("Left", $reward[0], $reward[1], 1, 10)
Sleep(300)
MouseClick("Left", $X2, $Y2, 1, 10)
ElseIf $rewardok = 1 Then
MouseClick("Left", $X2, $Y2, 1, 10)
ElseIf IsArray($hook) = True Then
MouseClick("Left", $hook[0], $hook[1], 1, 10)
ElseIf IsArray($collect) = True Then
MouseClick("Left", $collect[0], $collect[1], 1, 10)
ElseIf $levelup = 1 Then
MouseClick("Left", $X3, $Y3, 1, 10)
EndIf
WEnd
EndFunc

Func _cast()
Sleep(1500)
MouseClick("Left", $X, $Y, 1, 10)
EndFunc

Func _Exit()
Exit
EndFunc

[alpines]

Just add:

AdLibRegister("PauseScript", 1800000)

Func PauseScript()
	Sleep(5 * 60 * 1000); Pause for 5 Minutes.
EndFunc

This will run PauseScript every 30 minutes and sleeps for 5 minutes.