;*************************** AMUS Program Label ******************************
; Filename: AMUS2.TLK Date: 08/02/91
; Category: UTIL Hash Code: XXX-XXX-XXX-XXX Version: 4.0(100)
; Initials: ULTR/US Name: DAVID PALLMANN
; Company: ULTRASOFT CORPORATION Telephone #: 5163484848
; Related Files: LIB:TALKTO.DAT
; Min. Op. Sys.: AMOSL 1.3B/AMOS32 1.0 Expertise Level: INT
; Special: REQUIRES TALKTO 4.0 (see AMUS.TLK for a TALKTO 3.x script)
; Description: TALKTO 4.0 script file to dial into AMUS network
;*****************************************************************************
;
; Script file to dial into Alpha Micro User Society (AMUS) network
;
; Before using this script file, modify it as follows:
;
; 1. Change the TELSET line, if your modem is not named MODEM, to
; select the proper port name.
;
; 2. Change the terminal driver to match the type of terminal you are
; using. Default in this script file is "AM65".
;
; 3. Change the login ID and PASSWORD to match the network id and
; password that the AMUS office has assigned to you. The default
; id and password in this script are dummies that will not work.
;select port and set communications options
SELECT:
TELSET MODEM/H/L
EMULATE NONE
;dial one of the AMUS modems
DIAL:
CALL AMUS
IF $ GOTO ONLINE.FAST
MESSAGE Line #1 is busy, trying line #2
CALL AMUS2
IF $ GOTO ONLINE.SLOW
MESSAGE Line #2 is busy, tring line #3
CALL AMUS3
IF $ GOTO ONLINE.SLOW
MESSAGE Line #3, is busy trying line #4
CALL AMUS4
IF $ GOTO ONLINE.SLOW
;come here when we failed to connect to any modems
NO.CONNECT:
ALARM
MESSAGE Unable to connect to AMUS|
FINISH
;we are now on-line, but must output some CRs to establish our baud rate
