NKN
2012-03-22 07:17:46
I got the rest of my progress report, I just can't seem to find a formula to get it to check how many herbs cleaned per hour. Help?
Thanks in advance.
Thanks in advance.
2012-03-22 07:17:46
2012-03-22 13:16:13
2012-03-22 14:03:01
procedure HerbsBanked;
var
HerbsCleaned: Integer;
begin
if BankScreen then
IncEx(HerbsCleaned, 28);
end;procedure Report;
begin
if BankScreen then
begin
//Time running
// blah blah
Writeln('Herbs Cleaned ' + IntToStr(HerbsCleaned) );
end;
end;
2012-03-22 15:55:03
2012-03-22 16:01:12
procedure HerbsPerHour;
Begin
HerbsPH := Round((HerbsCleaned * 3600) / (GetTimeRunning / 1000));
end;
2012-03-22 16:01:59