home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / walnut-creek-CDROM / JSAGE / ZSUS / TCJ / TCJ45.LBR / PCPDATA.TZJ / PCPDATA.TCJ
Text File  |  1990-05-02  |  1KB  |  45 lines
  1.  
  2. .. PCPDATA.MEX  (04/14/90))
  3. ..
  4. .. This routine contains all the data for the systems in the
  5. .. menu.  Each entry sets the following variables:
  6. ..
  7. ..      B               actual baud rate code ("12" or "24")
  8. ..      D               outdial code
  9. ..      E               phone number
  10. ..      F               name of system called
  11. ..      %a              area code
  12. ..      %c              city number (see PCPMAN menu)
  13. ..
  14. .. In addition, function keys are set up (where the defaults are
  15. .. not correct) with the login names and/or passwords.
  16.  
  17. key 1="Your Name/r";.       default key definitions
  18. key 2="Your-Usual-PW/r"
  19.  
  20. if %b=1200 B="12"
  21. if %b=2400 B="24"
  22.  
  23. .. dispatch table
  24.  
  25. if %m=1  GOTO BBS01
  26. .. etc.
  27. if %m=27 GOTO BBS27
  28.  
  29. .. ------------------------------------------------------------
  30. ..
  31. ..      Data on Remote Access Systems from Menu
  32. ..
  33. .. ------------------------------------------------------------
  34.  
  35. LABEL BBS01
  36. F="Al Hawley (ZN2)"
  37. D="CALAN"
  38. %c=13
  39. %a=213
  40. E="670-9465"
  41. key 1="###CCCCCCC/r";.      login id/password combination
  42. READ PCPCALL;.              chain to place the call
  43.  
  44. .. entries for other systems omitted
  45.