Teleporter - Made by me :)

Code:

program Stuis_Teleporter;

Procedure Mage_Tab;                                       //1 = magic tab
begin;                                                    //2 = Varrock Tele           //7 = Friends Bar 7=bottom 8 = top
Movemouse(1, 1); //Moves mouse to magic tab               //3 = Skill Tab              //6 =Friends List
Clickmouse(1, 1, 1); //Clicks Magic Tab                   //4 = Random                 //5 =Magic Icon
Movemouse(2, 2); // Moves it to varrock tele, Other Coords for other teles are at the bottom

End;

Procedure Tele;
begin;
Clickmouse(2, 2, 1) //Clicks Tele
Wait(1000) // Waits before clicking again, want to offset +/- 500


End;

Procedure Antiban;
begin;
Movemouse(3, 3); //How to choose a random coordinate inside a given area?
Clickmouse(3, 3, 1); // Click where the mouse lands
Movemouse(5, 5); // Checks how much till you level in mage, still want to offset where the mouse goes by a random amount each time
Wait(3000); // Simulates you looking at how much xp left, want to offset this by +/- 1 second
Movemouse(4, 4); //How to choose a random coordinate inside a given area?
Wait(2000); // Simulates you looking at how much xp left, want to offset this by +/- 1 second
Movemouse(1, 1); //Moves mouse to magic tab
Clickmouse(1, 1, 1); //Clicks Magic Tab
Movemouse(2, 2); // Moves it to varrock tele, Other Coords for other teles are at the bottom


end;

Procedure Antiban_2;
begin;
Movemouse (6, 6); // what a normal person would do :P check their friends
Clickmouse(6, 6, 1); // what a normal person would do :P check their friends
Movemouse(8, 7); // If you have a large friends list, if you dont just comment these next few lines out
Holdmouse(7, 7, 1); // Clicks it so you can move mouse down the list
Movemouse(7, 7); // Moves it to the bottom of the list
MoveMouse(8, 7);// Goes to the bottom of friends list then back to the top
ReleaseMouse(8, 7, 1);
Movemouse(1, 1); //Moves mouse to magic tab
Clickmouse(1, 1, 1); //Clicks Magic Tab
Movemouse(2, 2); // Moves it to varrock tele, Other Coords for other teles are at the bottom


End;

Procedure Antiban_3;
Begin;
//Presskey
Movemouse(1, 1); //Moves mouse to magic tab
Clickmouse(1, 1, 1); //Clicks Magic Tab
Movemouse(2, 2); // Moves it to varrock tele, Other Coords for other teles are at the bottom

End;



begin
Mage_Tab;
Repeat
Tele
Until(False); //do you just put the number of repeats in here? e.g. 700 teles would you put 700 in here?

end.


//Questions?


                                                       Tele


//Camelot Tele Coords = x,y
//Fally Tele Coords = x,y
//Lumby Tele Coords = x,y

my internet is screwing with me so i cant get the coords just yet, but by tomorrow i should have them , in theory this should work right? its all compiled and shit like that

If some could also answer these questions it would help alot as well


Line 5, How Can I Make It Click Anywhere In The Magic Skill Box? Settargetbitmap(randompos)clickmouse? Or Something Like That Need This For Alot Of My Anitban

Line 25-27,39-41,47,49 Are They Needed Or Do I Just Repeat "Mage_Tab" Somewhere

Line 19-27 How Can I Offset These? "Wait(RandomRange(2000-4000));" ?

How Do I Use The Keyboard Functions To Move The Keys Around? e.g. Turn Screen 90 Degrees With A Random Offset I Dont Have Any Clue On How To Do It lol

How Do I Make The Antiban Go At Random Times? I Have Three Of Them, Moving Keyboard And The Friends List And XP One
Or Do I Just Make Them All Into One?

I Dont Know If Simba Supports This But On Levelup Could you Quickchat Your Mage Level And Say Like W00T Leveled Again Or Something Along Those Lines

Thanks For The Help And For Using My Script Very Basic But I Made It Without Any Google Or Anything Lol

 

bump....

 

It's a decent first script, you should input a few dtms, bitmaps and tpas if you can. They're a lot more stable/ less obvious bot. That isn't really antiban, you should have antiban more like this:
Procedure Antiban;
Begin
Case Random(192) Of
0: HoverSkill('Magic', False);
1: Begin PickUpMouse; SleepAndMoveMouse(3000 + Random(500)); End;
2: IdleTime(100+random(700), 100+Random(100), 0.2+RandomE/2);
3: Begin GameTab(Tab_Stats); Wait(3000 + Random(500)); GameTab(Tab_Inv); End;
4: HoverSkill('random', False);
5: RandomMovement;
End;
If you don't want something just put a // in there.
If you want to rotate your screen you can do this:
SetAngle(SRL_ANGLE_HIGH);
MakeCompass('W');
Pretty self explanatory on what they do.
Edit: You can just put a procedure within a procedure by putting "Magetab;" at the appropriate time and it will do it.

 

You should try OSI (check my signature), the include offers a lot of methods that will make your script better and safer.