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 crap 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
remember this is just the start but for now im stuck, any hints would be welcome.
Code:
Msgbox(64,"Scott's Rappelz Autobot. Codename: Lebanese Slut", "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 Slut", "UMMM, well you don't have rappelz open?? what do you expect me to do... NOOB!!!")1