First time scripting, trying to make an autocurser.
I cannot seem to get SCAR to click on the spell 'curse'. Any help with that? Also, how does one use DeclarePlayers to login? Any advice would also be appreciated.Code:program Auotcurser; {.include srl/srl.scar} Procedure LoginButton; Begin Mouse(364,171,1,1,true) Wait(1000+Random(1000)) WriteLn('Clicked Existing User Button') end; Procedure UsernamePassType; Begin Mouse(328,260,1,1,true) Wait(1000+Random(1000)) TypeSend('') // username here! wait(1000+Random(200)) TypeSend('') // password here end; Procedure LoginFinish; Begin Mouse(366,366,1,1,true) Wait(3000+Random(2000)) WriteLn('clicked login button') Mouse(380,347,1,1,true) Wait(3000+Random(2000)) end; Procedure CastCurse; Var Ax, Ay : Integer; Begin Begin GameTab(7); Wait(500+Random(600)) ;FindObjCustom(Ax, Ay, ['ast, urse'], [15533737], 15) MMouse(Ax, Ay, 4, 4); If(IsUpText('urse'))Then Mouse(Ax, Ay, 4, 4, true); wait(1000+random(500)) ;FindObjCustom(Ax, Ay, ['onk, orak'], [3752096], 10) Mouse(Ax, Ay, 3, 3, true); end; end; Begin SetupSRL; ActivateClient; LoginButton; UsernamePassType; LoginFinish; repeat CastCurse; until(false) end.![]()



Reply With Quote





. To end all functions and procedures you do a semicolon. Only on the main loop do you do a period.
I got rid of the procedure bit before the "begin" of the main loop, added the period there instead of at the end, so it now works. Yay