home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Simtel MSDOS 1992 December
/
simtel1292_SIMTEL_1292_Walnut_Creek.iso
/
msdos
/
procomm
/
pcpdial.arc
/
VERSA2.MNU
< prev
next >
Wrap
Text File
|
1988-01-18
|
16KB
|
595 lines
SWIT S1
CASE"NYNYO"
GOTO NYNYO
ENDC
CASE"PAPHI"
GOTO PAPHI
ENDC
CASE"NCRTP"
GOTO NCRTP
ENDC
CASE"FLTAM"
GOTO FLTAM
ENDC
CASE"DCWAS"
GOTO DCWAS
ENDC
CASE"ILCHI"
GOTO ILCHI
ENDC
CASE"TXDAL"
GOTO TXDAL
ENDC
DEFA
ASSI S9"ERROR"
EXEC"VERSA.CMD"
ENDC
ENDS
NYNYO:
CLEA
LOCA 2,0
MESS" ╒══════╡ New York BBS Directory (212/718) ╞══════╕"
MESS" │ │"
MESS" │ -Board- -SIG- │"
MESS" │ │"
MESS" │ < 1> Invention Factory Everything │"
MESS" │ < 2> Friends Conversation │"
MESS" │ < 3> PC Magazine IRS PC Mag Utilities │"
MESS" │ < 4> Wolves' Den PC Board │"
MESS" │ < 5> NY BBS Service │"
MESS" │ < 6> Net Works │"
MESS" │ < 7> Marble Hill │"
MESS" │ < 8> NY Connection │"
MESS" │ < 9> Chelsea Square │"
MESS" │ <10> │"
MESS" │ │"
MESS" │ <G>o back to city selection │"
MESS" │ │"
MESS" ├────────────────────────────────────────────────┤"
MESS" │ Enter 1-10 or other phone number: │"
MESS" ╘════════════════════════════════════════════════╛"
LOCA 20,52
GET S9 11
SWIT S9
CASE"1"
ASSI S2"4311194"
;ASSI S7"COMMAND.VER"
ENDC
CASE"2"
ASSI S2"7814723"
;ASSI S7"COMMAND.VER"
ENDC
CASE"3"
ASSI S2"6960360"
;ASSI S7"COMMAND.VER"
ENDC
CASE"4"
ASSI S2"8746319"
;ASSI S7"COMMAND.VER"
ENDC
CASE"5"
ASSI S2"9800770"
;ASSI S7"COMMAND.VER"
ENDC
CASE"6"
ASSI S2"4100949"
;ASSI S7"COMMAND.VER"
ENDC
CASE"7"
ASSI S2"5625308"
;ASSI S7"COMMAND.VER"
ENDC
CASE"8"
ASSI S2"6285495"
;ASSI S7"COMMAND.VER"
ENDC
CASE"9"
ASSI S2"8071267"
;ASSI S7"COMMAND.VER"
ENDC
CASE"10"
ASSI S2"XXXXXXX"
;ASSI S7"COMMAND.VER"
ENDC
CASE"D"
EXEC"VERSA.CMD"
ENDC
CASE"E"
EXEC"VERSA.CMD"
ENDC
CASE"G"
EXEC"VERSA.CMD"
ENDC
DEFA
ASSI S2 S9
ENDC
ENDS
ASSI S9"ACTIVE"
EXEC"VERSA.CMD"
PAPHI:
CLEA
LOCA 2,0
MESS" ╒══════╡ Philadelphia BBS Directory (215) ╞══════╕"
MESS" │ │"
MESS" │ -Board- -SIG- │"
MESS" │ │"
MESS" │ < 1> Softshop │"
MESS" │ < 2> Homer Systems │"
MESS" │ < 3> System2 │"
MESS" │ < 4> Garden Works │"
MESS" │ < 5> Micro BBS │"
MESS" │ < 6> DATANET │"
MESS" │ < 7> Matrix │"
MESS" │ < 8> CITADEL BBS │"
MESS" │ < 9> Compu Chuck │"
MESS" │ <10> │"
MESS" │ │"
MESS" │ <G>o back to city selection │"
MESS" │ │"
MESS" ├────────────────────────────────────────────────┤"
MESS" │ Enter 1-10 or other phone number: │"
MESS" ╘════════════════════════════════════════════════╛"
LOCA 20,52
GET S9 11
SWIT S9
CASE"1"
ASSI S2"6631487"
;ASSI S7"COMMAND.VER"
ENDC
CASE"2"
ASSI S2"5247027"
;ASSI S7"COMMAND.VER"
ENDC
CASE"3"
ASSI S2"5841412"
;ASSI S7"COMMAND.VER"
ENDC
CASE"4"
ASSI S2"2765177"
;ASSI S7"COMMAND.VER"
ENDC
CASE"5"
ASSI S2"3386005"
;ASSI S7"COMMAND.VER"
ENDC
CASE"6"
ASSI S2"5639211"
;ASSI S7"COMMAND.VER"
ENDC
CASE"7"
ASSI S2"6323986"
;ASSI S7"COMMAND.VER"
ENDC
CASE"8"
ASSI S2"6381176"
;ASSI S7"COMMAND.VER"
ENDC
CASE"9"
ASSI S2"6711256"
;ASSI S7"COMMAND.VER"
ENDC
CASE"10"
ASSI S2"XXXXXXX"
;ASSI S7"COMMAND.VER"
ENDC
CASE"D"
EXEC"VERSA.CMD"
ENDC
CASE"E"
EXEC"VERSA.CMD"
ENDC
CASE"G"
EXEC"VERSA.CMD"
ENDC
DEFA
ASSI S2 S9
ENDC
ENDS
ASSI S9"ACTIVE"
EXEC"VERSA.CMD"
NCRTP:
CLEA
LOCA 2,0
MESS" ╒═╡ Research Triangle Park BBS Directory (919) ╞═╕"
MESS" │ │"
MESS" │ -Board- -SIG- │"
MESS" │ │"
MESS" │ < 1> Mists of Avalon │"
MESS" │ < 2> The Third Wave │"
MESS" │ < 3> The Second Ring │"
MESS" │ < 4> The Extra Ball │"
MESS" │ < 5> The Clone Connection │"
MESS" │ < 6> GTS RBBS │"
MESS" │ < 7> The Starfleet RBBS │"
MESS" │ < 8> Nibbles & Bytes │"
MESS" │ < 9> The TeXnet BBS │"
MESS" │ <10> │"
MESS" │ │"
MESS" │ <G>o back to city selection │"
MESS" │ │"
MESS" ├────────────────────────────────────────────────┤"
MESS" │ Enter 1-10 or other phone number: │"
MESS" ╘════════════════════════════════════════════════╛"
LOCA 20,52
GET S9 11
SWIT S9
CASE"1"
ASSI S2"7566151"
;ASSI S7"COMMAND.VER"
ENDC
CASE"2"
ASSI S2"7909470"
;ASSI S7"COMMAND.VER"
ENDC
CASE"3"
ASSI S2"8474625"
;ASSI S7"COMMAND.VER"
ENDC
CASE"4"
ASSI S2"8515563"
;ASSI S7"COMMAND.VER"
ENDC
CASE"5"
ASSI S2"4719771"
;ASSI S7"COMMAND.VER"
ENDC
CASE"6"
ASSI S2"4790043"
;ASSI S7"COMMAND.VER"
ENDC
CASE"7"
ASSI S2"7823095"
;ASSI S7"COMMAND.VER"
ENDC
CASE"8"
ASSI S2"9429267"
;ASSI S7"COMMAND.VER"
ENDC
CASE"9"
ASSI S2"9680657"
;ASSI S7"COMMAND.VER"
ENDC
CASE"10"
ASSI S2"XXXXXXX"
;ASSI S7"COMMAND.VER"
ENDC
CASE"D"
EXEC"VERSA.CMD"
ENDC
CASE"E"
EXEC"VERSA.CMD"
ENDC
CASE"G"
EXEC"VERSA.CMD"
ENDC
DEFA
ASSI S2 S9
ENDC
ENDS
ASSI S9"ACTIVE"
EXEC"VERSA.CMD"
FLTAM:
CLEA
LOCA 2,0
MESS" ╒═════════╡ Tampa BBS Directory (813) ╞═════════╕"
MESS" │ │"
MESS" │ -Board- -SIG- │"
MESS" │ │"
MESS" │ < 1> Sands of Babylon │"
MESS" │ < 2> The Swamp │"
MESS" │ < 3> BIDS RBBS │"
MESS" │ < 4> Amateur Radio │"
MESS" │ < 5> Ark Tangent Comp Sci │"
MESS" │ < 6> CAD Connx │"
MESS" │ < 7> Shamrock BBS │"
MESS" │ < 8> │"
MESS" │ < 9> │"
MESS" │ <10> │"
MESS" │ │"
MESS" │ <G>o back to city selection │"
MESS" │ │"
MESS" ├────────────────────────────────────────────────┤"
MESS" │ Enter 1-10 or other phone number: │"
MESS" ╘════════════════════════════════════════════════╛"
LOCA 20,52
GET S9 11
SWIT S9
CASE"1"
ASSI S2"2547710"
;ASSI S7"COMMAND.VER"
ENDC
CASE"2"
ASSI S2"8316841"
;ASSI S7"COMMAND.VER"
ENDC
CASE"3"
ASSI S2"8393003"
;ASSI S7"COMMAND.VER"
ENDC
CASE"4"
ASSI S2"8856524"
;ASSI S7"COMMAND.VER"
ENDC
CASE"5"
ASSI S2"9326939"
;ASSI S7"COMMAND.VER"
ENDC
CASE"6"
ASSI S2"8820494"
;ASSI S7"COMMAND.VER"
ENDC
CASE"7"
ASSI S2"6812611"
;ASSI S7"COMMAND.VER"
ENDC
CASE"8"
ASSI S2"XXXXXXX"
;ASSI S7"COMMAND.VER"
ENDC
CASE"9"
ASSI S2"XXXXXXX"
;ASSI S7"COMMAND.VER"
ENDC
CASE"10"
ASSI S2"XXXXXXX"
;ASSI S7"COMMAND.VER"
ENDC
CASE"D"
EXEC"VERSA.CMD"
ENDC
CASE"E"
EXEC"VERSA.CMD"
ENDC
CASE"G"
EXEC"VERSA.CMD"
ENDC
DEFA
ASSI S2 S9
ENDC
ENDS
ASSI S9"ACTIVE"
EXEC"VERSA.CMD"
DCWAS:
CLEA
LOCA 2,0
MESS" ╒═╡ Washington DC BBS Directory (202/703/301) ╞═╕"
MESS" │ │"
MESS" │ -Board- -SIG- │"
MESS" │ │"
MESS" │ < 1> Net-Exchange PC Pursuit │"
MESS" │ < 2> Interconnect Jeff Morley │"
MESS" │ < 3> DARWIN Home of DARWIN list │"
MESS" │ < 4> Capitol Connection Everything │"
MESS" │ < 5> Gannett Help Screen Publishing │"
MESS" │ < 6> ITC │"
MESS" │ < 7> Data Gate │"
MESS" │ < 8> National Geographic │"
MESS" │ < 9> Geobyte │"
MESS" │ <10> │"
MESS" │ │"
MESS" │ <G>o back to city selection │"
MESS" │ │"
MESS" ├────────────────────────────────────────────────┤"
MESS" │ Enter 1-10 or other phone number: │"
MESS" ╘════════════════════════════════════════════════╛"
LOCA 20,52
GET S9 11
SWIT S9
CASE"1"
ASSI S2"6893561"
;ASSI S7"COMMAND.VER"
ENDC
CASE"2"
ASSI S2"8275762"
;ASSI S7"COMMAND.VER"
ENDC
CASE"3"
ASSI S2"2519206"
;ASSI S7"COMMAND.VER"
ENDC
CASE"4"
ASSI S2"2805490"
;ASSI S7"COMMAND.VER"
ENDC
CASE"5"
ASSI S2"5243982"
;ASSI S7"COMMAND.VER"
ENDC
CASE"6"
ASSI S2"2751010"
;ASSI S7"COMMAND.VER"
ENDC
CASE"7"
ASSI S2"9488332"
;ASSI S7"COMMAND.VER"
ENDC
CASE"8"
ASSI S2"7756738"
;ASSI S7"COMMAND.VER"
ENDC
CASE"9"
ASSI S2"5935946"
;ASSI S7"COMMAND.VER"
ENDC
CASE"10"
ASSI S2"XXXXXXX"
;ASSI S7"COMMAND.VER"
ENDC
CASE"D"
EXEC"VERSA.CMD"
ENDC
CASE"E"
EXEC"VERSA.CMD"
ENDC
CASE"G"
EXEC"VERSA.CMD"
ENDC
DEFA
ASSI S2 S9
ENDC
ENDS
ASSI S9"ACTIVE"
EXEC"VERSA.CMD"
ILCHI:
CLEA
LOCA 2,0
MESS" ╒══════╡ Chicago BBS Directory (312/815) ╞══════╕"
MESS" │ │"
MESS" │ -Board- -SIG- │"
MESS" │ │"
MESS" │ < 1> Super Board Files, Files, Files │"
MESS" │ < 2> Lakes Region RBBS │"
MESS" │ < 3> RIPCOoard Pseudo Illegal │"
MESS" │ < 4> LAWMUG Law, Lawyers │"
MESS" │ < 5> Chicago Computer Society │"
MESS" │ < 6> Ski's Lodge │"
MESS" │ < 7> Excellence │"
MESS" │ < 8> Waukegan Pub Lib Sys │"
MESS" │ < 9> Windmill │"
MESS" │ <10> │"
MESS" │ │"
MESS" │ <G>o back to city selection │"
MESS" │ │"
MESS" ├────────────────────────────────────────────────┤"
MESS" │ Enter 1-10 or other phone number: │"
MESS" ╘════════════════════════════════════════════════╛"
LOCA 20,52
GET S9 11
SWIT S9
CASE"1"
ASSI S2"8824227"
;ASSI S7"COMMAND.VER"
ENDC
CASE"2"
ASSI S2"8728086"
;ASSI S7"COMMAND.VER"
ENDC
CASE"3"
ASSI S2"5285020"
;ASSI S7"COMMAND.VER"
ENDC
CASE"4"
ASSI S2"2808180"
;ASSI S7"COMMAND.VER"
ENDC
CASE"5"
ASSI S2"9406496"
;ASSI S7"COMMAND.VER"
ENDC
CASE"6"
ASSI S2"2829272"
;ASSI S7"COMMAND.VER"
ENDC
CASE"7"
ASSI S2"3982872"
;ASSI S7"COMMAND.VER"
ENDC
CASE"8"
ASSI S2"6232226"
;ASSI S7"COMMAND.VER"
ENDC
CASE"9"
ASSI S2"8798027"
;ASSI S7"COMMAND.VER"
ENDC
CASE"10"
ASSI S2"XXXXXXX"
;ASSI S7"COMMAND.VER"
ENDC
CASE"D"
EXEC"VERSA.CMD"
ENDC
CASE"E"
EXEC"VERSA.CMD"
ENDC
CASE"G"
EXEC"VERSA.CMD"
ENDC
DEFA
ASSI S2 S9
ENDC
ENDS
ASSI S9"ACTIVE"
EXEC"VERSA.CMD"
TXDAL:
CLEA
LOCA 2,0
MESS" ╒═══════╡ Dallas BBS Directory (214/817) ╞═══════╕"
MESS" │ │"
MESS" │ -Board- -SIG- │"
MESS" │ │"
MESS" │ < 1> Killen Board C Languages │"
MESS" │ < 2> UNIX Connection UNIX │"
MESS" │ < 3> K-Squared │"
MESS" │ < 4> Double D │"
MESS" │ < 5> Mars Hill Philosophy Conference │"
MESS" │ < 6> Seabrook Computers │"
MESS" │ < 7> Sachse │"
MESS" │ < 8> F I A W O L │"
MESS" │ < 9> Bluebonnet BBS │"
MESS" │ <10> │"
MESS" │ │"
MESS" │ <G>o back to city selection │"
MESS" │ │"
MESS" ├────────────────────────────────────────────────┤"
MESS" │ Enter 1-10 or other phone number: │"
MESS" ╘════════════════════════════════════════════════╛"
LOCA 20,52
GET S9 11
SWIT S9
CASE"1"
ASSI S2"2452432"
;ASSI S7"COMMAND.VER"
ENDC
CASE"2"
ASSI S2"8210390"
;ASSI S7"COMMAND.VER"
ENDC
CASE"3"
ASSI S2"3930750"
;ASSI S7"COMMAND.VER"
ENDC
CASE"4"
ASSI S2"4928090"
;ASSI S7"COMMAND.VER"
ENDC
CASE"5"
ASSI S2"2727979"
;ASSI S7"COMMAND.VER"
ENDC
CASE"6"
ASSI S2"6698735"
;ASSI S7"COMMAND.VER"
ENDC
CASE"7"
ASSI S2"5300607"
;ASSI S7"COMMAND.VER"
ENDC
CASE"8"
ASSI S2"3528721"
;ASSI S7"COMMAND.VER"
ENDC
CASE"9"
ASSI S2"8215312"
;ASSI S7"COMMAND.VER"
ENDC
CASE"10"
ASSI S2"XXXXXXX"
;ASSI S7"COMMAND.VER"
ENDC
CASE"D"
EXEC"VERSA.CMD"
ENDC
CASE"E"
EXEC"VERSA.CMD"
ENDC
CASE"G"
EXEC"VERSA.CMD"
ENDC
DEFA
ASSI S2 S9
ENDC
ENDS
ASSI S9"ACTIVE"
EXEC"VERSA.CMD"