Results 1 to 5 of 5

Thread: Teleporter [Varrock,Lumbridge,Falador & Camelot]

  1. #1
    Join Date
    Jan 2013
    Location
    Finland
    Posts
    130
    Mentioned
    1 Post(s)
    Quoted
    30 Post(s)

    Post Teleporter [Varrock,Lumbridge,Falador & Camelot]

    Had to get 55 mage fast for my own account so made this simple script.

    Can be set to repeat x amount of times. Adjust to the script where you'd like to teleport.

    Just set where to teleport and amount if you want then play...
    Checks if you have runes, checks if run out of runes...
    Does not click mindlessly one spot!

    REQUIRES
    Smart 8.3 - http://villavu.com/forum/showthread.php?t=105548
    Reflection - http://villavu.com/forum/showthread.php?t=107698
    SRL-OSR - http://villavu.com/forum/showthread.php?t=99577
    This might help with problems
    https://villavu.com/forum/showthread.php?t=107436

    I DO take suggestions towards the script, if you have one feel free to post
    If you are so lucky that it runs longer periods please take print screen/copy of the proggy!
    Seriously would appreciate to see how its working...
    Attached Files Attached Files

  2. #2
    Join Date
    Apr 2013
    Posts
    680
    Mentioned
    13 Post(s)
    Quoted
    341 Post(s)

    Default

    Good Work! =D i will give this a blast tomorrow... =D

    Keep the scripts coming.

    <------------------>



  3. #3
    Join Date
    Jan 2013
    Location
    Finland
    Posts
    130
    Mentioned
    1 Post(s)
    Quoted
    30 Post(s)

    Default

    1350 teleports per hour roughly, experience rates would be:
    Camelot 55.5xp * 1350 = 74925xp / h
    Falador 48xp * 1350 = 64800xp / h
    Lumbridge 41xp * 1350 = 55350xp / h
    Varrock 35xp * 1350 = 47250xp / h

  4. #4
    Join Date
    Jun 2015
    Location
    New Zealand
    Posts
    322
    Mentioned
    2 Post(s)
    Quoted
    131 Post(s)

    Default

    Congratulations on script release Great XP rates too

  5. #5
    Join Date
    Sep 2006
    Location
    Australia
    Posts
    425
    Mentioned
    0 Post(s)
    Quoted
    34 Post(s)

    Default

    I realise this post is old, but for anyone else trying to raise their mage with teleports, here's a working version of the script:

    Code:
    program JoulahaTeler;
    {$DEFINE SMART8}
    {$I SRL-OSR/SRL.Simba}
    {$I SRL-OSR\SRL\misc\SmartGraphics.simba}
    
    var
    X, Y, MageInv, LumbridgePic, VarrockPic, TeleLoc, FaladorPic, Runes, RepeatTimes, SetAmountRepeat, XpFromSkill, CamelotPic: Integer;
    //Defining X,Y and others
    
    procedure GetLocation; //Setups
    begin
    TeleLoc := 4; // 1 = Varrock, 2 = Lumby, 3 = Fally, 4 = Cammy
    Runes := 1;  // This is just check for having runes
    SetAmountRepeat := 1000; //This is how many times you want to repeat
    end;
    
    procedure DefineLetters;
    begin
    MageInv := BitmapFromString(13, 12, 'meJybvuJAeGaLvnOGiJ63YWidfX' +
    'AiMoKLJFROQFbjkVhiXrsIgoBsOHJL7TGycIFoQVaDrDK8sMXAKRS' +
    'XGtVZ24EKgAwgCVED0Qi0F6saoMMg5sARXBlQFqIAogZIQkQwEdBA' +
    'iJrZO47ABeEmABnZ7TOACK5m7sGr8GDBRHA1zQu3AEm4YmAAIiNxJ' +
    'QuIGqBiIAlXDBQHBiPQnJwJS4FRA+RC1AADDUgiK4arhJgGUcPIwA' +
    'AADPDHqg==');
    VarrockPic := BitmapFromString(10, 10, 'meJzTFxT5WVWFFekLiujDZPNMTO' +
    'EILguXYmRggCO4AojU33//kGWBXIgCiC5MWYgJcDPhCuAMrNrhGpG' +
    'thoijSeH3kT7e0AAAFRJ2lQ==');
    FaladorPic := BitmapFromString(10, 11, 'meJz73NunLygCRD+rquAIIvIZLI' +
    'UsjqkGws4zMYUjuCxc6u+/f3AEVwCRYmRgAAoCSTiCKIBIQWQhCFk' +
    'BsiyyXjTtWE1GdhWmFH4f4Q8NAPqKhq0=');
    CamelotPic := BitmapFromString(10, 12, 'meJzTFxT5WVWFFekLiujDZPNMTO' +
    'EILguXYmRg+PvvHxABGXAFyFJAEs6AKIBIIcvCEcQWPLL4TcbvKvw' +
    '+0scbGp97+zDVQESAUhAE4SIjiDgAsmaN5Q==');
    LumbridgePic := BitmapFromString(10, 7, 'meJzLMzFlZGAAor///kEYcJRnYpq' +
            'HV/ZnVRVEAVAWjuBSEAQ3AVkXEOkLisAVwBFcCi6LiYBSn3v7MNVA' +
            'RIBSAPoCTRk=');
    end;
    
    procedure FreeBitmaps;
    begin
      Freebitmap(MageInv);
      Freebitmap(LumbridgePic);
      Freebitmap(VarrockPic);
      Freebitmap(FaladorPic);
      Freebitmap(LumbridgePic);
    end;
    
    
    
    procedure StartBotting;
    begin
    
    DefineLetters;
    if (TeleLoc = 1) then
    TeleLoc :=  VarrockPic;
    XpFromSkill := 35;
    
    if (TeleLoc = 2) then
    TeleLoc :=  LumbridgePic;
    XpFromSkill := 41;
    
    if (TeleLoc = 3) then
    TeleLoc :=  FaladorPic;
    XpFromSkill := 48;
    
    if (TeleLoc = 4) then
    TeleLoc :=  CamelotPic;
    XpFromSkill := 55;
    
    if FindBitmapToleranceIn(MageInv, X, Y, 0, 0, 760, 480, 20)then
    begin
    wait(750);
    Mouse(x, y, 4, 4, True);
    wait(750);
        repeat
    
            begin;
    
                      wait (750);
                      if FindBitmapToleranceIn(TeleLoc, X, Y, 500, 200, 760, 480, 5)then
                      begin
                        Wait(750);
                        Mouse(x+5, y+5, 7, 7, True);
                        inc(RepeatTimes);
                        Cleardebug;
                        WriteLn('---Joulahas teleporter---');
                        WriteLn('Time run (' + timeRunning + ')');
                        WriteLn('Teleport times (' + IntToStr(RepeatTimes) + ')');
                        WriteLn('XP gained (' + IntToStr(RepeatTimes*XpFromSkill) + ')');
                        Wait(750);
                      end else
    
                      begin
                        Runes := 0;
                        WriteLn('Teleport not found, no runes?');
                        LogOut;
                      end;
    
            end;
    
        until (Runes = 0) or (RepeatTimes = SetAmountRepeat);
    
    end else
    WriteLn('No mageslot found, no runes or repeated enough.');
    LogOut;
    
    if (Runes = 0) then
    WriteLn('Runes out?');
    LogOut;
    
    end;
    
    begin
    SetupSrl;
    ClearDebug();
    AddOnTerminate('FreeBitmaps');
    GetLocation;
    StartBotting;
    end.
    Your directories weren't setup correctly, and you didn't terminate the Mouse() statements with a semicolon.

    Edit for proggy:
    Code:
    ---Joulahas teleporter---
    Time run (44 Minutes and 30 Seconds)
    Teleport times (998)
    XP gained (54890)
    Teleport not found, no runes?
    Runes out?
    Succesfully freed SMART[4716]
    Error: The bitmap[7] does not exist at line 45
    Execution failed.
    The following bitmaps were not freed: [6]
    Last edited by Deni_mulic; 10-07-2015 at 12:45 AM.

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •