program new;
{$I SRL/OSR.simba}
{$I SRL/utils/slackdebug.simba}

var
  bmp: TMufasaBitmap;
begin
  bmp.Init(client.GetMBitmaps);
  bmp.SetSize(280,100);
  AddOnTerminate(@bmp.Free);

  while True do
  begin                               //random color   //random XP         //random XP gain  //count
    bmp.DrawSkillReport(Point(25,15), Random($FFFFFF), Random(0,14000000), Random(1200000),  10,'');
    bmp.Debug();
    wait(600);
  end;
end.