| Title: | True North Strong & Free |
| Notice: | Introduction in Note 535, For Sale/Wanted in 524 |
| Moderator: | POLAR::RICHARDSON |
| Created: | Fri Jun 19 1987 |
| Last Modified: | Fri Jun 06 1997 |
| Last Successful Update: | Fri Jun 06 1997 |
| Number of topics: | 1040 |
| Total number of notes: | 13668 |
In hopes this will save somebody time: here is a basic KERMIT
script for a dialback system. It will make the call, wait for the
call back, and logon to your VAX. I annotated it for another user
already so it should be easy to understand. If anybody else has
a useful script please post it! I am posting it here because I'm
note sure any other sites have the same type of callback system
we're using here at KAO/OTO and TRO/TRC...
needs: Kermit 3.01 terminal software (3.00 won't do unless you
make a few changes)
IBM pc
Hayes compatible commands must be accepted by modem
Use your MSKERMIT.INI file to set all the basic stuff like
port, terminal speed, etc.
You need to know how to use an editor to change the
personal data to yours.
Extract this file, move it to your PC and call it DB.TAK. Then
fire up MSKERMIT, and say TAK DB.TAK at the MS-Kermit prompt.
;
; Dialback script for Kermit 3.01 and HAYES COMPATIBLE modems
;
; 1. make changes below for your personal data
; 2. put in a file called (for example) DB.TAK in your Kermit directory
; 3. start KERMIT; at the "MS-Kermit>" prompt type: TAKE DB.TAK
;
; YOU MUST CHANGE THE FOLLOWING to your own data:
;
define \%n 7307616 ;TRO dialback number (check!!)
define \%c 0009999 ;Access code (your own personal)
define \%m TROOA ;machine to connect to from LAT
define \%a CURZON ;your personal VAX account
; (what you type at the Username: prompt)
;**********************************************************************
;
; The rest SHOULDN'T be changed until you think you know what you're
; doing....
;
def errmsg echo \%1, echo \13, def \%1, stop ; complain but don't hangup
set input timeout quit ;for this part, quit if we don't get
; a call back
;
echo LEAVE YOUR TELEPHONE on hook...\13
echo \7\13
echo IF YOUR MODEM has no speaker, you won't be able to tell if\13
echo ..the callback line is busy. Lift your phone a few seconds\13
echo ..AFTER Kermit dials the number, and listen just long enough\13
echo ..to be sure the call is being answered. Then hang up the phone.\13
echo \13
echo This part is not fancy, if our call gets\13
echo a busy signal, you can:\13
echo .....wait 3 minutes for Kermit to timeout and quit\13
echo .....just hit control C LOTS of times\13
echo ..........& type OUTPUT ATH to hangup the modem.\13
echo
;
:redial
clear ;remove whatever is there
hangup ;make sure modem is ours
pause 1 ;
output ATZ\13 ;Get MODEM attention
input 2 ok ;MODEM should say ok..
output ATX3\13 ;Setup modem response set. One result is
; "blind dial", so that when the VAX calls
; back we can respond with ATDT command
; even though there is no dial tone.
input 2 OK ;MODEM ok..
output ATDT \%n ,,,,, \%cH\13 ;Dial
pause 20 ; dial seq should be finished
echo \7\13 ; response, but let's just look for CR)
;
echo Here's where we wait for the VAX to phone us back.\13
echo Kermit will wait for 3 minutes then time out.\13
echo .... so just wait, don't touch anything.\13
echo \13
echo .... if you heard a busy signal, hit LOTS of control-C's\13
echo .... and type OUTPUT ATH when you see the MS-Kermit prompt\13
echo ........ and try again later!\13
echo \13
input 180 RING ;modem will tell Kermit when dialback comes,
; we'll wait 3 minutes for it then quit
echo \13
echo \13 Your VAX is calling... the next thing you will have to type \13
echo ...SHOULD be your password... wait til you see the password prompt.\13
echo \13
pause 1 ;wait a second and answer
output ATDT8\13 ;dial any number to please robot ***
input 60 CONNECT ;modem signals when it is talking to VAX
; modem. We wait 60 seconds for connect.
;
set input timeout-action proceed ;if no expected responses, allow error
;handling (alternative to PROCEED is QUIT)
clear ;kill whatever is in comm buffer
set count 8
write screen text \10\13 next try to wake up the LAT ;tell user where we are
:getlat
write screen count ;show user retries
output \13 ;Wake up LAT
input 1 \13
if success set count 8 ;we'll try up to 8 times to get username>
if success write screen text \10\13 next try for username> prompt from LAT:
if success goto lat_uname
if count goto getlat
errmsg {couldn't get response}
:lat_uname
write screen count
output \13
input 1 name>
if success set count 5
if success write screen text \10\13 next try for Local> prompt:
if success goto typeuser
if count goto lat_uname
errmsg {couldn't get response}
:typeuser
write screen count
output rc\13
input 1 Local> ;ready for commands
if success set count 5
if success write screen text \10\13 next try for USERNAME: prompt from VAX
if success goto conntovax
if count goto typeuser
errmsg {couldn't get response}
:conntovax
write screen count
output connect \%m\13 ;tell lat the service to connect
input 3 Username:
if success set count 5
if success goto vaxlogin
if count goto conntovax
errmsg {couldn't get response}
:vaxlogin
output \%a\13 ;tell VAX "It's me"
input 3 Password: ; wait for the pw prompt
echo \7\13
echo \13 Now Kermit will pass your password to the "Password:" prompt.
echo \13 ... TYPE YOUR VAX PASSWORD, then hit ENTER:
output @CON ;pass the word to the VAX
output \13 ;hit enter after that
input 15 \27Z ;wait for FIRST "terminal type" query from the VAX
; (at least true for node TROOA in January 1991)
; note: in CONNECT mode, Kermit automatically answers the
; LAST "terminal type" query that comes from the VAX,
; but then you are in terminal mode and script is no longer
; in control of the session. If user wants to keep control
; of the session, use one of these 2 INPUT strings, and
; the OUTPUT string shown below.
;input 15 \27[c ;wait for terminal type inquiry - this is the NEWEST type
; of term type query, but it's the LAST one of 3 that
; that VMS issues. It has been commented out here in
; for for faster logons!
echo \13 Got terminal type query from the VAX, responding.... \13
output \27[?63\{59}1\{59}2\{59}8c ;respond "<escape>[?63;1;2;8c"
; play games to get around ";" problems
; this is the proper response for the
; "crippled" VT320 that we are.
CONNECT
| T.R | Title | User | Personal Name | Date | Lines |
|---|---|---|---|---|---|
| 400.1 | new ACB script | TROOA::CURZON | Richard Curzon TRO4/24 | Sun May 31 1992 23:07 | 80 |
New dialback system in MQO, TRO, TRC (anyplace else?). So a new Kermit script.
If you dial in regularly, saves doing the annoying stuff over and over...
Same as the last one, this one does the original call, types in the access
code, and answers the phone when the ACB calls back. This is simpler, it
doesn't try to log you on to a system but leaves you at the VTLAT prompt.
How about scripts for other term programs, somebody out there would
appreciate your sample scripts!
;-------8<--------8<-------8<------------cut here-------------------------
; Dialback script for Kermit 3.01 or higher and HAYES COMPATIBLE modems
;
; 1. make changes just above the asterisks for your personal values,
; number to dial and your personal access code.
; 2. save it as a file called (for example) DB.TAK in your Kermit directory
; 3. start KERMIT; at the "MS-Kermit>" prompt type: TAKE DB.TAK
; 4. or even better, define a macro command with these 2 lines in
; your MSKERMIT.INI file:
; define db take c:\kermit\db.tak
; ECHO To initiate dialback script, type "db"
;
; CHANGE THE FOLLOWING TO SUIT YOUR NEEDS:
;
define \%n 7306717 ;Number to dial
define \%c 00009999 ;Access code
;**********************************************************************
; The rest SHOULDN'T be changed until you think you know what you're
; doing....
;
def errmsg echo \%1, echo \13, def \%1, stop ; complain but don't hangup
set input timeout quit ;for this part, quit if we don't get
; a call back
;
echo LEAVE YOUR TELEPHONE on hook...\13
echo \7\13
echo IF YOUR MODEM has no speaker, you won't be able to tell if\13
echo ..the callback line is busy. Lift your phone a few seconds\13
echo ..AFTER Kermit dials the number, and listen just long enough\13
echo ..to be sure the call is being answered. Then hang up the phone.\13
echo \13
echo This part is not fancy, if our call gets\13
echo a busy signal, you can:\13
echo .....wait 3 minutes for Kermit to timeout and quit\13
echo .....just hit control C LOTS of times\13
echo ..........& type OUTPUT ATH to hangup the modem.\13
echo
;
:redial
clear ;remove whatever is there
hangup ;make sure modem is ours
pause 1 ;
output ATZ\13 ;Get MODEM attention
input 2 OK ;MODEM should say ok..
output ATX3\13 ;Setup modem response set.
input 2 OK ;MODEM should say OK
output ATDT \%n \13 ; dial number
input 40 Access code: ; access code prompt from latserver
output \%c\13
;
pause 8
echo Here's where we wait for the VAX to phone us back.\13
echo Kermit will wait for 3 minutes then time out.\13
echo .... so just wait, don't touch anything.\13
echo \13
echo .... if you heard a busy signal, hit LOTS of control-C's\13
echo .... and type OUTPUT ATH when you see the MS-Kermit prompt\13
echo ........ and try again later!\13
echo \13
input 180 RING ;modem will tell Kermit when dialback comes,
; we'll wait 3 minutes for it then quit
echo \13
echo \13 Your VAX is calling... the next thing you will have to type \13
echo ...SHOULD be your password... wait til you see the password prompt.\13
echo \13
output ATA\13 ; go to autoanswer mode
input 60 CONNECT ;modem signals when it is talking to VAX
; modem. We wait 60 seconds for connect.
| |||||