home *** CD-ROM | disk | FTP | other *** search
/ CBM Funet Archive / cbm-funet-archive-2003.iso / cpm / zutils / lbrhlp22.lbr / LBRHLPCF.ZZ0 / LBRHLPCF.Z80
Text File  |  1992-05-09  |  6KB  |  192 lines
  1. ; lbrhlpcf.z80
  2.  
  3. ;
  4.  
  5. ; mODIFIED 5/3/92, gENE pIZZETTA
  6.  
  7. ;mADE SLIGHT CHANGES TO MENU SCREEN AND ADDED HIGHTLIGHTING.
  8.  
  9. ;
  10.  
  11. ;---------------------------------------------------------
  12.  
  13.  
  14.  
  15. ; lbrhlp pATCH OFFSETS                          19 feb 92
  16.  
  17. HDUEQU0BH;ALTERNATE DU
  18.  
  19. HDIREQU015H;ALTERNATE DIR
  20.  
  21. HNAMEQU1DH;DEFAULT FILE NAME
  22.  
  23. LNAMEQU25H;LBR NAME
  24.  
  25. ;HTYPEQU2DH;FILE TYPE
  26.  
  27. LTYPEQU30H;LBR TYPE
  28.  
  29. PTRCHKEQU33H;PRINTER CHECK
  30.  
  31.  
  32.  
  33. ;---------------------------------------------------------
  34.  
  35.  
  36.  
  37. ;data for cnfg program linkage
  38.  
  39. ;FUNCTION DEFINITIONS - **NEEDED FOR case tABLE ENTRIES**
  40.  
  41.  
  42.  
  43. SWITCHEQU0;TOGGLE BIT N IN A BYTE (N IS SPECIFIED)
  44.  
  45. TEXTEQU1;REPLACE A TEXT STRING OF SPECIFIED LENGTH
  46.  
  47. DUSPECEQU2;REPLACE A zcpr STYLE du SPECIFICATION (not dir:!)
  48.  
  49. HEXRADEQU3;EDIT BYTE/WORD USING hex RADIX
  50.  
  51. DECRADEQU4;EDIT BYTE/WORD USING decimal RADIX
  52.  
  53. TEXTLCEQU5;SAME AS FUNCTION TEXT, BUT LOWER CASE IS ok
  54.  
  55. FILESPEQU6;CHANGE ALL OR PART OF A FILESPEC du:fn.ft
  56.  
  57. TOGL3EQU7;TOGGLE TO ONE OF THREE OPTIONS: 001b, 010b, 100b
  58.  
  59. TOGLTFEQU8;TOGGLE A BYTE BETWEEN 0FFH AND 0
  60.  
  61. ;SEE zcnfg.ws (OR .doc) FOR A FULL DEFINITION OF THESE FUNCTIONS.
  62.  
  63.  
  64.  
  65. ;ascii DEFINITIONS
  66.  
  67. HONEQU1; HIGHLIGHTING ON
  68.  
  69. HOFEQU2; HIGHLIGHTING OFF
  70.  
  71. CTLCEQU3
  72.  
  73. BSEQU8;BACKSPACE
  74.  
  75. HTEQU9;HORIZONTAL TAB
  76.  
  77. TABEQU9;HORIZONTAL TAB
  78.  
  79. LFEQU10;LINE FEED
  80.  
  81. CREQU13;CARRIAGE RETURN
  82.  
  83. SPCEQU20H;SPACE CHAR
  84.  
  85.  
  86.  
  87. ;=========================================================
  88.  
  89. ;macro definitions
  90.  
  91.  
  92.  
  93. ;THIS MACRO USED FOR BITMAPPED BYTE DATA
  94.  
  95.  
  96.  
  97. BITMAPMACROa,FUNCTN,OFFSET,BIT,SCR,DAT
  98.  
  99. DB'&a'
  100.  
  101. DWFUNCTN,OFFSET
  102.  
  103. DB1 SHL BIT
  104.  
  105. DWSCR,DAT
  106.  
  107. ENDM
  108.  
  109.  
  110.  
  111. ;=========================================================
  112.  
  113. ;MEANING OF PARAMETERS IN bitmap & vector MACROS:
  114.  
  115. ;a   = CHARACTER USED IN SCREEN IMAGE FOR THIS MENU ITEM.
  116.  
  117. ;      mUST BE UNIQUE, AND NOT ONE OF: ?/,.<>xqXQ 
  118.  
  119. ;OFFSET = BYTE OFFSET IN CONFIG BLOCK
  120.  
  121. ;FUNCTN = FUNCTION FOR CONVERSION FROM CONFIG. BLOCK TO SCREEN
  122.  
  123. ;SCR = SCREEN LOCATION
  124.  
  125. ;DAT = EXTRA DATA WORD IF REQUIRED. nORMALLY 0
  126.  
  127. ;PRODUCES A RECORD WHICH IS 8 BYTES LONG
  128.  
  129. ;=========================================================
  130.  
  131.  
  132.  
  133. ;THIS MACRO USED FOR BYTE DATA STRUCTURES
  134.  
  135.  
  136.  
  137. VECTORMACROa,FUNCTN,OFFSET,BYTE,SCR,DAT
  138.  
  139. DB'&a'
  140.  
  141. DWFUNCTN,OFFSET
  142.  
  143. DBBYTE
  144.  
  145. DWSCR,DAT
  146.  
  147. ENDM
  148.  
  149.  
  150.  
  151.  
  152.  
  153. ;************************************************************
  154.  
  155. ;start of overlay code
  156.  
  157. ;************************************************************
  158.  
  159. ;tHE NEXT 13 BYTES MUST REMAIN IN THIS LOCATION.
  160.  
  161. RST0;FOR SAFETY - FILE WON'T EXECUTE
  162.  
  163. DWMENU1;FOR RELOCATION OF ADDRESSES, THIS
  164.  
  165. ;POINTS TO THE next LOCATION.
  166.  
  167. ;FIRST menu LIST MUST BE HERE. aLL NAMES ARE LOCAL.
  168.  
  169. MENU1:DWMENU1,MENU1,SCRN1,CASE1,HELP1;menu a
  170.  
  171.  
  172.  
  173. ;=========================================================
  174.  
  175.  
  176.  
  177. CASE1:DB(CASE1X-CASE11)/(CASE12-CASE11);NUMBER OF CASES
  178.  
  179. DBCASE12-CASE11;LENGTH OF EACH RECORD
  180.  
  181.  
  182.  
  183. ;tHE FIRST TWO ENTRIES IN THE CASE TABLE MUST BE LABELED TO
  184.  
  185. ;PROVIDE DATA FOR THE CALCULATION AT CASE1:. sUBSEQUENT
  186.  
  187. ;ENTRIES (ONE FOR EACH MENU SELECTION) NEED NOT BE LABELED.
  188.  
  189.  
  190.  
  191. CASE11:VECTORl,TEXT,LNAM,8,   SCR100,0
  192.  
  193. CASE12:VECTORe,TEXT,LTYP,3,   SCR101,0
  194.  
  195. VECTORn,TEXT,HNAM,8,   SCR102,0
  196.  
  197. VECTORd,TEXT,HDIR,8,   SCR104,0
  198.  
  199. VECTORa,DUSPEC,HDU,0,   SCR105,0
  200.  
  201. VECTOR  p,TOGLTF, PTRCHK, 1,   SCR106,    YNDATA
  202.  
  203.  
  204.  
  205. ;THE NEXT ENTRY IS A LABEL WHICH TERMINATES THE LIST.
  206.  
  207. ;iT IS REQUIRED FOR USE IN THE CALCULATION AT CASE1:
  208.  
  209.  
  210.  
  211. CASE1X:;LABEL USED TO CALC NUMBER OF ENTRIES
  212.  
  213.  
  214.  
  215. ;=========================================================
  216.  
  217.  
  218.  
  219. SCRN1:DBCR,LF,LF
  220.  
  221. DBTAB,TAB,TAB,'  lhc/lhq cONFIGURATION'
  222.  
  223. DBCR,LF,LF,LF
  224.  
  225. DBTAB,TAB,'(l) ',HON,'dEFAULT lbr NAME  . . . . . ',HOF
  226.  
  227. scr100:DB'        '
  228.  
  229. DBCR,LF
  230.  
  231. DBTAB,TAB,'(e) ',HON,'lbr EXTENSION . . . . . . . . . ',HOF,'.'
  232.  
  233. scr101:DB'   '
  234.  
  235. DBCR,LF,LF
  236.  
  237. DBTAB,TAB,'(n) ',HON,'dEFAULT FILE NAME . . . . . ',HOF
  238.  
  239. scr102:DB'        '
  240.  
  241. DBCR,LF,LF
  242.  
  243. DBTAB,TAB,'(d) ',HON,'aLTERNATE DIRECTORY . . . . ',HOF
  244.  
  245. scr104:DB'        '
  246.  
  247. DBCR,LF
  248.  
  249. DBTAB,TAB,'(a) ',HON,'aLTERNATE du  . . . . . . . . .  ',HOF
  250.  
  251. scr105:DB'   '
  252.  
  253. DBCR,LF,LF
  254.  
  255. DBTAB,TAB,'(p) ',HON,'dO PRINTER-READY TEST . . . . .  ',HOF
  256.  
  257. scr106:DB'   '
  258.  
  259. DBCR,LF
  260.  
  261. DB0
  262.  
  263.  
  264.  
  265. ;=========================================================
  266.  
  267. ;
  268.  
  269. YNDATA:DEFZ'yes'; FOR 0FFH
  270.  
  271. DEFZ' no'; FOR 0
  272.  
  273.  
  274.  
  275. ;=========================================================
  276.  
  277.  
  278.  
  279. HELP1:DBcr,lf
  280.  
  281. ;
  282.  
  283. DBhon,'oPTION l -- dEFAULT LIBRARY.',hof,'  tHIS  OPTION '
  284.  
  285. DB'DEFINES THE DEFAULT LIBRARY NAME',cr,lf
  286.  
  287. DB'THAT lhc/lhq WILL SEARCH FOR IF NONE IS GIVEN ON THE '
  288.  
  289. DB'COMMAND LINE  WHEN THE',cr,lf
  290.  
  291. DB'PROGRAM IS INVOKED.'
  292.  
  293. DBcr,lf,lf
  294.  
  295. ;
  296.  
  297. DBhon,'oPTION e -- lIBRARY FILE TYPE.',hof,'  sPECIFIES '
  298.  
  299. DB'THE FILE TYPE OR EXTENSION OF THE',cr,lf
  300.  
  301. DB'LIBRARY.  iN MOST CASES, THIS WILL BE "lbr."'
  302.  
  303. DBcr,lf,lf
  304.  
  305. ;
  306.  
  307. DBhon,'oPTION n -- dEFAULT HELP FILE.',hof,'  tHIS OPTION '
  308.  
  309. DB'DEFINES THE HELP FILE NAME THAT',cr,lf
  310.  
  311. DB'lhc/lhq WILL SEARCH FOR IF NONE IS SPECIFIED.  tHIS IS '
  312.  
  313. DB'THE DEFAULT FOR BOTH',cr,lf
  314.  
  315. DB'THE LIBRARY MEMBER NAME AND THE STAND-ALONE HELP FILE '
  316.  
  317. DB'NAME.'
  318.  
  319. DBcr,lf,lf
  320.  
  321. ;
  322.  
  323. DBhon,'oPTIONS d AND a --  aLTERNATE DIRECTORIES.',hof,' '
  324.  
  325. DB' dEFINE HERE THE ALTERNATE NAMED',cr,lf
  326.  
  327. DB'DIRECTORY AND ALTERNATE du  TO  BE  SEARCHED.  lhc/lhq '
  328.  
  329. DB' FIRST  SEARCHES THE',cr,lf
  330.  
  331. DB'DIRECTORY SPECIFIED  ON  THE  COMMAND  LINE, (THE CURRENT '
  332.  
  333. DB'DIRECTORY IF NONE',cr,lf
  334.  
  335. DB'SPECIFIED), FOR THE REQUESTED  HELP  LIBRARY  OR STAND-ALONE '
  336.  
  337. DB'HELP FILE.  iF',cr,lf
  338.  
  339. DB'THE FILE CANNOT BE FOUND, lhc/lhq ATTEMPTS TO SEARCH '
  340.  
  341. DB'FOR  IT  IN  THE NAMED',cr,lf
  342.  
  343. DB'DIRECTORY SPECIFIED  FOR  OPTION  d.  iF  THE  SYSTEM '
  344.  
  345. DB' DOES  NOT  CONTAIN A',cr,lf
  346.  
  347. DB'DIRECTORY WITH THIS NAME, THEN THE du DEFINED BY OPTION '
  348.  
  349. DB'a IS SEARCHED.'
  350.  
  351. DBcr,lf
  352.  
  353. ;
  354.  
  355. DB':',cr,lf; NEW PAGE
  356.  
  357. ;
  358.  
  359. DBhon,'oPTION p -- pRINTER CHECK.',hof,'  sPECIFIES  WHETHER '
  360.  
  361. DB'A PRINTER-READY TEST WILL BE',cr,lf
  362.  
  363. DB'MADE BEFORE PRINTING.  iF YOUR SYSTEM  HAS  TROUBLE  '
  364.  
  365. DB'WITH  THE  bios listst',cr,lf
  366.  
  367. DB'CALL, SET THIS TO off.'
  368.  
  369. DBcr,lf
  370.  
  371. ;
  372.  
  373. DB0
  374.  
  375.  
  376.  
  377. ;=========================================================
  378.  
  379.  
  380.  
  381. END
  382.  
  383.