home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / 1990 / 05 / tricks / test1.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  1990-02-12  |  604 b   |  18 lines
  1. (* ------------------------------------------------------ *)
  2. (*                     TEST1.PAS                          *)
  3. (*            Demoprogramm zu NOTHALT.PAS                 *)
  4. (* ------------------------------------------------------ *)
  5. {$M 16384,0,655360}
  6. PROGRAM test1;
  7.  
  8. USES Dos;
  9.  
  10. BEGIN
  11.   WriteLn('Falls sie NOTHALT installiert haben, können ');
  12.   WriteLn('Sie ihr System mit <CTRL-ALT-HOME> wieder ');
  13.   WriteLn('zum Leben erwecken !');
  14.   Keep(0);
  15. END.
  16. (* ------------------------------------------------------ *)
  17. (*                 Ende von TEST1.PAS                     *)
  18.