!
@ANSWER
@HANGUP
EXIT 0
!
@ORIGINATE
!
CHRDELAY 1
!
@LABEL 10
MATCHCLR
MATCHSTR 1 11 "sername:"
MATCHREAD 300
NOTE "Connect script couldn't match \34Username: \34" 3
JUMP 99
!
@LABEL 11
IFSTR 11 12 "<Guest>"
IFSTR 11 12 ""
PAUSE 1
WRITE "^u\13"
JUMP 13
!
@LABEL 12
ASK 0 "Please enter username:"
WRITE "^*\13"
!
@LABEL 13
MATCHCLR
MATCHSTR 1 14 "assword:"
MATCHREAD 300
NOTE "Connect script couldn't match \34Password: \34" 3
JUMP 99
!
@LABEL 14
IFSTR 12 15 ""
PAUSE 1
WRITE "^p\13"
JUMP 16
!
@LABEL 15
ASK 1 "Please enter password:"
WRITE "^*\13"
!
@LABEL 16
MATCHCLR
MATCHSTR 1 17 ">"
MATCHREAD 300
NOTE "Connect script couldn't match \34-server>\34" 3
JUMP 99
!
@LABEL 17
PAUSE 1
WRITE "ppp\13"
!
@LABEL 90
PAUSE 1
EXIT 0
!
@LABEL 99
PAUSE 60
EXIT -6002 "Connection script failed."