Results 1 to 3 of 3

Thread: Problem with Pin?

  1. #1
    Join Date
    Feb 2012
    Location
    DON'T PM ME ASKING FOR STUFF
    Posts
    2,170
    Mentioned
    38 Post(s)
    Quoted
    423 Post(s)

    Default Problem with Pin?

    hey guys,

    been working on my first/second (working on 2 at a time so I don't get bored) script.

    Code:
      {
      }
    
    
    program GreenRingEnchant;
      {$DEFINE SMART}
    {$i SRL\SRL.simba}
    var
      t, r, q, m, ring, x, y, spell: integer;
      Clock: TIntegerArray;
    
    procedure DeclarePlayers;
    begin
      HowManyPlayers := 1;
      NumberOfPlayers(HowManyPlayers);
      CurrentPlayer := 0;
      Players[0].Name := ''; //Runescape Username
      Players[0].Pass := ''; //Runescape Password
      Players[0].Nick := ''; //3-4 letters that you will recognise
      Players[0].Member := True; //Are you a member?
      Players[0].Active := True; //Not sure what this means... I saw it on other scripts
      Players[0].Pin := ''; //Bank Pin
      Players[0].BoxRewards := ['Xp', 'mote', 'ostume','ssence'];
    
    end;
    
    
    procedure Enchantthatshit;
    var
      i : Integer;
     begin
     Spell := DTMFromString('m6wAAAHic42ZgYMhmYmAoBuJSKAax85gg4hlAnAbEmVAxXUYGBiMg1gNiLSBWB2JVKAaxQfLGQGwCxDKbmBik+ViIwlwMxANGEjASAACR+wlw');
     Gametab(Tab_Magic);
     Wait(randomrange(300,400));
    
      Wait(randomrange(200,300));
      for i := 2 to 28 do
      begin
      FindDTM(spell, x, y, MIX1, MIY1, MIX2, MIY2);
      Mouse(x,y, 0, 0, true);
        wait(randomrange(400,600));
        InvMouse(i, 1);
       Gametab(Tab_Magic);
      Writeln('Congrats for using someone elses bot and being to lazy to code your own. Dick. ')
      end;
    end;
    
    procedure Bankthatshit;
    begin
       OpenBankChestEdge(SRL_BANK_SW);
       repeat
        wait(randomrange(60,110));
        until(BankScreen); //Stops previous procedure start if bankscreen is found
    Mouse(655, 224, 3, 3, false);
    
      ChooseOption('All');
      Withdraw(9, 0, 999);
      CloseBank;   //Closes panel for bank
      Writeln('Sittin on the toilet.')
    end;
    
    
    
    Procedure Statistics4Bot;
    begin
               Clock := [0,0,0];
            ConvertTime(GetTimeRunning,Clock[0],Clock[1],Clock[2])
            Writeln('Time Running ' +tostr(Clock[0])+':'+tostr(Clock[1])+':'+tostr(Clock[2]))
            Writeln('We have made ' + IntToStr(t * 27) + ' Rings this Session')
            Writeln('We have earned ' + IntToStr(t * 27 * 140) + ' Gold Pieces this Session')
            Writeln('Magic Exp Earned ' + IntToStr(t * 27 * 55) + ' xp this Session')
    end;
    
       //This is the boring shit. This is how the bot is scripted to make everything run
     Begin
        smart_server := 44;
        smart_members := true;
        smart_signed :=true;
        smart_superdetail := false;
        SetupSRL;
        DeclarePlayers;
        LoginPlayer;
        t:= 0
        begin
          repeat
          inc(t)
      //     Bank;
           Bankthatshit;
           Writeln('Stealing Username and Password now.')
           Wait(randomrange(100,300));
           Writeln('Haha, Joking. This is just a silly antiban procedure')
           Enchantthatshit;
           Statistics4bot;
          until(t=0);
        end;
        end.
    Why won't it enter the pin in the bank?

  2. #2
    Join Date
    Mar 2007
    Location
    Alberta, Canada
    Posts
    1,780
    Mentioned
    0 Post(s)
    Quoted
    11 Post(s)

    Default

    You still need to tell it to put in the bank pin.
    Simba Code:
    If PinScreen then
      InPin(Players[CurrentPlayer].Pin);

  3. #3
    Join Date
    Feb 2012
    Location
    DON'T PM ME ASKING FOR STUFF
    Posts
    2,170
    Mentioned
    38 Post(s)
    Quoted
    423 Post(s)

    Default

    Thanks! Worked a charm ^.^

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
  •