home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Oakland CPM Archive
/
oakcpm.iso
/
sigm
/
vol175
/
start.a86
< prev
next >
Wrap
Text File
|
1984-07-15
|
6KB
|
158 lines
;
; START.A86
;
;This file is for making changes to MODEM9.xx which are not UART/MODEM
;specific. UART/MODEM suport is provided by the various SYS files.
;
;The user can make the following changes in this file:
;
; a) Set the TRUE/FALSE statements in the lookup table which
; begins with BAKUPBYTE and ends with EOFSEND
; b) Change the control characters that are used for local commands,
; this sequence starts with EXITCHR and ends with EXTCHR
; c) Set STRGOK to TRUE and enter up to ten strings at location
; STRINGS. These strings can be logon sequences or frequently
; used commands that are sent to a remote computer
;
;
STRGOK EQU TRUE ;change to TRUE if you want to define
;strings, such as logon sequences, for
;transmission. Up to 10 strings may be
;entered at location STRINGS in this file.
;
;*** Don't change the ORG locations in this file or in the files ***
;*** SETUP and MAIN. This ORG statements provide standard locations ***
;*** for modification by overaly files or DDT. ***
;
CSEG
ORG 0100H
;
JMP START
;
BAKUPBYTE DB FALSE ;true=make .BAK file
CKSUMDFLT DB FALSE ;true=default to Checksum checking
;false=default to CRC checking
TOGGLECRC DB TRUE ;true=allow toggling of Checksum to CRC
CONVBKSP DB FALSE ;true=convert backspace to rub
TOGGLEBK DB TRUE ;true=allow toggling of bksp to rub
ADDLF DB FALSE ;true=add LF after CR
TOGGLELF DB TRUE ;true=allow toggling of LF after CR
STRLF DB FALSE ;true=strip LF after CR in terminal file output
TOGSLF DB TRUE ;true=toggle strip LF after CR in file output
LOCONEXTCHR DB FALSE ;true=local command if EXTCHR precedes
;false=not local command if EXTCHR precedes
TOGGLELOC DB TRUE ;true=allow toggling of LOCONEXTCHR
LSTTST DB TRUE ;true=allow toggling of printer on/off
;in terminal mode. Set to false if your
;printer can't keep up with the modem
XOFFTST DB FALSE ;true=allow testing of XOFF from remote
;while transmitting a file in terminal mode
XONWAIT DB FALSE ;true=wait for XON after sending CR while
;transmitting a file in terminal mode
TOGXOFF DB TRUE ;true=allow toggling of XOFF/XON testing
ECHWAIT DB FALSE ;true=wait for echo before sending next
;character in terminal mode file output
EOFSEND DB FALSE ;true=send eof in terminal mode file output
NAKONLY DB FALSE ;true=resends a record only after a valid NAK
;false=resends a record after any non-ACK
;true is intended only for use with mainframes
;that send, for example, xoff when buffer is
;full
;
SETUPTST DB SETUP
SCRNTEST DB SCRNCLR
TRANLOGON DB STRGOK
DISCFLG DB DISCON
CARDETFLG DB CARDET
CLOCK DB CLKRATE
;
MSPEED DB 3 ;sets the display time to send a file
;0=110 1=300 2=600 3=1200
;4=2400 5=4800 6=9600 7=19200
BYTDLY DB 0 ;default time to send character in
;terminal mode file transfer
;0=0 delay, 1=0.02 sec, -- ,9=0.18 sec
CRDLY DB 0 ;default time for extra wait after CR
;in terminal mode file transfer
;0=0 delay, 1=0.02 sec, -- ,9=0.18 sec
BELRPT DB 10 ;bell repeat time = value*0.03 sec
NOOFCOL DB 5 ;number of directory columns, currently
;set for 80 column screen
;
EXITCHR DB '\'-40H ; ^E = Exit without disconnect
LOGCHR DB 'N'-40H ; ^O = Send logon
LSTCHR DB ']'-40H ; ^P = Toggle printer
UNSAVECHR DB 'D'-40H ; ^R = Close input text buffer
TRANCHR DB 'V'-40H ; ^T = Transmit file to remote
SAVECHR DB 'F'-40H ; ^Y = Open input text buffer
EXTCHR DB '^'-40H ; ^^ = Send next character
;
VERNUM: CALL ILPRT
DB CR,LF
DB 'MODEM 9.01.05 - 24/Nov/83'
DB CR,LF,LF
DB 'CP/M-86 version by Michael Mellinger and Bill Bolton'
DB CR,LF,LF,0
JMP SYSVER
;
;ALL STRINGS MUST BE 31 CHARACTERS OR LESS AND MUST BE TERMINATED WITH 0
;
STRINGS:
DB 'STRING #0 at 240H',0
RB (OFFSET STRINGS)-(OFFSET $)+32*1
DB 'STRING #1 at 260H',0
RB (OFFSET STRINGS)-(OFFSET $)+32*2
DB 'STRING #2 at 280H',0
RB (OFFSET STRINGS)-(OFFSET $)+32*3
DB 'STRING #3 at 2A0H',0
RB (OFFSET STRINGS)-(OFFSET $)+32*4
DB 'STRING #4 at 2C0H',0
RB (OFFSET STRINGS)-(OFFSET $)+32*5
DB 'STRING #5 at 2E0H',0
RB (OFFSET STRINGS)-(OFFSET $)+32*6
DB 'STRING #6 at 300H',0
RB (OFFSET STRINGS)-(OFFSET $)+32*7
DB 'STRING #7 at 320H',0
RB (OFFSET STRINGS)-(OFFSET $)+32*8
DB 'STRING #8 at 340H',0
RB (OFFSET STRINGS)-(OFFSET $)+32*9
DB 'STRING #9 at 360H',0
;
;
;PHONE NUMBER LIBRARY TABLE.
;
;EACH DB MUST BE 32 CHARACTERS LONG FOR PROPER OPERATION.
;LAST DB MUST BE DB 0. UP TO 26 NUMBERS ARE ALLOWED.
;
NUMBLIB:
; '----5---10---15---20---25-----32'
DB 'A=Amrad 1-703-734-1387' ;'A'
DB 'B=Ben Bronson 1-312-955-4493' ;'B'
DB 'C=CBBS Pasadena 1-213-799-1632' ;'C'
DB 'D=PMMI 1-703-379-0303' ;'D'
DB 'E=Tech. CBBS 1-313-846-6127' ;'E'
DB 'F=Ron Fowler 1-313-729-1905R' ;'F'
DB 'G=Gasnet NASA 1-301-344-9156' ;'G'
DB 'H=Dave Hardy 1-313-846-6127' ;'H'
DB 'I=Wayne Hammerly 1-301-953-3753' ;'I'
DB 'J=RBBS Pasadena 1-213-356-1034' ;'J'
DB 'K=David Kozinn 1-216-334-4604' ;'K'
DB 'L=Program Store 1-202-337-4694' ;'L'
DB 'M=Kelly Smith 1-805-527-9321' ;'M'
DB 'N=SuperBrain Sys 1-617-862-0781' ;'N'
DB 'O=R.L.Plouffe 1-703-524-2549' ;'O'
DB 'P=K.Petersen 1-313-759-6569R' ;'P'
DB 'Q=Bruce Ratoff 1-201-272-1874' ;'Q'
DB 'R=Mark Pulver 1-312-789-0499' ;'R'
DB 'S= ' ;'S'
DB 'T= ' ;'T'
DB 'U= ' ;'U'
DB 'V= ' ;'V'
DB 'W= ' ;'W'
DB 'X= ' ;'X'
DB 'Y= ' ;'Y'
DB 'Z= ' ;'Z'
DB 0 ; end
; '----5---10---15---20---25-----32'
;