Results 1 to 5 of 5

Thread: function ClickPrayer(Slot:Integer):Boolean;

  1. #1
    Join Date
    Feb 2006
    Location
    Las Vegas, NV
    Posts
    939
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default function ClickPrayer(Slot:Integer):Boolean;

    yeah prayer clicker with slots instead of the string.. returns true if you clicked it and your level is high enough.. false if your lvl is too low

    Code:
    {.include SRL\SRL.scar}
    
    function ClickPrayer(Slot:Integer):Boolean;
    begin
      GameTab(6)
      case Slot of
        1  : Mouse(584, 224, 6, 6, true);
        2  : Mouse(626, 224, 6, 6, true);
        3  : Mouse(666, 224, 6, 6, true);
        4  : Mouse(710, 223, 6, 6, true);
        5  : Mouse(586, 259, 6, 6, true);
        6  : Mouse(628, 260, 6, 6, true);
        7  : Mouse(669, 260, 6, 6, true);
        8  : Mouse(708, 260, 6, 6, true);
        9  : Mouse(586, 294, 6, 6, true);
        10 : Mouse(629, 295, 6, 6, true);
        11 : Mouse(667, 298, 6, 6, true);
        12 : Mouse(707, 297, 6, 6, true);
        13 : Mouse(584, 335, 6, 6, true);
        14 : Mouse(627, 331, 6, 6, true);
        15 : Mouse(665, 334, 6, 6, true);
        16 : Mouse(707, 332, 6, 6, true);
        17 : Mouse(583, 369, 6, 6, true);
        18 : Mouse(628, 372, 6, 6, true);
      end;
      Wait(500)
      Result:=True
      if(GetColor(284, 442)=16711680)then
        begin
          Result:=False
        end;
    end;
    slots are set up like this
    Code:
    1    2    3    4
    5    6    7   8...
    heres another function to go with it.. randomly select a prayer to boost accuracy,strength, or defense.. based on your level.. nothin much to it, but it works.. thanks to whiteshadow for a little help.. also must be used with ClickPrayer

    Code:
    procedure RandomAttackPrayer;
    var i: Integer;
    begin
      i:=GetSkillLevel('prayer')
      if(1<=i)and(i<=3)then ClickPrayer(1)
      if(4<=i)and(i<=6)then ClickPrayer(1+random(2))
      if(7<=i)and(i<=9)then ClickPrayer(1+random(3))
      if(10<=i)and(i<=12)then ClickPrayer(2+random(3))
      if(13<=i)and(i<=15)then ClickPrayer(3+random(3))
      if(16<=i)and(i<=27)then ClickPrayer(4+random(3))
      if(28<=i)and(i<=30)then
        begin
          case random(3)+1 of
            1 : ClickPrayer(5)
            2 : ClickPrayer(6)
            3 : ClickPrayer(10)
          end;
        end;
      if(31<=i)and(i<=33)then
        begin
          case random(3)+1 of
            1 : ClickPrayer(6)
            2 : ClickPrayer(10)
            3 : ClickPrayer(11)
          end;
        end;
      if(34<=i)then ClickPrayer(10+random(3))
    end;
    Busy with real life. I'll still be around occasionally.
    Current Mood:


  2. #2
    Join Date
    Mar 2006
    Location
    Rural New Zealand
    Posts
    688
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    it works! hehe one fof the functions for squigs fight cave one that were totaly revamping
    Come Add A Few Hits To My Site
    Cakemix lives on

  3. #3
    Join Date
    Feb 2006
    Location
    Las Vegas, NV
    Posts
    939
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    added RandomAttackPrayer; above
    Busy with real life. I'll still be around occasionally.
    Current Mood:


  4. #4
    Join Date
    Feb 2006
    Location
    California-Foster City
    Posts
    742
    Mentioned
    0 Post(s)
    Quoted
    1 Post(s)

    Default

    PRetty user friendly. Besides from the fact that you have to memorize the slot # or count, its pretty useful
    The Welcoming Party
    Don't be a Fakawi! Get 25 hours of sleep a day!

  5. #5
    Join Date
    Feb 2006
    Location
    Las Vegas, NV
    Posts
    939
    Mentioned
    1 Post(s)
    Quoted
    0 Post(s)

    Default

    ty! and for me.. its easier to remember combos of 0-9 numbers instead of combos of 26 letters
    Busy with real life. I'll still be around occasionally.
    Current Mood:


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
  •