Code:program programname; {.include SRL/SRL.scar} const Knifecolor=7171702; Treecolor=1387816; Axehead=6111295; procedure DeclarePlayers; begin HowManyPlayers := 4; NumberOfPlayers(HowManyPlayers); CurrentPlayer := 0; Players[0].Name := 'Username'; Players[0].Pass := 'Password'; Players[0].Nick := 'ame'; Players[0].Active := True; Players[1].Name := 'Username'; Players[1].Pass := 'Password'; Players[1].Nick := 'Nick'; Players[1].Active := True; Players[2].Name := 'Username'; Players[2].Pass := 'Password'; Players[2].Nick := 'Nick'; Players[2].Active := True; Players[3].Name := 'Username'; Players[3].Pass := 'Password'; Players[3].Nick := 'Nick'; Players[3].Active := True; end; procedure logcutting; //This cuts the logs begin if not(FindObjCustom (x, y, ['Wil', 'low'], [Treecolor], 10)) then //Tells it to logout if logs not found Wait(100+random(100)); Tries := Tries + 1; if(Tries = 25)then Logout; Exit; if (FindObjCustom(x, y, ['Wil', 'low'], [Treecolor], 10) then //Tells it to cut logs when found repeat case (Random(2)) of 1: Mouse(x, y, 4, 4,false); ChooseOption('ill'); 2: Mouse(x, y, 4, 4, True); end; until (InvFull) end; procedure DropLogs; // This Drops the logs begin if FindObjCustom(x, y, ['Willow logs'] DropTo(1,28); end; procedure AntiBan; begin if not LoggedIn then Exit; case Random(30) of 1: RandomRClick; 2: HoverSkill('Woodcutting', False); 3: RandomMovement; 4: BoredHuman; 5: AlmostLogout; 6: DoEmote(400 +Random(90)); end; end procedure AntiRandom; begin LampSkill := 'Woodcutting'; FindNormalRandoms; if FindFight then RunAway('N',True,1,5000); end; procedure Loop; begin SetupSRL; repeat logcutting; DropLogs; AntiBan; AntiRandom; until (False) end.
This is the error i get and i do not understand out how to fix it. (I have searched for ways to fix.)
Failed when compiling
Line 41: [Error] (12684:23): Unknown identifier 'x' in script


Reply With Quote



