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' +
'8F482BFF7FD25A4093991BC4694172A59098D484E08D92321 477E' +
'40404006747BB16BA5F91776BBC559B33C733161C0D2DD89D 4F27' +
'F2EE3A7F71ACF3F01F11EAE99DFF3ED194DF3CAB3C175E9F8 1D3E' +
'AD2FA4567E6E79A6DB78CC1F3A03FD539E84391AA4CF3A72D BDB6' +
'A87ECE527D5A56C3B93E1AC3C6912BF7CB915F8503CCEB04D 6B3F' +
'79BF0B302CEED04AF7EEDDB257EBE1DEA704F9F95FEB7A935 8679' +
'4CEF61554027C0EFBB7E7AEFBC4BB903BFCE108F47FAD99B2 DF61' +
'7FB00213A2515');
click_here_to_play_BMP:= BitmapFromString(43, 11, 'z78DAED955172C3300844AF8414D9' +
'4D3E9DB6B9FF91AAB0D87984F806CD4C341E042B58C16A5D9 AD93' +
'2AED6CD626D36AC2D5B5BECAAF572B7CB745A6CB5B6BABFD6 B198' +
'4DCB6F9FEEF211822CEBBD7DDB4D6B787A54E06057FE8AEDD BF4F' +
'C701663231FCF4D08B2B38A14DBE6DA52151E65FE2342646B 60C3' +
'57B2914E0403E1299C6AF11C229F92B3FC0F8BEDF9CBC2DC9 809F' +
'103A7D44204FA6B1503AC65B8317CB6E7B7782393C1D2369D AF91' +
'EDCC7F722504F0F6F5B8F4DE85E30861D1B7ECB2A40E1C3BE 6CEA' +
'1CE8A6E01930DDD125578FECA24D7F5FCA9B76DE7A19B9181 C4F6' +
'3360493914F694CFFCF79EBB5177841E56ACCEE5A4A45B439 458B' +
'D7D8FC7E527183BB94D760BBBA8AEC3B94A3D892960DF06CF 7E47' +
'E95E18CB59F6EF9A27D1B45B19388B9A3E6F535CCFADF34E3 4B21' +
'1387EA79599D08192ADBA2529DB8916856656D5025ACCD11D 53E0' +
'BB69BE8A3EF0FB4C87ADDCE9190F52B60F08650AA2F32D4DF 1B3C' +
'3916152F8F19AFDF02FBD7A6475A8AE2C5C6B54BAC7726EDC C5D6' +
'DE7BBBCC02D523D9C1C0A01E8ED00DD79FD8ED5909432D7D4 BAAF' +
'5362F8765DDFCA590AA48C1A0A5B2D7A8F1369BC7597E2E95 3065' +
'FE52D14315EDA5CFF4B4D78B1F0C40918ED7D03EDE02942DD E23C' +
'74908984AAEF535FCE0B3E35BEE6DBE7D4450BDCC2A55417F E800' +
'11C4004F4FCAE30C3CCA8F2FB2145BF68403F664AF38ECFFD 0228' +
'FA58FF07922775557B2A00AE28BD5540594F0FFF707A90542 0D');
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


Reply With Quote












of well still srl member


