Results 1 to 16 of 16

Thread: Load Count?

  1. #1
    Join Date
    Jul 2008
    Location
    Far Off Pot Fields, Nowhere
    Posts
    66
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default Load Count?

    Ok so i wanna make it where my script renews the ring of forging after it degrades.

    It degrades after 5 full inventorys

    Can someone help me with a command or procedure of somekind?

  2. #2
    Join Date
    Dec 2008
    Posts
    2,813
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    after your thing that uses the ring, do Inc(used)

    then make a new proc..

    SCAR Code:
    procedure Recharge;
    begin
    If not(loggedin) then
    exit;
    if (used = 5) then
    //blahblahblah
    end;
    IncEx(Used, 5);//can't remember IncEx and how to take away whatever.. I think you can maybe use IncEx(Used, -5)? dunno.. nauman I think has a tut

  3. #3
    Join Date
    Sep 2006
    Location
    Canada
    Posts
    1,124
    Mentioned
    0 Post(s)
    Quoted
    5 Post(s)

    Default

    99_, the problem with your idea is the ring of forging may not degrade after 5 uses! If you logout after doing one load and log back in, what if you are at the furnace after doing four loads, having depleted your ring, but since your script knows you've done 4 it won't bring out a new one.

    I think the best way would be to get the black message from the text box as it says "Your ring of forging has turned to ashes" or something like that.

  4. #4
    Join Date
    Jul 2008
    Location
    Far Off Pot Fields, Nowhere
    Posts
    66
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    I'll try it out and get back to you.
    Thanks

  5. #5
    Join Date
    Jul 2008
    Location
    Far Off Pot Fields, Nowhere
    Posts
    66
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Which game tab is equiptment so i can make it check if ring exists.

  6. #6
    Join Date
    Feb 2007
    Location
    Access Violation at 0x00000000
    Posts
    2,865
    Mentioned
    3 Post(s)
    Quoted
    18 Post(s)

    Default

    GameTab 5 as I recon.
    Ce ne sont que des gueux


  7. #7
    Join Date
    Jan 2009
    Posts
    40
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Tab 4 is inventory, so tab 5 is equipment... You can just count..

  8. #8
    Join Date
    Dec 2008
    Posts
    2,813
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    what are you talking about?

    it will know it's used a charge after a load, the if not Loggedin, is just a failsafe >.>

    and I've never used one, so I'm going off what he said.. just add the text checking for a back up

  9. #9
    Join Date
    Jul 2008
    Location
    Far Off Pot Fields, Nowhere
    Posts
    66
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Ok so here's what i got to work..

    Checks for ring after it withdraws ore, if not equipted it will do so =p

    SCAR Code:
    Procedure CheckRing;

    begin;
     if not Loggedin then
      Exit;
     GameTab(5);
     if not (FindDTM(RingDTM,x,y,msx1,msy1,msx2,msy2))then
     
    begin;

     if FindObjCustom(x, y, ['ooth', 'Bank Booth'], [5070960, 3622224, 4675944], 5) then

    begin;
        wait(850 + random(200));
        Mouse(X,Y, 2,2, false);
        wait(200 + random(200));
        ChooseOption('uick');
        wait(2000 +random(500));
      if(FindDTM(RingDTM,x,y,msx1,msy1,msx2,msy2))then

    begin;
                Status('Withdrawing Ring..');
                Mouse(x,y,1,3,True);
                CloseBank;
                wait(1500 +random(750));
                GameTab(4);
      if(FindDTM(RingDTM,x,y,msx1,msy1,msx2,msy2))then
     
    begin;
                wait(1500 +random(750));
                Mouse(x,y,2,4,True);
                FreeDTM(RingDTM);
    end;
    end;
    end;
    end;
    end;

  10. #10
    Join Date
    Oct 2008
    Location
    behind you!
    Posts
    1,688
    Mentioned
    2 Post(s)
    Quoted
    40 Post(s)

    Default

    SCAR Code:
    Procedure CheckRing;
     
    begin;
      if not Loggedin then
      Exit;
      GameTab(5);
      if not (FindDTM(RingDTM,x,y,msx1,msy1,msx2,msy2))then
      begin;
        if FindObjCustom(x, y, ['ooth', 'Bank Booth'], [5070960, 3622224, 4675944], 5) then
        begin;
          wait(850 + random(200));
          Mouse(X,Y, 2,2, false);
          wait(200 + random(200));
          ChooseOption('uick');
          wait(2000 +random(500));
          if(FindDTM(RingDTM,x,y,msx1,msy1,msx2,msy2))then
          begin;
            Status('Withdrawing Ring..');
            Mouse(x,y,1,3,True);
            CloseBank;
            wait(1500 +random(750));
            GameTab(4);
            if(FindDTM(RingDTM,x,y,msx1,msy1,msx2,msy2))then
            begin;
              wait(1500 +random(750));
              Mouse(x,y,2,4,True);
              FreeDTM(RingDTM);
            end;
          end;
        end;
      end;
    end;

    fixed, btw why you don't use bank.scar tools for banking to open the bank etc.
    Hi

  11. #11
    Join Date
    Feb 2007
    Location
    Access Violation at 0x00000000
    Posts
    2,865
    Mentioned
    3 Post(s)
    Quoted
    18 Post(s)

    Default

    SCAR Code:
    Procedure CheckRing;
    Begin
      If Not Loggedin Then
        Exit;
      If GetCurrentTab <> 5 Then
        GameTab(5);
      If Not FindDTM(RingDTM, x, y, MSX1, MSY1, MSX2, MSY2) Then
      Begin
        If FindObjCustom(x, y, ['ooth', 'Bank Booth'], [5070960, 3622224, 4675944], 5) Then
        Begin
          Mouse(x, y, 2, 2, False);
          Wait(200 + random(200));
          ChooseOption('uick');
          Wait(2000 + random(500));
          If FindDTM(RingDTM, x, y, MSX1, MSY1, MSX2, MSY2) Then
          Begin
            Status('Withdrawing Ring..');
            Mouse(x, y, 1, 3, True);
            CloseBank;
            Wait(1500 + random(750));
            GameTab(4);
            If FindDTM(RingDTM, x, y, MSX1, MSY1, MSX2, MSY2) Then
            Begin
              Wait(1500 + random(750));
              Mouse(x, y, 2, 4, True);
              FreeDTM(RingDTM);
            End;
          End;
        End;
      End;
    End;

    Fixed some more standards.
    I like to capitalize bold words but that's up to you.
    Ce ne sont que des gueux


  12. #12
    Join Date
    Jul 2008
    Location
    Far Off Pot Fields, Nowhere
    Posts
    66
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Ok... Even if it is there it still withdraws ring..

    Can someone make it where if it finds it it will go to next procedure?

    Much thanks btw

  13. #13
    Join Date
    Feb 2007
    Location
    Access Violation at 0x00000000
    Posts
    2,865
    Mentioned
    3 Post(s)
    Quoted
    18 Post(s)

    Default

    It should just exit out of the procedure if the ring is found...
    SCAR Code:
    If Not FindDTM(RingDTM, x, y, MSX1, MSY1, MSX2, MSY2) Then
    Ce ne sont que des gueux


  14. #14
    Join Date
    Jul 2008
    Location
    Far Off Pot Fields, Nowhere
    Posts
    66
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    It continues anyways..
    Idk
    I thought the same.

  15. #15
    Join Date
    Oct 2008
    Location
    behind you!
    Posts
    1,688
    Mentioned
    2 Post(s)
    Quoted
    40 Post(s)

    Default

    Quote Originally Posted by Sir_Oober View Post
    It continues anyways..
    Idk
    I thought the same.
    Sir_Oober, where are you banking.
    Hi

  16. #16
    Join Date
    Jul 2008
    Location
    Far Off Pot Fields, Nowhere
    Posts
    66
    Mentioned
    0 Post(s)
    Quoted
    0 Post(s)

    Default

    Akb

    I already fixed banking if thats the case

Thread Information

Users Browsing this Thread

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

Similar Threads

  1. cant load fonts =[
    By skilld u in forum OSR Help
    Replies: 5
    Last Post: 04-21-2008, 06:39 PM

Posting Permissions

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