SRL Archive - RS3 Utility Scripts

Universal Proggy System

Sin

2012-04-20 10:49:19

procedure Proggy;
var
  StartTime:Integer;
  XP,XPH,Sec:Integer;
begin
ClearDebug;
XP := GetXPBarTotal - Players[CurrentPlayer].Integers[0];
Sec:= (1+((Getsystemtime-StartTime)/1000));
XPH := (3600*XP) / (SeC);
//Your other vars go here

writeLn('============Proggy============');
writeLn('Time Running: ' + TimeRunning);
writeLn('XP Earned: ' + IntToStr(XP));
writeLn('XP/h: ' + IntToStr(XPH));
//other stuff
//other stuff
writelN('===================================');
end;

Add that before your main loop:

StartTime:=GetSystemTime;
  if (Players[CurrentPlayer].Integers[1] = 0) then
  begin
    if not IsXPBarOpen then ToggleXPBar(true);
      Players[CurrentPlayer].Integers[0] := GetXPBarTotal;
      Players[CurrentPlayer].Integers[1] := (Players[CurrentPlayer].Integers[1] + 1);
  end;

Should save you guys a lot of time =]

Sir Ducksworthy

2012-04-20 10:54:35

The Leeches sure will be bloodsucking'ly Happy with you today, Sin XD

Imanoobbot

2012-04-20 10:56:27

Pretty cool!
+Rep

mormonman

2012-04-20 14:10:52

There is already a universal proggy system included in srl/misc…

Abu

2012-04-20 14:13:13

From: mormonman
There is already a universal proggy system included in srl/misc…

*facepalmed*

the flea

2012-04-20 14:13:41

check out reports.simba in misc

E: already said woops

Hitman1531

2012-04-20 14:20:49

thanks

Sin

2012-04-20 15:34:49

Half the people don't know reports.simba exist.
And abu, you say MY attitude is bad?

I do believe that meme applies to this.

Joe

2012-04-20 16:00:43

I appreciate it..
rep+ but I have to rep someone else first

Olly

2012-04-20 16:02:50

I didn't know reports.simba existed before this thread lol :p I used Abu's tutorial before.

Sin

2012-04-20 16:03:14

From: Ollybest
I didn't know reports.simba existed before this thread lol :p I used Abu's tutorial before.

My point proven.

Sex

2012-04-20 16:05:06

Save me a lot of time? Maybe 3 minutes.

Sin

2012-04-20 16:09:50

From: Sex
Save me a lot of time? Maybe 3 minutes.

Doing frost dragons = 2.5m/h.
2.5m / 60 = 41666.66666666667.
41666 x 3 = 120k
Saved you 120k / $0.06 ^^

tehq

2012-04-20 16:12:27

From: Sin
Doing frost dragons = 2.5m/h.
2.5m / 60 = 41666.66666666667.
41666 x 3 = 120k
Saved you 120k / $0.06 ^^

6 whole cents! ;) Could be helpful for newcomers, good job.

BuckWild

2012-05-06 22:47:57

Thanks a ton for this