; Configuration file for SNAP12.  Adapted from ...

; Module:	ZCNFGMDL - Model ZCNFG configuration file
; Author:	Carson Wilson
; Date:		4 Nov 89
; Version:	1.3
; Notes:	Use this "template" file to build the source for 
;		 a .CFG file of your own.

; EQUATES

;Labels		Locations	  Descriptions
Patch1	equ	00Dh		; Patch location 1
Patch2	equ	00Eh		; Patch location 2
Patch3	equ	00Fh		; Patch location 3
Patch4	equ	010h		; Patch location 4
Patch5	equ	011h		; Patch location 5
Patch6	equ	012h		; Patch location 6
Patch7	equ	013h		; Patch location 7

; ZCNFG function definitions, used in CASE TABLES below.  Do not modify.

ToglTF	equ	8	; Toggle a byte between 0ffh and 0

; Sample ASCII definitions, used in SCREEN sections below.

tab	equ	9		;horizontal tab
lf	equ	10		;line feed
cr	equ	13		;carriage return

; =======================================
;
;	C O D E   B E G I N S
;
; =======================================
;

	rst	0	; For safety, so .CFG file won't execute

	dw	AMenu	; For relocation of addresses, this
			; ..points to the NEXT location.

; ---------------------------------------------------------
;
;	MENU LIST SECTION
;

AMenu:	dw	AMenu, AMenu, AScrn, ACase, AHelp	; Entry for menu A

; -------------------------------------
;
;	CASE TABLE SECTION
;

ACase:	db	(ACaseX-ACase1)/(ACase2-ACase1)	; Number of cases
	db	ACase2-ACase1			; Length of each record

ACase1:
	db	'1'	; Unique ASCII selector from SCREEN IMAGE
	dw	ToglTF	; ZCNFG function number
	dw	Patch1	; Location in file to be patched by ZCNFG
	db	1	; Number of bytes for ZCNFG to change
	dw	AScrnA	; Location to change in SCREEN IMAGE
	dw	YNData	; 0 or address of min/max data words or strings

ACase2:
	db	'2'	
	dw	ToglTF	
	dw	Patch2	
	db	1	
	dw	AScrnB	
	dw	YNData	

ACase3:
	db	'3'	
	dw	ToglTF	
	dw	Patch3	
	db	1	
	dw	AScrnC	
	dw	YNData	

ACase4:
	db	'4'	
	dw	ToglTF	
	dw	Patch4	
	db	1	
	dw	AScrnD	
	dw	YNData	

ACase5:
	db	'5'	
	dw	ToglTF	
	dw	Patch5	
	db	1	
	dw	AScrnE	
	dw	YNData	

ACase6:
	db	'6'	
	dw	ToglTF	
	dw	Patch6	
	db	1	
	dw	AScrnF	
	dw	YNData	

ACase7:
	db	'7'	
	dw	ToglTF	
	dw	Patch7	
	db	1	
	dw	AScrnG	
	dw	YNData	

ACaseX:			; Label for calculation of list length


YNData:			; Null-terminated data pair for ZCNFG's ToglTF function
	db	'YES',0	; First entry is displayed if current value is 0FFh
	db	' NO',0	; Second entry is displayed if current value is 000h

; ------------------------------------------
;
;	SCREEN IMAGE SECTION

AScrn:
	db	cr,lf
	db 	'                     === SNAP INSTALLATION ==='
	db	cr,lf,lf,lf

	db	'  1) Erase existing file without asking?   '
AScrnA:	db	'   '			; Display current value here
	db	cr,lf,lf

	db	'Save segments to image file --'
	db	cr,lf,lf
	db	'  2) TCAP    '
AScrnB:	db	'   '			; Display current value here
	db	cr,lf

	db	'  3) RCP     '
AScrnC:	db	'   '			; Display current value here
	db	cr,lf

	db	'  4) FCP     '
AScrnD:	db	'   '			; Display current value here
	db	cr,lf

	db	'  5) IOP     '
AScrnE:	db	'   '			; Display current value here
	db	cr,lf

	db	'  6) NDR     '
AScrnF:	db	'   '			; Display current value here
	db	cr,lf

	db	'  7) PATH    '
AScrnG:	db	'   '			; Display current value here
	db	cr,lf

	db	cr,lf
	db	'              -- Selecting Choice # Toggles YES/NO --'

        db	cr
	db	lf,lf,lf,lf,lf		; Fill rest of screen
	db	0			; Terminator

; ---------------------------------------------------
;
;	HELP SCREEN SECTION
;

AHelp:
	db	cr,lf,lf,lf,tab,tab,tab,'SNAP Installation Help'
	db	cr,lf,lf

 db '  If the erase option is set to "NO", SNAP will replace an output file'
 db cr,lf
 db '  of the same name without asking.'
 db cr,lf,lf
 db '  By default, SNAP saves all system segments to the image file.  You can'
 db cr,lf
 db '  ask SNAP to save only the segments you specify as command line options.'
 db cr,lf,lf
 db '       SNAP <file> /oo...'
 db cr,lf
 db '             where o = (T)cap ,(R)cp, (F)cp, (I)op ,(N)dr, or (P)ath'
 db cr,lf,lf
 db '  If you always prefer to leave out a segment or two, reconfigure the'
 db cr,lf
 db '  preferences table. (The ENV is always loaded.)'
 db cr,lf
	db 0		; Terminator

	end