home *** CD-ROM | disk | FTP | other *** search
/ ftp.barnyard.co.uk / 2015.02.ftp.barnyard.co.uk.tar / ftp.barnyard.co.uk / cpm / DRI-archive / roche / COMALERR.ASM < prev    next >
Assembly Source File  |  2009-12-11  |  22KB  |  935 lines
  1. From: "Arobase, Salle multimΘdia" <arobase1.rochef...@wanadoo.fr>
  2. Newsgroups: comp.os.cpm
  3. Subject: COMPIS COMAL
  4. Date: Wed, 5 Dec 2001 11:51:41 +0100
  5. Organization: Wanadoo, l'internet avec France Telecom
  6. Lines: 922
  7. Message-ID: <9uktrk$lj2$1@wanadoo.fr>
  8. NNTP-Posting-Host: apoitiers-102-2-1-63.abo.wanadoo.fr
  9. X-Trace: wanadoo.fr 1007549108 22114 193.253.213.63 (5 Dec 2001 10:45:08 GMT)
  10. X-Complaints-To: abuse@wanadoo.fr
  11. NNTP-Posting-Date: 5 Dec 2001 10:45:08 GMT
  12. X-Priority: 3
  13. X-MSMail-Priority: Normal
  14. X-Newsreader: Microsoft Outlook Express 6.00.2600.0000
  15. X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
  16.  
  17. ; COMALERR.ASM
  18. ; ------------
  19. ;
  20. ; CP/M-86 -- (Swedish) TeleNova COMPIS
  21. ;
  22. ; File ERROR.TXT of COMAL 2.1 interpreter.
  23. ; (This TXT file contains binary data...)
  24. ;
  25. ; Usage: A>ASM comalerr   (Use CP/M 2.2 ASM v2.0)
  26. ;        A>LOAD comalerr
  27. ;        A>REN error.txt=comalerr.com
  28. ;
  29. ; Disassembled by:
  30. ;
  31. ; Mr Emmanuel ROCHE
  32. ; chemin de Boisrond
  33. ; 17430 Tonnay-Charente
  34. ; FRANCE
  35. ;
  36. ;--------------------------------
  37. ; 32 records of 128 bytes = 4096 bytes (4 KB)
  38. ;--------------------------------
  39. ; Conclusion:
  40. ; I think that this is a CP/M "random access" file
  41. ; created by COMAL. The 4 KB size could be the result
  42. ; of the minimal file size of a hard disk.
  43. ; With this file, one could create an English version
  44. ; (don't forget to adjust the number of slack bytes).
  45. ;--------------------------------
  46.         ORG     0100H           ; Standard CP/M COMmand file
  47. ;--------------------------------
  48. ; 0: ?
  49. ;
  50.  DB Len0            ; 21 items follow
  51.         DB      00H             ; Separator ?
  52. Rbeg0:
  53.         DB      59H             ;  1: ?
  54.         DB      60H             ;  2:
  55.         DB      62H             ;  3:
  56.         DB      65H             ;  4:
  57.         DB      67H             ;  5:
  58.         DB      6BH             ;  6:
  59.  DB 6EH             ;  7:
  60.         DB      71H             ;  8:
  61.         DB      75H             ;  9:
  62.         DB      78H             ; 10:
  63.         DB      7BH             ; 11:
  64.         DB      7EH             ; 12:
  65.         DB      0C9H            ; 13:
  66.         DB      0CDH            ; 14:
  67.  DB 0D0H            ; 15:
  68.         DB      0D3H            ; 16:
  69.         DB      0D6H            ; 17:
  70.         DB      0DAH            ; 18:
  71.         DB      0DCH            ; 19:
  72.         DB      0DEH            ; 20:
  73.         DB      0EEH            ; 21:
  74. Rend0:
  75. Len0    EQU     Rend0 - Rbeg0
  76. ;
  77. ; Slack bytes.
  78. ;
  79.         DB      00H
  80.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  81.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  82.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  83.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  84.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  85.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  86.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  87.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  88.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  89.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  90.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  91.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  92.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  93. ;
  94. ;--------------------------------
  95. ; 1: 59H
  96. ;
  97.  DB Len1
  98.         DB      00H
  99. Rbeg1:
  100.         DB      23H
  101.         DB      59H
  102.  DB 'Felaktigt f|rs|k till omnumrering'
  103. ;
  104.         DB      20H
  105.         DB      5EH
  106.         DB      'Felaktig anv{ndning av RETURN'
  107.         DB      2EH
  108. ;
  109.         DB      12H
  110.         DB      5FH
  111.         DB      'CON ej till}tet'
  112.  DB 2EH
  113. Rend1:
  114. Len1    EQU     Rend1 - Rbeg1
  115. ;
  116.         DB      00H,00H,00H,00H,00H,00H,00H
  117.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  118.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  119.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  120.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  121.  DB 00H,00H
  122. ;
  123. ;--------------------------------
  124. ; 2: 60H
  125. ;
  126.         DB      Len2
  127.         DB      00H
  128. Rbeg2:
  129.         DB      3FH
  130.         DB      60H
  131.  DB 'Fel i programstrukturen'
  132.         DB      2EH
  133. ;
  134.         DB      20H
  135.         DB      28H
  136.         DB      'NEXT, UNTIL, ENDPROC'
  137.         DB      2EH
  138. ;
  139.         DB      2EH
  140.         DB      20H
  141.  DB 'osv'
  142. ;
  143.         DB      2EH
  144.         DB      20H
  145.         DB      'saknas'
  146. ;
  147.         DB      29H
  148. ;
  149.         DB      3AH
  150.         DB      61H
  151.         DB      'G}r ej att g|ra LOAD p} fil '
  152.         DB      'som inte {r skapad med SAVE'
  153.  DB 2EH
  154. Rend2:
  155. Len2    EQU     Rend2 - Rbeg2
  156. ;
  157.         DB      00H,00H,00H,00H,00H
  158. ;
  159. ;--------------------------------
  160. ; 3: 62H
  161. ;
  162.         DB      Len3
  163.         DB      00H
  164. Rbeg3:
  165.  DB 2FH
  166.         DB      62H
  167.  DB 'Funktionen {r ej implementerad '
  168.         DB      'i denna COMAL'
  169.         DB      2EH
  170. ;
  171.         DB      40H
  172.         DB      63H
  173.  DB 'Systemfel'
  174. ;
  175.         DB      2EH
  176.         DB      20H
  177.         DB      'Skriv en felrapport'
  178. ;
  179.         DB      2EH
  180.         DB      20H
  181.         DB      'L{mna den till din leverant|r'
  182.         DB      2EH
  183. ;
  184.         DB      08H
  185.         DB      64H
  186.  DB 'ESCAPE'
  187. Rend3:
  188. Len3    EQU     Rend3 - Rbeg3
  189. ;
  190.  DB 00H,00H,00H,00H,00H,00H,00H
  191. ;
  192. ;--------------------------------
  193. ; 4: 65H
  194. ;
  195.         DB      Len4
  196.  DB 00H
  197. Rbeg4:
  198.         DB      35H
  199.         DB      65H
  200.  DB 'Otill}tet heltalsv{rde'
  201.         DB      2EH
  202. ;
  203.         DB      20H
  204.         DB      28H
  205.  DB '-32768 <= heltal <= 32767'
  206.         DB      29H
  207. ;
  208.         DB      43H
  209.         DB      66H
  210.         DB      'Logaritmen av negativt tal eller '
  211.         DB      'noll {r matematiskt odefinierad'
  212.  DB 2EH
  213. Rend4:
  214. Len4    EQU     Rend4 - Rbeg4
  215. ;
  216.         DB      00H,00H,00H,00H,00H,00H
  217. ;
  218. ;--------------------------------
  219. ; 5: 67H
  220. ;
  221.         DB      Len5
  222.  DB 00H
  223. Rbeg5:
  224.         DB      32H
  225.         DB      67H
  226.  DB 'G}r ej att dra kvadratroten ur ett '
  227.         DB      'negativt tal'
  228.         DB      2EH
  229. ;
  230.         DB      1FH
  231.         DB      68H
  232.  DB 'G}r ej att dividera med noll'
  233.         DB      2EH
  234. ;
  235.         DB      0BH
  236.         DB      69H
  237.  DB 'STEP = 0'
  238.         DB      2EH
  239. ;
  240.         DB      17H
  241.         DB      6AH
  242.  DB 'Resultatet f|r stort'
  243.  DB 2EH
  244. Rend5:
  245. Len5    EQU     Rend5 - Rbeg5
  246. ;
  247.         DB      00H,00H,00H,00H,00H,00H,00H
  248.  DB 00H,00H,00H,00H
  249. ;
  250. ;--------------------------------
  251. ; 6:6BH
  252. ;
  253.         DB      Len6
  254.         DB      00H
  255. Rbeg6:
  256.         DB      1FH
  257.         DB      6BH
  258.  DB 'Otill}tet v{rde i INPUT FILE'
  259.         DB      2EH
  260. ;
  261.         DB      3BH
  262.         DB      6CH
  263.         DB      'Programmet f|r stort'
  264. ;
  265.         DB      2EH
  266.         DB      20H
  267.         DB      'Dela t.ex upp i externa procedurer'
  268.         DB      2EH
  269. ;
  270.         DB      0EH
  271.         DB      6DH
  272.  DB 'Typkonflikt'
  273.  DB 2EH
  274. Rend6:
  275. Len6    EQU     Rend6 - Rbeg6
  276. ;
  277.         DB      00H,00H,00H,00H,00H,00H,00H
  278.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  279.  DB 00H,00H,00H,00H,00H,00H,00H
  280. ;
  281. ;--------------------------------
  282. ; 7:6EH
  283. ;
  284.         DB      Len7
  285.  DB 00H
  286. Rbeg7:
  287.         DB      1BH
  288.         DB      6EH
  289.  DB 'Variabel har inget v{rde'
  290.         DB      2EH
  291. ;
  292.         DB      16H
  293.         DB      6FH
  294.  DB 'Namnet redan anv{nt'
  295.         DB      2EH
  296. ;
  297.         DB      3CH
  298.         DB      70H
  299.  DB 'Parameter ej i |verensst{mmelse '
  300.         DB      'med PROC/FUNC deklaration'
  301.  DB 2EH
  302. Rend7:
  303. Len7    EQU     Rend7 - Rbeg7
  304. ;
  305.         DB      00H,00H,00H,00H,00H,00H,00H
  306.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  307.  DB 00H,00H
  308. ;
  309. ;--------------------------------
  310. ; 8: 71H
  311. ;
  312.         DB      Len8
  313.         DB      00H
  314. Rbeg8:
  315.         DB      31H
  316.         DB      71H
  317.  DB 'Funktionen {r odefinierad f|r '
  318.         DB      'angivet argument'
  319.         DB      2EH
  320. ;
  321.         DB      1DH
  322.         DB      72H
  323.  DB 'Otill}ten filidentifierare'
  324.         DB      2EH
  325. ;
  326.         DB      03H     ; Control-C ?
  327.         DB      73H
  328.         DB      2AH
  329. ;
  330.         DB      11H
  331.         DB      74H
  332.  DB 'Otill}tet hopp'
  333.  DB 2EH
  334. Rend8:
  335. Len8    EQU     Rend8 - Rbeg8
  336. ;
  337.         DB      00H,00H,00H,00H,00H,00H,00H
  338.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  339.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  340.  DB 00H,00H,00H,00H,00H
  341. ;
  342. ;--------------------------------
  343. ; 9: 75H
  344. ;
  345.         DB      Len9
  346.         DB      00H
  347. Rbeg9:
  348.         DB      21H
  349.  DB 75H
  350.  DB 'Slut p} v{rden i DATA-satserna'
  351.         DB      2EH
  352. ;
  353.         DB      0DH
  354.         DB      76H
  355.  DB 'Fel i INPUT'
  356. ;
  357.         DB      26H
  358.         DB      77H
  359.         DB      'Den externa PROCeduren {r ej CLOSED'
  360.  DB 2EH
  361. Rend9:
  362. Len9    EQU     Rend9 - Rbeg9
  363. ;
  364.         DB      00H,00H,00H,00H,00H,00H,00H
  365.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  366.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  367.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  368.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  369.  DB 00H,00H,00H
  370. ;
  371. ;--------------------------------
  372. ; 10: 78H
  373. ;
  374.         DB      Len10
  375.         DB      00H
  376. Rbeg10:
  377.         DB      33H
  378.         DB      78H
  379.  DB 'Index utanf|r gr{nserna eller '
  380.  DB 'felaktig delstr{ng'
  381.         DB      2EH
  382. ;
  383.  DB 1AH
  384.         DB      79H
  385.  DB 'Felaktig USING - str{ng'
  386.         DB      2EH
  387. ;
  388.         DB      2BH
  389.         DB      7AH
  390.         DB      'PROCeduren saknas i angivet '
  391.  DB 'OBJECT-paket'
  392.  DB 2EH
  393. Rend10:
  394. Len10   EQU     Rend10 - Rbeg10
  395. ;
  396.         DB      00H,00H,00H,00H,00H,00H
  397. ;
  398. ;--------------------------------
  399. ; 11: 7BH
  400. ;
  401.         DB      Len11
  402.  DB 00H
  403. Rbeg11:
  404.         DB      24H
  405.         DB      7BH
  406.  DB 'Angivet OBJECT-paket {r ej laddat'
  407.         DB      2EH
  408. ;
  409.         DB      26H
  410.         DB      7CH
  411.         DB      'Det finns inga OBJECT-paket laddade'
  412.         DB      2EH
  413. ;
  414.         DB      2BH
  415.         DB      7DH
  416.  DB 'OBJECT-proceduren har ej utf|rts korrekt'
  417.  DB 2EH
  418. Rend11:
  419. Len11   EQU     Rend11 - Rbeg11
  420. ;
  421.         DB      00H,00H,00H,00H,00H,00H,00H
  422.  DB 00H,00H
  423. ;
  424. ;--------------------------------
  425. ; 12: 7EH
  426. ;
  427.         DB      Len12
  428.         DB      00H
  429. Rbeg12:
  430.         DB      30H
  431.         DB      7EH
  432.  DB 'OBJECT-deklarationen har f|r m}nga '
  433.         DB      'parametrar'
  434.         DB      2EH
  435. ;
  436.         DB      15H
  437.  DB 82H
  438.  DB 'Textstr{ng f|r l}ng'
  439. ;
  440.         DB      2CH
  441.         DB      83H
  442.  DB 'G}r ej att tilldela en funktion ett v{rde'
  443.  DB 2EH
  444. Rend12:
  445. Len12   EQU     Rend12 - Rbeg12
  446. ;
  447.         DB      00H,00H,00H,00H,00H,00H,00H
  448.  DB 00H,00H,00H,00H,00H,00H
  449. ;
  450. ;--------------------------------
  451. ; 13: 0C9H
  452. ;
  453.         DB      Len13
  454.         DB      00H
  455. Rbeg13:
  456.  DB 36H
  457.         DB      0C9H
  458.  DB 'End of File'
  459. ;
  460.         DB      2EH
  461.         DB      20H
  462.         DB      'Filen slut, finns inget v{rde att l{sa'
  463.         DB      2EH
  464. ;
  465.         DB      2EH
  466.         DB      0CBH
  467.  DB 'Skrivaren ej klar'
  468. ;
  469.         DB      2EH
  470.         DB      20H
  471.  DB 'Kolla att den {r On-line'
  472.         DB      2EH
  473. ;
  474.         DB      16H
  475.  DB 0CCH
  476.  DB 'Otill}ten operation'
  477.  DB 2EH
  478. Rend13:
  479. Len13   EQU     Rend13 - Rbeg13
  480. ;
  481.         DB      00H,00H,00H,00H
  482. ;
  483. ;--------------------------------
  484. ; 14: 0CDH
  485. ;
  486.         DB      Len14
  487.         DB      00H
  488. Rbeg14:
  489.         DB      38H
  490.  DB 0CDH
  491.  DB 'Diskettfel'
  492. ;
  493.         DB      2EH
  494.         DB      20H
  495.         DB      'Fysiskt fel p} disketten t ex paritetsfel'
  496.         DB      2EH
  497. ;
  498.         DB      19H
  499.  DB 0CEH
  500.  DB 'Timeout p} skivenheten'
  501.         DB      2EH
  502. ;
  503.         DB      1AH
  504.  DB 0CFH
  505.  DB 'Diskettenheten avst{ngd'
  506.  DB 2EH
  507. Rend14:
  508. Len14   EQU     Rend14 - Rbeg14
  509. ;
  510.         DB      00H,00H,00H,00H,00H,00H,00H
  511.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  512.  DB 00H,00H,00H,00H
  513. ;
  514. ;--------------------------------
  515. ; 15: 0D0H
  516. ;
  517.         DB      Len15
  518.         DB      00H
  519. Rbeg15:
  520.         DB      2EH
  521.         DB      0D0H
  522.  DB 'Disketten {r utbytt'
  523. ;
  524.         DB      2EH
  525.         DB      20H
  526.         DB      'G|r ett MOUNT-kommando'
  527.         DB      2EH
  528. ;
  529.         DB      2AH
  530.         DB      0D1H
  531.  DB 'Disketten {r skrivskyddad'
  532.         DB      2EH
  533. ;
  534.         DB      20H
  535.         DB      28H
  536.  DB 'Klisterlapp'
  537.  DB 29H
  538. Rend15:
  539. Len15   EQU     Rend15 - Rbeg15
  540. ;
  541.         DB      00H,00H,00H,00H,00H,00H,00H
  542.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  543.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  544.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  545.  DB 00H,00H,00H,00H,00H,00H,00H
  546. ;
  547. ;--------------------------------
  548. ; 16: 0D3H
  549. ;
  550.         DB      Len16
  551.  DB 00H
  552. Rbeg16:
  553.         DB      28H
  554.         DB      0D3H
  555.  DB 'Skrivaren avst{ngd eller ej inkopplad'
  556.         DB      2EH
  557. ;
  558.         DB      32H
  559.         DB      0D4H
  560.  DB 'Fel i filnamn, inneh}ller t ex '
  561.         DB      'otill}tna tecken'
  562.         DB      2EH
  563. ;
  564.         DB      1EH
  565.  DB 0D5H
  566.  DB 'Filen finns redan p} skivan'
  567.  DB 2EH
  568. Rend16:
  569. Len16   EQU     Rend16 - Rbeg16
  570. ;
  571.         DB      00H,00H,00H,00H,00H,00H
  572. ;
  573. ;--------------------------------
  574. ; 17: 0D6H
  575. ;
  576.         DB      Len17
  577.  DB 00H
  578. Rbeg17:
  579.         DB      1BH
  580.         DB      0D6H
  581.  DB 'Filen finns ej p} skivan'
  582.         DB      2EH
  583. ;
  584.  DB 11H
  585.  DB 0D7H
  586.  DB 'Skivan {r full'
  587.         DB      2EH
  588. ;
  589.         DB      2AH
  590.         DB      0D8H
  591.  DB 'Filen {r skrivskyddad'
  592. ;
  593.         DB      2EH
  594.         DB      20H
  595.         DB      'Filattribut = R/O'
  596. ;
  597.         DB      25H
  598.         DB      0D9H
  599.  DB 'Filen ej |ppnad eller redan |ppnad'
  600.  DB 2EH
  601. Rend17:
  602. Len17   EQU     Rend17 - Rbeg17
  603. ;
  604.         DB      00H,00H,00H
  605. ;
  606. ;--------------------------------
  607. ; 18: 0DAH
  608. ;
  609.         DB      Len18
  610.         DB      00H
  611. Rbeg18:
  612.         DB      3DH
  613.         DB      0DAH
  614.  DB 'F|rs|k att skriva till skrivaren '
  615.         DB      'via flera filer samtidigt'
  616.         DB      2EH
  617. ;
  618.         DB      3CH
  619.         DB      0DBH
  620.  DB 'Det finns |ppna filer p} enheten'
  621. ;
  622.         DB      2EH
  623.         DB      20H
  624.         DB      'G|r CLOSE f|re skivbyte'
  625.  DB 2EH
  626. Rend18:
  627. Len18   EQU     Rend18 - Rbeg18
  628. ;
  629.         DB      00H,00H,00H,00H,00H
  630. ;
  631. ;--------------------------------
  632. ; 19: 0DCH
  633. ;
  634.         DB      Len19
  635.         DB      00H
  636. Rbeg19:
  637.  DB 3EH
  638.         DB      0DCH
  639.  DB 'Otill}tet postnummer'
  640. ;
  641.         DB      2EH
  642.         DB      20H
  643.         DB      'F}r ej vara <=0 eller st|rre {n filen'
  644.         DB      2EH
  645. ;
  646.         DB      38H
  647.         DB      0DDH
  648.  DB 'End of Record'
  649. ;
  650.         DB      2EH
  651.         DB      20H
  652.         DB      'G}r ej att skriva ut|ver poststorleken'
  653.  DB 2EH
  654. Rend19:
  655. Len19   EQU     Rend19 - Rbeg19
  656. ;
  657.         DB      00H,00H,00H,00H,00H,00H,00H
  658.  DB 00H
  659. ;
  660. ;--------------------------------
  661. ; 20: 0DEH
  662. ;
  663.         DB      Len20
  664.         DB      00H
  665. Rbeg20:
  666.         DB      2AH
  667.         DB      0DEH
  668.  DB 'Filen {r skrivskyddad'
  669. ;
  670.         DB      2EH
  671.         DB      20H
  672.         DB      'Filattribut = SYS'
  673. ;
  674.         DB      2BH
  675.         DB      0DFH
  676.  DB 'Raden {r f|r l}ng'
  677. ;
  678.         DB      2EH
  679.         DB      20H
  680.         DB      'G}r ej att g|ra INPUT'
  681.         DB      2EH
  682. ;
  683.         DB      11H
  684.  DB 0E0H
  685.  DB 'Filen {r |ppen'
  686.  DB 2EH
  687. ;
  688.         DB      03H,0E6H,2AH
  689.         DB      03H,0E7H,2AH
  690.         DB      03H,0E8H,2AH
  691.         DB      03H,0E9H,2AH
  692.         DB      03H,0EAH,2AH
  693.  DB 03H,0EBH,2AH
  694.         DB      03H,0ECH,2AH
  695.         DB      03H,0EDH,2AH
  696. Rend20:
  697. Len20   EQU     Rend20 - Rbeg20
  698. ;
  699. ;--------------------------------
  700. ; 21: 0EEH
  701. ;
  702.         DB      Len21
  703.         DB      00H
  704. Rbeg21:
  705. ;
  706.         DB      03H,0EEH,2AH
  707.         DB      03H,0EFH,2AH
  708.         DB      03H,0F0H,2AH
  709. Rend21:
  710. Len21   EQU     Rend21 - Rbeg21
  711. ;
  712. ; Slack bytes.
  713. ;
  714.         DB      00H,00H,00H,00H,00H
  715.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  716.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  717.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  718.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  719.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  720.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  721.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  722.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  723.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  724.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  725.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  726.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  727.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  728.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  729. ;
  730. ;--------------------------------
  731. ; 22: ?
  732. ;
  733.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  734.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  735.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  736.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  737.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  738.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  739.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  740.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  741.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  742.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  743.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  744.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  745.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  746.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  747.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  748.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  749. ;
  750. ;--------------------------------
  751. ; 23: ?
  752. ;
  753.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  754.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  755.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  756.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  757.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  758.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  759.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  760.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  761.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  762.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  763.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  764.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  765.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  766.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  767.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  768.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  769. ;
  770. ;--------------------------------
  771. ; 24: ?
  772. ;
  773.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  774.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  775.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  776.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  777.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  778.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  779.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  780.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  781.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  782.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  783.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  784.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  785.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  786.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  787.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  788.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  789. ;
  790. ;--------------------------------
  791. ; 25: ?
  792. ;
  793.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  794.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  795.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  796.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  797.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  798.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  799.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  800.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  801.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  802.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  803.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  804.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  805.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  806.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  807.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  808.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  809. ;
  810. ;--------------------------------
  811. ; 26: ?
  812. ;
  813.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  814.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  815.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  816.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  817.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  818.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  819.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  820.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  821.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  822.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  823.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  824.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  825.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  826.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  827.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  828.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  829. ;
  830. ;--------------------------------
  831. ; 27: ?
  832. ;
  833.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  834.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  835.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  836.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  837.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  838.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  839.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  840.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  841.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  842.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  843.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  844.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  845.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  846.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  847.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  848.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  849. ;
  850. ;--------------------------------
  851. ; 28: ?
  852. ;
  853.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  854.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  855.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  856.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  857.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  858.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  859.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  860.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  861.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  862.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  863.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  864.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  865.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  866.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  867.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  868.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  869. ;
  870. ;--------------------------------
  871. ; 29: ?
  872. ;
  873.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  874.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  875.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  876.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  877.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  878.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  879.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  880.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  881.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  882.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  883.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  884.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  885.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  886.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  887.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  888.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  889. ;
  890. ;--------------------------------
  891. ; 30: ?
  892. ;
  893.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  894.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  895.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  896.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  897.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  898.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  899.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  900.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  901.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  902.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  903.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  904.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  905.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  906.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  907.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  908.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  909. ;
  910. ;--------------------------------
  911. ; 31: ?
  912. ;
  913.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  914.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  915.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  916.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  917.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  918.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  919.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  920.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  921.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  922.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  923.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  924.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  925.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  926.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  927.  DB 00H,00H,00H,00H,00H,00H,00H,00H
  928.  DB 00H,00H,00H,00H,00H,00H,00H
  929. ;
  930.         DB      1AH             ; CP/M End Of File
  931. ;
  932. ;--------------------------------
  933. ;
  934.  END     0100H           ; Standard CP/M COMmand file
  935.