SRL Archive - RS Scripts

here is my auto teleporter i updated the auto teleporter

{8888 88888 8 8 88888 88 88888 888 88 88
88 8 8 8 8 8 88 8 8 8 888 88
88 8 888 8 8 8 88 8 8 8 88 8 88
88 8 8 8 8 8 88 8 8 8 88 888
8888 88888 8 88888 88888 88888 888 88 88
///////////////////////////////////////////////
version 2.03
credits to History for maked the base of the script
\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\
upcoming features in version 3.0
+faster login function
+randomtalking
Enjoy }
///////////////////////////////////////
program autoeleporter;/////////////////
{.include squig2.scar}
//////
var//////////
K,login_bitmap,click_here_to_play_BMP:integer;
const////////
///////~setup~\\\\\\\
username='';
password='';
teleto=1;{1=varrock
2=lumbridge
3=falador
4=camelot
5=ardougne
6=watchtower
7=trollheim}
teletimes=1500;//number of times to teleport
waitingtime=3500;//number of time to wait before next teleport 1000=1second



///////~End of setup~\\\\\\\




//DO NOT TOUCH BELOW(For the leachers)\\


procedure teleport;
begin
clickhuman(739,181,true)
wait(300+random(100))
if(teleto=1)then
begin
movemousesmooth(706,251 )
wait(300+random(100))
clickhuman( 706, 251 ,true)
wait(waitingtime+random(1000))
end else
if(teleto=2)then
begin
movemousesmooth(610 , 276)
wait(300+random(100) )
clickhuman( 610,276 , true)
wait(waitingtime+random(1000))
end else
if(teleto=3)then
begin
movemousesmooth( 684,277 )
wait(300+random(100))
clickhuman( 684,277,true)
wait(waitingtime+random(1000))
end else
if(teleto=4)then
begin
movemousesmooth(612 ,300 )
wait(300+random(100))
clickhuman( 612 ,300,true)
wait(waitingtime+random(1000))
end else
if(teleto=5)then
begin
movemousesmooth(590,320 )
wait(300+random(100) )
clickhuman( 590 ,320 ,true)
wait(waitingtime+random(1000))
end else
if(teleto=6)then
begin
movemousesmooth(709 ,325 )
wait(300+random(100) )
clickhuman( 709,325 ,true)
wait(waitingtime+random(1000))
end else
if(teleto=7)then
begin
movemousesmooth(709 ,345 )
wait(300+random(100) )
clickhuman( 709 ,345 ,true)
wait(waitingtime+random(1000))
end;
end;

procedure autologin;
var
i,p,c,v:integer;
begin
if(findbitmaptolerancein(login_bitmap,c,v,0,0,9999,9999,100))then
begin
movemousesmooth(510,294)
wait(1000)
clickhuman(510,294,true)
wait(200)
sendkeys(username)
wait(300)
clickhuman(369,271,true)
wait(300)
sendkeys(password)
wait(300)
clickhuman(303,321,true)
wait(9000)
if(findbitmaptolerancein(click_here_to_play_BMP,i,p,0,0,9999,9999,400))then
begin
ClickHuman(427+random(2),339+random(2),true);
writeln('logged in')
wait(3000)
ClickHuman(427+random(2),339+random(2),true);
end else
if(findbitmaptolerancein(login_bitmap,c,v,0,0,9999,9999,400))then
begin
writeln('error while logging in,script is ruined now')
terminatescript;
end;
end else
exit;
end;

procedure bitmaps;
begin
login_bitmap:= BitmapFromString(16, 14, 'z78DABD54410EC3200CFB5204A66B' +
'8F482BFF7FD25A4093991BC4694172A59098D484E08D92321477E' +
'40404006747BB16BA5F91776BBC559B33C733161C0D2DD89D4F27' +
'F2EE3A7F71ACF3F01F11EAE99DFF3ED194DF3CAB3C175E9F81D3E' +
'AD2FA4567E6E79A6DB78CC1F3A03FD539E84391AA4CF3A72DBDB6' +
'A87ECE527D5A56C3B93E1AC3C6912BF7CB915F8503CCEB04D6B3F' +
'79BF0B302CEED04AF7EEDDB257EBE1DEA704F9F95FEB7A9358679' +
'4CEF61554027C0EFBB7E7AEFBC4BB903BFCE108F47FAD99B2DF61' +
'7FB00213A2515');
click_here_to_play_BMP:= BitmapFromString(43, 11, 'z78DAED955172C3300844AF8414D9' +
'4D3E9DB6B9FF91AAB0D87984F806CD4C341E042B58C16A5D9AD93' +
'2AED6CD626D36AC2D5B5BECAAF572B7CB745A6CB5B6BABFD6B198' +
'4DCB6F9FEEF211822CEBBD7DDB4D6B787A54E06057FE8AEDDBF4F' +
'C701663231FCF4D08B2B38A14DBE6DA52151E65FE2342646B60C3' +
'57B2914E0403E1299C6AF11C229F92B3FC0F8BEDF9CBC2DC9809F' +
'103A7D44204FA6B1503AC65B8317CB6E7B7782393C1D2369DAF91' +
'EDCC7F722504F0F6F5B8F4DE85E30861D1B7ECB2A40E1C3BE6CEA' +
'1CE8A6E01930DDD125578FECA24D7F5FCA9B76DE7A19B9181C4F6' +
'3360493914F694CFFCF79EBB5177841E56ACCEE5A4A45B439458B' +
'D7D8FC7E527183BB94D760BBBA8AEC3B94A3D892960DF06CF7E47' +
'E95E18CB59F6EF9A27D1B45B19388B9A3E6F535CCFADF34E34B21' +
'1387EA79599D08192ADBA2529DB8916856656D5025ACCD11D53E0' +
'BB69BE8A3EF0FB4C87ADDCE9190F52B60F08650AA2F32D4DF1B3C' +
'3916152F8F19AFDF02FBD7A6475A8AE2C5C6B54BAC7726EDCC5D6' +
'DE7BBBCC02D523D9C1C0A01E8ED00DD79FD8ED5909432D7D4BAAF' +
'5362F8765DDFCA590AA48C1A0A5B2D7A8F1369BC7597E2E953065' +
'FE52D14315EDA5CFF4B4D78B1F0C40918ED7D03EDE02942DDE23C' +
'74908984AAEF535FCE0B3E35BEE6DBE7D4450BDCC2A55417FE800' +
'11C4004F4FCAE30C3CCA8F2FB2145BF68403F664AF38ECFFD0228' +
'FA58FF07922775557B2A00AE28BD5540594F0FFF707A905420D');
end;

