home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / beehive / bbs / rosuncr.arc / UNCREL.INC < prev   
Text File  |  1991-08-11  |  7KB  |  150 lines
  1. { -=*=-=*==*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-
  2.  
  3.                        UNCREL.INC  vers 1.0  11jan88
  4.               Turbo pascal inline code Uncrunch subroutines
  5.  
  6.            Copyright (c) Steven Greenberg 8/31/86  201-670-8724.
  7.                 May be reproduced for non-profit use only.
  8.  
  9.                    Assembled into Inline code format by
  10.                   Wells Brimhall / Znode 52 (602)996-8739
  11.  
  12.   -=*=-=*==*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-=*=-
  13.  
  14.   UNCREL.INC must have following addresses patched in:
  15.  
  16.     byte          address
  17.     ----          -----------------
  18.     1+2            24k uncr buffer
  19.     7+8            getbyt routine (returns next curnched byte in reg a)
  20.     10+11          out routine (outputs uncrunched bytes in reg a)
  21.  
  22.   The calling SP is stored at Uncrel+542h. To abort the uncrunch
  23.   procedure the in or out routine must restore the SP to this value
  24.   and execute a Z80 RET instruction. }
  25.  
  26. INLINE($21/$34/$12/$C3/*+$0068/$C3/$78/$56/
  27. $C3/$BC/$9A/$43/$6F/$70/$79/$72/$69/$67/$68/
  28. $74/$20/$28/$63/$29/$20/$53/$74/$65/$76/$65/
  29. $6E/$20/$47/$72/$65/$65/$6E/$62/$65/$72/$67/
  30. $20/$38/$2F/$33/$31/$2F/$38/$36/$20/$20/$32/
  31. $30/$31/$2D/$36/$37/$30/$2D/$38/$37/$32/$34/
  32. $2E/$20/$4D/$61/$79/$20/$62/$65/$20/$72/$65/
  33. $70/$72/$6F/$64/$75/$63/$65/$64/$20/$66/$6F/
  34. $72/$20/$6E/$6F/$6E/$2D/$70/$72/$6F/$66/$69/
  35. $74/$20/$75/$73/$65/$20/$6F/$6E/$6C/$79/$2E/
  36. $11/$FF/$00/$19/$2E/$00/$22/*+$04D9/$3E/$30/
  37. $84/$67/$22/*+$04D4/$3E/$28/$84/$67/$E5/$11/
  38. $00/$00/$EB/$A7/$ED/$52/$22/*+$04CC/$E1/$7C/
  39. $C6/$08/$67/$ED/$73/*+$04B0/$F9/$21/$75/$EC/
  40. $ED/$5B/*+$04B4/$A7/$ED/$52/$22/*+$04B0/$CD/
  41. *+$047B/$CD/*+$0462/$FE/$76/$20/$0F/$CD/*+$045B/
  42. $FE/$FE/$28/$17/$3E/$04/$18/$0A/$3E/$03/$18/
  43. $06/$3E/$02/$18/$02/$3E/$01/$37/$ED/$7B/*+$047E/
  44. $C9/$AF/$18/$F8/$CD/*+$043D/$B7/$20/$FA/$CD/
  45. *+$0437/$CD/*+$0434/$F5/$CD/*+$0430/$CD/*+$042D/
  46. $F1/$FE/$20/$D2/*+$01AA/$CD/*+$00FA/$11/$FF/
  47. $FF/$ED/$53/*+$044C/$CD/*+$00BE/$DA/*-$002A/
  48. $D5/$CD/*+$0026/$21/*+$0441/$CB/$3E/$38/$09/
  49. $2A/*+$0438/$3A/*+$0442/$CD/*+$0060/$D1/$3A/
  50. *+$042D/$B7/$28/$DB/$CD/*+$009D/$DA/*-$004B/
  51. $D5/$CD/*+$0005/$D1/$18/$F3/$E5/$2A/*+$0438/
  52. $39/$D2/*-$006E/$3A/*+$0429/$82/$67/$6B/$7E/
  53. $FE/$80/$20/$16/$3E/$01/$32/*+$0408/$E5/$2A/
  54. *+$0402/$3A/*+$040C/$CD/*+$002A/$E1/$7E/$FE/
  55. $80/$CA/*-$008B/$56/$7C/$C6/$10/$67/$5E/$CB/
  56. $7A/$20/$0D/$CD/*-$0034/$7C/$C6/$10/$67/$7E/
  57. $CD/*+$028D/$E1/$C9/$7C/$C6/$10/$67/$7E/$32/
  58. *+$03E3/$18/$F1/$F5/$E5/$CD/*+$00F7/$67/$3A/
  59. *+$03E1/$84/$67/$D1/$F1/$4F/$44/$7E/$FE/$80/
  60. $28/$16/$7C/$C6/$30/$67/$7E/$B7/$28/$0A/$47/
  61. $7C/$C6/$10/$67/$6E/$60/$C3/*-$0016/$60/$CD/
  62. *+$0083/$72/$7C/$C6/$10/$67/$73/$7C/$C6/$10/
  63. $67/$71/$ED/$4B/*+$03B6/$0B/$ED/$43/*+$03B1/
  64. $78/$B1/$C0/$3E/$FF/$32/*+$038D/$C9/$EB/$21/
  65. *+$0393/$CB/$06/$EB/$38/$19/$CD/*+$0352/$57/
  66. $CD/*+$034E/$32/*+$0397/$CB/$3A/$1F/$CB/$3A/
  67. $1F/$CB/$3A/$1F/$CB/$3A/$1F/$5F/$18/$0A/$CD/
  68. *+$0339/$5F/$3A/*+$0381/$E6/$0F/$57/$7A/$B3/
  69. $C6/$FF/$3F/$C9/$21/$FF/$0F/$22/*+$0370/$CD/
  70. *+$000F/$AF/$F5/$21/$FF/$FF/$CD/*-$0088/$F1/
  71. $3C/$20/$F5/$C9/$2A/*+$0357/$54/$5D/$13/$3E/
  72. $80/$01/$00/$10/$77/$ED/$B0/$36/$00/$01/$00/
  73. $40/$ED/$B0/$3E/$7F/$2A/*+$0340/$77/$C9/$C5/
  74. $D5/$E5/$7D/$C6/$65/$6F/$30/$0D/$24/$3A/*+$0332/
  75. $C6/$10/$BC/$20/$04/$3A/*+$032A/$67/$3A/*+$0326/
  76. $C6/$0F/$94/$47/$7D/$2F/$3C/$20/$01/$04/$4F/
  77. $54/$5D/$3E/$80/$ED/$B1/$28/$12/$2A/*+$030F/
  78. $3A/*+$030D/$47/$7A/$90/$47/$4B/$3E/$80/$ED/
  79. $B1/$C2/*-$0191/$2B/$EB/$E1/$7C/$C6/$30/$67/
  80. $72/$7C/$C6/$10/$67/$73/$EB/$D1/$C1/$C9/$11/
  81. $00/$00/$42/$4F/$09/$CB/$DC/$CB/$2C/$CB/$1D/
  82. $4C/$7D/$ED/$5A/$38/$0F/$06/$0C/$CB/$39/$1F/
  83. $30/$03/$EB/$19/$EB/$29/$10/$F5/$EB/$29/$17/
  84. $29/$17/$29/$17/$29/$17/$6C/$E6/$0F/$C9/$FE/
  85. $20/$DA/*-$01CF/$CD/*+$018C/$11/$FF/$FF/$ED/
  86. $53/*+$029F/$CD/*+$0117/$DA/*+$0041/$D5/$CD/
  87. *+$006D/$21/*+$0294/$CB/$3E/$38/$09/$2A/*+$028B/
  88. $3A/*+$0295/$CD/*+$00BE/$D1/$3A/*+$0280/$B7/
  89. $28/$DB/$FE/$FE/$20/$06/$3C/$32/*+$0275/$18/
  90. $D1/$ED/$53/*+$0270/$CD/*+$00E8/$DA/*+$0012/
  91. $D5/$CD/*+$003E/$2A/*+$0263/$3A/*+$026D/$CD/
  92. *+$01C8/$D1/$18/$E6/$7B/$FE/$00/$28/$27/$FE/
  93. $01/$C2/*-$022C/$21/$00/$00/$22/*+$024D/$AF/
  94. $32/*+$0245/$CD/*+$0129/$3E/$09/$32/*+$0244/
  95. $3E/$02/$32/*+$0240/$11/$FF/$FF/$3E/$01/$32/
  96. *+$0233/$C3/*-$0073/$AF/$C3/*-$0246/$D5/$EB/
  97. $3A/*+$023B/$84/$67/$CB/$EE/$D1/$E5/$2A/*+$023A/
  98. $39/$D2/*-$026C/$3A/*+$022B/$82/$67/$6B/$7E/
  99. $E6/$DF/$FE/$80/$20/$1F/$3E/$01/$32/*+$0208/
  100. $E5/$2A/*+$0202/$3E/$20/$32/*+$020F/$3A/*+$0207/
  101. $CD/*+$0030/$AF/$32/*+$0205/$E1/$7E/$FE/$80/
  102. $CA/*-$0294/$56/$7C/$C6/$10/$67/$5E/$CB/$7A/
  103. $20/$0F/$CB/$AA/$CD/*-$0041/$7C/$C6/$10/$67/
  104. $7E/$CD/*+$0082/$E1/$C9/$7C/$C6/$10/$67/$7E/
  105. $32/*+$01D8/$18/$F1/$F5/$E5/$CD/*+$00F9/$D1/
  106. $2A/*+$01C3/$3A/*+$01D3/$84/$67/$3A/*+$01CA/
  107. $B2/$77/$7C/$C6/$10/$67/$73/$7C/$C6/$10/$67/
  108. $F1/$77/$2A/*+$01AB/$23/$22/*+$01A7/$23/$3A/
  109. *+$01A7/$BC/$C0/$CB/$27/$32/*+$01A0/$3A/*+$019C/
  110. $3C/$FE/$0D/$28/$04/$32/*+$0194/$C9/$3E/$FE/
  111. $32/*+$0187/$C9/$11/$00/$00/$3A/*+$0187/$47/
  112. $3A/*+$0182/$4F/$CB/$21/$CC/*+$001D/$CB/$13/
  113. $CB/$12/$10/$F5/$79/$32/*+$0172/$7A/$3D/$A7/
  114. $C0/$7B/$FE/$04/$D0/$FE/$02/$28/$DA/$FE/$03/
  115. $28/$D6/$C9/$CD/*+$012A/$37/$17/$4F/$C9/$ED/
  116. $4B/*+$0159/$CB/$38/$38/$13/$FE/$90/$28/$09/
  117. $4F/$ED/$43/*+$014C/$CD/*+$011C/$C9/$04/$ED/
  118. $43/*+$0143/$C9/$B7/$28/$11/$3D/$47/$AF/$32/
  119. *+$013A/$79/$32/*+$0135/$79/$CD/*+$0104/$10/
  120. $FB/$C9/$3E/$90/$ED/$43/*+$0128/$CD/*+$00F8/
  121. $C9/$CD/*+$0027/$3E/$20/$32/*+$0126/$AF/$21/
  122. $FF/$FF/$E5/$F5/$CD/*-$00BC/$F1/$E1/$3C/$20/
  123. $F6/$06/$04/$C5/$21/$FF/$7F/$AF/$CD/*-$00CB/
  124. $C1/$10/$F5/$AF/$32/*+$0107/$C9/$2A/*+$0106/
  125. $54/$5D/$13/$01/$00/$10/$36/$80/$ED/$B0/$36/
  126. $00/$01/$00/$20/$ED/$B0/$2A/*+$00F4/$54/$5D/
  127. $13/$01/$00/$28/$36/$80/$ED/$B0/$2A/*+$00E7/
  128. $36/$7F/$C9/$47/$CD/*+$007E/$4C/$7E/$FE/$80/
  129. $28/$05/$CD/*+$0019/$18/$F5/$ED/$5B/*+$00BD/
  130. $72/$7C/$C6/$14/$67/$73/$3A/*+$00C9/$67/$79/
  131. $94/$67/$22/*+$00B8/$C9/$ED/$5B/*+$00B8/$19/
  132. $3A/*+$00B9/$57/$7C/$BA/$30/$04/$11/$8B/$13/
  133. $19/$C9/$47/$3E/$FF/$32/*+$00A2/$78/$CD/*+$0042/
  134. $4C/$7E/$FE/$80/$28/$20/$3A/*+$0095/$FE/$FF/
  135. $20/$14/$E5/$56/$7C/$C6/$14/$67/$6E/$3A/*+$008C/
  136. $82/$67/$CB/$6E/$20/$03/$22/*+$007D/$E1/$CD/
  137. *-$003E/$18/$DA/$2A/*+$0074/$7C/$FE/$FF/$C8/
  138. $ED/$5B/*+$005C/$3A/*+$0066/$47/$72/$7C/$C6/
  139. $10/$67/$73/$7C/$C6/$10/$67/$70/$5D/$29/$29/
  140. $29/$29/$AC/$6F/$7B/$E6/$0F/$67/$3A/*+$0057/
  141. $84/$67/$23/$E5/$ED/$5B/*+$0050/$19/$22/*+$0046/
  142. $E1/$C9/$C5/$D5/$E5/$CD/*-$0506/$E1/$D1/$C1/
  143. $C9/$F5/$C5/$D5/$E5/$CD/*-$050E/$E1/$D1/$C1/
  144. $F1/$C9/$21/*+$000B/$11/*+$0014/$01/$0C/$00/
  145. $ED/$B0/$C9/$00/$FF/$FF/$01/$00/$00/$80/$09/
  146. $02/$00/$00/$55/$00/$00/$00/$00/$00/$00/$00/
  147. $00/$00/$00/$00/$00/$00/$00/$00/$00/$00/$00/
  148. $00/$00/$00/$00/$00/$00/$00/$00/$00/$00/$00/
  149. $00/$00/$00/$00/$00);
  150.