SRL Archive - First Scripts

auto atk monster of selected color caotom work + added feature so its less detectable
auto eat any food*not my work
added custom antibans less detectable then befor
cons: may get lost often if not closed area work better





got helped by checking others scripts and paste couple of things big thx to caotom not very proud of it

dont use it next to players …unless u check chat often

outdated:reason eoc still work but less effective

So where is the deep info about setting it up. I don't know what you are talking about and how it works.

srry ill make it more friendly
40 to 52 str so far using this

feel free to edit and improve it if u feel like it !
would love to see the result



idea: answering to player talking in chat(i failed hard)

little bit of an error there, you used optionexists("Goblin"); if its a universal fighter surely that should be attack or something. also don't rely on waits to finish attacking an npc, use something like "While srl_inFight do Antiban;" etc. another improvement you could make would be looking at cases. you could use this in your MainLoop procedure as you could search for the npc's in a random order rather then a pattern.
Edit: All in all a pretty good attempt :) keep learning

in fight antiban…fine ill do that






here u go thx to u

procedure MainLoop;
begin
  While srl_inFight do Antiban;

////begin while srlinfight do antiban end else; would fit better?
      Case Random(2) Of


0:
   begin
      findman1;
         wait(100+random(3000));
          end;


1:
   begin
      findman2;
         wait(100+random(3000));
          end;
2:
  begin
    findman3;
       wait(100+random(3000));
                end;
       
     end;


end;

anything else plz with examples :D

Use simba tags around your text^

Use simba tags around your text^

god i fail :D

From: alucard123
god i fail :D

you'll get better dont worry :)

^^What he said bro. My first script was horrible… :(

ill test it

try it now its much better <3 getting almost pro
if u vote No i did like constructive comments

can some1 tell me how can i SendKey('CurrentStengthLevel')

From: alucard123
can some1 tell me how can i SendKey('CurrentStengthLevel')

procedure saystr;
var
  str, t : integer;
begin
  t := getcurrenttab;
  str := GetSkillLevel('strength');
  writeln('typeing our strength level which is' +tostr(str));
  case random(3) of
    0: typesend('im '+tostr(str)+' strength lol');
    1: typesend('my str lvl is '+tostr(str));
    2: typesend(tostr(str)+' str sucks');
  end;
  gametab(t);
end;  

From: Ollybest

procedure saystr;
var
  str, t : integer;
begin
  t := getcurrenttab;
  str := GetSkillLevel('strength');
  writeln('typeing our strength level which is' +tostr(str));
  case random(3) of
    0: typesend('im '+tostr(str)+' strength lol');
    1: typesend('my str lvl is '+tostr(str));
    2: typesend(tostr(str)+' str sucks');
  end;
  gametab(t);
end;  

ty so much i really needed example of
str := GetSkillLevel('strength');
and
(im '+tostr(str)+' strength lol)


also
???wat will this do ?check current gametab then nothing?


var
t := getcurrenttab;
begin
gametab(t);
end;

From: alucard123
ty so much i really needed example of

 str := GetSkillLevel('strength');    
and
(im '+tostr(str)+' strength lol)
[SIMBA]

[SIMBA]  t := getcurrenttab;
 gametab(t);[SIMBA]  ???wat will this do ?check current gametab then nothing?

He just had it set to go back to the game tab it was already on before you checked your stats

From: Ashaman88
He just had it set to go back to the game tab it was already on before you checked your stats

^ Thanks :P

It just reverts back to the gametab you were previously on since your switching to the skill tab to get your strength level.