auto it image search hjälp

#include <MsgBoxConstants.au3>
#include <ImageSearch2015.au3>
;HotKeySet(p,"checkimage")
HotKeySet("p", "join_adventure")
HotKeySet("o", "interact")
HotKeySet("c", "close")
HotKeySet("l", "teleport")
HotKeySet("k", "ress")

Local $teleportbutton[2]
Global $ressbutton[2] = ["1", "2"]
Global $aPos[2]
Global $bPos[2]
local $x1=0
local $y1=0
Local $i = 0





While 1
Sleep(1000)
checkimage($y1,$x1,$i)
WEnd



Func save_teleport_button($teleportbutton)
	$teleportbutton=MouseGetPos()
	EndFunc

Func save_ress_button($ressbutton)
	$ressbutton=MouseGetPos()

EndFunc

Func stoploop($go)
   $go = 0
   EndFunc



Func restartloop($go)
   $go = 1
   EndFunc
func stop_antiafk($go)
   $go = 0
EndFunc

Func close()
  Exit
EndFunc



func anti_afk()
   Sleep(1500)
   Send("5")
EndFunc

func join_adventure()
   Send(".")
   MouseMove(3437,628)
   MouseClick("left")
   Sleep(5000)
   	  MouseMove(2788,659.)
	  MouseClick("left")
EndFunc

   Func savemousecoords($aPos)
	  $aPos=MouseGetPos()
	  EndFunc

Func savemousecoords_b($bPos)
	  $bPos=MouseGetPos()
   EndFunc

   Func teleport_adventure()
	  	  MouseMove(2801,619)
	  MouseClick("left")
   EndFunc


   Func start($go)
   EndFunc
5
Func teleport()

  MouseMove(2810,647)
  MouseClick("left")
  Sleep(2000)
EndFunc


Func checkimage($y1,$x1,$i)
do
$result = _ImageSearch("C:\Users\benne\OneDrive\skrivbord\ImageSearch2015\teleport5.png",1,$x1,$y1,0)
until $result = 1;

if $result=1 Then
    MouseMove($x1,$y1,3)
    MouseClick("left", $x1,$y1, 1)
    WinWait("[Title:TightVNC File Transfer]", "", 10)
 else
    MsgBox(0,"MSG","End")
EndIf
EndFunc