home *** CD-ROM | disk | FTP | other *** search
/ Oakland CPM Archive / oakcpm.iso / sigm / vol237 / pilot-p.lbr / LESSON1.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1986-02-10  |  512 b   |  14 lines
  1. PROGRAM LESSON1;
  2. {$iPILOT/P.HDR }
  3. { FILE: LESSON1.PLT}
  4. BEGIN initialize;
  5. WRITELN($c);
  6. WRITELN(' LESSON #1');
  7. WRITELN;
  8. WRITELN(' ',$n,', AFTER PROGRESSING THRU THESE LESSONS WE');
  9. WRITELN(' AUTOMATICALLY RETURN TO THE MAIN PROGRAM.');
  10. WAIT(5,ch);
  11. FTXTIN('LMENU.COM');CHAIN;
  12. GOTO 0;
  13. 0:END.
  14.