SRL Archive - First Scripts

MFS Fally Teleporter With Anti Randoms


Fruity-Lo0py

2007-09-24 13:59:21

Ok so heres, what you do, enter your username, password and nickname into the DeclarePlayers procedure, drag cross hairs onto RS then press Play, has a neat little intro with some cool features.

Enter the amount of teleports you have into Integers[0] and make sure you have the correct runes.

:spot:

ShowerThoughts

2007-09-24 14:09:02

you could do somthing like

procedure StartTeleing;
begin
wait(200)
GameTab(7);
wait(200)
Repeat
case blablabla(5) of
fally: cast('fally')
lumby:cast('lumby')
FindFastRandoms;
Teleing := Teleing + 1;
End;
Until(Teleing = Players[CurrentPlayer].Integers[0])
end;


just use an case then you can do all the spells ;)
not working just gave an idea

King of Knives

2007-09-24 14:15:01

By far NOT the worst first script I've ever seen.

I don't think you need to use LoadDTMs when there are none, though ;)
Also, if you know how, try and make it use more than one player. When it's done with the first use this: NextPlayer(false)
and then use LoginPlayer;
That will change user, and login the next and do that users demand.

But as hermpie suggested, a case would be nice. Like this perhaps:
Procedure TeleportAndStuff;
var
Teles: Integer;
S: String;
begin
S:= Players[CurrentPlayer].Strings[0]
repeat
case Lowercase(S) of
'falador','fally': Cast('Falador Teleport')
'varrock': Cast('Varrock Teleport')
// And so on
end;
Teles:= Teles + 1;
until(Teles >= Players[CurrentPlayer].Integers[0])
end;
Cases are extremely helpful tools. And they look nice :D

-Knives

Fruity-Lo0py

2007-09-24 14:17:29

I thought about changing the Strings[0] To what ever tele you wanted to do and change the
if(Players[CurrentPlayer].Strings[0] = 'Varrock') then
begin
Cast('varrock teleport');
and so on and so forth, would that work?

Fruity-Lo0py

2007-09-24 14:18:32

Thanks king this was really for my own use because i had over 15k f2p teles and fally is the best lol so I decided to use :)

King of Knives

2007-09-24 14:48:06

NP :P
It's a good thing to be able to script, when you need to tele 15k times :P
Scripts for the community should be able to satisfy more needs, when you get to release some bigger ones :P

And please don't doublepost. Edit the first post instead, next time :D

-Knives

Fruity-Lo0py

2007-09-24 15:09:10

Ok sorry.

Dangerous Garden Tools

2007-09-24 19:34:59

You might want to add wizzups abyss random ;)