Program HiAsm;
{$ifdef FPC} {$APPTYPE GUI} {$endif}
{$R allres.res}
uses
hiMainForm_A089620,
Windows,
kol,Share;

begin
if ParamStr(1) = '/ih' then
begin
MessageBox(0,'Сделано в HiAsm.','HiAsm Info',MB_OK);
Halt;
end;
ClassMain := TClassMainForm_A089620.Create;
ClassMain.MainForm_A089620.Start;
Run(Applet);
ClassMain.Destroy;
end.