Ok, Im making a script, theres a constI want to make 1 procedure that will do the location that the user has chosen, how?SCAR Code:TransportLocation = 'Camelot'; {-->Lumbridge,Varrock,Falador,Camelot and Ardounge.}
Ok, Im making a script, theres a constI want to make 1 procedure that will do the location that the user has chosen, how?SCAR Code:TransportLocation = 'Camelot'; {-->Lumbridge,Varrock,Falador,Camelot and Ardounge.}
Could explain a bit? Lol
Do what?
use a case function
for example
SCAR Code:procedure casttele;
begin
case transportlocation of
'camelot' : castspell('camelot');
'lumbridge' : castspell('lumbridge');
end;
end;
dont forget to include magic.scar
Blank!
Its a transport script, you choose between 5 locs to transport to, and instead of making 5 diff procedures for each loc, id like to make the script to read what the user chose and then use that to run the script like
I choose camelot,the script sees it and then runs the ''camelot'' part and starts the transporting
Edit: Thx waddo, Ill try
Edit2: Waddo, why the 2 End; ?
a case needs an end
case sumit of
stuff
end;
include
{.include srl/srl/skill/magic.scar}
you can also do
SCAR Code:case....
'camelot' :cast(27);
end;
spel numbers here
1: TheSpell := 'Home Teleport';
2: TheSpell := 'Wind Strike';
3: TheSpell := 'Confuse';
4: TheSpell := 'Bolt Enchantment';
5: TheSpell := 'Water Strike';
6: TheSpell := 'Enchant Level 1 Jewelry';
7: TheSpell := 'Earth Strike';
8: TheSpell := 'Weaken';
9: TheSpell := 'Fire Strike';
10: TheSpell := 'Bones to Bananas';
11: TheSpell := 'Wind Bolt';
12: TheSpell := 'Curse';
13: TheSpell := 'Bind';
14: TheSpell := 'Low Level Alchemy';
15: TheSpell := 'Water Bolt';
16: TheSpell := 'Varrock Teleport';
17: TheSpell := 'Enchant Level 2 Jewelry';
18: TheSpell := 'Earth Bolt';
19: TheSpell := 'Lumbridge Teleport';
20: TheSpell := 'Telekinetic grab';
21: TheSpell := 'Fire Bolt';
22: TheSpell := 'Falador Teleport';
23: TheSpell := 'Crumble Undead';
24: TheSpell := 'House teleport';
25: TheSpell := 'Wind Blast';
26: TheSpell := 'Superheat Item';
27: TheSpell := 'Camelot Teleport';
28: TheSpell := 'Water Blast';
29: TheSpell := 'Enchant Level 3 Jewelry';
30: TheSpell := 'Iban Blast';
31: TheSpell := 'Snare';
32: TheSpell := 'Magic Dart';
33: TheSpell := 'Ardougne teleport';
34: TheSpell := 'Earth Blast';
35: TheSpell := 'High Level Alchemy';
36: TheSpell := 'Charge Water Orb';
37: TheSpell := 'Enchant Level 4 Jewelry';
38: TheSpell := 'Watchtower Teleport';
39: TheSpell := 'Fire Blast';
40: TheSpell := 'Charge Earth Orb';
41: TheSpell := 'Bones to Peaches';
42: TheSpell := 'Saradomin Strike';
43: TheSpell := 'Claws of Guthix';
44: TheSpell := 'Flames of Zamorak';
45: TheSpell := 'Trollheim Teleport';
46: TheSpell := 'Wind Wave';
47: TheSpell := 'Charge Fire Orb';
48: TheSpell := 'Ape Atoll teleport';
49: TheSpell := 'Water Wave';
50: TheSpell := 'Charge Air Orb';
51: TheSpell := 'Vulnerability';
52: TheSpell := 'Enchant Level 5 Jewelry';
53: TheSpell := 'Earth Wave';
54: TheSpell := 'Enfeeble';
55: TheSpell := 'Teleother Lumbridge';
56: TheSpell := 'Fire Wave';
57: TheSpell := 'Entangle';
58: TheSpell := 'Stun';
59: TheSpell := 'Charge';
60: TheSpell := 'Teleother Falador';
61: TheSpell := 'Tele Block';
62: TheSpell := 'Enchant Level 6 Jewelry ';
63: TheSpell := 'Teleother Camelot';
Blank!
ah, kk ty, This is how far ive comeSCAR Code:program New;
{.include srl/srl.scar}
{.include srl/srl/Skill/Magic.scar}
{.include srl/srl/misc/users.scar}
{-_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_-
====---> I have used P1nky's Teleporter so some credits to him.
====---> Teleport locations: Lumbridge,Varrock,Falador,Camelot and Ardounge.
====---> Members should use Camelot transport due to low cost of runes.
====---> This script has Abbys solver.
-_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_-}
Const
TransportTime = 3000; {--> Time between Transports; 3000-6000 advised}
Transports = 100; {--> How many times to Transport?}
TransportLocation = 'Camelot'; {-->Lumbridge,Varrock,Falador,Camelot and Ardounge.}
{-_-_-_-_-_-_-_-_-_-_-_-_-_-_Danger: Do not touch below!-_-_-_-_-_-_-_-_-_-_-_-_}
Var
TransportTime,Transports: Integer;
Procedure Transport;
Begin
Case TransportLocation of
'Camelot' : Castspell('Camelot');
Wait(TransportTime + random(1500));
end;
end;
Procedure Signature;
Begin
Writeln ('-------------------------------------------------------------------');
Writeln (' _ _______ _______ ');
Writeln(' ( ( /|( ____ \|\ /||\ /|( ___ )|\ /|');
Writeln(' | \ ( || ( \/( \ / )| ) ( || ( ) || ) ( |');
Writeln(' | \ | || (__ \ (_) / | (___) || | | || | | |');
Writeln(' | (\ \) || __) ) _ ( | ___ || | | || | | |');
Writeln(' | | \ || ( / ( ) \ | ( ) || | | || | | |');
Writeln(' | ) \ || (____/\( / \ )| ) ( || (___) || (___) |');
Writeln(' |/ )_)(_______/|/ \||/ \|(_______)(_______)');
Writeln ('-------------------------------------------------------------------');
end;
begin
SetupSRL;
Signature;
Transport;
end.
But I get this error..Line 23: [Error] (15370:1): Duplicate identifier 'TransportTime' in script
Const
TransportTime = 3000; {--> Time between Transports; 3000-6000 advised}
Transports = 100; {--> How many times to Transport?}
TransportLocation = 'Camelot'; {-->Lumbridge,Varrock,Falador,Camelot and Ardounge.}
{-_-_-_-_-_-_-_-_-_-_-_-_-_-_Danger: Do not touch below!-_-_-_-_-_-_-_-_-_-_-_-_}
Var
TransportTime,Transports: Integer;
cant have a var and const with same name, delete the variables
a constant doent need a data type as it is auto set
but add another variable telportscast:integer;
also dont forget to use
repeat
case and wait
inc(teleportscast);
until teleportscast>=transports;
or for teleportscast:= 0 to transports do
Transport;
Blank!
Ok, now its looking like thisSCAR Code:program New;
{.include srl/srl.scar}
{.include srl/srl/Skill/Magic.scar}
{.include srl/srl/misc/users.scar}
{-_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_-
====---> I have used P1nky's Teleporter so some credits to him.
====---> Teleport locations: Lumbridge,Varrock,Falador,Camelot and Ardounge.
====---> Members should use Camelot transport due to low cost of runes.
====---> This script has Abbys solver.
-_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_-}
Const
TransportTimez = 3000; {--> Time between Transports; 3000-6000 advised}
Transportz = 100; {--> How many times to Transport?}
TransportLocation = 'Camelot'; {-->Lumbridge,Varrock,Falador,Camelot and Ardounge.}
{-_-_-_-_-_-_-_-_-_-_-_-_-_-_Danger: Do not touch below!-_-_-_-_-_-_-_-_-_-_-_-_}
Var
TransportTime,Transports: Integer;
Procedure Transport;
Begin
Case TransportLocation of
'Camelot' : Castspell('Camelot');
Wait(TransportTime + random(1500));
end;
end;
Procedure Signature;
Begin
Writeln ('-------------------------------------------------------------------');
Writeln (' _ _______ _______ ');
Writeln(' ( ( /|( ____ \|\ /||\ /|( ___ )|\ /|');
Writeln(' | \ ( || ( \/( \ / )| ) ( || ( ) || ) ( |');
Writeln(' | \ | || (__ \ (_) / | (___) || | | || | | |');
Writeln(' | (\ \) || __) ) _ ( | ___ || | | || | | |');
Writeln(' | | \ || ( / ( ) \ | ( ) || | | || | | |');
Writeln(' | ) \ || (____/\( / \ )| ) ( || (___) || (___) |');
Writeln(' |/ )_)(_______/|/ \||/ \|(_______)(_______)');
Writeln ('-------------------------------------------------------------------');
end;
begin
SetupSRL;
Signature;
Transport;
end.
and I also get this errorit might be cuz of the 'Camelot' thing but if i put in Castspell (27) ill get this error..Line 28: [Error] (15375:33): Type mismatch in scriptI think its working with the (27); but theres something wrong withLine 29: [Error] (15376:35): colon (':') expected in script, gota go now but ill be backWait(TransportTimez + random(1500));![]()
becauseyou its not camelot
spel numbers here
1: TheSpell := 'Home Teleport';
2: TheSpell := 'Wind Strike';
3: TheSpell := 'Confuse';
4: TheSpell := 'Bolt Enchantment';
5: TheSpell := 'Water Strike';
6: TheSpell := 'Enchant Level 1 Jewelry';
7: TheSpell := 'Earth Strike';
8: TheSpell := 'Weaken';
9: TheSpell := 'Fire Strike';
10: TheSpell := 'Bones to Bananas';
11: TheSpell := 'Wind Bolt';
12: TheSpell := 'Curse';
13: TheSpell := 'Bind';
14: TheSpell := 'Low Level Alchemy';
15: TheSpell := 'Water Bolt';
16: TheSpell := 'Varrock Teleport';
17: TheSpell := 'Enchant Level 2 Jewelry';
18: TheSpell := 'Earth Bolt';
19: TheSpell := 'Lumbridge Teleport';
20: TheSpell := 'Telekinetic grab';
21: TheSpell := 'Fire Bolt';
22: TheSpell := 'Falador Teleport';
23: TheSpell := 'Crumble Undead';
24: TheSpell := 'House teleport';
25: TheSpell := 'Wind Blast';
26: TheSpell := 'Superheat Item';
27: TheSpell := 'Camelot Teleport';
28: TheSpell := 'Water Blast';
29: TheSpell := 'Enchant Level 3 Jewelry';
30: TheSpell := 'Iban Blast';
31: TheSpell := 'Snare';
32: TheSpell := 'Magic Dart';
33: TheSpell := 'Ardougne teleport';
34: TheSpell := 'Earth Blast';
35: TheSpell := 'High Level Alchemy';
36: TheSpell := 'Charge Water Orb';
37: TheSpell := 'Enchant Level 4 Jewelry';
38: TheSpell := 'Watchtower Teleport';
39: TheSpell := 'Fire Blast';
40: TheSpell := 'Charge Earth Orb';
41: TheSpell := 'Bones to Peaches';
42: TheSpell := 'Saradomin Strike';
43: TheSpell := 'Claws of Guthix';
44: TheSpell := 'Flames of Zamorak';
45: TheSpell := 'Trollheim Teleport';
46: TheSpell := 'Wind Wave';
47: TheSpell := 'Charge Fire Orb';
48: TheSpell := 'Ape Atoll teleport';
49: TheSpell := 'Water Wave';
50: TheSpell := 'Charge Air Orb';
51: TheSpell := 'Vulnerability';
52: TheSpell := 'Enchant Level 5 Jewelry';
53: TheSpell := 'Earth Wave';
54: TheSpell := 'Enfeeble';
55: TheSpell := 'Teleother Lumbridge';
56: TheSpell := 'Fire Wave';
57: TheSpell := 'Entangle';
58: TheSpell := 'Stun';
59: TheSpell := 'Charge';
60: TheSpell := 'Teleother Falador';
61: TheSpell := 'Tele Block';
62: TheSpell := 'Enchant Level 6 Jewelry ';
63: TheSpell := 'Teleother Camelot';
its camlot teleport
and to do with number
it is cast(27);
not castspell
also
SCAR Code:case
stuff
end;
wait
else it wont wokr
Edit: delete Var
TransportTime,Transports: Integer;
there not needed
Blank!
i fixed it for u, you will need to add antiban cos there is nothing in it, also failsafes and randomness will needed to be added but here it is
SCAR Code:program New;
{.include srl/srl.scar}
{.include srl/srl/Skill/Magic.scar}
{.include srl/srl/misc/users.scar}
{-_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_-
====---> I have used P1nky's Teleporter so some credits to him.
====---> Teleport locations: Lumbridge,Varrock,Falador,Camelot and Ardounge.
====---> Members should use Camelot transport due to low cost of runes.
====---> This script has Abbys solver.
-_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_-}
Const
TransportTime = 3000; {--> Time between Transports; 3000-6000 advised}
Transports = 100; {--> How many times to Transport?}
TransportLocation = 'Varrock'; {-->Lumbridge,Varrock,Falador,Camelot and Ardounge.}
{-_-_-_-_-_-_-_-_-_-_-_-_-_-_Danger: Do not touch below!-_-_-_-_-_-_-_-_-_-_-_-_}
Var
SpellToCast, Casted: Integer; // removed vars that were not needed
Procedure DeclarePlayers; // added declare players so u can actually use the script
begin
HowManyPlayers := 1;//Change this accordinly
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
Players[0].name := name;
Players[0].pass := pass;
Players[0].nick := 'nick'; //gonna give you up
Players[0].active := true;
end;
Procedure Transport;
Begin
Case TransportLocation of //addded spells and numbers
'Lumbridge' : SpellToCast :=19;
'Varrock' : SpellToCast :=16;
'Falador' : SpellToCast :=22;
'Camelot' : SpellToCast :=27;
'Ardounge' : SpellToCast :=33;
end;
end;
Procedure SpellCast;
begin
if (not(loggedin)) then exit; // makes sure you are logged in
Casted := 0;
Transport;
repeat
GameTab(7); // changes to magic tab
CastSpell(SpellToCast); // casts spell
casted := casted + 1;
Wait(TransportTime + random(1500));
until (casted=Transports);
NextPlayer(False); // This will switch players and will switch the current player to not active
end;
Procedure Signature;
Begin
Writeln ('-------------------------------------------------------------------');
Writeln (' _ _______ _______ ');
Writeln(' ( ( /|( ____ \|\ /||\ /|( ___ )|\ /|');
Writeln(' | \ ( || ( \/( \ / )| ) ( || ( ) || ) ( |');
Writeln(' | \ | || (__ \ (_) / | (___) || | | || | | |');
Writeln(' | (\ \) || __) ) _ ( | ___ || | | || | | |');
Writeln(' | | \ || ( / ( ) \ | ( ) || | | || | | |');
Writeln(' | ) \ || (____/\( / \ )| ) ( || (___) || (___) |');
Writeln(' |/ )_)(_______/|/ \||/ \|(_______)(_______)');
Writeln ('-------------------------------------------------------------------');
end;
begin
SetupSRL;
Signature;
DeclarePlayers;
SpellCast;
// Add everything else u are going to make
end.
if u dont understand what i have done just ask me
Ah man! thx! gona edit my script, ive done this far -.-SCAR Code:program Transporter;
{.include srl/srl.scar}
{.include srl/srl/Skill/Magic.scar}
{.include srl/srl/misc/users.scar}
{-_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_-
====---> I have used P1nky's Teleporter so some credits to him.
====---> Teleport locations: Lumbridge,Varrock,Falador,Camelot and Ardounge.
====---> Members should use Camelot transport due to low cost of runes.
====---> This script has Abbys solver.
====---> This script will go far with help with SRL's help :)
-_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_-}
Const
TransportTimez = 3000; {--> Time between Transports; 3000-6000 advised}
Transportz = 3; {--> How many times to Transport?}
TransportLocation = 'Lumbridge'; {-->Lumbridge,Varrock,Falador,Camelot and Ardounge.}
{-_-_-_-_-_-_-_-_-_-_-_-_-_-_Danger: Do not touch below!-_-_-_-_-_-_-_-_-_-_-_-_}
Var
TransportTime,Transports: Integer;
Procedure Lumbridge;
Begin
Cleardebug;
Writeln ('You have chosen Lumbridge as location to transport to.');
Writeln ('Runes needed for Lumbridge Transport : 1 Earth,3 Air,1 Law Runes.');
Wait(TransportTimez + random(1500));
Cast ('Lumbridge');
end;
Procedure Varrock;
Begin
Cleardebug;
Writeln ('You have chosen Varrock as location to transport to.');
Writeln ('Runes needed for Varrock Transport : 1 Fire,3 Air,1 Law Runes.');
Wait(TransportTimez + random(1500));
Cast ('Varrock');
end;
Procedure Falador;
Begin
Cleardebug;
Writeln ('You have chosen Falador as location to transport to.');
Writeln ('Runes needed for Falador Transport : 1 Water,3 Air,1 Law Runes.');
Wait(TransportTimez + random(1500));
Cast ('Falador');
end;
Procedure Camelot;
Begin
Cleardebug;
Writeln ('You have chosen Camelot as location to transport to.');
Writeln ('Runes needed for Camelot Transport : 5 Air,1 Law Runes.');
Writeln ('It is advised to use a Staff of Air to save money and runes.');
Wait(TransportTimez + random(1500));
Cast ('Camelot');
end;
Procedure Ardounge;
Begin
Cleardebug;
Writeln ('You have chosen Ardounge as location to transport to.');
Writeln ('Runes needed for Ardounge Transport : 2 Water,2 Law Runes.');
Wait(TransportTimez + random(1500));
Cast ('Ardounge');
end;
Function TransportLocatiion: Integer; {Idea from: P1nky's Everywhere teler}
Begin
Case Uppercase(TransportLocation) Of
'Lumbridge': Lumbridge;
'Varrock': Varrock;
'Falador': Falador;
'Camelot': Camelot;
'Ardounge': Ardounge;
End;
End;
Procedure Signature;
Begin
Writeln ('-------------------------------------------------------------------');
Writeln (' _ _______ _______ ');
Writeln(' ( ( /|( ____ \|\ /||\ /|( ___ )|\ /|');
Writeln(' | \ ( || ( \/( \ / )| ) ( || ( ) || ) ( |');
Writeln(' | \ | || (__ \ (_) / | (___) || | | || | | |');
Writeln(' | (\ \) || __) ) _ ( | ___ || | | || | | |');
Writeln(' | | \ || ( / ( ) \ | ( ) || | | || | | |');
Writeln(' | ) \ || (____/\( / \ )| ) ( || (___) || (___) |');
Writeln(' |/ )_)(_______/|/ \||/ \|(_______)(_______)');
Writeln ('-------------------------------------------------------------------');
end;
begin
SetupSRL;
Signature;
TransportLocatiion;
end.
also when i script i do the script itself first and then the findrandoms; and log in player and stuffthats the easy stuff, hard stuff first
![]()
try this
SCAR Code:program New;
{.include srl/srl.scar}
{.include srl/srl/Skill/Magic.scar}
{.include srl/srl/misc/users.scar}
{-_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_-
====---> I have used P1nky's Teleporter so some credits to him.
====---> Teleport locations: Lumbridge,Varrock,Falador,Camelot and Ardounge.
====---> Members should use Camelot transport due to low cost of runes.
====---> This script has Abbys solver.
-_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_--_-_-_-_-_-_-}
Const
TransportTime = 3000; {--> Time between Transports; 3000-6000 advised}
Transports = 100; {--> How many times to Transport?}
TransportLocation = 'Varrock'; {-->Lumbridge,Varrock,Falador,Camelot and Ardounge.}
{-_-_-_-_-_-_-_-_-_-_-_-_-_-_Danger: Do not touch below!-_-_-_-_-_-_-_-_-_-_-_-_}
Var
SpellToCast, Casted: Integer; // removed vars that were not needed
Write : string;
Procedure DeclarePlayers; // added declare players so u can actually use the script
begin
HowManyPlayers := 1;//Change this accordinly
NumberOfPlayers(HowManyPlayers);
CurrentPlayer := 0;
Players[0].name := 'name';
Players[0].pass := 'pass';
Players[0].nick := 'nick';
Players[0].active := true;
end;
Procedure Transport;
Begin
Case TransportLocation of //addded spells and numbers
'Lumbridge' : SpellToCast :=19;
'Varrock' : SpellToCast :=16;
'Falador' : SpellToCast :=22;
'Camelot' : SpellToCast :=27;
'Ardounge' : SpellToCast :=33;
end;
end;
procedure WriteStuff; //instead of calling different procedures for each spell
begin
case TransportLocation of
'Lumbridge' : Write := ('Runes needed for Lumbridge Transport 1 Earth,3 Air,1 Law Runes .');
'Varrock' : Write := ('Runes needed for Varrock Transport 1 Fire,3 Air,1 Law Runes.');
'Falador' : Write := ('Runes needed for Falador Transport 1 Water,3 Air,1 Law Runes.');
'Camelot' : Write := ('Runes needed for Camelot Transport : 5 Air,1 Law Runes.');
'Ardounge' : Write := ('Runes needed for Ardounge Transport 2 Water,2 Law Runes.');
end;
end;
Procedure SpellCast;
begin
if (not(loggedin)) then exit; // makes sure you are logged in
Casted := 0;
Transport;
repeat
GameTab(7); // changes to magic tab
CastSpell(SpellToCast); // casts spell
casted := casted + 1;
Wait(TransportTime + random(1500));
until (casted=Transports);
NextPlayer(False); // This will switch players and will switch the current player to not active
end;
Procedure Signature;
Begin
Writeln ('-------------------------------------------------------------------');
Writeln (' _ _______ _______ ');
Writeln(' ( ( /|( ____ \|\ /||\ /|( ___ )|\ /|');
Writeln(' | \ ( || ( \/( \ / )| ) ( || ( ) || ) ( |');
Writeln(' | \ | || (__ \ (_) / | (___) || | | || | | |');
Writeln(' | (\ \) || __) ) _ ( | ___ || | | || | | |');
Writeln(' | | \ || ( / ( ) \ | ( ) || | | || | | |');
Writeln(' | ) \ || (____/\( / \ )| ) ( || (___) || (___) |');
Writeln(' |/ )_)(_______/|/ \||/ \|(_______)(_______)');
Writeln ('-------------------------------------------------------------------');
wait(1000); // added the wait time so the sig stays there for a while
ClearDebug; // gets rid of the siggy
end;
begin
SetupSRL;
Signature;
WriteStuff; // Added to main loop so it actually gets used
WriteLn(Write); // Write what u have chosen in debug box or u can use status
DeclarePlayers;
SpellCast;
// Add everything else u are going to make
end.
let me know if u like it or understand what i did,because the way you did it you would have to call a procedure for each spell, this way is just easier
also they way u wrote the procedure for each spell would mean that the spell is only used once in the whole script, so have a look at the cast spell procedure i created and see how i used repeat and until to cast the spell
just remember to add failsafes to each procedure as u go that way u wont forget about it and have endless loops in your script =]also when i script i do the script itself first and then the findrandoms; and log in player and stuffthats the easy stuff, hard stuff first
![]()
SCAR Code:Procedure Magiclvl;
var Mlvl: integer;
begin;
if(not loggedin)then exit;
gametab(2);
MLvl := GetSkillLevel('Magic');
writeln('Your Magic Level is ' +inttostr(Mlvl));
if (MLvl <= 25) then TransportLocation:='Varrock' else;
if (MLvl <= 31) then TransportLocation:='Lumbridge' else;
if (MLvl <= 37) then TransportLocation:='Falador' else;
if (MLvl <= 45) then TransportLocation:='Camelot' else;
if (MLvl <= 51) then TransportLocation:='Ardougne';
end;
you could add something like that, then you would not have to declare what spell you wanted cast the script will cast the highest transport spell that you can, although u would have to edit it a little and add a few things so that it would work for f2p ppl as well as members
There are currently 1 users browsing this thread. (0 members and 1 guests)