;*************************** AMUS Program Label ******************************
; Filename: AMUS.BYE                                        Date: 01/29/90
; Category: COMM         Hash Code: 475-527-745-507      Version:
; Initials: BOB/AM       Name: KAREN BOJDA
; Company: SOFT MACHINES                           Telephone #: 2173517199
; Related Files: AMUS.AGO
; Min. Op. Sys.:                               Expertise Level: BEG
; Special: Requires AUTOLOG 2.3 or later
; Description: AUTOLOG BYE file (finish script) for logging off AMUS. Can be
; used alone or in conjunction with AMUS.AGO. Hash is correct when AMUS progr.
; label is removed.
;*****************************************************************************
:S
GET'DOT:
       say "^M"
       until "." 10
       if err0 = 0 goto BYE
       SAY "AT^M"
       UNTIL "OK" 10
       IF ERR0 = 0 GOTO ALL'DONE
:<
Please exit out of whatever program you're running on the AMUS
network, and return to the dot (.) prompt so we can log-off.
>
       sleep 1
       TALK
       GOTO GET'DOT
BYE:    SAY "BYE^M"
       :R
       UNTIL "THANK YOU" 30
       PEEK 2
       HANGUP
ALL'DONE:
:<Logged off AMUS network
>