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