Poll: Is this script better with SRL?

Results 1 to 3 of 3

Thread: [SRL][RS2]PROPERFLETCHER 3.0 Revamped!

  1. #1
    Join Date
    Aug 2006
    Posts
    13
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    [SRL][RS2]PROPERFLETCHER 3.0 Revamped!

    Well, I took the PROPERFLETCHER which was originally made by PROPERHACKER and also updated by philodespotos and I made it into an SRL Include. It worked fine for me and hopefully it works OK for you too! .

    If you are wondering why it says that it was updated by KillerPlatinum/Youngt191...The reason is because I have to forum names. On fagex I am known as KillerPlatinum. On Sythe and Villu-Reborn I am known as Youngt191.

    [CHANGE LOG]

    1.0 - Realeased
    2.0 - Fixed most bugs
    2.1 - Faster bank booth closing
    3.0 - Totaly re-coded by KillerPlatinum/Youngt191 and included SRL


    UPDATE: 3.1
    SCAR Code:
    {.Script Info:
    # ScriptName  = PROPERFLECHER
    # Author      = philodespotos, KillerPlatinum/Youngt191 and PROPERHACKER
    # Description = Logs 2 bows
    # Version     = 3.0
    # Date        = 10/4/2006
    # Comments    = SRL Updated
    /Script Info}

    {simple script to cut your logs into bows.
     ----
    properhacker.googlepages.com

     to keep from using an ugly hack, i simply assume you won't be
     macroing the creation of normal short long or stocks
     ----
     knife in first inventory slot,
     logs in first bank slot.
     face north or south in the seers bank(with current settings)
     only problem it allways picks what ever item is in the top left bank box even if it isnt your logs
     and it changes position everytime you flech
     it does push close on the bank booth!!
     ----
     Written by philodespotos, inproved by PROPERHACKER and Youngt191/KillerPlatinum(hope you dont mind, just for the recent changes)

     [CHANGE LOG]

     1.0 - Realeased
     2.0 - Fixed most bugs
     2.1 - Faster bank booth closing
     3.0 - Totaly re-coded by KillerPlatinum/Youngt191 and included SRL
     3.1 - Fixed bugs which messed up the script. Made it compatable with
     other bows other than willow longs! :P My bad!
    }

    program pdFletcher;
    {.include SRL\SRL.scar}
    {.include SRL\misc\PlayerForm.scar}

    const     BowType = 1;                 // 0 = short, 1 = long, 2 = stock
              TotalLogs = 2000;
              LogOutWhenDone = true;
              BowColor = 3047559; //Color of the bow AFTER it's made. Default = Willow Long
             
              Pin = '1993'; // Your bank pin if you have one...

    var       TotalDone, MakeX, count,lx,ly : integer;

    procedure LoadBmps;
    begin;
      MakeX := BitmapFromString(42, 3, 'z78DA33753135313137'      +
             '05936E48C0000C4C91648957430C492D73A865A31B06C02F3B' +
             'B4FC8E692F7EDFE10743DDEF00D948ACB1');
    end;

    procedure AntiRandoms;
    begin
      SRLRandomsReport;
      FindNormalRandoms;
      if(WeAreDead)then
      begin
      Logout;
      Writeln('We have died...Sorry!');
      TerminateScript;
      end;
      if(FindMod)then
      begin
      LogOut;
      Writeln('Found Moderator...Waiting 60 seconds');
      Wait(60000+random(3165));
      LoginPlayer;
      end;
      AntiBan;
     
    end;

    procedure WithdrawLogs;
    begin
      Openbank3;
      InPin(Pin);
      FixBank;
      Withdraw(1,1,27);
      repeat
      if(BankScreen)then
      CloseBank;
      until(not(BankScreen))
    end;

    procedure DepositBows;
    begin
      OpenBank3;
      InPin(Pin);
      FixBank;
      wait(100+random(400));
      Deposit(2,28,2);
      wait(100+random(300));
    end;

    procedure CutBows;
    var x, y: integer;
    begin
      UseItem(1);
      Wait(800+random(315));
      UseItem(2);
      wait(900+random(300));

      // no error checking. let's hope you got it right.
      case BowType of
        0:   Mouse(105, 403, 5, 15,false);
        1:   Mouse(251, 407, 5, 15,false);
        2:   Mouse(416, 401, 3, 3,false);
      end;
     
      ClickOption('Make X',3);
      Wait(1000+random(313));
      TypeSend('27');

      repeat
      Wait(431+random(531));
      RandomRClick;
      LeaveScreenEvery(2);
      GameTab(4);
      HoverEvery(3,'Fletching');
      GameTab(4);
      until(FindColorRightTol(x,y,BowColor,693, 433,725, 454,10))
      TotalDone := TotalDone + 27;
    end;

    Procedure Hi;
    begin
    Writeln('Proper Fletcher officially made by PROPERHACKER');
    Writeln('Revamped by KillerPlatinum/Youngt191 with SRL');
    Writeln('Hope you dont mind!');
    Writeln('');
    Writeln('Version Number: 3.0');
    End;

    procedure ScriptInit;
    begin
      SetupSRL;
      LoadBmps;
      SetupPlayers;
      ClearDebug;
      LoginPlayer;

      TotalDone := 0;
    end;

    begin
      ScriptInit;
      Hi;

      repeat
      begin
        AntiRandoms;
        WithdrawLogs;
        AntiRandoms;
        CutBows;
        AntiRandoms;
        DepositBows;
      end;
      until(TotalDone >= TotalLogs);
      CloseWindow;

      if(LogOutWhenDone)then
        LogOut;
    end.

  2. #2
    Join Date
    Nov 2006
    Posts
    2
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Looks nice, i'll be testing this.
    [STRIKE]Strength / 70[/STRIKE]
    [STRIKE]Defence / 70[/STRIKE]
    [H]Attack / 70[/H]
    [H]Magic / 70[/H]
    [STRIKE]Ranging / 60[/STRIKE]
    [STRIKE]Full Dragon[/STRIKE]
    [STRIKE]Full Dharoks[/STRIKE]
    [STRIKE]Full Veracs[/STRIKE]
    So Sam, looks like you're not the only rich shit around here eh?

  3. #3
    Join Date
    Nov 2006
    Posts
    17
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    im gonna give it a go

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. Trouble With PROPERFLETCHER
    By shawnrussow in forum RS3 Outdated / Broken Scripts
    Replies: 4
    Last Post: 02-03-2007, 03:22 AM

Posting Permissions

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