hey it says Line 60 error : 'then' expected in script....
heres the script
Code:program PowerChopper; {.include SRL/SRL.scar} ////////////////////////////////////// // Instructions // // 1.Start anywhere by trees. // // 2.Set the color of the tree. // // 3.Equip the axe of your choice. // // 4.Set the new RS window. // // 5.Hit Run! I Hope you enjoy // ////////////////////////////////////// /////// ////// // //// //// // // // // // // // // // //// // // // // // // // // ///////// // //// // // ////// // // // // // ///////////////////Setup///////////// const Normal=798760; //change if it doesnt find the tree ///////////////Don't Touch Below This////////////////////// procedure FindTree; var i:Integer; begin if(FindObj(x,y,'hop',Normal,10))then begin Mouse(x,y,5,5,True) repeat Wait(2000) i:=i+1 until(InChat('logs'))or(I>=5); end; i:=0 end; procedure Drop; begin DropAll; end; ///////////////Anti-Randoms////////////////// procedure Randoms; begin Findnormalrandoms; end; //////////////Anti-Ban/////////////////// procedure DontBanMe(mins: Integer); var DBanMe: Integer; begin if (TimeFromMark(PickUpMouseMark)) /1000) / 60 >=mins then DBanMe := Random(12); case DBanMe of 0: RandomRClickEvery(2 + Random(10)); 1: HoverSkill('random', False); 2:RotateEvery(20 + Random(10)); 3.LeaveScreenEvery(5 + Random(5)); 4:HoverEvery(15 + Random(5), 'random'); 5:PickUpMouse; 6:BoredEvery(9 + Random(24)); 7:DragItem(1, 1 + Random(18)); 8:GameTab(1 + Random(12)); 9:DoEmote(1 + Random(20)); 10: PolyGlotTalk; end; end; ///////////////////Main Loop//////////////////// begin SetupSRL; repeat repeat FindTree; until(invfull); DropAll; until(false) end.




Reply With Quote





