; NZBLTZCF.Z80
;
; ZCNFG configuration module for NZBLITZ.COM.  Rename the assembled
; version of this file to NZBLTZxx, where xx is the current version
; number of NZBLITZ, to be automatically recognized by ZCNFG.
;
vers	equ	14		; NZBLITZ version
;
; Patch locations . . .
;
rsxokf	equ	00bh		; Ok to save RSXs
top	equ	00ch		; Top of save flag
cfg	equ	00dh		; Default ZCNFG CFG filename
sysf	equ	016h		; Make NZCOM.CCP a system file
arcf	equ	017h		; Make NZCOM.CCP an archived file
save	equ	018h		; Save to this address if top=100b
;
; ZCNFG function definitions . . .
;
switch	equ	0		; Toggle bit n in a byte (n is specified)
text	equ	1		; Edit text with UC conversion
duspec	equ	2		; Replace a ZCPR style DU spec (NOT DIR:!)
hexrad	equ	3		; Edit byte/word using HEX radix
decrad	equ	4		; Edit byte/word using DECIMAL radix
textlc	equ	5		; Edit text, both UC and LC
filesp	equ	6		; Edit a Z3 filespec or filespec fragment
togl3	equ	7		; Toggle one of three options: 001B, 010B, 100B
togltf	equ	8		; Toggle a byte between 0ffh and 0
;
; ASCII characters . . .
;
tab	equ	9		; Tab
lf	equ	10		; Linefeed
cr	equ	13		; Carriage return
;
; Code . . .
;
	rst	0		; For safety, so .CFG file won't execute
;
	dw	menua		; For relocation of addresses, this
				; Points to the NEXT location.
;
; Menu list section . . .
;
menua:	dw	menua, menua, scrna, casea, helpa ; Single menu
;
; Case table section . . .
;
casea:	db	(caseax-casea0)/(casea1-casea0)	; Number of cases
	db	casea1-casea0	; Length of each record
;
casea0:	db	'A'		; Menu selector
	dw	text		; ZCNFG function number
	dw	cfg		; Patch location in file
	db	8		; Number of bytes to change
	dw	scrna0		; Screen location
	dw	0		; String address
;
casea1:	db	'B'		; Menu selector
	dw	togltf		; ZCNFG function number
	dw	rsxokf		; Patch location in file
	db	1		; Number of bytes to change
	dw	scrna1		; Screen location
	dw	yesno		; String address
;
casea2:	db	'C'		; Menu selector
	dw	togl3		; ZCNFG function number
	dw	top		; Patch location in file
	db	7		; Number of bytes to change
	dw	scrna2		; Screen location
	dw	addr		; String address
;
casea3:	db	'D'		; Menu selector
	dw	hexrad		; ZCNFG function number
	dw	save		; Patch location in file
	db	2		; Number of bytes to change
	dw	scrna3		; Screen location
	dw	0		; String address
;
casea4:	db	'E'		; Menu selector
	dw	togltf		; ZCNFG function number
	dw	sysf		; Patch location in file
	db	1		; Number of bytes to change
	dw	scrna4		; Screen location
	dw	yesno		; String address
;
casea5:	db	'F'		; Menu selector
	dw	togltf		; ZCNFG function number
	dw	arcf		; Patch location in file
	db	1		; Number of bytes to change
	dw	scrna5		; Screen location
	dw	yesno		; String address
;
caseax:				; For calculation of list length
;
; Case table support . . .
;
yesno:	db	'YES',0		; If value is FFh
	db	'NO ',0		; If value is 00h
addr:	db	'Start of CBIOS',0; If value is 001b
	db	'Top of memory ',0; If value is 010b
	db	'Address in D) ',0; If value is 100b
;
; Screen image section . . .
;
scrna:	db	cr,lf,lf
	db	tab,tab,1,'NZBLITZ VERS ',vers/10+'0','.',vers	mod 10+'0'
	db	' DEFAULTS',2
	db	cr,lf,lf

	db	'Default CFG filename (FILENAME)............. A) '
scrna0:	db	'        '
	db	cr,lf,lf

	db	'OK to save a loaded RSX..................... B) '
scrna1:	db	'   '
	db	cr,lf,lf

	db	'System image will be saved up to............ C) '
scrna2:	db	'              '
	db	cr,lf

	db	'                  Save system image up to... D) '
scrna3:	db	'    h'
	db	cr,lf,lf

	db	'Save NZCOM.CCP as system file?.............. E) '
scrna4:	db	'   '
	db	cr,lf

	db	'Save NZCOM.CCP as archived file?............ F) '
scrna5:	db	'   '

	db	0		; Terminator
;
; Help screen section . . .
;
helpa:	db	cr,lf

	db	1,'Default CFG Filename:',2,cr,lf
	db	'Enter the desired default CFG filename in the'
	db	' form ''FILENAME.TYP''.  Up to 8',cr,lf
	db	'characters may be used.',cr,lf,lf
;
	db	1,'RSXs Ok:',2,cr,lf
	db	'Set to YES if it''s ok to save loaded RSXs.  Set'
	db	' to NO if you don''t want',cr,lf
	db	'loaded RSXs to be saved.',cr,lf,lf

	db	1,'System Image Will Be Saved Up To:',2,cr,lf
	db	'This entry allows you to toggle through three'
	db	' choices for the top of the',cr,lf
	db	'saved system image:',cr,lf
	db	'     Start of CBIOS - saves up to the start of'
	db	' the CBIOS.',cr,lf
	db	'     Top of Memory  - saves up through the top'
	db	' of memory.',cr,lf
	db	'     Address in D)  - saves up to the address'
	db	' specified in menu entry D).',cr,lf,lf

	db	1,'Save System Image Up To:',2,cr,lf
	db	'Top of save address may be entered here.  Top'
	db	' of memory is 0000h.  This',cr,lf
	db	'address is ignored unless ''Address in D)'' is selected'
	db	' in menu entry C).',cr,lf,lf

	db	1,'NZCOM.CCP:',2,cr,lf
	db	'You may save NZCOM.CCP as a system and/or archived'
	db	' file if you desire.'
	db	0		; Terminator
;
	end