You should set-up Simba following the instructions at the link above. copy and paste it from below into simba. You will need SPS installed for it to run.
Please post the error below if you think it is to do with my script, if you think it is a client problem then post it in the client help section.
Not Currently, but if you can see a better way to achieve some of the things I am doing then feel free to mention them.
:spongebob:
If you wish to download this file for use see the bottom of this post, if you just want to see what this script contains please look here:
Simba Code:
//This script kills goblins in lumbridge, It will even walk back if you die. Give me feedback in the forms. program GoblinKiller; {.include SRL/SRL/Misc/Smart.scar} {.include SRL/SRL.scar} {$i sps/sps.simba} {$i SRL/SRL/Misc/stats.simba} {$i SRL/SRL/misc/paintsmart.scar} {.include SRL/SRL/Skill/Fighting.scar}VarDied, Location, x, y :Integer;Lumbridge, Goblins1, Goblins2, Goblins3: TPoint;WalkGoblins: TPointArray;Colours: TIntegerArray;Ver : String;ConstVersion = 1;NCPColour1 = 5658202; //If the script won't fight the goblins then change theseNCPColour2 = 6335614;NCPColour3 = 4628377;WaitTime = 2000; //Wait Time before attacking another NCPTolerance = 3; //Colour TolerenceINeedHelp = False; //Do you need help setting this script up?procedure DeclarePlayers;begin HowManyPlayers := 1; NumberOfPlayers(HowManyPlayers); CurrentPlayer := 0; Players[0].Name :=''; //use " if you are getting ~ Players[0].Pass :=''; Players[0].Nick :='';//3-4 phrase from your name Ex. "ownage" = "nag" Players[0].Active := True;end;Procedure CheckVersion;Begin Ver := GetPage('http://goblinkiller.webuda.com/Ver'); If Version = StrToInt(Ver) Then Begin WriteLn('You are using the most up to date version -Thank you'); end Else begin WriteLn('Please Update This Script, opening web page...'); OpenWebPage('http://goblinkiller.webuda.com/Redirect.php'); TerminateScript; //Comment out this to use this version anyway end;End;Procedure CheckRandoms;beginFindNormalRandoms;If Not(LoggedIn) Then begin WriteLn('I think we failed a randome - I will just Check'); LoginPlayer; FindNormalRandoms; If Not(LoggedIn) Then begin WriteLn('Client has Logged Out So Probably Failed a Random - Terminating Scrip'); TerminateScript; end end;end;Procedure CheckLocation;begin Wait(4000+Random(2000)) Location := 2; if (SPS_PosOnMM(Lumbridge)) then Location := 0; //lumbridge if (SPS_PosOnMM(Goblins1)) or (SPS_PosOnMM(Goblins2)) or (SPS_PosOnMM(Goblins3)) then Location := 1; //Goblinsend;Procedure WalkToGoblins;begin Writeln('Walking To goblins') WalkGoblins := [Point(4708, 3767), Point(4733, 3767), Point(4753, 3761), Point(4759, 3743), Point(4748, 3723), Point(4731, 3707), Point(4717, 3693), Point(4710, 3676), Point(4698, 3677), Point(4675, 3674), Point(4648, 3678), Point(4625, 3675), Point(4598, 3677), Point(4580, 3676), Point(4565, 3676), Point(4565, 3650)] If(SPS_WalkPath(WalkGoblins)) then WriteLn('At Goblins');end;Procedure RectifyLocation;begin Mouse(254, 309, 10, 5, true); Wait(500+Random(500)); Mouse(544, 24,5,5,true); Wait(1000+Random(200)); If (FindSymbol( x, y, 'fishing shop')) then begin x := x-43 y := y-5 Mouse(x, y,5,5,true); Wait(2000+Random(2000)); end; CheckLocation; case location of 2: begin Writeln('Location Not Recognised - Lets Teleport Home') Mouse(748, 187,5,5,true) Wait(1000+Random(500)) Mouse(575, 230, 5, 5, true) Wait(16000+Random(2000)) end; endend;Procedure Attack;begin If(srl_InFight) then begin //WriteLn('In Fight') x := random(51) case x of 0: HoverSkill('Attack', False); //Beautiful Antiban 1: HoverSkill('Strength', False); 2: HoverSkill('Defence', False); 3: HoverSkill('hitpoints', False); 4: HoverSkill('smithing', False); 5: HoverSkill('woodcutting', False); 6: HoverSkill('firemaking', False); 7: HoverSkill('magic', False); 8: HoverSkill('woodcutting', False); 9: HoverSkill('fishing', False); 10: HoverSkill('prayer', False); 11: HoverSkill('runecrafting', False); 12..15: PickUpMouse; 16..25: RandomMovement; 26..27: RandomRClick; 28..32: BoredHuman; 33: ExamineInv; 34: RandomAngle(True); 35..45: Wait(1000+random(1000)); 46..50: Wait(1000+Random(20000)); end; Wait(2000); end else begin //WriteLn('Clicking Attack') FightNPC(Colours, Tolerance, WaitTime) //attack the goblin end;//to doend;begin If (IneedHelp) then begin WriteLn('Opening Help Page'); OpenWebPage('http://goblinkiller.webuda.com/Help'); TerminateScript; end; CheckVersion; Died := 0 Lumbridge := Point(4706, 3767); Goblins1 := Point(4570, 3650); Goblins2 := Point(4570, 3650); Goblins3 := Point(4570, 3650); Colours := [NCPColour1,NCPColour2,NCPColour3] Smart_Server := 11; Smart_Members := False; Smart_Signed := False; Smart_SuperDetail := False; SetupSRL; cleardebug; WriteLn('***************Goblin Killer by Putonajonny Version '+IntToStr(Version)+'***************'); CheckVersion; DeclarePlayers; LoginPlayer; SPS_Areas := ['11_9']; SPS_Setup(RUNESCAPE_SURFACE, SPS_Areas);// WriteLn('Current Location:')// WriteLn(SPS_GetMyPos); Repeat CheckRandoms; CheckLocation; case location of 0: WalkToGoblins; 1: Attack; 2: RectifyLocation; 3: WriteLn('oh'); else RectifyLocation; end; until(false)end.