home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CP/M
/
CPM_CDROM.iso
/
enterprs
/
cpm
/
utils
/
f
/
lbrhlp22.lbr
/
LBRHLPCF.ZZ0
/
LBRHLPCF.Z80
Wrap
Text File
|
1992-05-09
|
6KB
|
192 lines
; LBRHLPCF.Z80
;
; Modified 5/3/92, Gene Pizzetta
; Made slight changes to menu screen and added hightlighting.
;
;---------------------------------------------------------
; LBRHLP Patch offsets 19 FEB 92
hdu equ 0bh ;alternate du
hdir equ 015h ;alternate dir
hnam equ 1dh ;default file name
lnam equ 25h ;lbr name
;htyp equ 2dh ;file type
ltyp equ 30h ;lbr type
ptrchk equ 33h ;printer check
;---------------------------------------------------------
;DATA FOR CNFG PROGRAM LINKAGE
;function definitions - **needed for CASE Table entries**
switch equ 0 ;toggle bit n in a byte (n is specified)
text equ 1 ;replace a text string of specified length
duspec equ 2 ;replace a ZCPR style DU specification (NOT DIR:!)
hexrad equ 3 ;edit byte/word using HEX radix
decrad equ 4 ;edit byte/word using DECIMAL radix
textlc equ 5 ;same as function text, but lower case is OK
filesp equ 6 ;change all or part of a filespec DU:FN.FT
togl3 equ 7 ;toggle to one of three options: 001B, 010B, 100B
togltf equ 8 ;toggle a byte between 0ffh and 0
;see ZCNFG.WS (or .DOC) for a full definition of these functions.
;ASCII definitions
hon equ 1 ; highlighting on
hof equ 2 ; highlighting off
ctlc equ 3
bs equ 8 ;backspace
ht equ 9 ;horizontal tab
tab equ 9 ;horizontal tab
lf equ 10 ;line feed
cr equ 13 ;carriage return
spc equ 20h ;space char
;=========================================================
; MACRO DEFINITIONS
;this macro used for bitmapped byte data
bitmap macro A,functn,offset,bit,scr,dat
db '&A'
dw functn,offset
db 1 shl bit
dw scr,dat
endm
;=========================================================
;meaning of parameters in BITMAP & VECTOR macros:
; A = character used in screen image for this menu item.
; Must be unique, and not one of: ?/,.<>XQxq
; offset = byte offset in config block
; functn = function for conversion from config. block to screen
; scr = screen location
; dat = extra data word if required. Normally 0
;produces a record which is 8 bytes long
;=========================================================
;this macro used for byte data structures
vector macro A,functn,offset,byte,scr,dat
db '&A'
dw functn,offset
db byte
dw scr,dat
endm
;************************************************************
; START OF OVERLAY CODE
;************************************************************
;The next 13 bytes must remain in this location.
rst 0 ;for safety - file won't execute
dw menu1 ;for relocation of addresses, this
;points to the NEXT location.
;first MENU list must be here. All names are local.
menu1: dw menu1,menu1,scrn1,case1,help1 ;MENU A
;=========================================================
case1: db (case1x-case11)/(case12-case11) ;number of cases
db case12-case11 ;length of each record
;The first two entries in the case table must be labeled to
;provide data for the calculation at case1:. Subsequent
;entries (one for each menu selection) need not be labeled.
case11: vector L, text, lnam, 8, scr100, 0
case12: vector E, text, ltyp, 3, scr101, 0
vector N, text, hnam, 8, scr102, 0
vector D, text, hdir, 8, scr104, 0
vector A, duspec, hdu, 0, scr105, 0
vector P, togltf, ptrchk, 1, scr106, yndata
;the next entry is a label which terminates the list.
;It is required for use in the calculation at case1:
case1x: ;label used to calc number of entries
;=========================================================
scrn1: db cr,lf,lf
db tab,tab,tab,' LHC/LHQ Configuration'
db cr,lf,lf,lf
db tab,tab,'(L) ',hon,'Default LBR name . . . . . ',hof
SCR100: db ' '
db cr,lf
db tab,tab,'(E) ',hon,'LBR extension . . . . . . . . . ',hof,'.'
SCR101: db ' '
db cr,lf,lf
db tab,tab,'(N) ',hon,'Default file name . . . . . ',hof
SCR102: db ' '
db cr,lf,lf
db tab,tab,'(D) ',hon,'Alternate directory . . . . ',hof
SCR104: db ' '
db cr,lf
db tab,tab,'(A) ',hon,'Alternate DU . . . . . . . . . ',hof
SCR105: db ' '
db cr,lf,lf
db tab,tab,'(P) ',hon,'Do printer-ready test . . . . . ',hof
SCR106: db ' '
db cr,lf
db 0
;=========================================================
;
yndata: defz 'YES' ; for 0ffh
defz ' NO' ; for 0
;=========================================================
help1: db CR,LF
;
db HON,'Option L -- Default library.',HOF,' This option '
db 'defines the default library name',CR,LF
db 'that LHC/LHQ will search for if none is given on the '
db 'command line when the',CR,LF
db 'program is invoked.'
db CR,LF,LF
;
db HON,'Option E -- Library file type.',HOF,' Specifies '
db 'the file type or extension of the',CR,LF
db 'library. In most cases, this will be "LBR."'
db CR,LF,LF
;
db HON,'Option N -- Default help file.',HOF,' This option '
db 'defines the help file name that',CR,LF
db 'LHC/LHQ will search for if none is specified. This is '
db 'the default for both',CR,LF
db 'the library member name and the stand-alone help file '
db 'name.'
db CR,LF,LF
;
db HON,'Options D and A -- Alternate directories.',HOF,' '
db ' Define here the alternate named',CR,LF
db 'directory and alternate DU to be searched. LHC/LHQ '
db ' first searches the',CR,LF
db 'directory specified on the command line, (the current '
db 'directory if none',CR,LF
db 'specified), for the requested help library or stand-alone '
db 'help file. If',CR,LF
db 'the file cannot be found, LHC/LHQ attempts to search '
db 'for it in the named',CR,LF
db 'directory specified for option D. If the system '
db ' does not contain a',CR,LF
db 'directory with this name, then the DU defined by option '
db 'A is searched.'
db CR,LF
;
db ':',CR,LF ; new page
;
db HON,'Option P -- Printer check.',HOF,' Specifies whether '
db 'a printer-ready test will be',CR,LF
db 'made before printing. If your system has trouble '
db 'with the BIOS LISTST',CR,LF
db 'call, set this to OFF.'
db CR,LF
;
db 0
;=========================================================
end