; DETABZCF.MAC ; ; ZCNFG configuration module for DETABZ.COM. The assembled version of ; this file must be named DETABZxx.CFG, where xx is the version number ; of DETABZ, to be automatically recognized by ZCNFG. ; ; Version 1.1 -- September 28, 1990 -- Gene Pizzetta ; Changed patch addresses for DETABZ 1.3. ; ; Version 1.0 -- August 25, 1990 -- Gene Pizzetta ; For DETABZ 1.0. ; ; Patch locations . . . ; QtFlag equ 015h ; quiet flag DefInc equ 016h ; default tab increment ; ; 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 ; MACLIB Z80 ; ; 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-CaseA1)/(CaseA2-CaseA1) ; number of cases db CaseA2-CaseA1 ; length of each record ; CaseA1: db '1' ; menu selector dw DecRad ; ZCNFG function number dw DefInc ; patch location in file db 1 ; number of bytes to change dw ScrnA1 ; screen location dw DIRnge ; string address ; CaseA2: db '2' ; menu selector dw ToglTF ; ZCNFG function number dw QtFlag ; patch location in file db 1 ; number of bytes to change dw ScrnA2 ; screen location dw YesNo ; string address ; CaseAX: ; for calculation of list length ; ; Case table support . . . ; DIRnge: dw 1,255 ; minimum/maximum for DefInc YesNo: db 'YES',0 ; displayed if value is FFh (ToglTF) db ' NO',0 ; displayed if value is 00h (ToglTF) ; ; Screen image section . . . ; ScrnA: db cr,lf,lf,tab,tab,tab,' DETAB-Z Installation Menu' db cr,lf,lf,lf ; db tab,tab,'(1) ',1,'Default TAB increment . . . . . . . . ',2 ScrnA1: db ' ' ; current value db cr,lf,lf ; db tab,tab,'(2) ',1,'Default to quiet mode? . . . . . . . ',2 ScrnA2: db ' ' ; current value ; db lf,lf,lf,lf,lf,lf,lf,lf, ; fill rest of screen ; db 0 ; terminator ; ; Help screen section . . . ; HelpA: db CR,LF,LF db 1,'Option (1)',2,' -- This option sets the default increment that DETABZ will' db CR,LF db 'use to fill tab characters with spaces. For compatibility with CP/M and' db CR,LF db 'MS-DOS text files, this value should be set to 8, but you can set it to' db CR,LF db 'another value if you wish.' db CR,LF,LF db 1,'Option (2)',2,' -- This option determines whether DETABZ will be in verbose' db CR,LF db 'or quiet mode by default. The default may be toggled by using the "Q"' db CR,LF db 'option on the command line.' db CR,LF ; db 0 ; Terminator ; end