begin
K:=0
setupsquig('Runescape Legit Community…..ewww!!!',false)
bitmaps;
repeat
activateclient;
teleport;
K:=K+1
until(K=teletimes)
writeln('ready')
writeln('Thank you for using Devilions"s Auto teleporter v2.03')
freebitmap(login_bitmap)
freebitmap(click_here_to_play_BMP)
end.


i hope you all enjoy my script

greets devilion

It's alot longer than it needs to be, and why don't you make it SRL?

pretty good :)

good Job keep working and if you can learn some standards but good beggining script

reformatted your script

use code tags in combination with courier new. looks nicer that way :)

A quick look @ your scipts. Try cutting down on the 'blind' clicks.

add some standards?… great work

Alot of things could be fixed up.

But, it's ok. :)

HAHAH YOU LITTLE PICE OF SHIT!!


lol i rememberred when u asked my help i only fixed coords little bit nothing else now i looked on this u didnt hcnage anything else expect Red text lol

This is ok. But what about the teleporting random, this will just keep trying to teleport and your char will eventually die.

i haven't fixed the teleport randoms because i dont know how to do it so that is the reason

You bitch!!! i didnt give you any permisssion to take it!

Admins delete this at once!
and he didnt change anyhting from the script

Yes, randoms would help this script a lot:). Very good though!.

the purple square means u got de-repped right? who the fu** de reps some 1 for helping?:rolleyes: of well still srl member

Im confused, did jagex_fagex get derepped?

And jag02, if this is truley what history says, remove it

nice script to begin with, alot of cleaning up could be done on the procdure side, just use the SRL pack and more conditionals.

I demand you delete this topic!!
that script was totally made by me!
all he did was replace my name with his!

I SAID DELETE THIS!!!

they doesnt reckonize you history…but really who cares he is only little piece of shit

From: jagex_fagex
the purple square means u got de-repped right? who the fu** de reps some 1 for helping?:rolleyes: of well still srl member

No if its blue it means someone tryed to give you rep but had only 10 rep so cant give out rep

From: HISTORY
I demand you delete this topic!!
that script was totally made by me!
all he did was replace my name with his!

I SAID DELETE THIS!!!

hm… so, what is it? Devillion, did you make this, or did HISTORY make it? Now, this isn't a particularly elaborate script, so nothing much to bitch over, but lets say, he who SRL-erize it, gets the credits, agree?

TIP: Work together. C O O P E R A T E!

From: WT-Fakawi
hm… so, what is it? Devillion, did you make this, or did HISTORY make it? Now, this isn't a particularly elaborate script, so nothing much to bitch over, but lets say, he who SRL-erize it, gets the credits, agree?

Is there anything SRL can't do?

It can't get me a cookie…:p

From: I
It can't get me a cookie…:p

procedure CookieMaker;
var
  xx, yy: integer;
begin
  Mix('Dough');
  PreHeat(0, 0, 'Oven');
  Add('Dough', 'Chocolate Chip');
  Heat('Oven');
  Settle('Fridge');
 Locate(xx, yy, 'I remember first post=p');
  Hand('Completed Cookie', 'Fridge', xx, yy);
end;

What are you talking about, 'Course it can.

Please delete this!!
this was one of my first scripts….it is too valuable to me to be ripped off by a mother fucking son of a black sperm-headed bitch


ill make you suffer i swear it

looks good ill sue it later this month (making the push for 95 magic)a.k.a 78k camlot teles to yer lol try and get that aniradom in befor then

From: HISTORY
Please delete this!!
this was one of my first scripts….it is too valuable to me to be ripped off by a mother fucking son of a black sperm-headed bitch


ill make you suffer i swear it

Agreed, I'll get one of the mods that are on!

From: WT-Fakawi
but lets say, he who SRL-erize it, gets the credits, agree?

http://www.villavu.com/forums/showthread.php?p=6269#post6269 does that mean i get credits :rolleyes:

lol this topic is crazy dont get a clue what its about lol but i trust History i think its his

Dude, almost a YEAR old.