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?
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?

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
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.
I'll try it out and get back to you.
Thanks
Which game tab is equiptment so i can make it check if ring exists.
GameTab 5 as I recon.
Ce ne sont que des gueux
Tab 4 is inventory, so tab 5 is equipment... You can just count..

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![]()
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;
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
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
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
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
It continues anyways..
Idk
I thought the same.
Akb
I already fixed banking if thats the case
There are currently 1 users browsing this thread. (0 members and 1 guests)