;---------------------------------------------------------

; CPSET12 Patch offsets                          31 OCT 90
qdflt	equ	15h		;suppress display of changes

;---------------------------------------------------------

;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
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	S,	togltf,	qdflt,	1,   scr100,	yndata
case12:

;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
	DB	TAB,TAB,TAB,'      CPSET CONFIGURATION',CR,LF
	DB	CR,LF
	DB	CR,LF
	DB	TAB,TAB,'S) Suppress display of changes',TAB,TAB
SCR100:	DB	'   ',CR,LF
	DB	0

;=========================================================
;	FUNCTION DATA LIST

;data pair for representing bit values in screen image
;Can also be used for function 8 display (True/False)
;these are null terminated strings. Note the 'DZ'.

yndata:	defz	'YES'		;for 1=yes
	defz	'NO '		;for 0=yes

;=========================================================

help1:		DB	CR,LF
	DB	'The S option determines whether or not CPSET'
	DB	' automatically displays the',CR,LF
	DB	'results after new settings have been entered.'
	DB	'  If set "YES", display of',CR,LF
	DB	'changes is suppressed; if set "NO", results'
	DB	' are displayed.  This default',CR,LF
	DB	'setting can be overridden by a command line'
	DB	' option when CPSET is run.',CR,LF
	DB	0

;=========================================================