Subversion Repositories Kolibri OS

Rev

Rev 9896 | Blame | Compare with Previous | Last modification | View Log | Download | RSS feed

  1. (*
  2.     Copyright 2016, 2023 Anton Krotov
  3.  
  4.     This file is part of fb2read.
  5.  
  6.     fb2read is free software: you can redistribute it and/or modify
  7.     it under the terms of the GNU General Public License as published by
  8.     the Free Software Foundation, either version 3 of the License, or
  9.     (at your option) any later version.
  10.  
  11.     fb2read is distributed in the hope that it will be useful,
  12.     but WITHOUT ANY WARRANTY; without even the implied warranty of
  13.     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14.     GNU General Public License for more details.
  15.  
  16.     You should have received a copy of the GNU General Public License
  17.     along with fb2read. If not, see <http://www.gnu.org/licenses/>.
  18. *)
  19.  
  20. MODULE Cursor;
  21.  
  22.  
  23. IMPORT SYSTEM;
  24.  
  25.  
  26. PROCEDURE [stdcall] cur;
  27. BEGIN
  28. SYSTEM.CODE(
  29. 000H, 000H, 002H, 000H, 001H, 000H, 020H, 020H, 000H, 000H,
  30. 005H, 000H, 000H, 000H, 0A8H, 00CH, 000H, 000H, 016H, 000H,
  31. 000H, 000H, 028H, 000H, 000H, 000H, 020H, 000H, 000H, 000H,
  32. 040H, 000H, 000H, 000H, 001H, 000H, 018H, 000H, 000H, 000H,
  33. 000H, 000H, 080H, 00CH, 000H, 000H, 000H, 000H, 000H, 000H,
  34. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  35. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  36. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  37. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  38. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  39. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  40. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  41. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  42. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  43. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  44. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  45. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  46. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  47. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  48. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  49. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  50. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  51. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  52. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  53. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  54. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  55. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  56. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  57. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  58. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  59. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  60. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  61. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  62. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  63. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  64. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  65. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  66. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  67. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  68. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  69. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  70. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  71. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  72. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  73. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  74. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  75. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  76. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  77. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  78. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  79. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  80. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  81. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  82. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  83. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  84. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  85. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  86. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  87. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  88. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  89. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  90. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  91. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  92. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  93. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  94. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  95. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  96. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  97. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  98. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  99. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  100. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  101. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  102. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  103. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  104. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  105. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  106. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  107. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  108. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  109. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  110. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  111. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  112. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  113. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  114. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  115. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  116. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  117. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  118. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  119. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  120. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  121. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  122. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  123. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  124. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  125. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  126. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  127. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  128. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  129. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  130. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  131. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  132. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  133. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  134. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  135. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  136. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  137. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  138. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  139. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  140. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  141. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  142. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  143. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  144. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  145. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  146. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  147. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  148. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  149. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  150. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  151. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  152. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  153. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  154. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  155. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  156. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  157. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  158. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  159. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  160. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  161. 000H, 000H, 000H, 000H, 000H, 033H, 033H, 033H, 000H, 000H,
  162. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  163. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  164. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  165. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  166. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  167. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  168. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  169. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  170. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  171. 000H, 055H, 055H, 055H, 0BBH, 0BBH, 0BBH, 0BBH, 0BBH, 0BBH,
  172. 0BBH, 0BBH, 0BBH, 0AAH, 0AAH, 0AAH, 033H, 033H, 033H, 0AAH,
  173. 0AAH, 0AAH, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  174. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  175. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  176. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  177. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  178. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  179. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  180. 000H, 000H, 000H, 000H, 033H, 033H, 033H, 0BBH, 0BBH, 0BBH,
  181. 0EEH, 0EEH, 0EEH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0EEH,
  182. 0EEH, 0EEH, 0AAH, 0AAH, 0AAH, 0EEH, 0EEH, 0EEH, 000H, 000H,
  183. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  184. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  185. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  186. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  187. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  188. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  189. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 033H, 033H, 033H,
  190. 0BBH, 0BBH, 0BBH, 0EEH, 0EEH, 0EEH, 0FFH, 0FFH, 0FFH, 0FFH,
  191. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0EEH, 0EEH,
  192. 0EEH, 0FFH, 0FFH, 0FFH, 0AAH, 0AAH, 0AAH, 000H, 000H, 000H,
  193. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  194. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  195. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  196. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  197. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  198. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  199. 033H, 033H, 033H, 0BBH, 0BBH, 0BBH, 0EEH, 0EEH, 0EEH, 0FFH,
  200. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  201. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  202. 0CCH, 0CCH, 0CCH, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  203. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  204. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  205. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  206. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  207. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  208. 000H, 000H, 000H, 000H, 000H, 000H, 055H, 055H, 055H, 0EEH,
  209. 0EEH, 0EEH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  210. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  211. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0E5H, 0E5H, 0E5H, 088H,
  212. 088H, 088H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  213. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  214. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  215. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  216. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  217. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  218. 000H, 000H, 055H, 055H, 055H, 0EEH, 0EEH, 0EEH, 0FFH, 0FFH,
  219. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  220. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  221. 0FFH, 0FFH, 0E5H, 0E5H, 0E5H, 088H, 088H, 088H, 000H, 000H,
  222. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  223. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  224. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  225. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  226. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  227. 000H, 000H, 000H, 000H, 000H, 033H, 033H, 033H, 0DDH, 0DDH,
  228. 0DDH, 0FFH, 0FFH, 0FFH, 0DDH, 0DDH, 0DDH, 0FFH, 0FFH, 0FFH,
  229. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  230. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0EEH, 0EEH,
  231. 0EEH, 0BBH, 0BBH, 0BBH, 000H, 000H, 000H, 000H, 000H, 000H,
  232. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  233. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  234. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  235. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  236. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 033H, 033H,
  237. 033H, 0DDH, 0DDH, 0DDH, 0FFH, 0FFH, 0FFH, 0E5H, 0E5H, 0E5H,
  238. 000H, 000H, 000H, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  239. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  240. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0CCH, 0CCH, 0CCH,
  241. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  242. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  243. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  244. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  245. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  246. 000H, 000H, 000H, 000H, 033H, 033H, 033H, 0DDH, 0DDH, 0DDH,
  247. 0FFH, 0FFH, 0FFH, 0E5H, 0E5H, 0E5H, 000H, 000H, 000H, 0FFH,
  248. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  249. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  250. 0FFH, 0FFH, 0FFH, 0CCH, 0CCH, 0CCH, 000H, 000H, 000H, 000H,
  251. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  252. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  253. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  254. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  255. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  256. 055H, 055H, 055H, 0FFH, 0FFH, 0FFH, 0BBH, 0BBH, 0BBH, 000H,
  257. 000H, 000H, 033H, 033H, 033H, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  258. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  259. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0CCH,
  260. 0CCH, 0CCH, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  261. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  262. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  263. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  264. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  265. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 055H,
  266. 055H, 055H, 022H, 022H, 022H, 000H, 000H, 000H, 033H, 033H,
  267. 033H, 0FFH, 0FFH, 0FFH, 0EEH, 0EEH, 0EEH, 088H, 088H, 088H,
  268. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 088H, 088H, 088H, 0E5H,
  269. 0E5H, 0E5H, 044H, 044H, 044H, 0E5H, 0E5H, 0E5H, 033H, 033H,
  270. 033H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  271. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  272. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  273. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  274. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  275. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  276. 000H, 000H, 000H, 000H, 033H, 033H, 033H, 0FFH, 0FFH, 0FFH,
  277. 0E5H, 0E5H, 0E5H, 044H, 044H, 044H, 0F4H, 0F4H, 0F4H, 0E5H,
  278. 0E5H, 0E5H, 044H, 044H, 044H, 0E5H, 0E5H, 0E5H, 000H, 000H,
  279. 000H, 033H, 033H, 033H, 000H, 000H, 000H, 000H, 000H, 000H,
  280. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  281. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  282. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  283. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  284. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  285. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  286. 033H, 033H, 033H, 0FFH, 0FFH, 0FFH, 0E5H, 0E5H, 0E5H, 000H,
  287. 000H, 000H, 0AAH, 0AAH, 0AAH, 022H, 022H, 022H, 000H, 000H,
  288. 000H, 033H, 033H, 033H, 000H, 000H, 000H, 000H, 000H, 000H,
  289. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  290. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  291. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  292. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  293. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  294. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  295. 000H, 000H, 000H, 000H, 000H, 000H, 033H, 033H, 033H, 0FFH,
  296. 0FFH, 0FFH, 0E5H, 0E5H, 0E5H, 000H, 000H, 000H, 033H, 033H,
  297. 033H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  298. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  299. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  300. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  301. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  302. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  303. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  304. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  305. 000H, 000H, 033H, 033H, 033H, 0FFH, 0FFH, 0FFH, 0E5H, 0E5H,
  306. 0E5H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  307. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  308. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  309. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  310. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  311. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  312. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  313. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  314. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 033H, 033H,
  315. 033H, 0FFH, 0FFH, 0FFH, 0E5H, 0E5H, 0E5H, 000H, 000H, 000H,
  316. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  317. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  318. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  319. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  320. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  321. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  322. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  323. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  324. 000H, 000H, 000H, 000H, 044H, 044H, 044H, 0EEH, 0EEH, 0EEH,
  325. 0E5H, 0E5H, 0E5H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  326. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  327. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  328. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  329. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  330. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  331. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  332. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  333. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  334. 000H, 000H, 000H, 044H, 044H, 044H, 000H, 000H, 000H, 000H,
  335. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  336. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  337. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  338. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  339. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  340. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  341. 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H, 000H,
  342. 000H, 000H, 000H, 000H, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  343. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  344. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  345. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  346. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH,
  347. 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0FFH, 0F8H, 027H, 0FFH, 0FFH,
  348. 0F8H, 007H, 0FFH, 0FFH, 0F0H, 007H, 0FFH, 0FFH, 0E0H, 003H,
  349. 0FFH, 0FFH, 0C0H, 003H, 0FFH, 0FFH, 0C0H, 001H, 0FFH, 0FFH,
  350. 0C0H, 001H, 0FFH, 0FFH, 080H, 001H, 0FFH, 0FFH, 000H, 001H,
  351. 0FFH, 0FFH, 000H, 001H, 0FFH, 0FFH, 000H, 001H, 0FFH, 0FFH,
  352. 090H, 001H, 0FFH, 0FFH, 0F0H, 003H, 0FFH, 0FFH, 0F0H, 00FH,
  353. 0FFH, 0FFH, 0F0H, 07FH, 0FFH, 0FFH, 0F0H, 0FFH, 0FFH, 0FFH,
  354. 0F0H, 0FFH, 0FFH, 0FFH, 0F0H, 0FFH, 0FFH, 0FFH, 0F9H, 0FFH,
  355. 0FFH, 0FFH)
  356. END cur;
  357.  
  358.  
  359. PROCEDURE GetCursor* (): INTEGER;
  360.         RETURN SYSTEM.ADR(cur) + 3
  361. END GetCursor;
  362.  
  363.  
  364. END Cursor.
  365.