
.. PCPDATA.MEX  (04/14/90))
..
.. This routine contains all the data for the systems in the menu.  Each
.. entry sets the following variables:
..
..	B		actual baud rate code ("12" or "24")
..	D		outdial code
..	E		phone number
..	F		name of system called
..	%a		area code
..	%c		city number (see PCPMAN menu)
..
.. In addition, function keys are set up (where the defaults are not correct)
.. with the login names and/or passwords.  Once the data has been set, the
.. code chains to PCPCONN, which negociates the connection.


key 1="Your Name/r";.			default key definitions
key 2="Your-Usual-PW/r"

.. set the standard baud rate codes based on highest rate requested.  Today
.. with all PCP cities at 2400 bps, the defaults will always be used.

if %b=1200 B="12"
if %b=2400 B="24"

.. dispatch table

if %m=1  GOTO BBS01
if %m=2  GOTO BBS02
... similar items omitted
if %m=27 GOTO BBS27

.. ----------------------------------------------------------------------
..
..	Data on Remote Access Systems from Menu
..
.. ----------------------------------------------------------------------

LABEL BBS01
F="Al Hawley (ZN2)"
D="CALAN"
%c=13
%a=213
E="670-9465"
key 1="###CCCCCCC/r";.		login id/password combination
READ PCPCALL;.			chain to place the call

.. entries for other systems omitted
                                                                   