buying kb acct sa graveyard ran ?
src allQuote:
$ANSWER=MSGBOX(4,"Ran Bot made by Davey (DaveWorks Co Ltd.)","This Bot is Protected by DaveWorks CO LTD.")
IF $ANSWER=7 THEN
MSGBOX(4096,"DaveWorks Co Ltd.","OK. Bye!")
EXIT
ENDIF
$BLOOP=1
WHILE $BLOOP=1
$TEXT=INPUTBOX("DaveWorks Co Ltd.","Enter Security Password","","*")
IF @ERROR=1 THEN
MSGBOX(4096,"Error","You pressed 'Cancel' - try again!","","*")
ELSE
IF $TEXT<>"nastypanty" THEN
MSGBOX(4096,"Error","You typed in the wrong password - try again!","","*")
ELSE
$BLOOP=0
ENDIF
ENDIF
WEND
MSGBOX(4096,"DaveWorks Co Ltd.","Davey is cute xD. May Tama Ka ^_^")
MSGBOX(4096,"DaveWorks Co Ltd.","Press F1 to Start and ESC to Pause!")
GLOBAL $COUNTER=0
WHILE 1
HOTKEYSET("{F1}","we")
HOTKEYSET("{ESC}","Terminate")
WEND
FUNC WE()
$COUNTER=1
WHILE $COUNTER=1
SEND("qqq")
SEND("www")
SEND("eee")
SEND("111")
SEND("222")
SEND("333")
SEND("444")
SEND("555")
SEND("666")
MOUSECLICK("right")
WEND
ENDFUNC
FUNC TERMINATE()
$COUNTER=0
ENDFUNC