Basically, I thought I fixed the anti-leech on this script but I keep getting this same problem, I don't know where to put the semi-colon :S
The error I'm getting: [Error] C:\Users\Ryan\Downloads\CurseRelease.simba(41:1): Semicolon (';') expected at line 40
Compiling failed.
Code:program Curser; {$I SRL/SRL.Simba} {$I SRL/SRL/Misc/Debug.Simba} {$I P07Include.Simba} var x,y:Integer; procedure Friendchat; begin mmouse(671,509,5,5); wait(randomrange(10,100)); clickmouse2(mouse_left); wait(randomrange(500,5000)); mmouse(833,209,5,5); wait(randomrange(10,50)); clickmouse2(mouse_left); end; procedure CheckInvo; begin mmouse(735,212,5,5); wait(randomrange(10,150)); clickmouse2(mouse_left); wait(randomrange(500,5000)); mmouse(835,206,5,5); wait(randomrange(25,50)); clickmouse2(mouse_left); end; procedure ClickCurse; begin WriteLn('Clicking curse'); mmouse(659,261,5,5); clickmouse2(mouse_Left); wait(randomrange(50,200)); end procedure CurseMonk; begin if P07_FindObj(x,y, 'Monk',3423118,5) then begin mmouse(x,y,2,2); clickmouse2(mouse_left); wait(randomrange(1000,2000)); end end; Function AntiBan: Boolean; begin case random(300) of 1: FriendChat; 2: P07_MakeCameraAngleHigh; 3: P07_MakeCompassSouth; 4: P07_MakeCompassEast; 5: P07_MakeCompassWest; 6: MMouse(random(700), random(400), 0, 0); 7: CheckInvo; end; end; begin SetupP07Include; ActivateClient; wait(randomrange(500,2000)); repeat ClickCurse; CurseMonk; antiban; until(false) end.


Reply With Quote