SRL Archive - OSR Help

Can someone help me out why isit my proggy showing up

this is the code;

procedure ProggyTest;
begin
  ClearDebug;
  TimeGone := (GetTimeRunning/1000);
  XPGain[CurrentPlayer] := (CurrentXP - OriginalXP);
  XPPerhour :=(3600*(XPGain))/((TimeGone));
  begin
  begin
    Writeln('******************************************************************');
    Writeln('*/////////---------- Script Writer willow bot v1.0 ----------\\\\\\\*');
    Writeln('*/////////----------____________________________----------\\\\\\\*');
    Writeln('******************************************************************');
    Writeln('');
   begin
      Writeln('*/////////--------- Proggy for the player: ' + Players[0].Nick + ' --------\\\\\\\\\*');
      Writeln('*/////////Running for: ' + IntToStr(TimeGone) + ' secounds' );
      Writeln('*/////////We have gained ' + IntToStr(XpGain) + ' xp/  Thats ' + IntToStr(XPPerHour) + ' xp per hour');
       end;
 end;

Do you call this procedure in the mainloop?

@OP
When requesting help please post the entire script. If you have info in the script you'd rather not share remove it first.

Also wrap tags around your code. for instance use these tags: