My Rappelz bot code

[Avignale2]

Hey there, i dont know whats going on here maybe im too tired anybody who knows what there doing like to fix up my code here, its broken like **** i know and it wont work, but i been coding all weekend and my head hurts way too much to think at all, i seriously cant think anymore. some help would be appreciated

Msgbox(64,"Scott's Rappelz Autobot. Codename: Lebanese ****", "Welcome to my Rappelz Autofighter")
If WinExists("Rappelz") Then
while 1
Func Main()
WinActivate ( "Rappelz" )
sleep(5000)
ControlSend("Rappelz", "", "", "{TAB}")
PixelSearch( 746, 34, 925, 47, 0xDBDDDD )
If @error = 1 Then
	ControlSend("Rappelz", "", "", "{TAB}")
	PixelSearch( 746, 34, 925, 47, 0xDBDDDD )
	if @error = 1 Then
		MouseClickDrag ( "Right", 400, 270, 670, 270, 0 )
	EndIf
	call ("Main")
EndIf
ControlSend("Rappelz", "", "", "{F3}")
sleep(50)
ControlSend("Rappelz", "", "", "{F1}")
PixelSearch( 748, 55, 758, 61, 0x281A12, 5 )
while @error = 1
	PixelSearch( 748, 55, 758, 61, 0x281A12, 5 )
	sleep(100)
Wend
ControlSend("Rappelz", "", "", "{F2}")
sleep(500)
ControlSend("Rappelz", "", "", "{F2}")
sleep(350)
ControlSend("Rappelz", "", "", "{F2}")
sleep(500)
ControlSend("Rappelz", "", "", "{F4}")
	sleep(500)
	ControlSend("Rappelz", "", "", "{ALT down}")
	sleep(500)
	ControlSend("Rappelz", "", "", "{4}")
	sleep(500)
	ControlSend("Rappelz", "", "", "{ALT up}")
EndFunc
	
wend
EndIf
Msgbox(64,"Scott's Rappelz Autobot. Codename: Lebanese ****", "UMMM, well you don't have rappelz open?? what do you expect me to do... NOOB!!!")1

remember this is just the start but for now im stuck, any hints would be welcome.