Log in

View Full Version : Per hour proggy



Footy
08-08-2012, 02:02 PM
How would I go about putting exp per hour, and tanned hides per hour in my proggy? This is my proggy so far.
Procedure Proggy;
begin
Writeln('********************************');
Writeln('Time running = ' + (TimeRunning));
Writeln('We have Tanned ' + IntToStr(Hides_Tanned));
Writeln('We have earned ' + IntToStr(Profit_per_hide * Hides_Tanned));
end;
Thanks in advance!
Footy

P1ng
08-08-2012, 02:08 PM
Simple math :) But there are many ways to arrange the math, all a matter of preference.

Here is how I do it in all of my scripts: round(3600000 * 1.0 / GetTimeRunning * xp)

Don't forget to add the 'round' because otherwise you will have some hectic long decimal on the end of that number.

Footy
08-08-2012, 02:09 PM
Awesome! Thanks Ping!

VastlySuperior
08-08-2012, 03:54 PM
There was a discussion about htis just a day ago, here is the link (http://villavu.com/forum/showthread.php?t=87956)