home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / enterprs / cpm / utils / f / lbrhlp22.lbr / LBRHLPCF.ZZ0 / LBRHLPCF.Z80
Text File  |  1992-05-09  |  6KB  |  192 lines

  1. ; LBRHLPCF.Z80
  2. ;
  3. ; Modified 5/3/92, Gene Pizzetta
  4. ;    Made slight changes to menu screen and added hightlighting.
  5. ;
  6. ;---------------------------------------------------------
  7.  
  8. ; LBRHLP Patch offsets                          19 FEB 92
  9. hdu    equ    0bh        ;alternate du
  10. hdir    equ    015h        ;alternate dir
  11. hnam    equ    1dh        ;default file name
  12. lnam    equ    25h        ;lbr name
  13. ;htyp    equ    2dh        ;file type
  14. ltyp    equ    30h        ;lbr type
  15. ptrchk    equ    33h        ;printer check
  16.  
  17. ;---------------------------------------------------------
  18.  
  19. ;DATA FOR CNFG PROGRAM LINKAGE
  20. ;function definitions - **needed for CASE Table entries**
  21.  
  22. switch    equ    0    ;toggle bit n in a byte (n is specified)
  23. text    equ    1    ;replace a text string of specified length
  24. duspec    equ    2    ;replace a ZCPR style DU specification (NOT DIR:!)
  25. hexrad    equ    3    ;edit byte/word using HEX radix
  26. decrad    equ    4    ;edit byte/word using DECIMAL radix
  27. textlc    equ    5    ;same as function text, but lower case is OK
  28. filesp    equ    6    ;change all or part of a filespec DU:FN.FT
  29. togl3    equ    7    ;toggle to one of three options: 001B, 010B, 100B
  30. togltf    equ    8    ;toggle a byte between 0ffh and 0
  31. ;see ZCNFG.WS (or .DOC) for a full definition of these functions.
  32.  
  33. ;ASCII definitions
  34. hon    equ    1        ; highlighting on
  35. hof    equ    2        ; highlighting off
  36. ctlc    equ    3
  37. bs    equ    8        ;backspace
  38. ht    equ    9        ;horizontal tab
  39. tab    equ    9        ;horizontal tab
  40. lf    equ    10        ;line feed
  41. cr    equ    13        ;carriage return
  42. spc    equ    20h        ;space char
  43.  
  44. ;=========================================================
  45. ;    MACRO DEFINITIONS
  46.  
  47. ;this macro used for bitmapped byte data
  48.  
  49. bitmap    macro    A,functn,offset,bit,scr,dat
  50.     db    '&A'
  51.     dw    functn,offset
  52.     db    1 shl bit
  53.     dw    scr,dat
  54.     endm
  55.  
  56. ;=========================================================
  57. ;meaning of parameters in BITMAP & VECTOR macros:
  58. ;    A   = character used in screen image for this menu item.
  59. ;          Must be unique, and not one of: ?/,.<>XQxq 
  60. ;    offset = byte offset in config block
  61. ;    functn = function for conversion from config. block to screen
  62. ;    scr = screen location
  63. ;    dat = extra data word if required. Normally 0
  64. ;produces a record which is 8 bytes long
  65. ;=========================================================
  66.  
  67. ;this macro used for byte data structures
  68.  
  69. vector    macro    A,functn,offset,byte,scr,dat
  70.     db    '&A'
  71.     dw    functn,offset
  72.     db    byte
  73.     dw    scr,dat
  74.     endm
  75.  
  76.  
  77. ;************************************************************
  78. ;    START OF OVERLAY CODE
  79. ;************************************************************
  80. ;The next 13 bytes must remain in this location.
  81.     rst    0    ;for safety - file won't execute
  82.     dw    menu1    ;for relocation of addresses, this
  83.             ;points to the NEXT location.
  84. ;first MENU list must be here. All names are local.
  85. menu1:    dw    menu1,menu1,scrn1,case1,help1    ;MENU A
  86.  
  87. ;=========================================================
  88.  
  89. case1:    db    (case1x-case11)/(case12-case11)    ;number of cases
  90.     db    case12-case11            ;length of each record
  91.  
  92. ;The first two entries in the case table must be labeled to
  93. ;provide data for the calculation at case1:. Subsequent
  94. ;entries (one for each menu selection) need not be labeled.
  95.  
  96. case11:    vector    L,    text,    lnam,    8,   scr100,    0
  97. case12:    vector    E,    text,    ltyp,    3,   scr101,    0
  98.     vector    N,    text,    hnam,    8,   scr102,    0
  99.     vector    D,    text,    hdir,    8,   scr104,    0
  100.     vector    A,    duspec,    hdu,    0,   scr105,    0
  101.     vector  P,    togltf, ptrchk, 1,   scr106,    yndata
  102.  
  103. ;the next entry is a label which terminates the list.
  104. ;It is required for use in the calculation at case1:
  105.  
  106. case1x:        ;label used to calc number of entries
  107.  
  108. ;=========================================================
  109.  
  110. scrn1:    db    cr,lf,lf
  111.     db    tab,tab,tab,'  LHC/LHQ Configuration'
  112.     db    cr,lf,lf,lf
  113.     db    tab,tab,'(L) ',hon,'Default LBR name  . . . . . ',hof
  114. SCR100:    db    '        '
  115.     db    cr,lf
  116.     db    tab,tab,'(E) ',hon,'LBR extension . . . . . . . . . ',hof,'.'
  117. SCR101:    db    '   '
  118.     db    cr,lf,lf
  119.     db    tab,tab,'(N) ',hon,'Default file name . . . . . ',hof
  120. SCR102:    db    '        '
  121.     db    cr,lf,lf
  122.     db    tab,tab,'(D) ',hon,'Alternate directory . . . . ',hof
  123. SCR104:    db    '        '
  124.     db    cr,lf
  125.     db    tab,tab,'(A) ',hon,'Alternate DU  . . . . . . . . .  ',hof
  126. SCR105:    db    '   '
  127.     db    cr,lf,lf
  128.     db    tab,tab,'(P) ',hon,'Do printer-ready test . . . . .  ',hof
  129. SCR106:    db    '   '
  130.     db    cr,lf
  131.     db    0
  132.  
  133. ;=========================================================
  134. ;
  135. yndata:    defz    'YES'        ; for 0ffh
  136.     defz    ' NO'        ; for 0
  137.  
  138. ;=========================================================
  139.  
  140. help1:    db    CR,LF
  141. ;
  142.     db    HON,'Option L -- Default library.',HOF,'  This  option '
  143.     db    'defines the default library name',CR,LF
  144.     db    'that LHC/LHQ will search for if none is given on the '
  145.     db    'command line  when the',CR,LF
  146.     db    'program is invoked.'
  147.     db    CR,LF,LF
  148. ;
  149.     db    HON,'Option E -- Library file type.',HOF,'  Specifies '
  150.     db    'the file type or extension of the',CR,LF
  151.     db    'library.  In most cases, this will be "LBR."'
  152.     db    CR,LF,LF
  153. ;
  154.     db    HON,'Option N -- Default help file.',HOF,'  This option '
  155.     db    'defines the help file name that',CR,LF
  156.     db    'LHC/LHQ will search for if none is specified.  This is '
  157.     db    'the default for both',CR,LF
  158.     db    'the library member name and the stand-alone help file '
  159.     db    'name.'
  160.     db    CR,LF,LF
  161. ;
  162.     db    HON,'Options D and A --  Alternate directories.',HOF,' '
  163.     db    ' Define here the alternate named',CR,LF
  164.     db    'directory and alternate DU  to  be  searched.  LHC/LHQ '
  165.     db    ' first  searches the',CR,LF
  166.     db    'directory specified  on  the  command  line, (the current '
  167.     db    'directory if none',CR,LF
  168.     db    'specified), for the requested  help  library  or stand-alone '
  169.     db    'help file.  If',CR,LF
  170.     db    'the file cannot be found, LHC/LHQ attempts to search '
  171.     db    'for  it  in  the named',CR,LF
  172.     db    'directory specified  for  option  D.  If  the  system '
  173.     db    ' does  not  contain a',CR,LF
  174.     db    'directory with this name, then the DU defined by option '
  175.     db    'A is searched.'
  176.     db    CR,LF
  177. ;
  178.     db    ':',CR,LF    ; new page
  179. ;
  180.     db    HON,'Option P -- Printer check.',HOF,'  Specifies  whether '
  181.     db    'a printer-ready test will be',CR,LF
  182.     db    'made before printing.  If your system  has  trouble  '
  183.     db    'with  the  BIOS LISTST',CR,LF
  184.     db    'call, set this to OFF.'
  185.     db    CR,LF
  186. ;
  187.     db    0
  188.  
  189. ;=========================================================
  190.  
  191.     end
  192.