I got
Code:
Error: Exception: "" is an invalid integer at line 92
The following DTMs were not freed: [0, SRL - Lamp bitmap, 2]
The following bitmaps were not freed: [SRL - Mod bitmap, SRL - Admin bitmap, SRL - Flag bitmap]
result:=StrToInt(ExtractFromStr(GetTextAtExWrap(424,56,508,69,0,5,4,clWhite,2,XPChars),Numbers));
I don't know how to fix sorry 
---------
I made all uses of xp comments and it works
----
Code:
// Writeln('********** Inventories: ' + inttostr(inventories) + ' Planks: ' + inttostr((GainedXP/90)) + ' **********' );
Writeln('****************************************************');
Writeln('Running for: ' + TimeRunning);
Writeln('Missclicks (on purpose): ' + inttostr(missclicks) + ' || ' + OutputDecimals(missclicks,inventories) + ' avg/inventory' );
Writeln('Random waits: ' + inttostr(rsleep) + ' || ' + OutputDecimals(rsleep,inventories) + ' avg/inventory');
Writeln('Antiban actions: ' + inttostr(antibans) + ' || ' + OutputDecimals(antibans,inventories) + ' avg/inventory');
// Writeln('Exp Gained: ' + inttostr(GainedXP) + ' || ' + XPPerHour(GetTimeRunning,GainedXP) + ' exp/hour');
//Writeln('We have made/lost: ' + inttostr(Round(((GainedXP*GAIN_PER_CAST)/90))) + ' gp || ' + XPPerHour(GetTimeRunning,(Round(((GainedXP*GAIN_PER_CAS
etc.