Jagex_Fagex
2006-04-05 21:06:29
{*******************************************************************************
Procedure CastSelfTele(Spell: String);
By: Jagex_Fagex (originally by:???)
Description: Originally Cast; Edited To Be Teleports for self, not tele Other
Cast's the selected self teleport.
*******************************************************************************}
Procedure CastSelfTele(Spell:String);
var SP:Integer;
begin
SP:=StrToInt(Spell);
if SP<=46 then FixMage(True);
if SP>46 then FixMage(False);
GameTab(7);
if (Lowercase(Spell) = 'varrock teleport') or (Spell = '13') then
if FindColor(X,Y,16711423,706,250,706,250) then
begin
Mouse(X,Y,2,2,True);
end;
if (Lowercase(Spell) = 'lumbridge teleport') or (Spell = '15') then
if FindColor(X,Y,16711423,612,275,612,275) then
begin
Mouse (X,Y,2,2,True);
end;
if (Lowercase(Spell) = 'falador teleport') or (Spell = '17') then
if FindColor(X,Y,16711423,682,275,682,275) then
begin
Mouse (X,Y,2,2,True);
end;
if (Lowercase(Spell) = 'camelot teleport') or (Spell = '21') then
if FindColor(X,Y,16711423,611,300,611,300) then
begin
Mouse (X,Y,2,2,True);
end;
if (Lowercase(Spell) = 'ardougne teleport') or (Spell = '27') then
if FindColor(X,Y,16711423,589,321,589,321) then
begin
Mouse (X,Y,2,2,True);
end;
if (Lowercase(Spell) = 'watchtower teleport') or (Spell = '32') then
if FindColor(X,Y,16711423,709,324,709,324) then
begin
Mouse (X,Y,2,2,True);
end;
if (Lowercase(Spell) = 'trollheim teleport') or (Spell = '39') then
if FindColor(X,Y,16711423,707,345,707,345) then
begin
Mouse (X,Y,2,2,True);
end;
end;Just Cut out all the bits except the self teleporting parts, and edited the parameters needed. Needed? it just helps with Moving around and stuff so you dont need to type in all the parameters.
So for the original Cast procedure, to varrock telly, you would need to write something like:
Cast('13','',0,2)For Mine, all, you need to write is:
CastSelfTele('13');So it is much easyier for people newer to scripting trying to work out what to put in the parameters.
:) Suggestions, comments?