95 lines
3.4 KiB
Mathematica
95 lines
3.4 KiB
Mathematica
PSDTRAK ;BIR/DAV-Set up TRAKKER ; 14 Sept 94
|
|
;;3.0; CONTROLLED SUBSTANCES ;;13 Feb 97
|
|
W !," "
|
|
W !,"To set-up the TRAKKER:"
|
|
W !," "
|
|
W !,"(1) Turn on the TRAKKER by pressing the [on-off] key."
|
|
W !," "
|
|
W !," After the TRAKKER performs a self test the following prompt will"
|
|
W !," be displayed ""Ready"""
|
|
W !," "
|
|
W !,"(2) At this point hold down the [ctrl] key and press [E]."
|
|
W !," "
|
|
W !," The words ""CONFIGURATION MENU:"" should appear."
|
|
W !," "
|
|
W !,"(3) Press the [Enter] key until you are prompted to ""Select or modify"
|
|
W !," operating parms.?"" The word NO will appear. Use the space key to"
|
|
W !," toggle this to a YES and press [Enter]."
|
|
W !," "
|
|
W !,"(4) Use the [enter] key to step through the basic operating parameters"
|
|
W !," "
|
|
W !," NOTE - in most cases the proper selection can be made using the"
|
|
W !," [space] key."
|
|
W !," "
|
|
11 D WAIT G Q:$D(ERR)
|
|
W !,"a. BEEP VOLUME - low or high"
|
|
W !,"b. DIPLAY MODE...............BUFFERED"
|
|
W !,"c. CHARACTER SET.............US-ASCII"
|
|
W !,"d. CPU RESP REQD MODE........DISABLED"
|
|
W !,"e. PREAMBLE REQUIRED.........NO"
|
|
W !,"f. LASER SCANNER MODE........ONE SHOT TRIGGER"
|
|
W !,"g. APPEND TIME TO DATA.......NO"
|
|
W !,"h. TIME IS SECONDS...........YES"
|
|
W !,"i. RESUME IRL PROGRAM........NO"
|
|
W !,"j. AUTOMATIC SHUT-OFF........10"
|
|
W !,"k. BACKLIGHT TIMEOUT.........60"
|
|
W !," "
|
|
W !,"(5) The next configuration heading is ""Select or modify comm protocol?"""
|
|
W !," "
|
|
W !," Use space bar to obtain POINT TO POINT"
|
|
W !," "
|
|
W !,"(6) Use the [enter] key to step through the ""comm protocol"""
|
|
W !," "
|
|
22 D WAIT G Q:$D(ERR)
|
|
W !,"a. CHECK CTS............NO"
|
|
W !,"b. XON..................Hold down the [ctrl] key & press [Q], to get DC1"
|
|
W !,"c. XOFF.................Hold down the [ctrl] key & press [S], to get DC3"
|
|
W !,"d. BAUD RATE............1200"
|
|
W !,"e. PARITY...............DISABLED"
|
|
W !,"f. DATA BITS............8"
|
|
W !,"g. STOP BITS............1"
|
|
W !,"h. TIMEOUT DELAY........10 seconds"
|
|
W !,"i. INTERCHAR DELAY......50 milliseconds"
|
|
W !,"j. TURNAROUND DELAY.....0 ms."
|
|
W !," "
|
|
W !,"At this point you will see ""Select or modify barcodes?"""
|
|
W !,"Press [alt] then [E] to exit and save changes."
|
|
W !,"or"
|
|
W !,"Hold [ctrl] and press [Z] to exit without saving changes."
|
|
W !," "
|
|
33 D WAIT G Q:$D(ERR)
|
|
W !," "
|
|
W !,"TO DOWNLOAD to the TRAKKER or to UPLOAD to DHCP, new entries must be made"
|
|
W !,"in the TERMINAL TYPE and DEVICE files."
|
|
W !," "
|
|
W !,"TERMINAL TYPE"
|
|
W !,"-------------"
|
|
W !,"NAME : C-VT420 (9440)"
|
|
W !,"FORM FEED : #"
|
|
W !,"OPEN EXECUTE : W $C(0)"
|
|
W !,"DESCRIPTION : TRAKKER 9440 TO AUX PORT OF VT420"
|
|
W !,"OPEN PRINTER PORT : W $C(27)_"_"""[5i"""
|
|
W !,"CLOSE PRINTER PORT : W $C(27)_"_"""4i"""
|
|
W !,"RIGHT MARGIN : 80"
|
|
W !,"PAGE LENGTH : 9999"
|
|
W !," "
|
|
44 D WAIT G Q:$D(ERR)
|
|
W !,"DEVICE"
|
|
W !,"-------"
|
|
W !,"NAME : TRAKKERSL"
|
|
W !,"LOCATION : SLAVED 9440 FROM VT420 AUX PORT"
|
|
W !,"MARGIN WIDTH : 80"
|
|
W !,"PAGE LENGTH : 9999"
|
|
W !,"MNEMONIC : TRAKKERSL"
|
|
W !,"FORM FEED : #"
|
|
W !,"BACK SPACE : $C(8)"
|
|
W !,"SUB-TYPE : C-VT420 (9440)"
|
|
W !,"TYPE : TERMINAL"
|
|
W !,"$I : 0 (zero)"
|
|
W !," "
|
|
W !,"---------------------------------------------------------------------"
|
|
Q K AN,ERR Q
|
|
WAIT I $E(IOST)["C" W !,"Press <RET> to continue, or '^' to abort: " R AN:DTIME I AN="^"!('$T) S ERR=1 Q
|
|
I $E(IOST)["C" W @IOF,"SET UP PROCEDURES",!
|
|
Q
|