API tools faq
paste
Advertisement
tahg

Untitled

tahg
Oct 31st, 2019
2,241
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 93.08 KB | None | 0 0
raw download clone embed print report
  1. ; Processor : 68HC11D0 [RAM=192 ROM=4032 EPROM=0 EEPROM=0]
  2. ; Target assembler: Motorola FreeWare Assembler
  3.  
  4. ; ===========================================================================
  5.  
  6. ; Segment type: Pure data
  7. ; segment FSR
  8. PORTA: rmb 1 ; DATA XREF: __RESET+3Aw __RESET+3Cw ...
  9. ; Port A data
  10. RESERVED01: rmb 1 ; RESERVED01
  11. PIOC: rmb 1 ; Parallel I_O Control Register
  12. PORTC: rmb 1 ; I_O Port C
  13. PORTB: rmb 1 ; Output Port B
  14. RESERVED05: rmb 1 ; RESERVED
  15. DDRB: rmb 1 ; Data Direction PortB
  16. DDRC: rmb 1 ; Data Direction for Port C
  17. PORTD: rmb 1 ; DATA XREF: __RESET+45w sub_87A4+3r ...
  18. ; Data Port D
  19. DDRD: rmb 1 ; DATA XREF: __RESET+41w
  20. ; Data Direction for Port D
  21. RESERVED0A: rmb 1 ; RESERVED
  22. CFORC: rmb 1 ; Compare Force Register
  23. OC1M: rmb 1 ; OC1 Action Mask Register
  24. OC1D: rmb 1 ; OC1 Action Data Register
  25. TCNTH: rmb 1 ; DATA XREF: sub_8103+45r sub_815D+6Cr ...
  26. ; Timer Counter Register (High)
  27. TCNTL: rmb 1 ; Timer Counter Register (Low)
  28. TIC1H: rmb 1 ; Input Capture 1 Register (High)
  29. TIC1L: rmb 1 ; Input Capture 1 Register (Low)
  30. TIC2H: rmb 1 ; Input Capture 2 Register (High)
  31. TIC2L: rmb 1 ; Input Capture 2 Register (Low)
  32. TIC3H: rmb 1 ; Input Capture 3 Register (High)
  33. TIC3L: rmb 1 ; Input Capture 3 Register (Low)
  34. TOC1H: rmb 1 ; Output Compare 1 Register (High)
  35. TOC1L: rmb 1 ; Output Compare 1 Register (Low)
  36. TOC2H: rmb 1 ; DATA XREF: sub_81F3+29w sub_88A6+29w ...
  37. ; Output Compare 2 Register (High)
  38. TOC2L: rmb 1 ; Output Compare 2 Register (Low)
  39. TOC3H: rmb 1 ; DATA XREF: sub_815D+71w sub_8853+28w
  40. ; Output Compare 3 Register (High)
  41. TOC3L: rmb 1 ; Output Compare 3 Register (Low)
  42. TOC4H: rmb 1 ; DATA XREF: sub_8103+4Aw RTII+1A6w
  43. ; Output Compare 4 Register (High)
  44. TOC4L: rmb 1 ; Output Compare 4 Register (Low)
  45. TI4O5H: rmb 1 ; Timer Input Capture 4/Output Compare 5 (High)
  46. TI4O5L: rmb 1 ; Timer Input Capture 4/Output Compare 5 (Low)
  47. TCTL1: rmb 1 ; Timer Control 1
  48. TCTL2: rmb 1 ; DATA XREF: __RESET+2Ew
  49. ; Timer Control 2
  50. TMSK1: rmb 1 ; DATA XREF: sub_8103r sub_8103+4w ...
  51. ; Timer Interrupt Mask 1
  52. TFLG1: rmb 1 ; DATA XREF: SCISS+69w sub_8103+54w ...
  53. ; Timer Interrupt Flag Register 1
  54. TMSK2: rmb 1 ; DATA XREF: __RESET+18r __RESET+1Cw ...
  55. ; Timer Interrupt Mask Register 2
  56. TFLG2: rmb 1 ; DATA XREF: SCISS+6Dw sub_81F3+35w ...
  57. ; Timer Interrupt Flag Register 2
  58. PACTL: rmb 1 ; DATA XREF: __RESET+2Aw
  59. ; Pulse Accumulator Control Register
  60. PACNT: rmb 1 ; Pulse Accumulator Count Register
  61. SPCR: rmb 1 ; DATA XREF: __RESET+49w
  62. ; SPI Control Register
  63. SPSR: rmb 1 ; DATA XREF: SCISS+7Dr
  64. ; sub_8376:loc_8388r ...
  65. ; SPI Status Register
  66. SPDR: rmb 1 ; DATA XREF: SCISS+7Fr sub_8376+18r ...
  67. ; SPI Data Register
  68. BAUD: rmb 1 ; SCI Baud Rate Control 3
  69. SCCR1: rmb 1 ; SCI Control Register 1
  70. SCCR2: rmb 1 ; SCI Control Register 2
  71. SCSR: rmb 1 ; SCI Status Register
  72. SCDR: rmb 1 ; SCI Data (Read RDR, Write TDR)
  73. RESERVED30: rmb 1 ; RESERVED
  74. RESERVED31: rmb 1 ; RESERVED
  75. RESERVED32: rmb 1 ; RESERVED
  76. RESERVED33: rmb 1 ; RESERVED
  77. RESERVED34: rmb 1 ; RESERVED
  78. RESERVED35: rmb 1 ; RESERVED
  79. RESERVED36: rmb 1 ; RESERVED
  80. RESERVED37: rmb 1 ; RESERVED
  81. RESERVED38: rmb 1 ; RESERVED
  82. OPTION: rmb 1 ; DATA XREF: __RESET+Aw
  83. ; System Configuration Options
  84. COPRST: rmb 1 ; DATA XREF: SCISS+77w SCISS+7Bw ...
  85. ; Arm_Reset COP Timer Circuitry
  86. RESERVED3B: rmb 1 ; RESERVED
  87. HPRIO: rmb 1 ; DATA XREF: __RESET+16w
  88. ; Highest Priority I-Bit Int and Misc
  89. INIT: rmb 1 ; DATA XREF: __RESET+Ew
  90. ; RAM and I_O Mapping Register
  91. TEST1: rmb 1 ; Factory TEST Control Register
  92. CONFIG: rmb 1 ; DATA XREF: __RESET+12w
  93. ; end of 'FSR' ; COP, ROM, and EEPROM Enables
  94.  
  95. ; ===========================================================================
  96.  
  97. ; Segment type: Pure data
  98. ; segment RAM
  99. org $C6
  100. byte_C6: rmb 1 ; DATA XREF: __RESET+5Aw IRQ+6Ar ...
  101. byte_C7: rmb 1 ; DATA XREF: sub_851E+5w sub_851E+165w ...
  102. byte_C8: rmb 1 ; DATA XREF: sub_851E+1Dr sub_851E+1Fw ...
  103. byte_C9: rmb 1 ; DATA XREF: SCISSr SCISS+5Bw ...
  104. byte_CA: rmb 1 ; DATA XREF: SCISS+3r SCISS+58w ...
  105. byte_CB: rmb 1 ; DATA XREF: SCISS+36r sub_8103+21r ...
  106. byte_CC: rmb 1 ; DATA XREF: OC2I+C2r sub_8EC6+9w ...
  107. byte_CD: rmb 1 ; DATA XREF: RTII+1B6w RTII:loc_9233w ...
  108. byte_CE: rmb 1 ; DATA XREF: RTII+29w RTII:loc_90A6w ...
  109. byte_CF: rmb 1 ; DATA XREF: RTII+145w RTII+1B4r ...
  110. byte_D0: rmb 1 ; DATA XREF: RTII+133w RTII:loc_9192r ...
  111. rmb 1
  112. byte_D2: rmb 1 ; DATA XREF: RTII+2Ew RTII+58r ...
  113. rmb 1
  114. byte_D4: rmb 1 ; DATA XREF: RTII+1Dr RTII:loc_905Er ...
  115. byte_D5: rmb 1 ; DATA XREF: RTII+39w RTII+3Cr ...
  116. byte_D6: rmb 1 ; DATA XREF: SCISS+17r SCISS+46w ...
  117. byte_D7: rmb 1 ; DATA XREF: RTII+ACr RTII+100r ...
  118. byte_D8: rmb 1 ; DATA XREF: RTII+33w RTII+A8r ...
  119. rmb 1
  120. byte_DA: rmb 1 ; DATA XREF: RTII+27r RTII+B2w ...
  121. byte_DB: rmb 1 ; DATA XREF: sub_851E+B3w
  122. ; sub_851E+191r
  123. byte_DC: rmb 1 ; DATA XREF: sub_851E+3w sub_851E+6Ar ...
  124. rmb 1
  125. byte_DE: rmb 1 ; DATA XREF: __RESET+66w SCISS+3Ew ...
  126. rmb 1
  127. byte_E0: rmb 1 ; DATA XREF: __RESET+64w SCISS+3Cw ...
  128. rmb 1
  129. byte_E2: rmb 1 ; DATA XREF: SCISS+11r SCISS+4Cw ...
  130. byte_E3: rmb 1 ; DATA XREF: SCISS+14r SCISS+49w ...
  131. byte_E4: rmb 1 ; DATA XREF: sub_8400+9Bw sub_8400+AFw ...
  132. byte_E5: rmb 1 ; DATA XREF: sub_8400+68w sub_8400+D8r ...
  133. byte_E6: rmb 1 ; DATA XREF: IRQ+19w IRQ:loc_824Fr ...
  134. byte_E7: rmb 1 ; DATA XREF: sub_8400r
  135. byte_E8: rmb 1 ; DATA XREF: sub_851E+19w sub_851E+1Br ...
  136. rmb 1
  137. byte_EA: rmb 1 ; DATA XREF: SCISS+Cr SCISS+4Fw ...
  138. byte_EB: rmb 1 ; DATA XREF: SCISS+9r SCISS+52w ...
  139. byte_EC: rmb 1 ; DATA XREF: __RESET+6Cr SCISS+6r ...
  140. byte_ED: rmb 1 ; DATA XREF: __RESET+5Fw SCISS+5Fw ...
  141. byte_EE: rmb 1 ; DATA XREF: SCISS+1Ar SCISS+43w ...
  142. byte_EF: rmb 1 ; DATA XREF: SCISS+Fr SCISS+40w ...
  143. byte_F0: rmb 1 ; DATA XREF: OC4I:loc_8F0Er OC4I+1Dw ...
  144. byte_F1: rmb 1 ; DATA XREF: sub_8853+39r sub_8853+3Br ...
  145. byte_F2: rmb 1 ; DATA XREF: sub_8400:loc_8484w
  146. ; sub_8400+8Fr ...
  147. rmb 1
  148. byte_F4: rmb 1 ; DATA XREF: sub_851E+44r sub_851E+FCr ...
  149. byte_F5: rmb 1 ; DATA XREF: sub_851E+3Dr sub_851E+F1r ...
  150. byte_F6: rmb 1 ; DATA XREF: sub_8500+4w sub_8500+Ar ...
  151. byte_F7: rmb 1 ; DATA XREF: OC4I+4r OC4I:loc_8F34w ...
  152. rmb 1
  153. byte_F9: rmb 1 ; DATA XREF: sub_815D+2Bw sub_815D+57r ...
  154. byte_FA: rmb 1 ; DATA XREF: sub_815D+27w sub_815D+4Fr ...
  155. byte_FB: rmb 1 ; DATA XREF: sub_851E+28r
  156. ; sub_851E:loc_85FAr ...
  157. byte_FC: rmb 1 ; DATA XREF: sub_851E+2Cr
  158. ; sub_851E:loc_8608r ...
  159. byte_FD: rmb 1 ; DATA XREF: __RESET+22r SCISS+33r ...
  160. byte_FE: rmb 1 ; DATA XREF: __RESET+20w SCISS+61w ...
  161. byte_FF: rmb 1 ; DATA XREF: __RESET+5w __RESET+35r ...
  162. ; end of 'RAM'
  163.  
  164. byte_800: rmb 1 ; DATA XREF: sub_8103+2Ar
  165. ; sub_851E:loc_8558r ...
  166. byte_801: rmb 1 ; DATA XREF: sub_8103:loc_813Fr
  167. ; sub_8400+16r ...
  168. byte_C00: rmb 1 ; DATA XREF: sub_851E+Fr RTII+4r
  169. byte_1000: rmb 1 ; DATA XREF: __RESET+2w __RESET+32w ...
  170. byte_4038: rmb 1 ; DATA XREF: sub_8853r sub_8853+5w ...
  171. ; end of 'RESERVED'
  172.  
  173. ; Base Address: 0000h Range: 8000h - 28000h Loaded length: 00020000h
  174. ; ===========================================================================
  175.  
  176. ; Segment type: Pure code
  177. ; segment ROM
  178. org $8000
  179.  
  180. ; =============== S U B R O U T I N E =======================================
  181.  
  182.  
  183. ; public __RESET
  184. __RESET: ; DATA XREF: USER_VEC:off_FFFEo
  185. ldaa #$F0 ; '𧍊
  186. staa byte_1000
  187. clr byte_FF
  188. ldaa #$1B
  189. staa OPTION ; System Configuration Options
  190. ldaa #0
  191. staa INIT ; RAM and I_O Mapping Register
  192. ldaa #0
  193. staa CONFIG ; COP, ROM, and EEPROM Enables
  194. ldaa #$2C ; ','
  195. staa HPRIO ; Highest Priority I-Bit Int and Misc
  196. ldaa TMSK2 ; Timer Interrupt Mask Register 2
  197. oraa #3
  198. staa TMSK2 ; Timer Interrupt Mask Register 2
  199. ldaa #$F0 ;
  200. staa byte_FE
  201. bset byte_FD $FF
  202.  
  203. loc_8025: ; CODE XREF: NOCOP+BJ CME+3J
  204. lds #$7FFF
  205. ldaa #5
  206. staa PACTL ; Pulse Accumulator Control Register
  207. ldaa #$AA ; 'ª'
  208. staa TCTL2 ; Timer Control 2
  209. ldaa #$F0 ;
  210. staa byte_1000
  211. bclr byte_FF $CF ; 'ϧ
  212. ldaa #$20 ; ' '
  213. staa PORTA ; Port A data
  214. clr PORTA ; Port A data
  215. ldaa #$FA ; 'ú'
  216. staa DDRD ; Data Direction for Port D
  217. ldaa #6
  218. staa PORTD ; Data Port D
  219. ldaa #$52 ; 'R'
  220. staa SPCR ; SPI Control Register
  221. ldx #$2000
  222.  
  223. loc_804E: ; CODE XREF: __RESET+55j
  224. bset 0,x $FF
  225. inx
  226. cpx #$2018
  227. bne loc_804E
  228. jsr sub_815D
  229. clr byte_C6
  230. ldaa #2
  231. staa byte_ED
  232. ldx #$4100
  233. stx byte_E0
  234. stx byte_DE
  235. ldaa #$83 ; 'ƒ'
  236. staa TMSK2 ; Timer Interrupt Mask Register 2
  237. bset byte_EC 1
  238. tpa
  239. anda #$BF ; '¿'
  240. tap
  241. cli
  242.  
  243. loc_8074: ; CODE XREF: __RESET+75j SCISS+89J
  244. wai
  245. bra loc_8074
  246. ; End of function __RESET
  247.  
  248.  
  249. ; =============== S U B R O U T I N E =======================================
  250.  
  251.  
  252. ; public SCISS
  253. SCISS: ; DATA XREF: USER_VEC:FFD6o
  254. ; USER_VEC:FFF4o ...
  255. ldaa byte_C9 ; OPC
  256. ; SOFT
  257. ; XIRQ
  258. psha
  259. ldaa byte_CA
  260. psha
  261. ldaa byte_EC
  262. psha
  263. ldaa byte_EB
  264. psha
  265. ldaa byte_EA
  266. psha
  267. ldab byte_EF
  268. ldaa byte_E2
  269. psha
  270. ldaa byte_E3
  271. psha
  272. ldaa byte_D6
  273. psha
  274. ldaa byte_EE
  275. psha
  276. ldx #$40 ; '@'
  277.  
  278. loc_8097: ; CODE XREF: SCISS+26j
  279. clr 0,x
  280. inx
  281. cpx #$FB ; 'û'
  282. bne loc_8097
  283. ldx #$4040
  284.  
  285. loc_80A2: ; CODE XREF: SCISS+31j
  286. clr 0,x
  287. inx
  288. cpx #$5000
  289. bne loc_80A2
  290. bset byte_FD $FF
  291. bset byte_CB 4
  292. ldx #$4100
  293. stx byte_E0
  294. stx byte_DE
  295. stab byte_EF
  296. pula
  297. staa byte_EE
  298. pula
  299. staa byte_D6
  300. pula
  301. staa byte_E3
  302. pula
  303. staa byte_E2
  304. pula
  305. staa byte_EA
  306. pula
  307. staa byte_EB
  308. pula
  309. staa byte_EC
  310. pula
  311. staa byte_CA
  312. pula
  313. staa byte_C9
  314. ldaa #2
  315. staa byte_ED
  316. clr byte_FE
  317. jsr sub_87D6
  318. ldaa #$BF ; '¿'
  319. staa TFLG1 ; Timer Interrupt Flag Register 1
  320. ldaa #$FF
  321. staa TFLG2 ; Timer Interrupt Flag Register 2
  322. ldaa TMSK2 ; Timer Interrupt Mask Register 2
  323. oraa #$C0 ; 'À'
  324. staa TMSK2 ; Timer Interrupt Mask Register 2
  325. ldaa #$55 ; 'U'
  326. staa COPRST ; Arm_Reset COP Timer Circuitry
  327. ldaa #$AA ; 'ª'
  328. staa COPRST ; Arm_Reset COP Timer Circuitry
  329. ldaa SPSR ; SPI Status Register
  330. ldaa SPDR ; SPI Data Register
  331. lds #$7FFF
  332. tpa
  333. anda #$BF ; '¿'
  334. tap
  335. cli
  336. jmp loc_8074
  337. ; End of function SCISS
  338.  
  339.  
  340. ; =============== S U B R O U T I N E =======================================
  341.  
  342.  
  343. sub_8103: ; CODE XREF: sub_8E4C+9P sub_8E6A+11P
  344. ldaa TMSK1 ; Timer Interrupt Mask 1
  345. anda #$BF ; '¿'
  346. staa TMSK1 ; Timer Interrupt Mask 1
  347. ldaa #$F0 ;
  348. staa byte_1000
  349. ldaa #$D8 ; 'ا
  350. staa byte_EE
  351. clr byte_EB
  352. clr byte_EA
  353. ldx #$2000
  354.  
  355. loc_811B: ; CODE XREF: sub_8103+1Fj
  356. bset 0,x $FF
  357. inx
  358. cpx #$2018
  359. bne loc_811B
  360. bset byte_CB 4
  361. ldaa TMSK2 ; Timer Interrupt Mask Register 2
  362. oraa #$C0 ; 'À'
  363. staa TMSK2 ; Timer Interrupt Mask Register 2
  364. ldaa byte_800
  365. anda #$80 ; '€'
  366. bne loc_813F
  367. ldaa #8
  368. staa byte_C9
  369. bset byte_CA $FF
  370. ldaa #$F
  371. staa TMSK1 ; Timer Interrupt Mask 1
  372.  
  373. loc_813F: ; CODE XREF: sub_8103+2Fj
  374. ldaa byte_801
  375. anda #$F
  376. cmpa #$A
  377. bne loc_8159
  378. ldd TCNTH ; Timer Counter Register (High)
  379. subd #1
  380. std TOC4H ; Output Compare 4 Register (High)
  381. ldaa TMSK1 ; Timer Interrupt Mask 1
  382. oraa #$10
  383. staa TMSK1 ; Timer Interrupt Mask 1
  384. ldaa #$FF
  385. staa TFLG1 ; Timer Interrupt Flag Register 1
  386.  
  387. loc_8159: ; CODE XREF: sub_8103+43j
  388. clr byte_EF
  389. rts
  390. ; End of function sub_8103
  391.  
  392.  
  393. ; =============== S U B R O U T I N E =======================================
  394.  
  395.  
  396. sub_815D: ; CODE XREF: __RESET+57P
  397. ldx #$4000
  398.  
  399. loc_8160: ; CODE XREF: sub_815D+Dj
  400. clr 0,x
  401. ldaa 0,x
  402. bne loc_816E
  403. inx
  404. cpx #$7F00
  405. bne loc_8160
  406. bra loc_8171
  407. ; ---------------------------------------------------------------------------
  408.  
  409. loc_816E: ; CODE XREF: sub_815D+7j
  410. bset byte_FF 1
  411.  
  412. loc_8171: ; CODE XREF: sub_815D+Fj
  413. ldaa byte_FE
  414. oraa #$F0 ;
  415. staa byte_FE
  416. jsr sub_87D6
  417. ldaa #$55 ; 'U'
  418. staa COPRST ; Arm_Reset COP Timer Circuitry
  419. ldaa #$AA ; 'ª'
  420. staa COPRST ; Arm_Reset COP Timer Circuitry
  421. ldaa #8
  422. staa byte_FA
  423. ldaa #$A5 ; '¥'
  424. staa byte_F9
  425. jsr sub_87A4
  426. ldx #$8000
  427. ldd #0
  428.  
  429. loc_8193: ; CODE XREF: sub_815D+3Dj
  430. addd 0,x
  431. inx
  432. inx
  433. cpx #$8320
  434. bne loc_8193
  435. nop
  436. cpx #$9A7A
  437. cpd #$6586
  438. beq loc_81A9
  439. bset byte_FF 2
  440.  
  441. loc_81A9: ; CODE XREF: sub_815D+47j
  442. jsr sub_8820
  443. ldaa byte_FA
  444. anda #$3F ; '?'
  445. cmpa #8
  446. bne loc_81BC
  447. ldaa byte_F9
  448. cmpa #$A5 ; '¥'
  449. bne loc_81BC
  450. bra loc_81BF
  451. ; ---------------------------------------------------------------------------
  452.  
  453. loc_81BC: ; CODE XREF: sub_815D+55j sub_815D+5Bj
  454. bset byte_FF 4
  455.  
  456. loc_81BF: ; CODE XREF: sub_815D+5Dj
  457. clr byte_FE
  458. jsr sub_87D6
  459. ldaa #$20 ; ' '
  460. staa TFLG1 ; Timer Interrupt Flag Register 1
  461. ldd TCNTH ; Timer Counter Register (High)
  462. addd #$10
  463. std TOC3H ; Output Compare 3 Register (High)
  464. ldx #0
  465.  
  466. loc_81D3: ; CODE XREF: sub_815D+80j
  467. inx
  468. cpx #$100
  469. beq loc_81F0
  470. ldaa TFLG1 ; Timer Interrupt Flag Register 1
  471. anda #$20 ; ' '
  472. beq loc_81D3
  473. ldx #$40 ; '@'
  474.  
  475. loc_81E2: ; CODE XREF: sub_815D+8Fj
  476. clr 0,x
  477. ldaa 0,x
  478. bne loc_81F0
  479. inx
  480. cpx #$FD ; 'ý'
  481. bne loc_81E2
  482. bra sub_81F3
  483. ; ---------------------------------------------------------------------------
  484.  
  485. loc_81F0: ; CODE XREF: sub_815D+7Aj sub_815D+89j
  486. bset byte_FF 8
  487. ; End of function sub_815D
  488.  
  489.  
  490. ; =============== S U B R O U T I N E =======================================
  491.  
  492.  
  493. sub_81F3: ; CODE XREF: sub_815D+91j sub_8400+E9P ...
  494. ldaa #$40 ; '@'
  495. staa TFLG1 ; Timer Interrupt Flag Register 1
  496. ldaa byte_FF
  497. bne loc_8201
  498. ldaa #$11
  499. ldab #$BE ; '¾'
  500. bra loc_8205
  501. ; ---------------------------------------------------------------------------
  502.  
  503. loc_8201: ; CODE XREF: sub_81F3+6j
  504. ldaa #$12
  505. ldab #$EE ; '
  506.  
  507. loc_8205: ; CODE XREF: sub_81F3+Cj
  508. staa byte_EF
  509. stab byte_EE
  510. stab byte_1000
  511. ldx #$2000
  512.  
  513. loc_820F: ; CODE XREF: sub_81F3+22j
  514. clr 0,x
  515. inx
  516. cpx #$2018
  517. bne loc_820F
  518. ldd TCNTH ; Timer Counter Register (High)
  519. addd #$7000
  520. std TOC2H ; Output Compare 2 Register (High)
  521. ldaa TMSK1 ; Timer Interrupt Mask 1
  522. oraa #$40 ; '@'
  523. staa TMSK1 ; Timer Interrupt Mask 1
  524. ldaa #$FF
  525. staa TFLG1 ; Timer Interrupt Flag Register 1
  526. staa TFLG2 ; Timer Interrupt Flag Register 2
  527. ldaa #$55 ; 'U'
  528. staa COPRST ; Arm_Reset COP Timer Circuitry
  529. ldaa #$AA ; 'ª'
  530. staa COPRST ; Arm_Reset COP Timer Circuitry
  531. rts
  532. ; End of function sub_81F3
  533.  
  534.  
  535. ; =============== S U B R O U T I N E =======================================
  536.  
  537.  
  538. ; public IRQ
  539. IRQ: ; DATA XREF: USER_VEC:FFF2o
  540. clr byte_E3
  541. jsr sub_8820
  542. ldab byte_FA
  543. andb #$30 ; '0'
  544. bne loc_825F
  545. ldaa byte_FA
  546. anda #8
  547. bne loc_8278
  548. ldaa byte_FD
  549. beq loc_824F
  550. ldx #0
  551. stx byte_E6
  552. rti
  553. ; ---------------------------------------------------------------------------
  554.  
  555. loc_824F: ; CODE XREF: IRQ+14j
  556. ldd byte_E6
  557. addd #$4040
  558. xgdx
  559. ldaa byte_F9
  560. staa 0,x
  561. ldx byte_E6
  562. inx
  563. stx byte_E6
  564. rti
  565. ; ---------------------------------------------------------------------------
  566.  
  567. loc_825F: ; CODE XREF: IRQ+Aj
  568. ldx #0
  569. stx byte_E6
  570. ldaa byte_FD
  571. beq loc_8269
  572. rti
  573. ; ---------------------------------------------------------------------------
  574.  
  575. loc_8269: ; CODE XREF: IRQ+33j
  576. bset byte_FD $FF
  577. ldaa #$FC ; 'ü'
  578. staa byte_F9
  579. ldaa #$38 ; '8'
  580. staa byte_FA
  581. jsr sub_87A4
  582. rti
  583. ; ---------------------------------------------------------------------------
  584.  
  585. loc_8278: ; CODE XREF: IRQ+10j
  586. ldaa byte_FD
  587. beq loc_8294
  588. ldx #0
  589. stx byte_E6
  590. ldaa byte_F9
  591. bne loc_828C
  592. clr byte_FD
  593. jsr sub_8362
  594. rti
  595. ; ---------------------------------------------------------------------------
  596.  
  597. loc_828C: ; CODE XREF: IRQ+50j
  598. cmpa #4
  599. bne locret_8293
  600. jsr sub_8376
  601.  
  602. locret_8293: ; CODE XREF: IRQ+5Bj
  603. rti
  604. ; ---------------------------------------------------------------------------
  605.  
  606. loc_8294: ; CODE XREF: IRQ+47j
  607. ldaa byte_F9
  608. cmpa #7
  609. bne loc_82AD
  610. jsr sub_8400
  611. ldaa byte_C6
  612. bne loc_82A4
  613. jsr sub_8362
  614.  
  615. loc_82A4: ; CODE XREF: IRQ+6Cj
  616. ldx #0
  617. stx byte_E6
  618. clr byte_C6
  619. rti
  620. ; ---------------------------------------------------------------------------
  621.  
  622. loc_82AD: ; CODE XREF: IRQ+65j
  623. ldaa byte_F9
  624. bne loc_82B5
  625. jsr sub_8366
  626. rti
  627. ; ---------------------------------------------------------------------------
  628.  
  629. loc_82B5: ; CODE XREF: IRQ+7Cj
  630. cmpa #1
  631. bne loc_82BD
  632. jsr sub_836F
  633. rti
  634. ; ---------------------------------------------------------------------------
  635.  
  636. loc_82BD: ; CODE XREF: IRQ+84j
  637. cmpa #2
  638. bne loc_82C5
  639. jsr sub_83A3
  640. rti
  641. ; ---------------------------------------------------------------------------
  642.  
  643. loc_82C5: ; CODE XREF: IRQ+8Cj
  644. cmpa #3
  645. bne loc_82CD
  646. jsr sub_83B9
  647. rti
  648. ; ---------------------------------------------------------------------------
  649.  
  650. loc_82CD: ; CODE XREF: IRQ+94j
  651. cmpa #4
  652. bne loc_82D5
  653. jsr sub_8376
  654. rti
  655. ; ---------------------------------------------------------------------------
  656.  
  657. loc_82D5: ; CODE XREF: IRQ+9Cj
  658. cmpa #5
  659. bne loc_82DD
  660. jsr sub_83E3
  661. rti
  662. ; ---------------------------------------------------------------------------
  663.  
  664. loc_82DD: ; CODE XREF: IRQ+A4j
  665. cmpa #8
  666. bne loc_82E5
  667. jsr sub_84F1
  668. rti
  669. ; ---------------------------------------------------------------------------
  670.  
  671. loc_82E5: ; CODE XREF: IRQ+ACj
  672. cmpa #$F
  673. bhi loc_82ED
  674. jsr sub_8500
  675. rti
  676. ; ---------------------------------------------------------------------------
  677.  
  678. loc_82ED: ; CODE XREF: IRQ+B4j
  679. cmpa #$1F
  680. bhi loc_82F5
  681. jsr sub_851E
  682. rti
  683. ; ---------------------------------------------------------------------------
  684.  
  685. loc_82F5: ; CODE XREF: IRQ+BCj
  686. cmpa #$2F ; '/'
  687. bhi loc_82FD
  688. jsr sub_86C8
  689. rti
  690. ; ---------------------------------------------------------------------------
  691.  
  692. loc_82FD: ; CODE XREF: IRQ+C4j
  693. cmpa #$30 ; '0'
  694. bne loc_8305
  695. jsr sub_8362
  696. rti
  697. ; ---------------------------------------------------------------------------
  698.  
  699. loc_8305: ; CODE XREF: IRQ+CCj
  700. cmpa #$31 ; '1'
  701. bne loc_830D
  702. jsr sub_8711
  703. rti
  704. ; ---------------------------------------------------------------------------
  705.  
  706. loc_830D: ; CODE XREF: IRQ+D4j
  707. cmpa #$32 ; '2'
  708. bne loc_8315
  709. jsr sub_876F
  710. rti
  711. ; ---------------------------------------------------------------------------
  712.  
  713. loc_8315: ; CODE XREF: IRQ+DCj
  714. cmpa #$3D ; '='
  715. bne loc_8320
  716. clr byte_D6
  717. jsr sub_8362
  718. rti
  719. ; ---------------------------------------------------------------------------
  720.  
  721. loc_8320: ; CODE XREF: IRQ+E4j
  722. cmpa #$3E ; '>'
  723. bne loc_832F
  724. bset byte_D6 $FF
  725. ldaa #2
  726. staa byte_ED
  727. jsr sub_8362
  728. rti
  729. ; ---------------------------------------------------------------------------
  730.  
  731. loc_832F: ; CODE XREF: IRQ+EFj
  732. cmpa #$3F ; '?'
  733. bne loc_833E
  734. bset byte_D6 $FF
  735. ldaa #1
  736. staa byte_ED
  737. jsr sub_8362
  738. rti
  739. ; ---------------------------------------------------------------------------
  740.  
  741. loc_833E: ; CODE XREF: IRQ+FEj
  742. cmpa #$F9 ; 'ù'
  743. bhi loc_8346
  744. jsr sub_8362
  745. rti
  746. ; ---------------------------------------------------------------------------
  747.  
  748. loc_8346: ; CODE XREF: IRQ+10Dj
  749. cmpa #$FA ; 'ú'
  750. bne loc_834E
  751. jsr sub_8362
  752. rti
  753. ; ---------------------------------------------------------------------------
  754.  
  755. loc_834E: ; CODE XREF: IRQ+115j
  756. cmpa #$FB ; 'û'
  757. bne loc_8356
  758. jsr sub_8362
  759. rti
  760. ; ---------------------------------------------------------------------------
  761.  
  762. loc_8356: ; CODE XREF: IRQ+11Dj
  763. cmpa #$FD ; 'ý'
  764. bhi loc_835E
  765. jsr sub_8758
  766. rti
  767. ; ---------------------------------------------------------------------------
  768.  
  769. loc_835E: ; CODE XREF: IRQ+125j
  770. jsr sub_8798
  771. rti
  772. ; End of function IRQ
  773.  
  774.  
  775. ; =============== S U B R O U T I N E =======================================
  776.  
  777.  
  778. sub_8362: ; CODE XREF: IRQ+55P IRQ+6EP ...
  779. jsr sub_87A4
  780. rts
  781. ; End of function sub_8362
  782.  
  783.  
  784. ; =============== S U B R O U T I N E =======================================
  785.  
  786.  
  787. sub_8366: ; CODE XREF: IRQ+7EP
  788. jsr sub_8362
  789. ldx #0
  790. stx byte_E6
  791. rts
  792. ; End of function sub_8366
  793.  
  794.  
  795. ; =============== S U B R O U T I N E =======================================
  796.  
  797.  
  798. sub_836F: ; CODE XREF: IRQ+86P
  799. jsr sub_8765
  800. jsr sub_8362
  801. rts
  802. ; End of function sub_836F
  803.  
  804.  
  805. ; =============== S U B R O U T I N E =======================================
  806.  
  807.  
  808. sub_8376: ; CODE XREF: IRQ+5DP IRQ+9EP
  809. jsr sub_8765
  810. ldx #0
  811.  
  812. loc_837C: ; CODE XREF: sub_8376+Aj
  813. inx
  814. cpx #$14
  815. bne loc_837C
  816. bset byte_FD $FF
  817. jsr sub_8362
  818.  
  819. loc_8388: ; CODE XREF: sub_8376+16j
  820. ldaa SPSR ; SPI Status Register
  821. anda #$80 ; '€'
  822. beq loc_8388
  823. ldaa SPDR ; SPI Data Register
  824. ldx #0
  825.  
  826. loc_8393: ; CODE XREF: sub_8376+21j
  827. inx
  828. cpx #$7D ; '}'
  829. bne loc_8393
  830. ldaa byte_FE
  831. anda #$F7 ; '÷'
  832. staa byte_FE
  833. jsr sub_87D6
  834. rts
  835. ; End of function sub_8376
  836.  
  837.  
  838. ; =============== S U B R O U T I N E =======================================
  839.  
  840.  
  841. sub_83A3: ; CODE XREF: IRQ+8EP
  842. ldaa byte_FE
  843. anda #$F7 ; '÷'
  844. staa byte_FE
  845. jsr sub_87D6
  846. ldx #0
  847.  
  848. loc_83AF: ; CODE XREF: sub_83A3+10j
  849. inx
  850. cpx #$14
  851. bne loc_83AF
  852. jsr sub_8362
  853. rts
  854. ; End of function sub_83A3
  855.  
  856.  
  857. ; =============== S U B R O U T I N E =======================================
  858.  
  859.  
  860. sub_83B9: ; CODE XREF: IRQ+96P
  861. ldaa #$DF ; 'ߧ
  862. staa byte_F9
  863. bclr byte_FA 8
  864. jsr sub_87A4
  865. ldaa #$B
  866. staa byte_F9
  867. jsr sub_87A4
  868. ldaa #$75 ; 'u'
  869. staa byte_F9
  870. jsr sub_87A4
  871. ldaa #0
  872. staa byte_F9
  873. jsr sub_87A4
  874. ldaa #3
  875. staa byte_F9
  876. bset byte_FA 8
  877. jsr sub_87A4
  878. rts
  879. ; End of function sub_83B9
  880.  
  881.  
  882. ; =============== S U B R O U T I N E =======================================
  883.  
  884.  
  885. sub_83E3: ; CODE XREF: IRQ+A6P
  886. jsr sub_8853
  887. bclr byte_FA 8
  888. ldaa byte_FF
  889. anda #$3D ; '='
  890. staa byte_F9
  891. jsr sub_87A4
  892. bclr byte_FF $3D ; '='
  893. ldaa #5
  894. staa byte_F9
  895. bset byte_FA 8
  896. jsr sub_87A4
  897. rts
  898. ; End of function sub_83E3
  899.  
  900.  
  901. ; =============== S U B R O U T I N E =======================================
  902.  
  903.  
  904. sub_8400: ; CODE XREF: IRQ+67P
  905. brclr byte_E7 1 loc_8408
  906. jsr sub_874D
  907. rts
  908. ; ---------------------------------------------------------------------------
  909.  
  910. loc_8408: ; CODE XREF: sub_8400j
  911. ldd byte_E6
  912. bne loc_8410
  913. jsr sub_874D
  914. rts
  915. ; ---------------------------------------------------------------------------
  916.  
  917. loc_8410: ; CODE XREF: sub_8400+Aj sub_8400+D2J
  918. addd #$403E
  919. xgdx
  920. ldab 0,x
  921. ldaa byte_801
  922. anda #$F
  923. cmpa #$A
  924. beq loc_8427
  925. cmpb #2
  926. bls loc_842F
  927. jsr sub_874D
  928. rts
  929. ; ---------------------------------------------------------------------------
  930.  
  931. loc_8427: ; CODE XREF: sub_8400+1Dj
  932. cmpb #$33 ; '3'
  933. bls loc_842F
  934. jsr sub_874D
  935. rts
  936. ; ---------------------------------------------------------------------------
  937.  
  938. loc_842F: ; CODE XREF: sub_8400+21j sub_8400+29j
  939. ldaa 1,x
  940. cmpb #0
  941. bne loc_843D
  942. staa byte_EF
  943. jsr sub_88A6
  944. jmp loc_84C9
  945. ; ---------------------------------------------------------------------------
  946.  
  947. loc_843D: ; CODE XREF: sub_8400+33j
  948. cmpb #1
  949. bne loc_8464
  950. ldab byte_EE
  951. andb #$F0 ;
  952. cmpa #1
  953. bne loc_844D
  954. orab #0
  955. bra loc_845F
  956. ; ---------------------------------------------------------------------------
  957.  
  958. loc_844D: ; CODE XREF: sub_8400+47j
  959. cmpa #2
  960. bne loc_8455
  961. orab #8
  962. bra loc_845F
  963. ; ---------------------------------------------------------------------------
  964.  
  965. loc_8455: ; CODE XREF: sub_8400+4Fj
  966. cmpa #3
  967. bne loc_845D
  968. orab #$B
  969. bra loc_845F
  970. ; ---------------------------------------------------------------------------
  971.  
  972. loc_845D: ; CODE XREF: sub_8400+57j
  973. orab #$D
  974.  
  975. loc_845F: ; CODE XREF: sub_8400+4Bj sub_8400+53j ...
  976. stab byte_EE
  977. jmp loc_84C9
  978. ; ---------------------------------------------------------------------------
  979.  
  980. loc_8464: ; CODE XREF: sub_8400+3Fj
  981. cmpb #2
  982. bne loc_846D
  983. staa byte_E5
  984. jmp loc_84C9
  985. ; ---------------------------------------------------------------------------
  986.  
  987. loc_846D: ; CODE XREF: sub_8400+66j
  988. cmpb #$33 ; '3'
  989. bne loc_8484
  990. ldaa 1,x
  991. cmpa #$FF
  992. bne loc_84C9
  993. ldx #$4000
  994.  
  995. loc_847A: ; CODE XREF: sub_8400+80j
  996. clr 0,x
  997. inx
  998. cpx #$4038
  999. bne loc_847A
  1000. bra loc_84C9
  1001. ; ---------------------------------------------------------------------------
  1002.  
  1003. loc_8484: ; CODE XREF: sub_8400+6Fj
  1004. staa byte_F2
  1005. subb #3
  1006. lsrb
  1007. bcs loc_849F
  1008. anda #$F
  1009. staa byte_F9
  1010. ldaa byte_F2
  1011. anda #$F0 ; '𧍊 lsra
  1012. lsra
  1013. lsra
  1014. lsra
  1015. staa byte_F2
  1016. ldaa #$F0 ; '𧍊 staa byte_E4
  1017. bra loc_84B1
  1018. ; ---------------------------------------------------------------------------
  1019.  
  1020. loc_849F: ; CODE XREF: sub_8400+89j
  1021. anda #$F
  1022. asla
  1023. asla
  1024. asla
  1025. asla
  1026. staa byte_F9
  1027. ldaa byte_F2
  1028. anda #$F0 ;
  1029. staa byte_F2
  1030. ldaa #$F
  1031. staa byte_E4
  1032.  
  1033. loc_84B1: ; CODE XREF: sub_8400+9Dj
  1034. ldx #$4000
  1035. abx
  1036. ldaa 0,x
  1037. anda byte_E4
  1038. oraa byte_F9
  1039. staa 0,x
  1040. ldx #$4020
  1041. abx
  1042. ldaa 0,x
  1043. anda byte_E4
  1044. oraa byte_F2
  1045. staa 0,x
  1046.  
  1047. loc_84C9: ; CODE XREF: sub_8400+3AJ sub_8400+61J ...
  1048. ldx byte_E6
  1049. dex
  1050. dex
  1051. stx byte_E6
  1052. xgdx
  1053. beq loc_84D5
  1054. jmp loc_8410
  1055. ; ---------------------------------------------------------------------------
  1056.  
  1057. loc_84D5: ; CODE XREF: sub_8400+D0j
  1058. clr byte_C6
  1059. ldaa byte_E5
  1060. beq loc_84EC
  1061. jsr sub_8362
  1062. ldaa #$FF
  1063. staa byte_C6
  1064. jsr sub_8853
  1065. clr byte_E5
  1066. jsr sub_81F3
  1067.  
  1068. loc_84EC: ; CODE XREF: sub_8400+DAj
  1069. ldaa #7
  1070. staa byte_F9
  1071. rts
  1072. ; End of function sub_8400
  1073.  
  1074.  
  1075. ; =============== S U B R O U T I N E =======================================
  1076.  
  1077.  
  1078. sub_84F1: ; CODE XREF: IRQ+AEP
  1079. bset byte_FD $FF
  1080. ldaa #$FD ; 'ý'
  1081. staa byte_F9
  1082. ldaa #8
  1083. staa byte_FA
  1084. jsr sub_87A4
  1085. rts
  1086. ; End of function sub_84F1
  1087.  
  1088.  
  1089. ; =============== S U B R O U T I N E =======================================
  1090.  
  1091.  
  1092. sub_8500: ; CODE XREF: IRQ+B6P
  1093. ldaa byte_F9
  1094. anda #7
  1095. staa byte_F6
  1096. ldaa byte_FE
  1097. anda #$F8 ; 'ø'
  1098. oraa byte_F6
  1099. staa byte_FE
  1100. jsr sub_87D6
  1101. ldaa byte_F6
  1102. inca
  1103. anda #7
  1104. oraa #8
  1105. staa byte_F9
  1106. jsr sub_87A4
  1107. rts
  1108. ; End of function sub_8500
  1109.  
  1110.  
  1111. ; =============== S U B R O U T I N E =======================================
  1112.  
  1113.  
  1114. sub_851E: ; CODE XREF: IRQ+BEP
  1115. ldx #$4400
  1116. stx byte_DC
  1117. clr byte_C7
  1118. ldaa byte_F9
  1119. staa byte_F2
  1120. ldaa byte_FA
  1121. psha
  1122. ldaa byte_C00
  1123. tab
  1124. anda #$F
  1125. lsrb
  1126. lsrb
  1127. lsrb
  1128. lsrb
  1129. stab byte_E8
  1130. suba byte_E8
  1131. adda byte_C8
  1132. staa byte_C8
  1133. ldaa #$20 ; ' '
  1134. staa PORTA ; Port A data
  1135. clr PORTA ; Port A data
  1136. ldaa byte_FB
  1137. bne loc_85BD
  1138. ldaa byte_FC
  1139. bne loc_85BD
  1140. ldaa byte_C8
  1141. bne loc_85BD
  1142. ldx byte_E0
  1143. cpx byte_DE
  1144. bne loc_85BD
  1145.  
  1146. loc_8558: ; CODE XREF: sub_851E+A3j
  1147. ldaa byte_800
  1148. cmpa byte_F5
  1149. bne loc_856B
  1150. ldaa byte_801
  1151. cmpa byte_F4
  1152. bne loc_856B
  1153.  
  1154. loc_8566: ; CODE XREF: sub_851E+51j
  1155. jsr sub_8362
  1156. pula
  1157. rts
  1158. ; ---------------------------------------------------------------------------
  1159.  
  1160. loc_856B: ; CODE XREF: sub_851E+3Fj sub_851E+46j
  1161. ldaa byte_F2
  1162. cmpa #$1C
  1163. bcc loc_8566
  1164. inc byte_F2
  1165. inc byte_F2
  1166. inc byte_F2
  1167. ldaa #$A
  1168. oraa byte_CB
  1169. staa byte_F9
  1170. clra
  1171. oraa byte_F6
  1172. staa byte_FA
  1173. jsr sub_87A4
  1174. ldx byte_DC
  1175. ldaa byte_F9
  1176. staa 0,x
  1177. inx
  1178. stx byte_DC
  1179. ldaa #0
  1180. staa byte_F9
  1181. jsr sub_87A4
  1182. ldx byte_DC
  1183. ldaa byte_F9
  1184. staa 0,x
  1185. inx
  1186. stx byte_DC
  1187. jsr sub_87A4
  1188. ldx byte_DC
  1189. ldaa byte_F9
  1190. staa 0,x
  1191. inx
  1192. stx byte_DC
  1193. ldaa byte_F2
  1194. staa byte_F9
  1195. pula
  1196. staa byte_FA
  1197. jsr sub_87A4
  1198. ldx byte_DC
  1199. bset 0,x $FF
  1200. rts
  1201. ; ---------------------------------------------------------------------------
  1202.  
  1203. loc_85BD: ; CODE XREF: sub_851E+2Aj sub_851E+2Ej ...
  1204. ldaa byte_F2
  1205. cmpa #$1C
  1206. bhi loc_8558
  1207. inc byte_F2
  1208. clrb
  1209. orab byte_CB
  1210. ldx byte_DE
  1211. cpx byte_E0
  1212. beq loc_85E3
  1213. ldaa 0,x
  1214. staa byte_DB
  1215. cmpa #1
  1216. bne loc_85DE
  1217. orab #$40 ; '@'
  1218. inc byte_F2
  1219. bra loc_85E3
  1220. ; ---------------------------------------------------------------------------
  1221.  
  1222. loc_85DE: ; CODE XREF: sub_851E+B7j
  1223. orab #$60 ; '`'
  1224. inc byte_F2
  1225.  
  1226. loc_85E3: ; CODE XREF: sub_851E+AFj sub_851E+BEj
  1227. ldaa byte_F2
  1228. cmpa #$1C
  1229. bhi loc_860C
  1230. ldaa byte_C8
  1231. beq loc_85FA
  1232. orab #3
  1233. inc byte_F2
  1234. inc byte_F2
  1235. inc byte_F2
  1236. bra loc_860C
  1237. ; ---------------------------------------------------------------------------
  1238.  
  1239. loc_85FA: ; CODE XREF: sub_851E+CDj
  1240. ldaa byte_FB
  1241. beq loc_8608
  1242.  
  1243. loc_85FE: ; CODE XREF: sub_851E+ECj
  1244. orab #2
  1245. inc byte_F2
  1246. inc byte_F2
  1247. bra loc_860C
  1248. ; ---------------------------------------------------------------------------
  1249.  
  1250. loc_8608: ; CODE XREF: sub_851E+DEj
  1251. ldaa byte_FC
  1252. bne loc_85FE
  1253.  
  1254. loc_860C: ; CODE XREF: sub_851E+C9j sub_851E+DAj ...
  1255. ldaa byte_800
  1256. cmpa byte_F5
  1257. beq loc_8617
  1258.  
  1259. loc_8613: ; CODE XREF: sub_851E+FEj
  1260. orab #8
  1261. bra loc_861E
  1262. ; ---------------------------------------------------------------------------
  1263.  
  1264. loc_8617: ; CODE XREF: sub_851E+F3j
  1265. ldaa byte_801
  1266. cmpa byte_F4
  1267. bne loc_8613
  1268.  
  1269. loc_861E: ; CODE XREF: sub_851E+F7j
  1270. stab byte_F9
  1271. clra
  1272. oraa byte_F6
  1273. staa byte_FA
  1274. jsr sub_87A4
  1275. ldx byte_DC
  1276. ldaa byte_F9
  1277. staa 0,x
  1278. inx
  1279. stx byte_DC
  1280. ldaa byte_F9
  1281. anda #3
  1282. beq loc_8676
  1283. psha
  1284. ldaa byte_FB
  1285. staa byte_F9
  1286. jsr sub_87A4
  1287. ldx byte_DC
  1288. ldaa byte_F9
  1289. staa 0,x
  1290. inx
  1291. stx byte_DC
  1292. ldaa byte_FC
  1293. staa byte_F9
  1294. jsr sub_87A4
  1295. ldx byte_DC
  1296. ldaa byte_F9
  1297. staa 0,x
  1298. inx
  1299. stx byte_DC
  1300. clr byte_FB
  1301. clr byte_FC
  1302. pula
  1303. anda #1
  1304. beq loc_8676
  1305. ldaa byte_C8
  1306. staa byte_F9
  1307. jsr sub_87A4
  1308. clr byte_C8
  1309. ldx byte_DC
  1310. ldaa byte_F9
  1311. staa 0,x
  1312. inx
  1313. stx byte_DC
  1314.  
  1315. loc_8676: ; CODE XREF: sub_851E+117j
  1316. ; sub_851E+143j
  1317. ldx byte_DE
  1318. cpx byte_E0
  1319. beq loc_86B8
  1320.  
  1321. loc_867C: ; CODE XREF: sub_851E+198j
  1322. ldaa 1,x
  1323. staa byte_F9
  1324. jsr sub_87A4
  1325. inc byte_C7
  1326. ldx byte_DC
  1327. ldaa byte_F9
  1328. staa 0,x
  1329. inx
  1330. stx byte_DC
  1331. ldx byte_DE
  1332. inx
  1333. inx
  1334. cpx #$4400
  1335. bne loc_869B
  1336. ldx #$4100
  1337.  
  1338. loc_869B: ; CODE XREF: sub_851E+178j
  1339. stx byte_DE
  1340. cpx byte_E0
  1341. beq loc_86B8
  1342. ldaa byte_F2
  1343. cmpa #$1E
  1344. bhi loc_86B8
  1345. ldaa byte_C7
  1346. cmpa #8
  1347. bhi loc_86B8
  1348. ldaa 0,x
  1349. cmpa byte_DB
  1350. bne loc_86B8
  1351. inc byte_F2
  1352. bra loc_867C
  1353. ; ---------------------------------------------------------------------------
  1354.  
  1355. loc_86B8: ; CODE XREF: sub_851E+15Cj
  1356. ; sub_851E+181j ...
  1357. ldaa byte_F2
  1358. staa byte_F9
  1359. pula
  1360. staa byte_FA
  1361. jsr sub_87A4
  1362. ldx byte_DC
  1363. bset 0,x $FF
  1364. rts
  1365. ; End of function sub_851E
  1366.  
  1367.  
  1368. ; =============== S U B R O U T I N E =======================================
  1369.  
  1370.  
  1371. sub_86C8: ; CODE XREF: IRQ+C6P
  1372. ldd #$4400
  1373. std byte_DC
  1374. subd #$4400
  1375. bne loc_86D5
  1376. jsr sub_8362
  1377.  
  1378. loc_86D5: ; CODE XREF: sub_86C8+8j
  1379. ldaa byte_F9
  1380. staa byte_F2
  1381. ldaa #$2F ; '/'
  1382. suba byte_F9
  1383. staa byte_F9
  1384. cmpb byte_F9
  1385. bls loc_86EB
  1386. ldaa byte_F2
  1387. staa byte_F9
  1388. jsr sub_8362
  1389. rts
  1390. ; ---------------------------------------------------------------------------
  1391.  
  1392. loc_86EB: ; CODE XREF: sub_86C8+19j
  1393. ldx byte_DC
  1394. ldaa byte_FA
  1395. psha
  1396. clra
  1397. oraa byte_F6
  1398. staa byte_FA
  1399.  
  1400. loc_86F5: ; CODE XREF: sub_86C8+3Cj
  1401. ldaa 0,x
  1402. staa byte_F9
  1403. cmpa #$FF
  1404. beq loc_8706
  1405. jsr sub_87A4
  1406. inc byte_F2
  1407. inx
  1408. bra loc_86F5
  1409. ; ---------------------------------------------------------------------------
  1410.  
  1411. loc_8706: ; CODE XREF: sub_86C8+33j
  1412. pula
  1413. staa byte_FA
  1414. ldaa byte_F2
  1415. staa byte_F9
  1416. jsr sub_87A4
  1417. rts
  1418. ; End of function sub_86C8
  1419.  
  1420.  
  1421. ; =============== S U B R O U T I N E =======================================
  1422.  
  1423.  
  1424. sub_8711: ; CODE XREF: IRQ+D6P
  1425. ldaa byte_800
  1426. staa byte_F5
  1427. ldab byte_801
  1428. stab byte_F4
  1429. aslb
  1430. aslb
  1431. aslb
  1432. aslb
  1433. anda #$F
  1434. stab byte_F2
  1435. oraa byte_F2
  1436. staa byte_F9
  1437. bclr byte_FA 8
  1438. jsr sub_87A4
  1439. ldaa byte_FF
  1440. staa byte_F9
  1441. clr byte_FF
  1442. jsr sub_87A4
  1443. ldaa byte_800
  1444. coma
  1445. anda #$C0 ; 'À'
  1446. staa byte_F9
  1447. jsr sub_87A4
  1448. bset byte_FA 8
  1449. ldaa #$31 ; '1'
  1450. staa byte_F9
  1451. jsr sub_87A4
  1452. rts
  1453. ; End of function sub_8711
  1454.  
  1455.  
  1456. ; =============== S U B R O U T I N E =======================================
  1457.  
  1458.  
  1459. sub_874D: ; CODE XREF: sub_8400+4P sub_8400+CP ...
  1460. ldaa #$FA ; 'ú'
  1461. staa byte_F9
  1462. ldaa #8
  1463. oraa byte_F6
  1464. staa byte_FA
  1465. rts
  1466. ; End of function sub_874D
  1467.  
  1468.  
  1469. ; =============== S U B R O U T I N E =======================================
  1470.  
  1471.  
  1472. sub_8758: ; CODE XREF: IRQ+127P sub_8798+8P
  1473. bset byte_FD $FF
  1474. ldaa #$80 ; '€'
  1475. oraa byte_F6
  1476. staa byte_FA
  1477. jsr sub_8362
  1478. rts
  1479. ; End of function sub_8758
  1480.  
  1481.  
  1482. ; =============== S U B R O U T I N E =======================================
  1483.  
  1484.  
  1485. sub_8765: ; CODE XREF: sub_836FP sub_8376P
  1486. ldaa byte_FE
  1487. oraa #8
  1488. staa byte_FE
  1489. jsr sub_87D6
  1490. rts
  1491. ; End of function sub_8765
  1492.  
  1493.  
  1494. ; =============== S U B R O U T I N E =======================================
  1495.  
  1496.  
  1497. sub_876F: ; CODE XREF: IRQ+DEP
  1498. ldaa #$21 ; '!'
  1499. staa byte_F9
  1500. bclr byte_FA 8
  1501. jsr sub_87A4
  1502. ldaa byte_801
  1503. anda #$F
  1504. cmpa #$A
  1505. bne loc_8786
  1506. ldaa #$33 ; '3'
  1507. bra loc_8788
  1508. ; ---------------------------------------------------------------------------
  1509.  
  1510. loc_8786: ; CODE XREF: sub_876F+11j
  1511. ldaa #2
  1512.  
  1513. loc_8788: ; CODE XREF: sub_876F+15j
  1514. staa byte_F9
  1515. jsr sub_87A4
  1516. bset byte_FA 8
  1517. ldaa #$32 ; '2'
  1518. staa byte_F9
  1519. jsr sub_87A4
  1520. rts
  1521. ; End of function sub_876F
  1522.  
  1523.  
  1524. ; =============== S U B R O U T I N E =======================================
  1525.  
  1526.  
  1527. sub_8798: ; CODE XREF: IRQ:loc_835EP
  1528. ldaa byte_FD
  1529. bne locret_87A3
  1530. ldaa #$FC ; 'ü'
  1531. staa byte_F9
  1532. jsr sub_8758
  1533.  
  1534. locret_87A3: ; CODE XREF: sub_8798+2j
  1535. rts
  1536. ; End of function sub_8798
  1537.  
  1538.  
  1539. ; =============== S U B R O U T I N E =======================================
  1540.  
  1541.  
  1542. sub_87A4: ; CODE XREF: sub_815D+2DP IRQ+41P ...
  1543. jsr sub_8803
  1544. ldaa PORTD ; Data Port D
  1545. oraa #$20 ; ' '
  1546. staa PORTD ; Data Port D
  1547. nop
  1548. nop
  1549. ldaa byte_FA
  1550. anda #$F
  1551. staa SPDR ; SPI Data Register
  1552.  
  1553. loc_87B5: ; CODE XREF: sub_87A4+15j
  1554. ldaa SPSR ; SPI Status Register
  1555. anda #$80 ; '€'
  1556. beq loc_87B5
  1557. nop
  1558. nop
  1559. nop
  1560. nop
  1561. nop
  1562. nop
  1563. nop
  1564. nop
  1565. ldaa byte_F9
  1566. staa SPDR ; SPI Data Register
  1567.  
  1568. loc_87C7: ; CODE XREF: sub_87A4+27j
  1569. ldaa SPSR ; SPI Status Register
  1570. anda #$80 ; '€'
  1571. beq loc_87C7
  1572. ldaa PORTD ; Data Port D
  1573. anda #$DF ; 'ߧ
  1574. staa PORTD ; Data Port D
  1575. ldaa SPDR ; SPI Data Register
  1576. rts
  1577. ; End of function sub_87A4
  1578.  
  1579.  
  1580. ; =============== S U B R O U T I N E =======================================
  1581.  
  1582.  
  1583. sub_87D6: ; CODE XREF: SCISS+64P sub_815D+1AP ...
  1584. ldaa PORTD ; Data Port D
  1585. oraa #$20 ; ' '
  1586. staa PORTD ; Data Port D
  1587. nop
  1588. nop
  1589. ldaa #$40 ; '@'
  1590. staa SPDR ; SPI Data Register
  1591.  
  1592. loc_87E2: ; CODE XREF: sub_87D6+10j
  1593. ldaa SPSR ; SPI Status Register
  1594. anda #$80 ; '€'
  1595. beq loc_87E2
  1596. nop
  1597. nop
  1598. nop
  1599. nop
  1600. nop
  1601. nop
  1602. nop
  1603. nop
  1604. ldaa byte_FE
  1605. staa SPDR ; SPI Data Register
  1606.  
  1607. loc_87F4: ; CODE XREF: sub_87D6+22j
  1608. ldaa SPSR ; SPI Status Register
  1609. anda #$80 ; '€'
  1610. beq loc_87F4
  1611. ldaa PORTD ; Data Port D
  1612. anda #$DF ; 'ߧ
  1613. staa PORTD ; Data Port D
  1614. ldaa SPDR ; SPI Data Register
  1615. rts
  1616. ; End of function sub_87D6
  1617.  
  1618.  
  1619. ; =============== S U B R O U T I N E =======================================
  1620.  
  1621.  
  1622. sub_8803: ; CODE XREF: sub_87A4P sub_8803+18j
  1623. ldab PORTD ; Data Port D
  1624. orab #$20 ; ' '
  1625. stab PORTD ; Data Port D
  1626. nop
  1627. nop
  1628. ldaa #$FF
  1629. staa SPDR ; SPI Data Register
  1630.  
  1631. loc_880F: ; CODE XREF: sub_8803+10j
  1632. ldaa SPSR ; SPI Status Register
  1633. anda #$80 ; '€'
  1634. beq loc_880F
  1635. andb #$DF ; 'ߧ
  1636. stab PORTD ; Data Port D
  1637. anda #$50 ; 'P'
  1638. bne sub_8803
  1639. ldaa SPDR ; SPI Data Register
  1640. rts
  1641. ; End of function sub_8803
  1642.  
  1643.  
  1644. ; =============== S U B R O U T I N E =======================================
  1645.  
  1646.  
  1647. sub_8820: ; CODE XREF: sub_815D:loc_81A9P IRQ+3P
  1648. ldaa PORTD ; Data Port D
  1649. oraa #$20 ; ' '
  1650. staa PORTD ; Data Port D
  1651. nop
  1652. nop
  1653. ldaa #$BF ; '¿'
  1654. staa SPDR ; SPI Data Register
  1655.  
  1656. loc_882C: ; CODE XREF: sub_8820+10j
  1657. ldaa SPSR ; SPI Status Register
  1658. anda #$80 ; '€'
  1659. beq loc_882C
  1660. ldaa SPDR ; SPI Data Register
  1661. staa byte_FA
  1662. nop
  1663. nop
  1664. nop
  1665. nop
  1666. nop
  1667. nop
  1668. ldaa #$FF
  1669. staa SPDR ; SPI Data Register
  1670.  
  1671. loc_8840: ; CODE XREF: sub_8820+24j
  1672. ldaa SPSR ; SPI Status Register
  1673. anda #$80 ; '€'
  1674. beq loc_8840
  1675. ldab SPDR ; SPI Data Register
  1676. stab byte_F9
  1677. ldaa PORTD ; Data Port D
  1678. anda #$DF ; 'ߧ
  1679. staa PORTD ; Data Port D
  1680. ldaa SPDR ; SPI Data Register
  1681. rts
  1682. ; End of function sub_8820
  1683.  
  1684.  
  1685. ; =============== S U B R O U T I N E =======================================
  1686.  
  1687.  
  1688. sub_8853: ; CODE XREF: sub_83E3P sub_8400+E3P ...
  1689. ldab byte_4038
  1690. ldaa #$FF
  1691. staa byte_4038
  1692. ldaa byte_4038
  1693. cmpa #$FF
  1694. bne loc_886F
  1695. clr byte_4038
  1696. ldaa byte_4038
  1697. bne loc_886F
  1698. stab byte_4038
  1699. bra loc_8872
  1700. ; ---------------------------------------------------------------------------
  1701.  
  1702. loc_886F: ; CODE XREF: sub_8853+Dj sub_8853+15j
  1703. bset byte_FF 1
  1704.  
  1705. loc_8872: ; CODE XREF: sub_8853+1Aj
  1706. ldaa #$20 ; ' '
  1707. staa TFLG1 ; Timer Interrupt Flag Register 1
  1708. ldd TCNTH ; Timer Counter Register (High)
  1709. addd #4
  1710. std TOC3H ; Output Compare 3 Register (High)
  1711. ldx #0
  1712.  
  1713. loc_8880: ; CODE XREF: sub_8853+37j
  1714. inx
  1715. cpx #$120
  1716. beq loc_88A2
  1717. ldaa TFLG1 ; Timer Interrupt Flag Register 1
  1718. anda #$20 ; ' '
  1719. beq loc_8880
  1720. ldab byte_F1
  1721. bset byte_F1 $FF
  1722. ldaa byte_F1
  1723. cmpa #$FF
  1724. bne loc_88A2
  1725. clr byte_F1
  1726. ldaa byte_F1
  1727. bne loc_88A2
  1728. stab byte_F1
  1729. bra locret_88A5
  1730. ; ---------------------------------------------------------------------------
  1731.  
  1732. loc_88A2: ; CODE XREF: sub_8853+31j sub_8853+42j ...
  1733. bset byte_FF 8
  1734.  
  1735. locret_88A5: ; CODE XREF: sub_8853+4Dj
  1736. rts
  1737. ; End of function sub_8853
  1738.  
  1739.  
  1740. ; =============== S U B R O U T I N E =======================================
  1741.  
  1742.  
  1743. sub_88A6: ; CODE XREF: sub_8400+37P sub_9345+59P ...
  1744. ldaa byte_EF
  1745. bne loc_88C0
  1746.  
  1747. loc_88AA: ; CODE XREF: sub_88A6+1Cj
  1748. ldaa TMSK1 ; Timer Interrupt Mask 1
  1749. anda #$BF ; '¿'
  1750. staa TMSK1 ; Timer Interrupt Mask 1
  1751. ldaa #$F0 ;
  1752. staa byte_1000
  1753. clr byte_EB
  1754. clr byte_EA
  1755. ldaa #$40 ; '@'
  1756. staa TFLG1 ; Timer Interrupt Flag Register 1
  1757. rts
  1758. ; ---------------------------------------------------------------------------
  1759.  
  1760. loc_88C0: ; CODE XREF: sub_88A6+2j
  1761. cmpa #$13
  1762. bhi loc_88AA
  1763. clr byte_EB
  1764. clr byte_EA
  1765. ldd TCNTH ; Timer Counter Register (High)
  1766. addd #$100
  1767. std TOC2H ; Output Compare 2 Register (High)
  1768. ldaa TMSK1 ; Timer Interrupt Mask 1
  1769. oraa #$40 ; '@'
  1770. staa TMSK1 ; Timer Interrupt Mask 1
  1771. ldaa #$40 ; '@'
  1772. staa TFLG1 ; Timer Interrupt Flag Register 1
  1773. rts
  1774. ; End of function sub_88A6
  1775.  
  1776.  
  1777. ; =============== S U B R O U T I N E =======================================
  1778.  
  1779.  
  1780. ; public IC3I
  1781. IC3I: ; DATA XREF: USER_VEC:FFEAo
  1782. inc byte_FB
  1783. inc byte_FB
  1784. inc byte_FB
  1785. ldaa #1
  1786. staa TFLG1 ; Timer Interrupt Flag Register 1
  1787. rti
  1788. ; End of function IC3I
  1789.  
  1790.  
  1791. ; =============== S U B R O U T I N E =======================================
  1792.  
  1793.  
  1794. ; public IC2I
  1795. IC2I: ; DATA XREF: USER_VEC:FFECo
  1796. dec byte_FB
  1797. dec byte_FB
  1798. dec byte_FB
  1799. ldaa #2
  1800. staa TFLG1 ; Timer Interrupt Flag Register 1
  1801. rti
  1802. ; End of function IC2I
  1803.  
  1804.  
  1805. ; =============== S U B R O U T I N E =======================================
  1806.  
  1807.  
  1808. ; public IC1I
  1809. IC1I: ; DATA XREF: USER_VEC:FFEEo
  1810. dec byte_FC
  1811. dec byte_FC
  1812. dec byte_FC
  1813. ldaa #4
  1814. staa TFLG1 ; Timer Interrupt Flag Register 1
  1815. rti
  1816. ; End of function IC1I
  1817.  
  1818.  
  1819. ; =============== S U B R O U T I N E =======================================
  1820.  
  1821.  
  1822. ; public I4_I5
  1823. I4_I5: ; DATA XREF: USER_VEC:FFE0o
  1824. inc byte_FC
  1825. inc byte_FC
  1826. inc byte_FC
  1827. ldaa #8
  1828. staa TFLG1 ; Timer Interrupt Flag Register 1
  1829. rti
  1830. ; End of function I4_I5
  1831.  
  1832.  
  1833. ; =============== S U B R O U T I N E =======================================
  1834.  
  1835.  
  1836. ; public NOCOP
  1837. NOCOP: ; DATA XREF: USER_VEC:FFFAo
  1838. ldaa #$55 ; 'U'
  1839. staa COPRST ; Arm_Reset COP Timer Circuitry
  1840. ldaa #$AA ; 'ª'
  1841. staa COPRST ; Arm_Reset COP Timer Circuitry
  1842. bset byte_FF $20 ; ' '
  1843. jmp loc_8025
  1844. ; End of function NOCOP
  1845.  
  1846.  
  1847. ; =============== S U B R O U T I N E =======================================
  1848.  
  1849.  
  1850. ; public CME
  1851. CME: ; DATA XREF: USER_VEC:FFFCo
  1852. bset byte_FF $10
  1853. jmp loc_8025
  1854. ; End of function CME
  1855.  
  1856.  
  1857. ; =============== S U B R O U T I N E =======================================
  1858.  
  1859.  
  1860. ; public OC2I
  1861. OC2I: ; DATA XREF: USER_VEC:FFE6o
  1862. ldaa #$40 ; '@'
  1863. staa TFLG1 ; Timer Interrupt Flag Register 1
  1864. ldaa byte_EF
  1865. bne loc_893C
  1866. ldaa TMSK1 ; Timer Interrupt Mask 1
  1867. anda #$BF ; '¿'
  1868. staa TMSK1 ; Timer Interrupt Mask 1
  1869. ldaa #$F0 ;
  1870. staa byte_1000
  1871. rti
  1872. ; ---------------------------------------------------------------------------
  1873.  
  1874. loc_893C: ; CODE XREF: OC2I+6j
  1875. cmpa #1
  1876. bne loc_8946
  1877. jsr sub_8A06
  1878. jmp loc_89FF
  1879. ; ---------------------------------------------------------------------------
  1880.  
  1881. loc_8946: ; CODE XREF: OC2I+16j
  1882. cmpa #2
  1883. bne loc_8950
  1884. jsr sub_8A35
  1885. jmp loc_89FF
  1886. ; ---------------------------------------------------------------------------
  1887.  
  1888. loc_8950: ; CODE XREF: OC2I+20j
  1889. cmpa #3
  1890. bne loc_895A
  1891. jsr sub_8A77
  1892. jmp loc_89FF
  1893. ; ---------------------------------------------------------------------------
  1894.  
  1895. loc_895A: ; CODE XREF: OC2I+2Aj
  1896. cmpa #4
  1897. bne loc_8964
  1898. jsr sub_8AFB
  1899. jmp loc_89FF
  1900. ; ---------------------------------------------------------------------------
  1901.  
  1902. loc_8964: ; CODE XREF: OC2I+34j
  1903. cmpa #5
  1904. bne loc_896E
  1905. jsr sub_8B45
  1906. jmp loc_89FF
  1907. ; ---------------------------------------------------------------------------
  1908.  
  1909. loc_896E: ; CODE XREF: OC2I+3Ej
  1910. cmpa #6
  1911. bne loc_8978
  1912. jsr sub_8BA3
  1913. jmp loc_89FF
  1914. ; ---------------------------------------------------------------------------
  1915.  
  1916. loc_8978: ; CODE XREF: OC2I+48j
  1917. cmpa #7
  1918. bne loc_8982
  1919. jsr sub_8BF2
  1920. jmp loc_89FF
  1921. ; ---------------------------------------------------------------------------
  1922.  
  1923. loc_8982: ; CODE XREF: OC2I+52j
  1924. cmpa #8
  1925. bne loc_898B
  1926. jsr sub_8C3C
  1927. bra loc_89FF
  1928. ; ---------------------------------------------------------------------------
  1929.  
  1930. loc_898B: ; CODE XREF: OC2I+5Cj
  1931. cmpa #9
  1932. bne loc_8995
  1933. jsr sub_8C6A
  1934. jmp loc_89FF
  1935. ; ---------------------------------------------------------------------------
  1936.  
  1937. loc_8995: ; CODE XREF: OC2I+65j
  1938. cmpa #$A
  1939. bne loc_899E
  1940. jsr sub_8CAD
  1941. bra loc_89FF
  1942. ; ---------------------------------------------------------------------------
  1943.  
  1944. loc_899E: ; CODE XREF: OC2I+6Fj
  1945. cmpa #$B
  1946. bne loc_89A7
  1947. jsr sub_8D10
  1948. bra loc_89FF
  1949. ; ---------------------------------------------------------------------------
  1950.  
  1951. loc_89A7: ; CODE XREF: OC2I+78j
  1952. cmpa #$C
  1953. bne loc_89B0
  1954. jsr sub_8D10
  1955. bra loc_89FF
  1956. ; ---------------------------------------------------------------------------
  1957.  
  1958. loc_89B0: ; CODE XREF: OC2I+81j
  1959. cmpa #$D
  1960. bne loc_89B9
  1961. jsr sub_8D41
  1962. bra loc_89FF
  1963. ; ---------------------------------------------------------------------------
  1964.  
  1965. loc_89B9: ; CODE XREF: OC2I+8Aj
  1966. cmpa #$E
  1967. bne loc_89C2
  1968. jsr sub_8DA1
  1969. bra loc_89FF
  1970. ; ---------------------------------------------------------------------------
  1971.  
  1972. loc_89C2: ; CODE XREF: OC2I+93j
  1973. cmpa #$F
  1974. bne loc_89CB
  1975. jsr sub_8DFA
  1976. bra loc_89FF
  1977. ; ---------------------------------------------------------------------------
  1978.  
  1979. loc_89CB: ; CODE XREF: OC2I+9Cj
  1980. cmpa #$11
  1981. bne loc_89D4
  1982. jsr sub_8E4C
  1983. bra loc_89FF
  1984. ; ---------------------------------------------------------------------------
  1985.  
  1986. loc_89D4: ; CODE XREF: OC2I+A5j
  1987. cmpa #$12
  1988. bne loc_89DD
  1989. jsr sub_8E6A
  1990. bra loc_89FF
  1991. ; ---------------------------------------------------------------------------
  1992.  
  1993. loc_89DD: ; CODE XREF: OC2I+AEj
  1994. cmpa #$13
  1995. bne loc_89E6
  1996. jsr sub_8E9B
  1997. bra loc_89FF
  1998. ; ---------------------------------------------------------------------------
  1999.  
  2000. loc_89E6: ; CODE XREF: OC2I+B7j
  2001. cmpa #$10
  2002. bne loc_89F3
  2003. ldaa byte_CC
  2004. beq loc_89FF
  2005. jsr sub_8EC6
  2006. bra loc_89FF
  2007. ; ---------------------------------------------------------------------------
  2008.  
  2009. loc_89F3: ; CODE XREF: OC2I+C0j
  2010. ldaa TMSK1 ; Timer Interrupt Mask 1
  2011. anda #$BF ; '¿'
  2012. staa TMSK1 ; Timer Interrupt Mask 1
  2013. ldaa #$F0 ;
  2014. staa byte_1000
  2015. rti
  2016. ; ---------------------------------------------------------------------------
  2017.  
  2018. loc_89FF: ; CODE XREF: OC2I+1BJ OC2I+25J ...
  2019. std TOC2H ; Output Compare 2 Register (High)
  2020. ldaa #$40 ; '@'
  2021. staa TFLG1 ; Timer Interrupt Flag Register 1
  2022. rti
  2023. ; End of function OC2I
  2024.  
  2025.  
  2026. ; =============== S U B R O U T I N E =======================================
  2027.  
  2028.  
  2029. sub_8A06: ; CODE XREF: OC2I+18P
  2030. ldab byte_EB
  2031. incb
  2032. stab byte_EB
  2033. cmpb #1
  2034. bls loc_8A24
  2035. ldaa TMSK1 ; Timer Interrupt Mask 1
  2036. anda #$BF ; '¿'
  2037. staa TMSK1 ; Timer Interrupt Mask 1
  2038. ldaa #$F0 ;
  2039. staa byte_1000
  2040. clr byte_EF
  2041. clr byte_EB
  2042. clr byte_EA
  2043. rts
  2044. ; ---------------------------------------------------------------------------
  2045.  
  2046. loc_8A24: ; CODE XREF: sub_8A06+7j
  2047. ldaa byte_EE
  2048. anda #$F
  2049. oraa #$D0 ; 'Ч
  2050. staa byte_EE
  2051. staa byte_1000
  2052. ldd TCNTH ; Timer Counter Register (High)
  2053. addd #$8000
  2054. rts
  2055. ; End of function sub_8A06
  2056.  
  2057.  
  2058. ; =============== S U B R O U T I N E =======================================
  2059.  
  2060.  
  2061. sub_8A35: ; CODE XREF: OC2I+22P
  2062. ldab byte_EB
  2063. incb
  2064. stab byte_EB
  2065. cmpb #1
  2066. bls loc_8A5B
  2067. cmpb #2
  2068. bls loc_8A6C
  2069. cmpb #3
  2070. bls loc_8A5B
  2071. ldaa TMSK1 ; Timer Interrupt Mask 1
  2072. anda #$BF ; '¿'
  2073. staa TMSK1 ; Timer Interrupt Mask 1
  2074. ldaa #$F0 ;
  2075. staa byte_1000
  2076. clr byte_EF
  2077. clr byte_EB
  2078. clr byte_EA
  2079. rts
  2080. ; ---------------------------------------------------------------------------
  2081.  
  2082. loc_8A5B: ; CODE XREF: sub_8A35+7j sub_8A35+Fj
  2083. ldaa byte_EE
  2084. anda #$F
  2085. oraa #$D0 ; 'Ч
  2086. staa byte_EE
  2087. staa byte_1000
  2088. ldd TCNTH ; Timer Counter Register (High)
  2089. subd #1
  2090. rts
  2091. ; ---------------------------------------------------------------------------
  2092.  
  2093. loc_8A6C: ; CODE XREF: sub_8A35+Bj
  2094. ldaa #$F0 ;
  2095. staa byte_1000
  2096. ldd TCNTH ; Timer Counter Register (High)
  2097. addd #$7000
  2098. rts
  2099. ; End of function sub_8A35
  2100.  
  2101.  
  2102. ; =============== S U B R O U T I N E =======================================
  2103.  
  2104.  
  2105. sub_8A77: ; CODE XREF: OC2I+2CP
  2106. ldab byte_EB
  2107. incb
  2108. stab byte_EB
  2109. cmpb #3
  2110. bls loc_8AAD
  2111. cmpb #4
  2112. bls loc_8AF0
  2113. cmpb #7
  2114. bls loc_8AAD
  2115. cmpb #8
  2116. bls loc_8AF0
  2117. cmpb #$B
  2118. bls loc_8AAD
  2119. cmpb #$C
  2120. bls loc_8AF0
  2121. cmpb #$F
  2122. bls loc_8AAD
  2123. ldaa TMSK1 ; Timer Interrupt Mask 1
  2124. anda #$BF ; '¿'
  2125. staa TMSK1 ; Timer Interrupt Mask 1
  2126. ldaa #$F0 ;
  2127. staa byte_1000
  2128. clr byte_EF
  2129. clr byte_EB
  2130. clr byte_EA
  2131. rts
  2132. ; ---------------------------------------------------------------------------
  2133.  
  2134. loc_8AAD: ; CODE XREF: sub_8A77+7j sub_8A77+Fj ...
  2135. ldab byte_EA
  2136. incb
  2137. stab byte_EA
  2138. cmpb #1
  2139. bhi loc_8AC7
  2140. ldaa byte_EE
  2141. anda #$F
  2142. oraa #$E0 ; '্
  2143. staa byte_EE
  2144. staa byte_1000
  2145. ldd TCNTH ; Timer Counter Register (High)
  2146. addd #$4000
  2147. rts
  2148. ; ---------------------------------------------------------------------------
  2149.  
  2150. loc_8AC7: ; CODE XREF: sub_8A77+3Dj
  2151. cmpb #2
  2152. bhi loc_8ADC
  2153. ldaa byte_EE
  2154. anda #$F
  2155. oraa #$D0 ; 'Ч
  2156. staa byte_EE
  2157. staa byte_1000
  2158. ldd TCNTH ; Timer Counter Register (High)
  2159. addd #$4000
  2160. rts
  2161. ; ---------------------------------------------------------------------------
  2162.  
  2163. loc_8ADC: ; CODE XREF: sub_8A77+52j
  2164. ldaa byte_EE
  2165. anda #$F
  2166. oraa #$B0 ; '°'
  2167. staa byte_EE
  2168. staa byte_1000
  2169. clr byte_EA
  2170. ldd TCNTH ; Timer Counter Register (High)
  2171. addd #$4000
  2172. rts
  2173. ; ---------------------------------------------------------------------------
  2174.  
  2175. loc_8AF0: ; CODE XREF: sub_8A77+Bj sub_8A77+13j ...
  2176. ldaa #$F0 ;
  2177. staa byte_1000
  2178. ldd TCNTH ; Timer Counter Register (High)
  2179. subd #1
  2180. rts
  2181. ; End of function sub_8A77
  2182.  
  2183.  
  2184. ; =============== S U B R O U T I N E =======================================
  2185.  
  2186.  
  2187. sub_8AFB: ; CODE XREF: OC2I+36P
  2188. ldab byte_EB
  2189. incb
  2190. stab byte_EB
  2191. cmpb #1
  2192. bls loc_8B29
  2193. cmpb #2
  2194. bls loc_8B3A
  2195. cmpb #3
  2196. bls loc_8B29
  2197. cmpb #4
  2198. bls loc_8B3A
  2199. cmpb #5
  2200. bls loc_8B29
  2201. ldaa TMSK1 ; Timer Interrupt Mask 1
  2202. anda #$BF ; '¿'
  2203. staa TMSK1 ; Timer Interrupt Mask 1
  2204. ldaa #$F0 ;
  2205. staa byte_1000
  2206. clr byte_EF
  2207. clr byte_EB
  2208. clr byte_EA
  2209. rts
  2210. ; ---------------------------------------------------------------------------
  2211.  
  2212. loc_8B29: ; CODE XREF: sub_8AFB+7j sub_8AFB+Fj ...
  2213. ldaa byte_EE
  2214. anda #$F
  2215. oraa #$D0 ; 'Ч
  2216. staa byte_EE
  2217. staa byte_1000
  2218. ldd TCNTH ; Timer Counter Register (High)
  2219. addd #$7000
  2220. rts
  2221. ; ---------------------------------------------------------------------------
  2222.  
  2223. loc_8B3A: ; CODE XREF: sub_8AFB+Bj sub_8AFB+13j
  2224. ldaa #$F0 ;
  2225. staa byte_1000
  2226. ldd TCNTH ; Timer Counter Register (High)
  2227. subd #1
  2228. rts
  2229. ; End of function sub_8AFB
  2230.  
  2231.  
  2232. ; =============== S U B R O U T I N E =======================================
  2233.  
  2234.  
  2235. sub_8B45: ; CODE XREF: OC2I+40P
  2236. ldab byte_EB
  2237. incb
  2238. stab byte_EB
  2239. cmpb #3
  2240. bls loc_8B63
  2241. ldaa TMSK1 ; Timer Interrupt Mask 1
  2242. anda #$BF ; '¿'
  2243. staa TMSK1 ; Timer Interrupt Mask 1
  2244. ldaa #$F0 ;
  2245. staa byte_1000
  2246. clr byte_EF
  2247. clr byte_EB
  2248. clr byte_EA
  2249. rts
  2250. ; ---------------------------------------------------------------------------
  2251.  
  2252. loc_8B63: ; CODE XREF: sub_8B45+7j
  2253. ldab byte_EA
  2254. incb
  2255. stab byte_EA
  2256. cmpb #1
  2257. bhi loc_8B7D
  2258. ldaa byte_EE
  2259. anda #$F
  2260. oraa #$E0 ; '্
  2261. staa byte_EE
  2262. staa byte_1000
  2263. ldd TCNTH ; Timer Counter Register (High)
  2264. addd #$4000
  2265. rts
  2266. ; ---------------------------------------------------------------------------
  2267.  
  2268. loc_8B7D: ; CODE XREF: sub_8B45+25j
  2269. cmpb #2
  2270. bhi loc_8B92
  2271. ldaa byte_EE
  2272. anda #$F
  2273. oraa #$D0 ; 'Ч
  2274. staa byte_EE
  2275. staa byte_1000
  2276. ldd TCNTH ; Timer Counter Register (High)
  2277. addd #$4000
  2278. rts
  2279. ; ---------------------------------------------------------------------------
  2280.  
  2281. loc_8B92: ; CODE XREF: sub_8B45+3Aj
  2282. ldaa byte_EE
  2283. anda #$F
  2284. oraa #$B0 ; '°'
  2285. staa byte_EE
  2286. staa byte_1000
  2287. ldd TCNTH ; Timer Counter Register (High)
  2288. addd #$4000
  2289. rts
  2290. ; End of function sub_8B45
  2291.  
  2292.  
  2293. ; =============== S U B R O U T I N E =======================================
  2294.  
  2295.  
  2296. sub_8BA3: ; CODE XREF: OC2I+4AP
  2297. ldab byte_EB
  2298. incb
  2299. stab byte_EB
  2300. cmpb #1
  2301. bls loc_8BD6
  2302. cmpb #2
  2303. bls loc_8BE7
  2304. cmpb #3
  2305. bls loc_8BD6
  2306. cmpb #4
  2307. bls loc_8BE7
  2308. cmpb #5
  2309. bls loc_8BD6
  2310. cmpb #6
  2311. bls loc_8BE7
  2312. cmpb #7
  2313. bls loc_8BD6
  2314. ldaa TMSK1 ; Timer Interrupt Mask 1
  2315. anda #$BF ; '¿'
  2316. staa TMSK1 ; Timer Interrupt Mask 1
  2317. ldaa #$F0 ;
  2318. staa byte_1000
  2319. clr byte_EF
  2320. clr byte_EB
  2321. rts
  2322. ; ---------------------------------------------------------------------------
  2323.  
  2324. loc_8BD6: ; CODE XREF: sub_8BA3+7j sub_8BA3+Fj ...
  2325. ldaa byte_EE
  2326. anda #$F
  2327. oraa #$D0 ; 'Ч
  2328. staa byte_EE
  2329. staa byte_1000
  2330. ldd TCNTH ; Timer Counter Register (High)
  2331. addd #$7000
  2332. rts
  2333. ; ---------------------------------------------------------------------------
  2334.  
  2335. loc_8BE7: ; CODE XREF: sub_8BA3+Bj sub_8BA3+13j ...
  2336. ldaa #$F0 ;
  2337. staa byte_1000
  2338. ldd TCNTH ; Timer Counter Register (High)
  2339. subd #1
  2340. rts
  2341. ; End of function sub_8BA3
  2342.  
  2343.  
  2344. ; =============== S U B R O U T I N E =======================================
  2345.  
  2346.  
  2347. sub_8BF2: ; CODE XREF: OC2I+54P
  2348. ldab byte_EB
  2349. incb
  2350. stab byte_EB
  2351. cmpb #3
  2352. bls loc_8C20
  2353. cmpb #4
  2354. bls loc_8C31
  2355. cmpb #5
  2356. bls loc_8C20
  2357. cmpb #6
  2358. bls loc_8C31
  2359. cmpb #7
  2360. bls loc_8C20
  2361. ldaa TMSK1 ; Timer Interrupt Mask 1
  2362. anda #$BF ; '¿'
  2363. staa TMSK1 ; Timer Interrupt Mask 1
  2364. ldaa #$F0 ;
  2365. staa byte_1000
  2366. clr byte_EF
  2367. clr byte_EB
  2368. clr byte_EA
  2369. rts
  2370. ; ---------------------------------------------------------------------------
  2371.  
  2372. loc_8C20: ; CODE XREF: sub_8BF2+7j sub_8BF2+Fj ...
  2373. ldaa byte_EE
  2374. anda #$F
  2375. oraa #$D0 ; 'Ч
  2376. staa byte_EE
  2377. staa byte_1000
  2378. ldd TCNTH ; Timer Counter Register (High)
  2379. addd #$7000
  2380. rts
  2381. ; ---------------------------------------------------------------------------
  2382.  
  2383. loc_8C31: ; CODE XREF: sub_8BF2+Bj sub_8BF2+13j
  2384. ldaa #$F0 ;
  2385. staa byte_1000
  2386. ldd TCNTH ; Timer Counter Register (High)
  2387. subd #1
  2388. rts
  2389. ; End of function sub_8BF2
  2390.  
  2391.  
  2392. ; =============== S U B R O U T I N E =======================================
  2393.  
  2394.  
  2395. sub_8C3C: ; CODE XREF: OC2I+5EP
  2396. ldab byte_EB
  2397. incb
  2398. stab byte_EB
  2399. cmpb #1
  2400. bls loc_8C4E
  2401. cmpb #2
  2402. bls loc_8C5F
  2403. clr byte_EB
  2404. bra loc_8C5F
  2405. ; ---------------------------------------------------------------------------
  2406.  
  2407. loc_8C4E: ; CODE XREF: sub_8C3C+7j
  2408. ldaa byte_EE
  2409. anda #$F
  2410. oraa #$D0 ; 'Ч
  2411. staa byte_EE
  2412. staa byte_1000
  2413. ldd TCNTH ; Timer Counter Register (High)
  2414. addd #$7000
  2415. rts
  2416. ; ---------------------------------------------------------------------------
  2417.  
  2418. loc_8C5F: ; CODE XREF: sub_8C3C+Bj sub_8C3C+10j
  2419. ldaa #$F0 ;
  2420. staa byte_1000
  2421. ldd TCNTH ; Timer Counter Register (High)
  2422. addd #$7000
  2423. rts
  2424. ; End of function sub_8C3C
  2425.  
  2426.  
  2427. ; =============== S U B R O U T I N E =======================================
  2428.  
  2429.  
  2430. sub_8C6A: ; CODE XREF: OC2I+67P
  2431. ldab byte_EA
  2432. incb
  2433. stab byte_EA
  2434. cmpb #1
  2435. bhi loc_8C84
  2436. ldaa byte_EE
  2437. anda #$F
  2438. oraa #$E0 ; '্
  2439. staa byte_EE
  2440. staa byte_1000
  2441. ldd TCNTH ; Timer Counter Register (High)
  2442. addd #$4000
  2443. rts
  2444. ; ---------------------------------------------------------------------------
  2445.  
  2446. loc_8C84: ; CODE XREF: sub_8C6A+7j
  2447. cmpb #2
  2448. bhi loc_8C99
  2449. ldaa byte_EE
  2450. anda #$F
  2451. oraa #$D0 ; 'Ч
  2452. staa byte_EE
  2453. staa byte_1000
  2454. ldd TCNTH ; Timer Counter Register (High)
  2455. addd #$4000
  2456. rts
  2457. ; ---------------------------------------------------------------------------
  2458.  
  2459. loc_8C99: ; CODE XREF: sub_8C6A+1Cj
  2460. ldaa byte_EE
  2461. anda #$F
  2462. oraa #$B0 ; '°'
  2463. staa byte_EE
  2464. staa byte_1000
  2465. clr byte_EA
  2466. ldd TCNTH ; Timer Counter Register (High)
  2467. addd #$4000
  2468. rts
  2469. ; End of function sub_8C6A
  2470.  
  2471.  
  2472. ; =============== S U B R O U T I N E =======================================
  2473.  
  2474.  
  2475. sub_8CAD: ; CODE XREF: OC2I+71P
  2476. ldab byte_EB
  2477. incb
  2478. stab byte_EB
  2479. cmpb #3
  2480. bls loc_8CC2
  2481. cmpb #4
  2482. bls loc_8D05
  2483. clr byte_EB
  2484. clr byte_EA
  2485. bra loc_8D05
  2486. ; ---------------------------------------------------------------------------
  2487.  
  2488. loc_8CC2: ; CODE XREF: sub_8CAD+7j
  2489. ldab byte_EA
  2490. incb
  2491. stab byte_EA
  2492. cmpb #1
  2493. bhi loc_8CDC
  2494. ldaa byte_EE
  2495. anda #$F
  2496. oraa #$E0 ; '্
  2497. staa byte_EE
  2498. staa byte_1000
  2499. ldd TCNTH ; Timer Counter Register (High)
  2500. addd #$4000
  2501. rts
  2502. ; ---------------------------------------------------------------------------
  2503.  
  2504. loc_8CDC: ; CODE XREF: sub_8CAD+1Cj
  2505. cmpb #2
  2506. bhi loc_8CF1
  2507. ldaa byte_EE
  2508. anda #$F
  2509. oraa #$D0 ; 'Ч
  2510. staa byte_EE
  2511. staa byte_1000
  2512. ldd TCNTH ; Timer Counter Register (High)
  2513. addd #$4000
  2514. rts
  2515. ; ---------------------------------------------------------------------------
  2516.  
  2517. loc_8CF1: ; CODE XREF: sub_8CAD+31j
  2518. ldaa byte_EE
  2519. anda #$F
  2520. oraa #$B0 ; '°'
  2521. staa byte_EE
  2522. staa byte_1000
  2523. clr byte_EA
  2524. ldd TCNTH ; Timer Counter Register (High)
  2525. addd #$4000
  2526. rts
  2527. ; ---------------------------------------------------------------------------
  2528.  
  2529. loc_8D05: ; CODE XREF: sub_8CAD+Bj sub_8CAD+13j
  2530. ldaa #$F0 ;
  2531. staa byte_1000
  2532. ldd TCNTH ; Timer Counter Register (High)
  2533. addd #$7000
  2534. rts
  2535. ; End of function sub_8CAD
  2536.  
  2537.  
  2538. ; =============== S U B R O U T I N E =======================================
  2539.  
  2540.  
  2541. sub_8D10: ; CODE XREF: OC2I+7AP OC2I+83P
  2542. ldab byte_EB
  2543. incb
  2544. stab byte_EB
  2545. cmpb #1
  2546. bls loc_8D25
  2547. cmpb #4
  2548. bls loc_8D36
  2549. clr byte_EB
  2550. clr byte_EA
  2551. bra loc_8D36
  2552. ; ---------------------------------------------------------------------------
  2553.  
  2554. loc_8D25: ; CODE XREF: sub_8D10+7j
  2555. ldaa byte_EE
  2556. anda #$F
  2557. oraa #$D0 ; 'Ч
  2558. staa byte_EE
  2559. staa byte_1000
  2560. ldd TCNTH ; Timer Counter Register (High)
  2561. addd #$7000
  2562. rts
  2563. ; ---------------------------------------------------------------------------
  2564.  
  2565. loc_8D36: ; CODE XREF: sub_8D10+Bj sub_8D10+13j
  2566. ldaa #$F0 ;
  2567. staa byte_1000
  2568. ldd TCNTH ; Timer Counter Register (High)
  2569. subd #1
  2570. rts
  2571. ; End of function sub_8D10
  2572.  
  2573.  
  2574. ; =============== S U B R O U T I N E =======================================
  2575.  
  2576.  
  2577. sub_8D41: ; CODE XREF: OC2I+8CP
  2578. ldab byte_EB
  2579. incb
  2580. stab byte_EB
  2581. cmpb #3
  2582. bls loc_8D56
  2583. cmpb #7
  2584. bls loc_8D96
  2585. clr byte_EB
  2586. clr byte_EA
  2587. bra loc_8D96
  2588. ; ---------------------------------------------------------------------------
  2589.  
  2590. loc_8D56: ; CODE XREF: sub_8D41+7j
  2591. ldab byte_EA
  2592. incb
  2593. stab byte_EA
  2594. cmpb #1
  2595. bhi loc_8D70
  2596. ldaa byte_EE
  2597. anda #$F
  2598. oraa #$E0 ; '্
  2599. staa byte_EE
  2600. staa byte_1000
  2601. ldd TCNTH ; Timer Counter Register (High)
  2602. subd #$7000
  2603. rts
  2604. ; ---------------------------------------------------------------------------
  2605.  
  2606. loc_8D70: ; CODE XREF: sub_8D41+1Cj
  2607. cmpb #2
  2608. bhi loc_8D85
  2609. ldaa byte_EE
  2610. anda #$F
  2611. oraa #$D0 ; 'Ч
  2612. staa byte_EE
  2613. staa byte_1000
  2614. ldd TCNTH ; Timer Counter Register (High)
  2615. subd #$7000
  2616. rts
  2617. ; ---------------------------------------------------------------------------
  2618.  
  2619. loc_8D85: ; CODE XREF: sub_8D41+31j
  2620. ldaa byte_EE
  2621. anda #$F
  2622. oraa #$B0 ; '°'
  2623. staa byte_EE
  2624. staa byte_1000
  2625. ldd TCNTH ; Timer Counter Register (High)
  2626. subd #$7000
  2627. rts
  2628. ; ---------------------------------------------------------------------------
  2629.  
  2630. loc_8D96: ; CODE XREF: sub_8D41+Bj sub_8D41+13j
  2631. ldaa #$F0 ;
  2632. staa byte_1000
  2633. ldd TCNTH ; Timer Counter Register (High)
  2634. subd #1
  2635. rts
  2636. ; End of function sub_8D41
  2637.  
  2638.  
  2639. ; =============== S U B R O U T I N E =======================================
  2640.  
  2641.  
  2642. sub_8DA1: ; CODE XREF: OC2I+95P
  2643. ldab byte_EA
  2644. incb
  2645. stab byte_EA
  2646. cmpb #1
  2647. bhi loc_8DBB
  2648. ldaa byte_EE
  2649. anda #$F
  2650. oraa #$E0 ; '্
  2651. staa byte_EE
  2652. staa byte_1000
  2653. ldd TCNTH ; Timer Counter Register (High)
  2654. addd #$4000
  2655. rts
  2656. ; ---------------------------------------------------------------------------
  2657.  
  2658. loc_8DBB: ; CODE XREF: sub_8DA1+7j
  2659. cmpb #2
  2660. bhi loc_8DD0
  2661. ldaa byte_EE
  2662. anda #$F
  2663. oraa #$D0 ; 'Ч
  2664. staa byte_EE
  2665. staa byte_1000
  2666. ldd TCNTH ; Timer Counter Register (High)
  2667. addd #$4000
  2668. rts
  2669. ; ---------------------------------------------------------------------------
  2670.  
  2671. loc_8DD0: ; CODE XREF: sub_8DA1+1Cj
  2672. cmpb #3
  2673. bhi loc_8DE5
  2674. ldaa byte_EE
  2675. anda #$F
  2676. oraa #$B0 ; '°'
  2677. staa byte_EE
  2678. staa byte_1000
  2679. ldd TCNTH ; Timer Counter Register (High)
  2680. addd #$4000
  2681. rts
  2682. ; ---------------------------------------------------------------------------
  2683.  
  2684. loc_8DE5: ; CODE XREF: sub_8DA1+31j
  2685. ldaa TMSK1 ; Timer Interrupt Mask 1
  2686. anda #$BF ; '¿'
  2687. staa TMSK1 ; Timer Interrupt Mask 1
  2688. ldaa #$F0 ;
  2689. staa byte_1000
  2690. clr byte_EF
  2691. clr byte_EB
  2692. clr byte_EA
  2693. rts
  2694. ; End of function sub_8DA1
  2695.  
  2696.  
  2697. ; =============== S U B R O U T I N E =======================================
  2698.  
  2699.  
  2700. sub_8DFA: ; CODE XREF: OC2I+9EP
  2701. ldab byte_EB
  2702. incb
  2703. stab byte_EB
  2704. cmpb #1
  2705. bls loc_8E30
  2706. cmpb #2
  2707. bls loc_8E41
  2708. cmpb #4
  2709. bls loc_8E30
  2710. cmpb #5
  2711. bls loc_8E41
  2712. cmpb #8
  2713. bls loc_8E30
  2714. cmpb #9
  2715. bls loc_8E41
  2716. cmpb #$D
  2717. bls loc_8E30
  2718. ldaa TMSK1 ; Timer Interrupt Mask 1
  2719. anda #$BF ; '¿'
  2720. staa TMSK1 ; Timer Interrupt Mask 1
  2721. ldaa #$F0 ;
  2722. staa byte_1000
  2723. clr byte_EF
  2724. clr byte_EB
  2725. clr byte_EA
  2726. rts
  2727. ; ---------------------------------------------------------------------------
  2728.  
  2729. loc_8E30: ; CODE XREF: sub_8DFA+7j sub_8DFA+Fj ...
  2730. ldaa byte_EE
  2731. anda #$F
  2732. oraa #$D0 ; 'Ч
  2733. staa byte_EE
  2734. staa byte_1000
  2735. ldd TCNTH ; Timer Counter Register (High)
  2736. subd #1
  2737. rts
  2738. ; ---------------------------------------------------------------------------
  2739.  
  2740. loc_8E41: ; CODE XREF: sub_8DFA+Bj sub_8DFA+13j ...
  2741. ldaa #$F0 ;
  2742. staa byte_1000
  2743. ldd TCNTH ; Timer Counter Register (High)
  2744. addd #$7000
  2745. rts
  2746. ; End of function sub_8DFA
  2747.  
  2748.  
  2749. ; =============== S U B R O U T I N E =======================================
  2750.  
  2751.  
  2752. sub_8E4C: ; CODE XREF: OC2I+A7P
  2753. ldab byte_EB
  2754. incb
  2755. stab byte_EB
  2756. cmpb #0
  2757. bls loc_8E59
  2758. jsr sub_8103
  2759. rts
  2760. ; ---------------------------------------------------------------------------
  2761.  
  2762. loc_8E59: ; CODE XREF: sub_8E4C+7j
  2763. ldaa byte_EE
  2764. anda #$F
  2765. oraa #$B0 ; '°'
  2766. staa byte_EE
  2767. staa byte_1000
  2768. ldd TCNTH ; Timer Counter Register (High)
  2769. addd #$7000
  2770. rts
  2771. ; End of function sub_8E4C
  2772.  
  2773.  
  2774. ; =============== S U B R O U T I N E =======================================
  2775.  
  2776.  
  2777. sub_8E6A: ; CODE XREF: OC2I+B0P
  2778. ldab byte_EB
  2779. incb
  2780. stab byte_EB
  2781. cmpb #2
  2782. bls loc_8E7F
  2783. cmpb #3
  2784. bls loc_8E90
  2785. cmpb #5
  2786. bls loc_8E7F
  2787. jsr sub_8103
  2788. rts
  2789. ; ---------------------------------------------------------------------------
  2790.  
  2791. loc_8E7F: ; CODE XREF: sub_8E6A+7j sub_8E6A+Fj
  2792. ldaa byte_EE
  2793. anda #$F
  2794. oraa #$E0 ; '্
  2795. staa byte_EE
  2796. staa byte_1000
  2797. ldd TCNTH ; Timer Counter Register (High)
  2798. subd #1
  2799. rts
  2800. ; ---------------------------------------------------------------------------
  2801.  
  2802. loc_8E90: ; CODE XREF: sub_8E6A+Bj
  2803. ldaa #$F0 ;
  2804. staa byte_1000
  2805. ldd TCNTH ; Timer Counter Register (High)
  2806. subd #1
  2807. rts
  2808. ; End of function sub_8E6A
  2809.  
  2810.  
  2811. ; =============== S U B R O U T I N E =======================================
  2812.  
  2813.  
  2814. sub_8E9B: ; CODE XREF: OC2I+B9P
  2815. ldab byte_EB
  2816. incb
  2817. stab byte_EB
  2818. cmpb #1
  2819. bls loc_8EB0
  2820. cmpb #2
  2821. bls loc_8EBB
  2822. clr byte_EB
  2823. clr byte_EA
  2824. bra loc_8EBB
  2825. ; ---------------------------------------------------------------------------
  2826.  
  2827. loc_8EB0: ; CODE XREF: sub_8E9B+7j
  2828. ldaa #$DE ; 'ާ
  2829. staa byte_1000
  2830. ldd TCNTH ; Timer Counter Register (High)
  2831. addd #$5000
  2832. rts
  2833. ; ---------------------------------------------------------------------------
  2834.  
  2835. loc_8EBB: ; CODE XREF: sub_8E9B+Bj sub_8E9B+13j
  2836. ldaa #$F0 ;
  2837. staa byte_1000
  2838. ldd TCNTH ; Timer Counter Register (High)
  2839. addd #$3000
  2840. rts
  2841. ; End of function sub_8E9B
  2842.  
  2843.  
  2844. ; =============== S U B R O U T I N E =======================================
  2845.  
  2846.  
  2847. sub_8EC6: ; CODE XREF: OC2I+C6P
  2848. ldab byte_EB
  2849. incb
  2850. stab byte_EB
  2851. cmpb #1
  2852. bls loc_8EE4
  2853. clr byte_CC
  2854. ldaa #$F0 ;
  2855. staa byte_1000
  2856. ldaa TMSK1 ; Timer Interrupt Mask 1
  2857. anda #$BF ; '¿'
  2858. staa TMSK1 ; Timer Interrupt Mask 1
  2859. clr byte_EB
  2860. clr byte_EA
  2861. rts
  2862. ; ---------------------------------------------------------------------------
  2863.  
  2864. loc_8EE4: ; CODE XREF: sub_8EC6+7j
  2865. ldaa byte_EE
  2866. anda #$F
  2867. oraa #$D0 ; 'Ч
  2868. staa byte_EE
  2869. staa byte_1000
  2870. ldd TCNTH ; Timer Counter Register (High)
  2871. addd #$4E20
  2872. rts
  2873. ; End of function sub_8EC6
  2874.  
  2875.  
  2876. ; =============== S U B R O U T I N E =======================================
  2877.  
  2878.  
  2879. ; public OC4I
  2880. OC4I: ; DATA XREF: USER_VEC:FFE2o
  2881. ldaa #$10
  2882. staa TFLG1 ; Timer Interrupt Flag Register 1
  2883. ldaa byte_F7
  2884. beq loc_8F0E
  2885. cmpa #1
  2886. bne loc_8F04
  2887. jmp loc_8F34
  2888. ; ---------------------------------------------------------------------------
  2889.  
  2890. loc_8F04: ; CODE XREF: OC4I+Aj
  2891. cmpa #$B
  2892. bne loc_8F0B
  2893. jmp loc_8F49
  2894. ; ---------------------------------------------------------------------------
  2895.  
  2896. loc_8F0B: ; CODE XREF: OC4I+11j
  2897. jmp loc_8F44
  2898. ; ---------------------------------------------------------------------------
  2899.  
  2900. loc_8F0E: ; CODE XREF: OC4I+6j
  2901. ldaa byte_F0
  2902. beq loc_8F1A
  2903. clr byte_F0
  2904. ldx #$4000
  2905. bra loc_8F20
  2906. ; ---------------------------------------------------------------------------
  2907.  
  2908. loc_8F1A: ; CODE XREF: OC4I+1Bj
  2909. bset byte_F0 $FF
  2910. ldx #$4020
  2911.  
  2912. loc_8F20: ; CODE XREF: OC4I+23j
  2913. ldy #$2000
  2914.  
  2915. loc_8F24: ; CODE XREF: OC4I+3Cj
  2916. ldaa 0,x
  2917. coma
  2918. staa 0,y
  2919. inx
  2920. iny
  2921. cpy #$2018
  2922. bne loc_8F24
  2923. rti
  2924. ; ---------------------------------------------------------------------------
  2925.  
  2926. loc_8F34: ; CODE XREF: OC4I+CJ
  2927. inc byte_F7
  2928. ldx #$2000
  2929.  
  2930. loc_8F3A: ; CODE XREF: OC4I+4Bj
  2931. clr 0,x
  2932. inx
  2933. cpx #$2018
  2934. bne loc_8F3A
  2935. bra locret_8F66
  2936. ; ---------------------------------------------------------------------------
  2937.  
  2938. loc_8F44: ; CODE XREF: OC4I:loc_8F0BJ
  2939. inc byte_F7
  2940. bra locret_8F66
  2941. ; ---------------------------------------------------------------------------
  2942.  
  2943. loc_8F49: ; CODE XREF: OC4I+13J
  2944. clr byte_F7
  2945. ldx #$2000
  2946.  
  2947. loc_8F4F: ; CODE XREF: OC4I+61j
  2948. bset 0,x $FF
  2949. inx
  2950. cpx #$2018
  2951. bne loc_8F4F
  2952. ldaa TMSK2 ; Timer Interrupt Mask Register 2
  2953. oraa #$40 ; '@'
  2954. staa TMSK2 ; Timer Interrupt Mask Register 2
  2955. ldaa #$40 ; '@'
  2956. staa TFLG2 ; Timer Interrupt Flag Register 2
  2957. ldaa #$F
  2958. staa TFLG1 ; Timer Interrupt Flag Register 1
  2959.  
  2960. locret_8F66: ; CODE XREF: OC4I+4Dj OC4I+52j
  2961. rti
  2962. ; End of function OC4I
  2963.  
  2964.  
  2965. ; =============== S U B R O U T I N E =======================================
  2966.  
  2967.  
  2968. ; public TOI
  2969. TOI: ; DATA XREF: USER_VEC:FFDEo
  2970. ldaa #$55 ; 'U'
  2971. staa COPRST ; Arm_Reset COP Timer Circuitry
  2972. ldaa #$AA ; 'ª'
  2973. staa COPRST ; Arm_Reset COP Timer Circuitry
  2974. ldaa #$80 ; '€'
  2975. staa TFLG2 ; Timer Interrupt Flag Register 2
  2976. ldaa byte_E3
  2977. beq loc_8FBD
  2978. ldaa byte_E2
  2979. cmpa #$90 ; ''
  2980. bls loc_8FB8
  2981. cmpa #$91 ; '‘'
  2982. bls loc_8F87
  2983. ldaa #$92 ; '’'
  2984. staa byte_E2
  2985. bra loc_8FB8
  2986. ; ---------------------------------------------------------------------------
  2987.  
  2988. loc_8F87: ; CODE XREF: TOI+18j
  2989. ldaa TMSK1 ; Timer Interrupt Mask 1
  2990. anda #$F0 ;
  2991. staa TMSK1 ; Timer Interrupt Mask 1
  2992. clr byte_CA
  2993. clr byte_C9
  2994. ldaa TMSK2 ; Timer Interrupt Mask Register 2
  2995. anda #$BF ; '¿'
  2996. staa TMSK2 ; Timer Interrupt Mask Register 2
  2997. ldaa #$13
  2998. staa byte_EF
  2999. ldaa #$F0 ;
  3000. staa byte_1000
  3001. ldaa #$92 ; '’'
  3002. staa byte_E2
  3003. ldaa TMSK1 ; Timer Interrupt Mask 1
  3004. oraa #$40 ; '@'
  3005. staa TMSK1 ; Timer Interrupt Mask 1
  3006. ldaa #$40 ; '@'
  3007. staa TFLG1 ; Timer Interrupt Flag Register 1
  3008. ldd TCNTH ; Timer Counter Register (High)
  3009. subd #1
  3010. std TOC2H ; Output Compare 2 Register (High)
  3011. rti
  3012. ; ---------------------------------------------------------------------------
  3013.  
  3014. loc_8FB8: ; CODE XREF: TOI+14j TOI+1Ej
  3015. inc byte_E2
  3016. bra loc_9011
  3017. ; ---------------------------------------------------------------------------
  3018.  
  3019. loc_8FBD: ; CODE XREF: TOI+Ej
  3020. ldaa byte_E2
  3021. beq loc_8FE6
  3022. clr byte_EF
  3023. clr byte_E2
  3024. clr byte_EB
  3025. clr byte_EA
  3026. ldaa #$F0 ;
  3027. staa byte_1000
  3028. ldaa TMSK1 ; Timer Interrupt Mask 1
  3029. anda #$BF ; '¿'
  3030. staa TMSK1 ; Timer Interrupt Mask 1
  3031. ldaa #$40 ; '@'
  3032. staa TFLG2 ; Timer Interrupt Flag Register 2
  3033. ldaa TMSK2 ; Timer Interrupt Mask Register 2
  3034. oraa #$40 ; '@'
  3035. staa TMSK2 ; Timer Interrupt Mask Register 2
  3036. ldaa #$4F ; 'O'
  3037. staa TFLG1 ; Timer Interrupt Flag Register 1
  3038.  
  3039. loc_8FE6: ; CODE XREF: TOI+58j
  3040. ldaa byte_800
  3041. anda #$80 ; '€'
  3042. bne loc_9005
  3043. inc byte_C9
  3044. ldaa byte_C9
  3045. cmpa #8
  3046. bls loc_9011
  3047. ldaa #8
  3048. staa byte_C9
  3049. bset byte_CA $FF
  3050. ldaa TMSK1 ; Timer Interrupt Mask 1
  3051. oraa #$F
  3052. staa TMSK1 ; Timer Interrupt Mask 1
  3053. bra loc_9011
  3054. ; ---------------------------------------------------------------------------
  3055.  
  3056. loc_9005: ; CODE XREF: TOI+84j
  3057. ldaa TMSK1 ; Timer Interrupt Mask 1
  3058. anda #$F0 ;
  3059. staa TMSK1 ; Timer Interrupt Mask 1
  3060. clr byte_C9
  3061. clr byte_CA
  3062.  
  3063. loc_9011: ; CODE XREF: TOI+54j TOI+8Dj ...
  3064. bset byte_E3 $FF
  3065. ldaa byte_801
  3066. anda #$80 ; '€'
  3067. beq loc_9034
  3068. ldaa byte_801
  3069. anda #$80 ; '€'
  3070. beq loc_9034
  3071. ldaa byte_EC
  3072. bne locret_9037
  3073. bset byte_EC 1
  3074. clr byte_E2
  3075. jsr sub_8853
  3076. jsr sub_81F3
  3077. bra locret_9037
  3078. ; ---------------------------------------------------------------------------
  3079.  
  3080. loc_9034: ; CODE XREF: TOI+B2j TOI+B9j
  3081. clr byte_EC
  3082.  
  3083. locret_9037: ; CODE XREF: TOI+BDj TOI+CBj
  3084. rti
  3085. ; End of function TOI
  3086.  
  3087. ; ---------------------------------------------------------------------------
  3088.  
  3089. loc_9038: ; CODE XREF: ROM:loc_9038j
  3090. bra loc_9038
  3091.  
  3092. ; =============== S U B R O U T I N E =======================================
  3093.  
  3094.  
  3095. ; public RTII
  3096. RTII: ; DATA XREF: USER_VEC:FFF0o
  3097. ldaa #$40 ; '@'
  3098. staa TFLG2 ; Timer Interrupt Flag Register 2
  3099. ldaa byte_C00
  3100. tab
  3101. anda #$F
  3102. lsrb
  3103. lsrb
  3104. lsrb
  3105. lsrb
  3106. stab byte_E8
  3107. suba byte_E8
  3108. adda byte_C8
  3109. staa byte_C8
  3110. ldaa #$20 ; ' '
  3111. staa PORTA ; Port A data
  3112. clr PORTA ; Port A data
  3113. ldaa byte_D4
  3114. beq loc_905E
  3115. jmp loc_91EB
  3116. ; ---------------------------------------------------------------------------
  3117.  
  3118. loc_905E: ; CODE XREF: RTII+1Fj
  3119. bset byte_D4 $FF
  3120. ldaa byte_DA
  3121. staa byte_CE
  3122. ldx #$4700
  3123. stx byte_D2
  3124. ldx #$4500
  3125. stx byte_D8
  3126. ldy #$3000
  3127. clr byte_D5
  3128. bset byte_D5 1
  3129.  
  3130. loc_9079: ; CODE XREF: RTII+D0J RTII+12DJ
  3131. ldaa 0,y
  3132. staa byte_F2
  3133. cmpa #$FF
  3134. bne loc_9085
  3135. jmp loc_910D
  3136. ; ---------------------------------------------------------------------------
  3137.  
  3138. loc_9085: ; CODE XREF: RTII+46j RTII+C2J
  3139. ldaa byte_F2
  3140. anda byte_D5
  3141. bne loc_90CC
  3142. ldab 0,x
  3143. bne loc_90A6
  3144. inc 0,x
  3145. xgdx
  3146. ldx byte_D2
  3147. sty 0,x
  3148. inx
  3149. inx
  3150. std 0,x
  3151. inx
  3152. inx
  3153. ldaa byte_D5
  3154. staa 0,x
  3155. inx
  3156. stx byte_D2
  3157. bra loc_90F2
  3158. ; ---------------------------------------------------------------------------
  3159.  
  3160. loc_90A6: ; CODE XREF: RTII+53j
  3161. dec byte_CE
  3162. inc 0,x
  3163. ldaa 0,x
  3164. cmpa #$20 ; ' '
  3165. bls loc_90B9
  3166. ldaa #$20 ; ' '
  3167. suba byte_ED
  3168. staa 0,x
  3169. bra loc_90F2
  3170. ; ---------------------------------------------------------------------------
  3171.  
  3172. loc_90B9: ; CODE XREF: RTII+75j
  3173. ldab byte_D6
  3174. beq loc_90F2
  3175. cmpa #$20 ; ' '
  3176. bne loc_90F2
  3177. ldaa #$20 ; ' '
  3178. suba byte_ED
  3179. staa 0,x
  3180. jsr sub_93A2
  3181. bra loc_90F2
  3182. ; ---------------------------------------------------------------------------
  3183.  
  3184. loc_90CC: ; CODE XREF: RTII+4Fj
  3185. ldab 0,x
  3186. beq loc_90F2
  3187. xgdx
  3188. subd #$4500
  3189. addd #$4600
  3190. xgdx
  3191. inc 0,x
  3192. ldaa 0,x
  3193. cmpa #4
  3194. bne loc_90F2
  3195. clr 0,x
  3196. ldx byte_D8
  3197. clr 0,x
  3198. bset byte_D7 1
  3199. jsr sub_9345
  3200. dec byte_DA
  3201. dec byte_CE
  3202.  
  3203. loc_90F2: ; CODE XREF: RTII+6Aj RTII+7Dj ...
  3204. ldx byte_D8
  3205. inx
  3206. stx byte_D8
  3207. asl byte_D5
  3208. bcs loc_90FF
  3209. jmp loc_9085
  3210. ; ---------------------------------------------------------------------------
  3211.  
  3212. loc_90FF: ; CODE XREF: RTII+C0j
  3213. bset byte_D5 1
  3214. iny
  3215. cpy #$300E
  3216. beq loc_916A
  3217. jmp loc_9079
  3218. ; ---------------------------------------------------------------------------
  3219.  
  3220. loc_910D: ; CODE XREF: RTII+48J
  3221. bset byte_D5 1
  3222. ldaa byte_CE
  3223. beq loc_9153
  3224. clra
  3225. clrb
  3226. addd 0,x
  3227. addd 2,x
  3228. addd 4,x
  3229. addd 6,x
  3230. beq loc_9153
  3231.  
  3232. loc_9120: ; CODE XREF: RTII+116J
  3233. ldab 0,x
  3234. beq loc_9146
  3235. xgdx
  3236. subd #$4500
  3237. addd #$4600
  3238. xgdx
  3239. inc 0,x
  3240. ldaa 0,x
  3241. cmpa #4
  3242. bne loc_9146
  3243. clr 0,x
  3244. ldx byte_D8
  3245. clr 0,x
  3246. bset byte_D7 1
  3247. jsr sub_9345
  3248. dec byte_DA
  3249. dec byte_CE
  3250.  
  3251. loc_9146: ; CODE XREF: RTII+E8j RTII+F8j
  3252. ldx byte_D8
  3253. inx
  3254. stx byte_D8
  3255. asl byte_D5
  3256. bcs loc_915C
  3257. jmp loc_9120
  3258. ; ---------------------------------------------------------------------------
  3259.  
  3260. loc_9153: ; CODE XREF: RTII+D8j RTII+E4j
  3261. ldx byte_D8
  3262. xgdx
  3263. addd #8
  3264. std byte_D8
  3265. xgdx
  3266.  
  3267. loc_915C: ; CODE XREF: RTII+114j
  3268. bset byte_D5 1
  3269. iny
  3270. cpy #$300E
  3271. beq loc_916A
  3272. jmp loc_9079
  3273. ; ---------------------------------------------------------------------------
  3274.  
  3275. loc_916A: ; CODE XREF: RTII+CEj RTII+12Bj
  3276. ldx #$4900
  3277. stx byte_D0
  3278. ldaa 4,x
  3279. beq loc_91A3
  3280.  
  3281. loc_9173: ; CODE XREF: RTII+167j
  3282. staa byte_D5
  3283. ldy 0,x
  3284. ldab 0,y
  3285. andb byte_D5
  3286. bne loc_918C
  3287. inc byte_CF
  3288. clr byte_D7
  3289. ldx 2,x
  3290. jsr sub_9345
  3291. bra loc_9192
  3292. ; ---------------------------------------------------------------------------
  3293.  
  3294. loc_918C: ; CODE XREF: RTII+143j
  3295. ldy 2,x
  3296. clr 0,y
  3297.  
  3298. loc_9192: ; CODE XREF: RTII+150j
  3299. ldx byte_D0
  3300. clr 4,x
  3301. ldaa 9,x
  3302. beq loc_91A3
  3303. inx
  3304. inx
  3305. inx
  3306. inx
  3307. inx
  3308. stx byte_D0
  3309. bra loc_9173
  3310. ; ---------------------------------------------------------------------------
  3311.  
  3312. loc_91A3: ; CODE XREF: RTII+137j RTII+15Ej
  3313. ldaa byte_801
  3314. anda #$F
  3315. cmpa #$A
  3316. beq loc_91AD
  3317. rti
  3318. ; ---------------------------------------------------------------------------
  3319.  
  3320. loc_91AD: ; CODE XREF: RTII+170j
  3321. ldaa byte_800
  3322. anda #$40 ; '@'
  3323. beq loc_91B5
  3324. rti
  3325. ; ---------------------------------------------------------------------------
  3326.  
  3327. loc_91B5: ; CODE XREF: RTII+178j
  3328. ldaa TMSK2 ; Timer Interrupt Mask Register 2
  3329. anda #$BF ; '¿'
  3330. staa TMSK2 ; Timer Interrupt Mask Register 2
  3331. ldaa #$40 ; '@'
  3332. staa TFLG2 ; Timer Interrupt Flag Register 2
  3333. ldaa TMSK1 ; Timer Interrupt Mask 1
  3334. anda #$B0 ; '°'
  3335. staa TMSK1 ; Timer Interrupt Mask 1
  3336. ldaa #$5F ; '_'
  3337. staa TFLG1 ; Timer Interrupt Flag Register 1
  3338. ldx #$2000
  3339.  
  3340. loc_91CC: ; CODE XREF: RTII+199j
  3341. bset 0,x $FF
  3342. inx
  3343. cpx #$2018
  3344. bne loc_91CC
  3345. ldaa TMSK1 ; Timer Interrupt Mask 1
  3346. oraa #$10
  3347. staa TMSK1 ; Timer Interrupt Mask 1
  3348. ldd TCNTH ; Timer Counter Register (High)
  3349. addd #$6000
  3350. std TOC4H ; Output Compare 4 Register (High)
  3351. ldaa #$40 ; '@'
  3352. staa TFLG1 ; Timer Interrupt Flag Register 1
  3353. ldaa #1
  3354. staa byte_F7
  3355. rti
  3356. ; ---------------------------------------------------------------------------
  3357.  
  3358. loc_91EB: ; CODE XREF: RTII+21J
  3359. clr byte_D4
  3360. ldaa byte_CF
  3361. staa byte_CD
  3362. ldx #$4900
  3363. stx byte_D0
  3364. ldx #$4570
  3365. stx byte_D8
  3366. ldy #$300E
  3367. clr byte_D5
  3368. bset byte_D5 1
  3369.  
  3370. loc_9206: ; CODE XREF: RTII:loc_92A1J
  3371. ; RTII:loc_9308J
  3372. ldaa 0,y
  3373. staa byte_F2
  3374. cmpa #$FF
  3375. bne loc_9212
  3376. jmp loc_92A4
  3377. ; ---------------------------------------------------------------------------
  3378.  
  3379. loc_9212: ; CODE XREF: RTII+1D3j RTII+24FJ
  3380. ldaa byte_F2
  3381. anda byte_D5
  3382. bne loc_9259
  3383. ldab 0,x
  3384. bne loc_9233
  3385. inc 0,x
  3386. xgdx
  3387. ldx byte_D0
  3388. sty 0,x
  3389. inx
  3390. inx
  3391. std 0,x
  3392. inx
  3393. inx
  3394. ldaa byte_D5
  3395. staa 0,x
  3396. inx
  3397. stx byte_D0
  3398. bra loc_927F
  3399. ; ---------------------------------------------------------------------------
  3400.  
  3401. loc_9233: ; CODE XREF: RTII+1E0j
  3402. dec byte_CD
  3403. inc 0,x
  3404. ldaa 0,x
  3405. cmpa #$20 ; ' '
  3406. bls loc_9246
  3407. ldaa #$20 ; ' '
  3408. suba byte_ED
  3409. staa 0,x
  3410. bra loc_927F
  3411. ; ---------------------------------------------------------------------------
  3412.  
  3413. loc_9246: ; CODE XREF: RTII+202j
  3414. ldab byte_D6
  3415. beq loc_927F
  3416. cmpa #$20 ; ' '
  3417. bne loc_927F
  3418. ldaa #$20 ; ' '
  3419. suba byte_ED
  3420. staa 0,x
  3421. jsr sub_93A2
  3422. bra loc_927F
  3423. ; ---------------------------------------------------------------------------
  3424.  
  3425. loc_9259: ; CODE XREF: RTII+1DCj
  3426. ldab 0,x
  3427. beq loc_927F
  3428. xgdx
  3429. subd #$4500
  3430. addd #$4600
  3431. xgdx
  3432. inc 0,x
  3433. ldaa 0,x
  3434. cmpa #4
  3435. bne loc_927F
  3436. clr 0,x
  3437. ldx byte_D8
  3438. clr 0,x
  3439. bset byte_D7 1
  3440. jsr sub_9345
  3441. dec byte_CF
  3442. dec byte_CD
  3443.  
  3444. loc_927F: ; CODE XREF: RTII+1F7j RTII+20Aj ...
  3445. ldx byte_D8
  3446. inx
  3447. stx byte_D8
  3448. asl byte_D5
  3449. bcs loc_928C
  3450. jmp loc_9212
  3451. ; ---------------------------------------------------------------------------
  3452.  
  3453. loc_928C: ; CODE XREF: RTII+24Dj
  3454. bset byte_D5 1
  3455. iny
  3456. cpy #$301D
  3457. bls loc_92A1
  3458. cpy #$301F
  3459. beq loc_930B
  3460. ldaa byte_CA
  3461. beq loc_930B
  3462.  
  3463. loc_92A1: ; CODE XREF: RTII+25Bj
  3464. jmp loc_9206
  3465. ; ---------------------------------------------------------------------------
  3466.  
  3467. loc_92A4: ; CODE XREF: RTII+1D5J
  3468. bset byte_D5 1
  3469. ldaa byte_CD
  3470. beq loc_92EA
  3471. clra
  3472. clrb
  3473. addd 0,x
  3474. addd 2,x
  3475. addd 4,x
  3476. addd 6,x
  3477. beq loc_92EA
  3478.  
  3479. loc_92B7: ; CODE XREF: RTII+2ADJ
  3480. ldab 0,x
  3481. beq loc_92DD
  3482. xgdx
  3483. subd #$4500
  3484. addd #$4600
  3485. xgdx
  3486. inc 0,x
  3487. ldaa 0,x
  3488. cmpa #4
  3489. bne loc_92DD
  3490. clr 0,x
  3491. ldx byte_D8
  3492. clr 0,x
  3493. bset byte_D7 1
  3494. jsr sub_9345
  3495. dec byte_CF
  3496. dec byte_CD
  3497.  
  3498. loc_92DD: ; CODE XREF: RTII+27Fj RTII+28Fj
  3499. ldx byte_D8
  3500. inx
  3501. stx byte_D8
  3502. asl byte_D5
  3503. bcs loc_92F3
  3504. jmp loc_92B7
  3505. ; ---------------------------------------------------------------------------
  3506.  
  3507. loc_92EA: ; CODE XREF: RTII+26Fj RTII+27Bj
  3508. ldx byte_D8
  3509. xgdx
  3510. addd #8
  3511. std byte_D8
  3512. xgdx
  3513.  
  3514. loc_92F3: ; CODE XREF: RTII+2ABj
  3515. bset byte_D5 1
  3516. iny
  3517. cpy #$301D
  3518. bls loc_9308
  3519. cpy #$301F
  3520. beq loc_930B
  3521. ldaa byte_CA
  3522. beq loc_930B
  3523.  
  3524. loc_9308: ; CODE XREF: RTII+2C2j
  3525. jmp loc_9206
  3526. ; ---------------------------------------------------------------------------
  3527.  
  3528. loc_930B: ; CODE XREF: RTII+261j RTII+265j ...
  3529. ldx #$4700
  3530. stx byte_D2
  3531. ldaa 4,x
  3532. beq locret_9344
  3533.  
  3534. loc_9314: ; CODE XREF: RTII+308j
  3535. staa byte_D5
  3536. ldy 0,x
  3537. ldab 0,y
  3538. andb byte_D5
  3539. bne loc_932D
  3540. inc byte_DA
  3541. clr byte_D7
  3542. ldx 2,x
  3543. jsr sub_9345
  3544. bra loc_9333
  3545. ; ---------------------------------------------------------------------------
  3546.  
  3547. loc_932D: ; CODE XREF: RTII+2E4j
  3548. ldy 2,x
  3549. clr 0,y
  3550.  
  3551. loc_9333: ; CODE XREF: RTII+2F1j
  3552. ldx byte_D2
  3553. clr 4,x
  3554. ldaa 9,x
  3555. beq locret_9344
  3556. inx
  3557. inx
  3558. inx
  3559. inx
  3560. inx
  3561. stx byte_D2
  3562. bra loc_9314
  3563. ; ---------------------------------------------------------------------------
  3564.  
  3565. locret_9344: ; CODE XREF: RTII+2D8j RTII+2FFj
  3566. rti
  3567. ; End of function RTII
  3568.  
  3569.  
  3570. ; =============== S U B R O U T I N E =======================================
  3571.  
  3572.  
  3573. sub_9345: ; CODE XREF: RTII+AFP RTII+103P ...
  3574. ldaa byte_801
  3575. anda #$F
  3576. cmpa #0
  3577. beq loc_935F
  3578. cmpa #$F
  3579. beq loc_936C
  3580. xgdx
  3581. subd #$4500
  3582. aslb
  3583. adca #0
  3584. addd #$E400
  3585. xgdx
  3586. bra loc_9377
  3587. ; ---------------------------------------------------------------------------
  3588.  
  3589. loc_935F: ; CODE XREF: sub_9345+7j
  3590. xgdx
  3591. subd #$4500
  3592. aslb
  3593. adca #0
  3594. addd #$E000
  3595. xgdx
  3596. bra loc_9377
  3597. ; ---------------------------------------------------------------------------
  3598.  
  3599. loc_936C: ; CODE XREF: sub_9345+Bj
  3600. xgdx
  3601. subd #$4500
  3602. aslb
  3603. adca #0
  3604. addd #$E200
  3605. xgdx
  3606.  
  3607. loc_9377: ; CODE XREF: sub_9345+18j sub_9345+25j
  3608. ldd 0,x
  3609. ldx byte_E0
  3610. staa 0,x
  3611. inx
  3612. orab byte_D7
  3613. stab 0,x
  3614. inx
  3615. cpx #$4400
  3616. bne loc_938B
  3617. ldx #$4100
  3618.  
  3619. loc_938B: ; CODE XREF: sub_9345+41j
  3620. stx byte_E0
  3621. ldaa byte_EF
  3622. cmpa #$10
  3623. bne locret_93A1
  3624. ldaa byte_CC
  3625. bne locret_93A1
  3626. ldaa byte_D7
  3627. bne locret_93A1
  3628. bset byte_CC $FF
  3629. jsr sub_88A6
  3630.  
  3631. locret_93A1: ; CODE XREF: sub_9345+4Cj sub_9345+50j ...
  3632. rts
  3633. ; End of function sub_9345
  3634.  
  3635.  
  3636. ; =============== S U B R O U T I N E =======================================
  3637.  
  3638.  
  3639. sub_93A2: ; CODE XREF: RTII+8DP RTII+21AP
  3640. ldaa byte_801
  3641. anda #$F
  3642. cmpa #0
  3643. beq loc_93BC
  3644. cmpa #$F
  3645. beq loc_93C9
  3646. xgdx
  3647. subd #$4500
  3648. aslb
  3649. adca #0
  3650. addd #$EA00
  3651. xgdx
  3652. bra loc_93D4
  3653. ; ---------------------------------------------------------------------------
  3654.  
  3655. loc_93BC: ; CODE XREF: sub_93A2+7j
  3656. xgdx
  3657. subd #$4500
  3658. aslb
  3659. adca #0
  3660. addd #$E600
  3661. xgdx
  3662. bra loc_93D4
  3663. ; ---------------------------------------------------------------------------
  3664.  
  3665. loc_93C9: ; CODE XREF: sub_93A2+Bj
  3666. xgdx
  3667. subd #$4500
  3668. aslb
  3669. adca #0
  3670. addd #$E800
  3671. xgdx
  3672.  
  3673. loc_93D4: ; CODE XREF: sub_93A2+18j sub_93A2+25j
  3674. ldd 0,x
  3675. cmpa #3
  3676. beq locret_93FC
  3677. ldx byte_E0
  3678. staa 0,x
  3679. inx
  3680. stab 0,x
  3681. inx
  3682. cpx #$4400
  3683. bne loc_93EA
  3684. ldx #$4100
  3685.  
  3686. loc_93EA: ; CODE XREF: sub_93A2+43j
  3687. stx byte_E0
  3688. ldaa byte_EF
  3689. cmpa #$10
  3690. bne locret_93FC
  3691. ldaa byte_CC
  3692. bne locret_93FC
  3693. bset byte_CC $FF
  3694. jsr sub_88A6
  3695.  
  3696. locret_93FC: ; CODE XREF: sub_93A2+36j sub_93A2+4Ej ...
  3697. rts
  3698. ; End of function sub_93A2
  3699.  
  3700. ; ---------------------------------------------------------------------------
  3701.  
  3702. org $C000
  3703. fdb $10C, $200, $200, $200, $200, $200, $200, $200, $106, $200, $200, $200, $200, $200, $200, $104; 0
  3704. fdb $10A, $200, $200, $200, $200, $200, $200, $108, $200, $22A, $230, $240, $12E, $12C, $148, $11E; 16
  3705. fdb $200, $220, $222, $224, $120, $124, $128, $200, $200, $200, $200, $200, $110, $114, $118, $11C; 32
  3706. fdb $264, $262, $260, $200, $11A, $112, $116, $1BA, $274, $272, $270, $200, $2A4, $2A6, $2A8, $24A; 48
  3707. fdb $10A, $23A, $206, $2F2, $2F0, $200, $200, $200, $20A, $238, $236, $234, $232, $2C4, $2C6, $2C8; 64
  3708. fdb $25E, $20C, $25A, $258, $256, $2B4, $2B6, $2B8, $26E, $26C, $26A, $268, $266, $2D8, $2DE, $200; 80
  3709. fdb $23E, $27C, $27A, $278, $276, $1EA, $2EE, $200, $200, $200, $246, $200, $2F8, $2FA, $2FE, $200; 96
  3710. fdb $200, $200, $228, $204, $200, $200, $200, $1F6, $22E, $22C, $248, $21E, $2CC, $2CE, $2AE, $1DA; 112
  3711. fdb $2A2, $212, $216, $242, $23C, $2BE, $2AC, $1F4, $14A, $142, $146, $14E, $1F8, $1FA, $1FE, $1D8; 128
  3712. fdb $1A2, $1A4, $1A6, $1A8, $1EA, $1FC, $1EE, $1AA, $198, $196, $194, $192, $190, $1DC, $1DE, $1CA; 144
  3713. fdb $138, $200, $244, $2E6, $1CC, $1CE, $1AE, $1C8, $19E, $200, $226, $1F2, $1BC, $1BE, $1AC, $1C6; 160
  3714. fdb $13A, $200, $200, $130, $1F0, $2D6, $2DC, $1BA, $15E, $200, $2C2, $152, $150, $200, $1DC, $19A; 176
  3715. fdb $16E, $200, $2B2, $164, $162, $2CA, $2DA, $1B8, $13E, $200, $200, $174, $172, $208, $2BA, $1B6; 192
  3716. fdb $138, $136, $134, $132, $1E0, $1E2, $1E4, $1E6, $15A, $158, $156, $154, $1D0, $1D2, $1D4, $1D6; 208
  3717. fdb $16C, $16A, $168, $166, $160, $1C0, $1C2, $1C4, $17C, $17A, $178, $176, $170, $1B0, $1B2, $1B4; 224
  3718. fdb $24E, $24C, $250, $252, $254; 240
  3719. fcb $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF
  3720. fcb $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF
  3721. fdb $10C, $200, $200, $200, $200, $200, $200, $200, $106, $200, $200, $200, $200, $200, $200, $104; 0
  3722. fdb $10A, $200, $200, $200, $200, $200, $200, $108, $200, $200, $200, $200, $200, $200, $200, $200; 16
  3723. fdb $200, $200, $200, $200, $200, $200, $200, $200, $200, $22C, $248, $21E, $200, $200, $26A, $204; 32
  3724. fdb $200, $200, $216, $200, $200, $200, $270, $10A, $200, $20A, $20C, $2A2, $200, $200, $200, $2E6; 48
  3725. fdb $200, $200, $200, $200, $200, $200, $200, $200, $298, $296, $294, $292, $200, $2EE, $200, $2AC; 64
  3726. fdb $1EA, $1F8, $1FA, $1FE, $200, $276, $200, $2A4, $1CC, $1CE, $1FC, $1EE, $200, $278, $200, $12C; 80
  3727. fdb $1BC, $1BE, $1DC, $1DE, $200, $200, $14A, $200, $140, $144, $1AC, $1AE, $1A6, $26C, $200, $200; 96
  3728. fdb $10E, $19C, $190, $1A0, $200, $2B4, $200, $1F6, $200, $12C, $148, $11E, $200, $2B2, $192, $1DA; 112
  3729. fdb $120, $124, $128, $27A, $196, $1CC, $23E, $1F4, $110, $114, $118, $1EA, $200, $200, $11E, $1D8; 128
  3730. fdb $11A, $112, $116, $27E, $200, $232, $2F0, $1AA, $12E, $2A6, $23C, $24A, $200, $234, $2F2, $1CA; 144
  3731. fdb $12C, $200, $200, $200, $200, $236, $206, $1C8, $19E, $27E, $27C, $1F2, $200, $238, $23A, $1C6; 160
  3732. fdb $13A, $200, $200, $130, $1F0, $200, $200, $1BA, $15E, $200, $1A4, $152, $150, $1A8, $142, $19A; 176
  3733. fdb $16E, $200, $200, $164, $162, $200, $200, $1B8, $13E, $200, $198, $174, $172, $194, $1A2, $1B6; 192
  3734. fdb $138, $136, $134, $132, $1E0, $1E2, $1E4, $1E6, $15A, $158, $156, $154, $1D0, $1D2, $1D4, $1D6; 208
  3735. fdb $16C, $16A, $168, $166, $160, $1C0, $1C2, $1C4, $17C, $17A, $178, $176, $170, $1B0, $1B2, $1B4; 224
  3736. fdb $24E, $24C, $250, $252, $254; 240
  3737. fcb $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF
  3738. fcb $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF
  3739. fdb $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200; 0
  3740. fdb $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200; 16
  3741. fdb $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200; 32
  3742. fdb $200, $200, $200, $200, $200, $200, $200, $200, $2F0, $2F2, $2F4, $2F6, $2F8, $2FA, $200, $200; 48
  3743. fdb $2E0, $2E2, $2E4, $2E6, $2E8, $2EA, $200, $200, $2D0, $2D2, $2D4, $2D6, $2D8, $2DA, $200, $200; 64
  3744. fdb $2C0, $2C2, $2C4, $2C6, $2C8, $2CA, $200, $200, $2B0, $2B2, $2B4, $2B6, $2B8, $2BA, $200, $200; 80
  3745. fdb $2A0, $2A2, $2A4, $2A6, $2A8, $2AA, $200, $200, $290, $292, $294, $296, $298, $29A, $200, $200; 96
  3746. fdb $280, $282, $284, $286, $288, $28A, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200; 112
  3747. fdb $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200; 128
  3748. fdb $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200; 144
  3749. fdb $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200; 160
  3750. fdb $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200; 176
  3751. fdb $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200; 192
  3752. fdb $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200; 208
  3753. fdb $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200, $200; 224
  3754. fdb $24E, $24C, $250, $252, $254; 240
  3755. fcb $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF
  3756. fcb $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF
  3757. fdb $30C, $300, $300, $300, $300, $300, $300, $300, $306, $300, $300, $300, $300, $300, $300, $304; 0
  3758. fdb $30A, $300, $300, $300, $300, $300, $300, $308, $300, $32A, $330, $340, $32E, $32C, $348, $31E; 16
  3759. fdb $300, $320, $322, $324, $320, $324, $328, $300, $300, $300, $300, $300, $310, $314, $318, $31C; 32
  3760. fdb $364, $362, $360, $300, $31A, $312, $316, $1BA, $374, $372, $370, $300, $3A4, $3A6, $3A8, $34A; 48
  3761. fdb $30A, $33A, $306, $3F2, $3F0, $300, $300, $300, $30A, $338, $336, $334, $332, $3C4, $3C6, $3C8; 64
  3762. fdb $35E, $30C, $35A, $358, $356, $3B4, $3B6, $3B8, $36E, $36C, $36A, $368, $366, $3D8, $3DE, $300; 80
  3763. fdb $33E, $37C, $37A, $378, $376, $3EA, $3EE, $300, $300, $300, $346, $300, $3F8, $3FA, $3FE, $300; 96
  3764. fdb $300, $300, $328, $304, $300, $300, $300, $3F6, $32E, $22C, $248, $21E, $3CC, $3CE, $3AE, $3DA; 112
  3765. fdb $3A2, $312, $216, $342, $33C, $3BE, $3AC, $3F4, $34A, $342, $346, $34E, $1F8, $1FA, $1FE, $3D8; 128
  3766. fdb $3A2, $3A4, $3A6, $3A8, $3EA, $1FC, $3EE, $3AA, $398, $396, $394, $392, $390, $3DC, $3DE, $3CA; 144
  3767. fdb $338, $300, $344, $3E6, $3CC, $3CE, $3AE, $3C8, $39E, $300, $326, $1F2, $3BC, $3BE, $3AC, $3C6; 160
  3768. fdb $33A, $300, $300, $330, $3F0, $3D6, $3DC, $1BA, $35E, $300, $3C2, $352, $350, $300, $3DC, $39A; 176
  3769. fdb $36E, $300, $3B2, $364, $362, $3CA, $3DA, $3B8, $33E, $300, $300, $374, $372, $308, $3BA, $3B6; 192
  3770. fdb $338, $336, $334, $332, $3E0, $3E2, $3E4, $3E6, $35A, $358, $356, $354, $3D0, $3D2, $3D4, $3D6; 208
  3771. fdb $36C, $36A, $368, $366, $360, $3C0, $3C2, $3C4, $37C, $37A, $378, $376, $370, $3B0, $3B2, $3B4; 224
  3772. fdb $34E, $34C, $350, $352, $354; 240
  3773. fcb $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF
  3774. fcb $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF
  3775. fdb $30C, $200, $200, $200, $200, $200, $200, $200, $306, $200, $200, $200, $200, $200, $200, $304; 0
  3776. fdb $30A, $200, $200, $200, $200, $200, $200, $308, $200, $200, $200, $200, $200, $200, $200, $200; 16
  3777. fdb $200, $200, $200, $200, $200, $200, $200, $200, $200, $22C, $248, $21E, $200, $200, $36A, $204; 32
  3778. fdb $200, $200, $216, $200, $200, $200, $270, $30A, $200, $30A, $30C, $3A2, $200, $200, $200, $2E6; 48
  3779. fdb $200, $200, $200, $200, $200, $200, $200, $200, $398, $396, $394, $392, $200, $3EE, $200, $3AC; 64
  3780. fdb $3EA, $1F8, $1FA, $1FE, $200, $376, $200, $3A4, $1CC, $1CE, $1FC, $3EE, $200, $378, $200, $12C; 80
  3781. fdb $1BC, $1BE, $3DC, $3DE, $200, $200, $34A, $200, $340, $344, $3AC, $3AE, $3A6, $36C, $200, $200; 96
  3782. fdb $30E, $39C, $390, $3A0, $200, $3B4, $200, $1F6, $200, $12C, $148, $31E, $200, $3B2, $392, $3DA; 112
  3783. fdb $120, $124, $128, $37A, $396, $1CC, $33E, $1F4, $110, $114, $118, $3EA, $200, $200, $31E, $1D8; 128
  3784. fdb $11A, $112, $116, $37E, $200, $232, $2F0, $1AA, $12E, $2A6, $23C, $24A, $200, $234, $2F2, $1CA; 144
  3785. fdb $12C, $200, $200, $200, $200, $236, $206, $1C8, $39E, $37E, $37C, $1F2, $200, $238, $23A, $1C6; 160
  3786. fdb $13A, $200, $200, $130, $1F0, $200, $200, $1BA, $35E, $200, $3A4, $152, $150, $3A8, $342, $19A; 176
  3787. fdb $16E, $200, $200, $164, $162, $200, $200, $1B8, $13E, $200, $398, $174, $172, $394, $1A2, $1B6; 192
  3788. fdb $138, $136, $134, $132, $1E0, $1E2, $1E4, $1E6, $15A, $158, $156, $154, $1D0, $1D2, $1D4, $1D6; 208
  3789. fdb $16C, $16A, $168, $166, $160, $1C0, $1C2, $1C4, $17C, $17A, $178, $176, $170, $1B0, $1B2, $1B4; 224
  3790. fdb $34E, $34C, $350, $352, $354; 240
  3791. fcb $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF
  3792. fcb $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF
  3793. fdb $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300; 0
  3794. fdb $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300; 16
  3795. fdb $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300; 32
  3796. fdb $300, $300, $300, $300, $300, $300, $300, $300, $3F0, $3F2, $3F4, $3F6, $3F8, $3FA, $300, $300; 48
  3797. fdb $3E0, $3E2, $3E4, $3E6, $3E8, $3EA, $300, $300, $3D0, $3D2, $3D4, $3D6, $3D8, $3DA, $300, $300; 64
  3798. fdb $3C0, $3C2, $3C4, $3C6, $3C8, $3CA, $300, $300, $3B0, $3B2, $3B4, $3B6, $3B8, $3BA, $300, $300; 80
  3799. fdb $3A0, $3A2, $3A4, $3A6, $3A8, $3AA, $300, $300, $390, $392, $394, $396, $398, $39A, $300, $300; 96
  3800. fdb $380, $382, $384, $386, $388, $38A, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300; 112
  3801. fdb $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300; 128
  3802. fdb $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300; 144
  3803. fdb $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300; 160
  3804. fdb $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300; 176
  3805. fdb $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300; 192
  3806. fdb $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300; 208
  3807. fdb $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300, $300; 224
  3808. fdb $34E, $34C, $350, $352, $354; 240
  3809. fcb $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF
  3810. fcb $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF, $FF
  3811. ; end of 'ROM'
  3812.  
  3813. ; ===========================================================================
  3814.  
  3815. ; Segment type: Pure data
  3816. ; segment USER_VEC
  3817. org $FFC0
  3818. RESERVFFC0: fcb $FF ; RESERVED
  3819. RESERVFFC1: fcb $FF ; RESERVED
  3820. RESERVFFC2: fcb $FF ; RESERVED
  3821. RESERVFFC3: fcb $FF ; RESERVED
  3822. RESERVFFC4: fcb $FF ; RESERVED
  3823. RESERVFFC5: fcb $FF ; RESERVED
  3824. RESERVFFC6: fcb $FF ; RESERVED
  3825. RESERVFFC7: fcb $FF ; RESERVED
  3826. RESERVFFC8: fcb $FF ; RESERVED
  3827. RESERVFFC9: fcb $FF ; RESERVED
  3828. RESERVFFCA: fcb $FF ; RESERVED
  3829. RESERVFFCB: fcb $FF ; RESERVED
  3830. RESERVFFCC: fcb $FF ; RESERVED
  3831. RESERVFFCD: fcb $FF ; RESERVED
  3832. RESERVFFCE: fcb $FF ; RESERVED
  3833. RESERVFFCF: fcb $FF ; RESERVED
  3834. RESERVFFD0: fcb $FF ; RESERVED
  3835. RESERVFFD1: fcb $FF ; RESERVED
  3836. RESERVFFD2: fcb $FF ; RESERVED
  3837. RESERVFFD3: fcb $FF ; RESERVED
  3838. RESERVFFD4: fcb $FF ; RESERVED
  3839. RESERVFFD5: fcb $FF ; RESERVED
  3840. fdb SCISS ; SCI Serial System
  3841. SPIE: fdb $FFFF ; SPI Serial Transfer Complete
  3842. PAII: fdb $FFFF ; Pulse Accumulator Input Edge
  3843. PAOVI: fdb $FFFF ; Pulse Accumulator Overflow
  3844. fdb TOI ; Timer Overflow
  3845. fdb I4_I5 ; Timer Input Capture 4 / Output Compare 5
  3846. fdb OC4I ; Timer Output Compare 4
  3847. OC3I: fdb $FFFF ; Timer Output Compare 3
  3848. fdb OC2I ; Timer Output Compare 2
  3849. OC1I: fdb $FFFF ; Timer Output Compare 1
  3850. fdb IC3I ; Timer Input Capture 3
  3851. fdb IC2I ; Timer Input Capture 2
  3852. fdb IC1I ; Timer Input Capture 1
  3853. fdb RTII ; Real Time Interrupt
  3854. fdb IRQ ; IRQ
  3855. fdb SCISS ; XIRQ Pin
  3856. fdb SCISS ; Software Interrupt
  3857. fdb SCISS ; Illegal Opcode Trap
  3858. fdb NOCOP ; COP Failure
  3859. fdb CME ; Clock Monitor Fail
  3860. off_FFFE: fdb __RESET ; DATA XREF: ROM:10000w ROM:10003w ...
  3861. ; end of 'USER_VEC' ; Processor reset
  3862.  
  3863. ; ---------------------------------------------------------------------------
  3864. ; ===========================================================================
  3865.  
  3866.  
  3867. ; end of 'ROM'
  3868.  
  3869.  
  3870. end
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!