home *** CD-ROM | disk | FTP | other *** search
/ Oakland CPM Archive / oakcpm.iso / cpm / turbopas / pmodem.ark / PMODEM.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1987-02-22  |  1.9 KB  |  44 lines
  1. (*-----------------------PMODEM--------------------------*
  2. *               Modem utility vers. 1.1b                 *
  3. * Written by Phillip Hansford, October 1984,             *
  4. * revised 11/9/86.                                       *
  5. *                                                        *
  6. * This program works with a smart modem to conveniently  *
  7. * access remote computers and modems. It includes a host *
  8. * mode to answer incomming calls. Provision for          *
  9. * automatic logon is also included in this revision.     *
  10. * Program is written in Turbo Pascal 3.0 for CP/M-80     *
  11. * (Z-80) and needs modification to match specific modem  *
  12. * and computer.                                          *
  13. *                                                        *
  14. * ==> This program is free. It may be used for any       *
  15. * purpose. However, the distribution of this program is  *
  16. * restricted to free remote computer systems and free    *
  17. * non-commercial means. This program is not to be sold,  *
  18. * nor may charges of any kind be made for its            *
  19. * distribution without permission from author.           *
  20. *--------------------------------------------------------*)
  21.  
  22. program pmodem;
  23. {program contains 'include' files which are
  24. combined by Turbo Pascal compiler}
  25.  
  26. {$I equates.inc}  {constants & initial values}
  27. {$I ros.mch}    {ROS machine drivers}
  28. {$I ros.mdm}    {ROS modem drivers}
  29. {$I io.inc}     {driver interface}
  30. {$I open.inc}  {other utilities}
  31. {$I terminal.inc}  {terminal mode section}
  32. {$I directry.inc}  {phone number list}
  33. {$I dial.inc}  {auto dial section}
  34. {$I ascii.inc}  {ASCII transfer}
  35. {$I send.inc}  {send file}
  36. {$I receive.inc}  {receive file}
  37. {$I host.inc}  {host modem routines}
  38. {$I default.inc}  {default & miscellaneous}
  39.  
  40. {$I main.inc}  {main program}
  41.  
  42. {end of program}
  43.  
  44.