Capture:="test"
Space::Test()

WinOnTop:
   SoundBeep
   Return

RunRunRun:
   TrayTip,, % WinTtlCls
   Sleep, 750
   TrayTip
   Return

Test()
{
   global
   SetTimer, WinOnTop, -1000
   WinTtlCls:=Capture
   Gosub, RunRunRun
}

SetTimer, WinOnTop, 100, WinTtlCls=Capture
Gosub, RunRunRun

SetTimer, WinOnTop, 100
WinTtlCls = Capture
Gosub, RunRunRun

x1:=y1:=0, x2:=(y2:=1200)-200
Path:="c:\boomtime\", Tint:=""

...
Loop
{
   If (v1>Sr)
   {
      SoundPlay, % Path "finish.mp3", 1
      Return
   }
   Else
      MouseMove, h1, v1
   If (A_Cursor!="Unknown")
      v1:=v1+50
   Else
      Break
}
MouseClick,, h1, v1,, 0
Sleep, 500
SameFuncName()
...

SameFuncName()
{
   global
   Loop
      If !SameFuncName2(x, y, x1, y1, x2, y2, "", Path "loaded.png")
         Break
   If !SameFuncName2(x, y, x1, y1, x2, y2, "", Path "error.png")
   {
      SoundPlay, % Path "finish.mp3", 1
      Return
   }
   If !SameFuncName2(x, y, x1, y1, x2, y2, "", Path "ocenena.png")
      Send, !{F4}
   If !SameFuncName2(x, y, x1, y1, x2, y2, "", Path "ocenka.png")
   {
      Send, % ocenka
      Sleep, 500
      MouseClick,, x, y,, 0
      Sleep, 1000
      If !SameFuncName2(x, y, x1, y1, x2, y2, "", Path "zakaz.png")
      {
         Sleep, 500
         Send, % pokupka
         MouseClick,, x, y,, 0
         Sleep, 500
         Send, !{F4}
      }
      Else
         Send, !{F4}
   }
   Sleep, 500
}

SameFuncName2(ByRef OutX, ByRef OutY, X1, Y1, X2, Y2, Variation, FilePath)
{
   ImageSearch, OutX, OutY, X1, Y1, X2, Y2, % Variation . FilePath
   Return, ErrorLevel
}

loop
   {
      ImageSearch, x6, y6, 0, 0, 1000, 1200, C:\boomtime\loaded.png   
      If ErrorLevel = 0
      {
         break
      }
   }
   ImageSearch, x5, y5, 0, 0, 1000, 1200, C:\boomtime\error.png
   If ErrorLevel = 0
   {
      SoundPlay, C:\boomtime\finish.mp3
      Return
   }
   ImageSearch, x4, y4, 0, 0, 1000, 1200, C:\boomtime\ocenena.png
   If ErrorLevel = 0
   {
      send !{f4} 
   }
   ImageSearch, x2, y2, 0, 0, 1000, 1200, C:\boomtime\ocenka.png
   If ErrorLevel = 0
   {
      send %ocenka%
      sleep, 500
      click %x2%, %y2%
      sleep, 1000
      ImageSearch, x3, y3, 0, 0, 1000, 1200, C:\boomtime\zakaz.png
      If ErrorLevel = 0 
      {
         sleep, 500
         send %pokupka%
         click %x3%, %y3%
         sleep, 500  
         send !{f4}
      } 
      Else  
      {
         send !{f4}
      }     
   }
   sleep, 500