freepascal.compiler/packages/tosunits/examples/higem.pas

{$APPTYPE GUI}
program higem;

uses
  aes;

begin
  appl_init;

  form_alert(1,'[4][Hi Atari GEM World!|'+
               '|This is Free Pascal here.][Cool]');

  appl_exit;
end.