SRL Archive - Help

How can i input a list of words, and everytime simba performs the main loops it types the next word?

From: cynicz
How can i input a list of words, and everytime simba performs the main loops it types the next word?

how long is the list of words? It may be simplest to create an array of strings and just loop through the array. If the list is MASSIVE then reading from a txt file would make more sense. What are you trying to do? Some sort of spam bot?

actually its 345 lines of words.
its for a pserver, to login, wait XX time, then logout and goto next acc. i planned on using a tx file just dont know how

okay, do you have a script skeleton yet? I'd just like to see the process. I'll look at the include that you can use and get back to you at some point. I'm at work so it might not be super fast

this should help

 procedure DeclarePlayers;
    begin
      HowManyPlayers := 1; // Number of Players to use
      NumberOfPlayers(HowManyPlayers);
      CurrentPlayer := 0; // Player to start with, first one is 0
      Players[0].Name := PlayerNames[PlayerID];
      Writeln(Players[0].Name);
      Players[0].Pass := 'password123'; // Password
      Players[0].Active := True; // True if you are using this player
      Players[0].Pin := ''; // Bank Pin. Leave it if you don't have one.
    end;  

begin
  SetupSRL;
  PlayerNames := ['email@email.co.uk,email1@email.co.uk'];
  for i := 0 to High(PlayerNames) do
     begin
        //mainloop
        inc(i);
     end;

end.  

footballjds gave some nice hints where to look, I suppose I could help by saying that I made a semi-not-really-elaborate post/banter for working with INI files.

well I havent made the process yet, but i know itll be easy as hell basically heres the procedure i want to follow
login account 1,
drop item in first invo spot If successfull then goto logout, else wait 10seconds and repeat.

then under logout press backspace 13 times then goto account or line 2 in the text and click login,

then ill add a little writeln after each loop so it says account1 is done, account2 is done etc
i can do everything myself except for the text file haha

thanks for the 2 responses i didnt reply too,
@xstrap this isnt for real runescape but a private server so idk if that will work, will it?
@jingle i will check that out and try to teach myself EDIT: says i cant access file or page

i appreciate everyones help so far :D

Ah, I see; here's the image I posted, should help complicate things;

will that work on a private server though

seems as if the declare players function is runescape only correct? i need this for a pserv

cynicz, please edit rather then double+ posting, thanks :)

Le Jingle, isnt it possible to just read the next line?

cynicz, take a look at the handbook:
http://docs.villavu.com/simba/scriptref/files.html

From: footballjds
cynicz, please edit rather then double+ posting, thanks :)

Le Jingle, isnt it possible to just read the next line?

cynicz, take a look at the handbook:
http://docs.villavu.com/simba/scriptref/files.html

sorry was on mobile, on computer now, but i read through that and cant figure out how to read 1 whole line, then add a say +1 to count and read the whole next line and typesend it

From: cynicz
sorry was on mobile, on computer now, but i read through that and cant figure out how to read 1 whole line, then add a say +1 to count and read the whole next line and typesend it

try readINI:
http://villavu.com/forum/showthread.php?t=44955

edit: or read this:
http://villavu.com/forum/showthread.php?t=59654

another quick question is there a program that will like allow you to input a base such as "acc " then it adds a number to the end in a 3 digit format?
such ass
inputting smoke
and it returns a list
smoke 001
smoke 002
smoke 003

because all my accounts are the same base and i have 750 accounts, and thats alot to type by hand lol

you can toString an int and amend it to a string in a loop. I'll write up an example and edit quick.

EDIT:
Run this and tell me if I answered your question:

program new;
var
  i: integer;
begin
  for i := 1 to 750 do
  begin
    if i < 10 then Writeln('smoke 00' + IntToStr(i)) else
      if i <100 then Writeln('smoke 0' + IntToStr(i)) else
        if i < 1000 then Writeln('smoke ' + IntToStr(i));
  end;
end.

god you are epic.

From: cynicz
god you are epic.

aha, thanks :spot:

my method worked too -.- no recognition for me lol

From: xtrapsp
my method worked too -.- no recognition for me lol

bah humbug… :P

btw this is resolved. I assisted cynicz and created/modified the script for him.

he was generous enough to make a substantial donation too!