home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / PASCAL / MGTP4.ZIP / MGSKEL.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1988-01-16  |  603 b   |  29 lines
  1. {$R-}    {Range checking off}
  2. {$B-}    {Boolean short circuiting off}
  3. {$S+}    {Stack checking on}
  4. {$I+}    {I/O checking on}
  5. {$N-}    {No numeric coprocessor}
  6. {$M 65500,16384,655360} {Turbo 3 default stack and heap}
  7.  
  8. Program SkeletonProgram(Input,Output);
  9.  
  10. Uses
  11.   Crt,
  12.   Dos,
  13.   MgProg;
  14.  
  15.                           { Enter any MiniGen window procedres here }
  16.  
  17. Procedure MainLoop;       { Main program logic }
  18. Begin
  19. End;
  20.  
  21. Begin {** Main Program **}
  22. ClrScr;
  23. MaxLimits;
  24.                           { Define screens }
  25. MainLoop;
  26. TerminateScreens;
  27. LowVideo;
  28. ClrScr;
  29. End. {** Main **}