Advertisement
Guest User

MCS-48 disassembly output

a guest
Nov 5th, 2021
195
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 58.85 KB | None | 0 0
  1. ;********************************************************************************
  2. ; Disassembly of MCS-48 binary file: AutoHelm_30000_05_22CA.BIN
  3. ;********************************************************************************
  4. 0000 27 VResetL CLR A
  5. 0001 04 09 JMP Jmp0009
  6.  
  7. 0003 94 B0 VIRQL CALL Sub04B0
  8. 0005 84 59 JMP Jmp0459
  9.  
  10. 0007 04 1B VTimerL JMP Jmp001B
  11.  
  12. 0009 37 Jmp0009 CPL A
  13. 000A 02 OUTL BUS,A
  14. 000B 98 7F ANL BUS,#$7F
  15. 000D 27 CLR A
  16. 000E B8 7F MOV R0,#Mem7F
  17. 0010 B0 2B MOV @R0,#$2B
  18. 0012 C8 DEC R0
  19. 0013 B0 8C MOV @R0,#$8C
  20. 0015 C8 DEC R0
  21. 0016 A0 Bra0016 MOV @R0,A
  22. 0017 E8 16 DJNZ R0,Bra0016
  23. 0019 14 75 CALL Sub0075
  24. 001B 23 68 Jmp001B MOV A,#$68
  25. 001D 62 MOV T,A
  26. 001E 35 DIS TCNTI
  27. 001F 55 STRT T
  28. 0020 B9 09 MOV R1,#$09
  29. 0022 27 CLR A
  30. 0023 A1 MOV @R1,A
  31. 0024 C9 DEC R1
  32. 0025 17 INC A
  33. 0026 D7 MOV PSW,A
  34. 0027 B8 23 MOV R0,#$23
  35. 0029 23 3E MOV A,#$3E
  36. 002B 60 ADD A,@R0
  37. 002C 60 ADD A,@R0
  38. 002D A1 MOV @R1,A
  39. 002E 10 INC @R0
  40. 002F F0 MOV A,@R0
  41. 0030 D3 09 XRL A,#$09
  42. 0032 96 35 JNZ Bra0035
  43. 0034 A0 MOV @R0,A
  44. 0035 B8 4D Bra0035 MOV R0,#$4D
  45. 0037 B9 24 MOV R1,#$24
  46. 0039 F4 E0 CALL Sub07E0
  47. 003B 14 50 CALL Sub0050
  48. 003D 93 RETR
  49.  
  50. 003E C4 9F JMP Jmp069F
  51.  
  52. 0040 E4 A6 D0040 DB $E4,$A6,$E4,$BA,$E4,$C0,$E4,$A6 ;........
  53. 0048 E4 A6 .... DB $E4,$BA,$24,$31,$84,$B5,$44,$87 ;..$1..D.
  54.  
  55. 0050 B8 44 Sub0050 MOV R0,#Mem44
  56. 0052 F0 MOV A,@R0
  57. 0053 C6 8F JZ Bra008F
  58. 0055 12 A5 JB0 Bra00A5
  59. 0057 04 E3 JMP Jmp00E3
  60.  
  61. 0059 B8 65 Jmp0059 MOV R0,#Mem65
  62. 005B F0 MOV A,@R0
  63. 005C 96 68 JNZ Bra0068
  64. 005E B9 7E MOV R1,#Mem7E
  65. 0060 F1 MOV A,@R1
  66. 0061 53 7F ANL A,#$7F
  67. 0063 21 XCH A,@R1
  68. 0064 37 CPL A
  69. 0065 F2 75 JB7 Sub0075
  70. 0067 10 INC @R0
  71. 0068 B9 64 Bra0068 MOV R1,#$64
  72. 006A F0 MOV A,@R0
  73. 006B 12 7B JB0 Bra007B
  74. 006D 98 7F ANL BUS,#$7F
  75. 006F F4 22 CALL Sub0722
  76. 0071 96 7A JNZ Jmp007A
  77. 0073 B0 00 MOV @R0,#$00
  78. 0075 23 F2 Sub0075 MOV A,#$F2
  79. 0077 B9 64 Jmp0077 MOV R1,#Mem64
  80. 0079 A1 MOV @R1,A
  81. 007A 83 Jmp007A RET
  82.  
  83. 007B F4 22 Bra007B CALL Sub0722
  84. 007D C6 83 JZ Bra0083
  85. 007F 88 80 ORL BUS,#$80
  86. 0081 04 7A JMP Jmp007A
  87.  
  88. 0083 10 Bra0083 INC @R0
  89. 0084 23 F6 MOV A,#$F6
  90. 0086 04 77 JMP Jmp0077
  91.  
  92. 0088 B9 7E Sub0088 MOV R1,#Mem7E
  93. 008A F1 MOV A,@R1
  94. 008B 43 80 ORL A,#$80
  95. 008D A1 MOV @R1,A
  96. 008E 83 RET
  97.  
  98. 008F B8 66 Bra008F MOV R0,#Mem66
  99. 0091 B0 00 MOV @R0,#$00
  100. 0093 B4 34 CALL Sub0534
  101. 0095 96 A3 JNZ Bra00A3
  102. 0097 FE MOV A,R6
  103. 0098 C6 A3 JZ Bra00A3
  104. 009A F4 22 CALL Sub0722
  105. 009C 96 A3 JNZ Bra00A3
  106. 009E B1 FD Bra009E MOV @R1,#$FD
  107. 00A0 19 INC R1
  108. 00A1 B1 01 MOV @R1,#$01
  109. 00A3 04 59 Bra00A3 JMP Jmp0059
  110.  
  111. 00A5 B4 34 Bra00A5 CALL Sub0534
  112. 00A7 C6 9E JZ Bra009E
  113. 00A9 F4 22 CALL Sub0722
  114. 00AB 96 C7 JNZ Bra00C7
  115. 00AD B9 45 MOV R1,#$45
  116. 00AF FA MOV A,R2
  117. 00B0 A1 MOV @R1,A
  118. 00B1 74 73 CALL Sub0373
  119. 00B3 C6 C9 JZ Bra00C9
  120. 00B5 74 77 CALL Sub0377
  121. 00B7 BB 40 MOV R3,#$40
  122. 00B9 C6 CB JZ Bra00CB
  123. 00BB 14 88 Bra00BB CALL Sub0088
  124. 00BD B9 66 MOV R1,#Mem66
  125. 00BF B1 01 MOV @R1,#$01
  126. 00C1 B9 43 Jmp00C1 MOV R1,#Mem43
  127. 00C3 B1 B5 MOV @R1,#$B5
  128. 00C5 19 INC R1
  129. 00C6 11 INC @R1
  130. 00C7 04 59 Bra00C7 JMP Jmp0059
  131.  
  132. 00C9 BB 20 Bra00C9 MOV R3,#$20
  133. 00CB FA Bra00CB MOV A,R2
  134. 00CC DB XRL A,R3
  135. 00CD 96 BB JNZ Bra00BB
  136. 00CF B8 7E MOV R0,#Mem7E
  137. 00D1 F0 MOV A,@R0
  138. 00D2 D2 BB JB6 Bra00BB
  139. 00D4 04 C1 JMP Jmp00C1
  140.  
  141. 00D6 74 77 Bra00D6 CALL Sub0377
  142. 00D8 96 E1 JNZ Bra00E1
  143. 00DA B9 7E MOV R1,#Mem7E
  144. 00DC F1 MOV A,@R1
  145. 00DD D2 E1 JB6 Bra00E1
  146. 00DF 24 05 Bra00DF JMP Jmp0105
  147.  
  148. 00E1 04 FA Bra00E1 JMP Jmp00FA
  149.  
  150. 00E3 B4 34 Jmp00E3 CALL Sub0534
  151. 00E5 C6 DF JZ Bra00DF
  152. 00E7 F4 22 CALL Sub0722
  153. 00E9 C6 DF JZ Bra00DF
  154. 00EB FA MOV A,R2
  155. 00EC D3 40 XRL A,#$40
  156. 00EE C6 D6 JZ Bra00D6
  157. 00F0 FA MOV A,R2
  158. 00F1 D3 80 XRL A,#$80
  159. 00F3 00 NOP
  160. 00F4 00 NOP
  161. 00F5 00 NOP
  162. 00F6 C6 FA JZ Jmp00FA
  163. 00F8 24 11 JMP Jmp0111
  164.  
  165. 00FA B8 45 Jmp00FA MOV R0,#$45
  166. 00FC FA MOV A,R2
  167. 00FD A0 MOV @R0,A
  168. 00FE B8 66 MOV R0,#Mem66
  169. 0100 F0 MOV A,@R0
  170. 0101 96 05 JNZ Jmp0105
  171. 0103 14 88 CALL Sub0088
  172. 0105 B8 45 Jmp0105 MOV R0,#Mem45
  173. 0107 F0 MOV A,@R0
  174. 0108 18 INC R0
  175. 0109 A0 MOV @R0,A
  176. 010A B8 43 MOV R0,#Mem43
  177. 010C B0 FD MOV @R0,#$FD
  178. 010E 18 INC R0
  179. 010F B0 00 MOV @R0,#$00
  180. 0111 B8 46 Jmp0111 MOV R0,#$46
  181. 0113 74 7B CALL Sub037B
  182. 0115 C6 2A JZ Bra012A
  183. 0117 74 73 CALL Sub0373
  184. 0119 BB 40 MOV R3,#$40
  185. 011B 96 1F JNZ Bra011F
  186. 011D BB 20 MOV R3,#$20
  187. 011F F0 Bra011F MOV A,@R0
  188. 0120 DB XRL A,R3
  189. 0121 96 28 JNZ Bra0128
  190. 0123 F1 MOV A,@R1
  191. 0124 D2 28 JB6 Bra0128
  192. 0126 B0 00 Jmp0126 MOV @R0,#$00
  193. 0128 04 59 Bra0128 JMP Jmp0059
  194.  
  195. 012A F0 Bra012A MOV A,@R0
  196. 012B 53 80 ANL A,#$80
  197. 012D C6 28 JZ Bra0128
  198. 012F 24 26 JMP Jmp0126
  199.  
  200. 0131 B9 47 D0131 DB $B9,$47,$B8,$7B,$B4,$77,$C8,$F0 ;.G.{.w..
  201. 0139 B9 47 .... DB $17,$53,$03,$A0,$B9,$2B,$B4,$A6 ;WSC..+..
  202. 0141 B9 47 .... DB $BC,$38,$BD,$FF,$B4,$70,$D4,$29 ;.8...p.)
  203. 0149 B9 47 .... DB $23,$E2,$94,$3F,$F6,$51,$24,$68 ;#..?.Q$h
  204. 0151 B9 47 .... DB $B8,$7F,$FE,$F7,$23,$02,$E6,$5B ;...#B.[
  205. 0159 B9 47 .... DB $23,$FE,$60,$AE,$03,$FB,$F2,$68 ;#.`.C..h
  206. 0161 B9 47 .... DB $03,$D6,$F7,$E6,$68,$FE,$A0,$B8 ;C...h...
  207. 0169 B9 47 .... DB $47,$B9,$2B,$D4,$50,$B8,$49,$B9 ;G.+.P.I.
  208. 0171 B9 47 .... DB $5C,$D4,$50,$E4,$27 ;\.P.'
  209.  
  210. 0176 B9 7E Jmp0176 MOV R1,#$7E
  211. 0178 B8 46 MOV R0,#$46
  212. 017A 27 CLR A
  213. 017B 20 XCH A,@R0
  214. 017C AD MOV R5,A
  215. 017D F1 MOV A,@R1
  216. 017E 37 CPL A
  217. 017F 72 84 JB3 Bra0184
  218. 0181 FD MOV A,R5
  219. 0182 C6 8B JZ Bra018B
  220. 0184 B8 4D Bra0184 MOV R0,#Mem4D
  221. 0186 B0 39 MOV @R0,#$39
  222. 0188 18 INC R0
  223. 0189 B0 FC MOV @R0,#$FC
  224. 018B B8 4D Bra018B MOV R0,#$4D
  225. 018D F4 16 CALL Sub0716
  226. 018F FD MOV A,R5
  227. 0190 12 B4 JB0 Bra01B4
  228. 0192 B2 B2 JB5 Bra01B2
  229. 0194 D2 AE JB6 Bra01AE
  230. 0196 F2 D3 JB7 Bra01D3
  231. 0198 BA FD MOV R2,#$FD
  232. 019A BD FE MOV R5,#$FE
  233. 019C 32 B0 JB1 Bra01B0
  234. 019E BD 02 MOV R5,#$02
  235. 01A0 52 B0 JB2 Bra01B0
  236. 01A2 BA E0 MOV R2,#$E0
  237. 01A4 BD EC MOV R5,#$EC
  238. 01A6 72 B0 JB3 Bra01B0
  239. 01A8 BD 14 MOV R5,#$14
  240. 01AA 92 B0 JB4 Bra01B0
  241. 01AC 44 6D JMP Bra026D
  242.  
  243. 01AE 44 1A Bra01AE JMP Jmp021A
  244.  
  245. 01B0 44 08 Bra01B0 JMP Jmp0208
  246.  
  247. 01B2 44 02 Bra01B2 JMP Jmp0202
  248.  
  249. 01B4 F1 Bra01B4 MOV A,@R1
  250. 01B5 72 C4 JB3 Bra01C4
  251. 01B7 43 6C ORL A,#$6C
  252. 01B9 A1 MOV @R1,A
  253. 01BA B8 42 MOV R0,#Mem42
  254. 01BC B0 00 MOV @R0,#$00
  255. 01BE B9 4B MOV R1,#$4B
  256. 01C0 B8 37 MOV R0,#$37
  257. 01C2 B4 77 CALL Sub0577
  258. 01C4 B8 4B Bra01C4 MOV R0,#$4B
  259. 01C6 94 AB CALL Sub04AB
  260. 01C8 B9 08 Jmp01C8 MOV R1,#$08
  261. 01CA B8 18 MOV R0,#R0
  262. 01CC B0 00 Bra01CC MOV @R0,#$00
  263. 01CE 18 INC R0
  264. 01CF E9 CC DJNZ R1,Bra01CC
  265. 01D1 44 69 JMP Jmp0269
  266.  
  267. 01D3 F1 Bra01D3 MOV A,@R1
  268. 01D4 12 DB JB0 Bra01DB
  269. 01D6 D3 20 XRL A,#$20
  270. 01D8 A1 MOV @R1,A
  271. 01D9 44 69 Bra01D9 JMP Jmp0269
  272.  
  273. 01DB B8 4B Bra01DB MOV R0,#Mem4B
  274. 01DD F0 MOV A,@R0
  275. 01DE 18 INC R0
  276. 01DF 96 F7 JNZ Bra01F7
  277. 01E1 F0 MOV A,@R0
  278. 01E2 03 6A ADD A,#$6A
  279. 01E4 F6 D9 JC Bra01D9
  280. 01E6 C8 Bra01E6 DEC R0
  281. 01E7 B8 4B MOV R0,#Mem4B
  282. 01E9 F0 MOV A,@R0
  283. 01EA 37 CPL A
  284. 01EB 53 03 ANL A,#$03
  285. 01ED A0 MOV @R0,A
  286. 01EE 18 INC R0
  287. 01EF F0 MOV A,@R0
  288. 01F0 37 CPL A
  289. 01F1 17 INC A
  290. 01F2 03 B4 ADD A,#$B4
  291. 01F4 A0 MOV @R0,A
  292. 01F5 44 69 JMP Jmp0269
  293.  
  294. 01F7 D3 03 Bra01F7 XRL A,#$03
  295. 01F9 96 D9 JNZ Bra01D9
  296. 01FB F0 MOV A,@R0
  297. 01FC 03 E2 ADD A,#$E2
  298. 01FE F6 E6 JC Bra01E6
  299. 0200 44 69 JMP Jmp0269
  300.  
  301. 0202 BB 04 Jmp0202 MOV R3,#$04
  302. 0204 B9 47 MOV R1,#$47
  303. 0206 44 36 JMP Jmp0236
  304.  
  305. 0208 B8 1E Jmp0208 MOV R0,#$1E
  306. 020A BB FF MOV R3,#$FF
  307. 020C 94 10 CALL Sub0410
  308. 020E 94 22 CALL Sub0422
  309. 0210 B8 39 MOV R0,#Mem39
  310. 0212 B0 FE MOV @R0,#$FE
  311. 0214 B8 4B MOV R0,#$4B
  312. 0216 B4 7E CALL Sub057E
  313. 0218 44 69 JMP Jmp0269
  314.  
  315. 021A B8 5C Jmp021A MOV R0,#$5C
  316. 021C 94 00 CALL Sub0400
  317. 021E D4 29 CALL Sub0629
  318. 0220 94 30 CALL Sub0430
  319. 0222 B8 5F MOV R0,#$5F
  320. 0224 94 00 CALL Sub0400
  321. 0226 D4 29 CALL Sub0629
  322. 0228 B4 70 CALL Sub0570
  323. 022A BC CD MOV R4,#$CD
  324. 022C BD FF MOV R5,#$FF
  325. 022E B4 70 CALL Sub0570
  326. 0230 F2 6D JB7 Bra026D
  327. 0232 BB 05 MOV R3,#$05
  328. 0234 B9 49 MOV R1,#$49
  329. 0236 B8 7E Jmp0236 MOV R0,#Mem7E
  330. 0238 F0 MOV A,@R0
  331. 0239 AA MOV R2,A
  332. 023A 72 3E JB3 Bra023E
  333. 023C 44 58 JMP Jmp0258
  334.  
  335. 023E DB Bra023E XRL A,R3
  336. 023F 12 52 JB0 Bra0252
  337. 0241 B8 42 MOV R0,#Mem42
  338. 0243 B0 B4 MOV @R0,#$B4
  339. 0245 B8 4B Jmp0245 MOV R0,#$4B
  340. 0247 B4 77 CALL Sub0577
  341. 0249 B9 7E MOV R1,#$7E
  342. 024B FA MOV A,R2
  343. 024C 53 C6 ANL A,#$C6
  344. 024E 4B ORL A,R3
  345. 024F A1 MOV @R1,A
  346. 0250 24 C8 JMP Jmp01C8
  347.  
  348. 0252 FA Bra0252 MOV A,R2
  349. 0253 53 BF ANL A,#$BF
  350. 0255 AA MOV R2,A
  351. 0256 44 45 JMP Jmp0245
  352.  
  353. 0258 DB Jmp0258 XRL A,R3
  354. 0259 12 52 JB0 Bra0252
  355. 025B FA MOV A,R2
  356. 025C 37 CPL A
  357. 025D D2 6D JB6 Bra026D
  358. 025F B8 42 MOV R0,#Mem42
  359. 0261 B0 FF MOV @R0,#$FF
  360. 0263 B9 37 MOV R1,#$37
  361. 0265 B8 4B MOV R0,#$4B
  362. 0267 B4 77 CALL Sub0577
  363. 0269 B8 27 Jmp0269 MOV R0,#Mem27
  364. 026B B0 00 MOV @R0,#$00
  365. 026D B9 42 Bra026D MOV R1,#Mem42
  366. 026F F1 MOV A,@R1
  367. 0270 C6 7C JZ Bra027C
  368. 0272 11 INC @R1
  369. 0273 F1 MOV A,@R1
  370. 0274 96 7C JNZ Bra027C
  371. 0276 B8 7E MOV R0,#Mem7E
  372. 0278 F0 MOV A,@R0
  373. 0279 53 BF ANL A,#$BF
  374. 027B A0 MOV @R0,A
  375. 027C 64 5C Bra027C JMP Jmp035C
  376.  
  377. 027E 09 Sub027E IN A,P1
  378. 027F B2 86 JB5 Bra0286
  379. 0281 D4 19 CALL Sub0619
  380. 0283 FE MOV A,R6
  381. 0284 37 CPL A
  382. 0285 AE MOV R6,A
  383. 0286 83 Bra0286 RET
  384.  
  385. 0287 9A 00 ANL P2,#$00
  386. 0289 BA 05 MOV R2,#$05
  387. 028B B9 E0 Bra028B MOV R1,#$E0
  388. 028D 94 6C CALL Sub046C
  389. 028F EA 8B DJNZ R2,Bra028B
  390. 0291 74 65 CALL Sub0365
  391. 0293 B8 54 MOV R0,#$54
  392. 0295 94 10 CALL Sub0410
  393. 0297 54 7E CALL Sub027E
  394. 0299 B9 70 MOV R1,#$70
  395. 029B 94 29 CALL Sub0429
  396. 029D B8 1C MOV R0,#$1C
  397. 029F 94 10 CALL Sub0410
  398. 02A1 B9 06 MOV R1,#$06
  399. 02A3 D4 6D CALL Sub066D
  400. 02A5 B9 04 MOV R1,#$04
  401. 02A7 B4 77 CALL Sub0577
  402. 02A9 B8 18 MOV R0,#$18
  403. 02AB 94 10 CALL Sub0410
  404. 02AD 94 22 CALL Sub0422
  405. 02AF B8 1E MOV R0,#$1E
  406. 02B1 F4 16 CALL Sub0716
  407. 02B3 96 CF JNZ Bra02CF
  408. 02B5 74 7B CALL Sub037B
  409. 02B7 C6 CF JZ Bra02CF
  410. 02B9 B8 18 MOV R0,#$18
  411. 02BB B9 1A MOV R1,#$1A
  412. 02BD D4 24 CALL Sub0624
  413. 02BF B9 09 MOV R1,#$09
  414. 02C1 D4 6D CALL Sub066D
  415. 02C3 D4 19 CALL Sub0619
  416. 02C5 94 10 CALL Sub0410
  417. 02C7 94 22 CALL Sub0422
  418. 02C9 B8 1A MOV R0,#$1A
  419. 02CB B9 04 MOV R1,#$04
  420. 02CD B4 77 CALL Sub0577
  421. 02CF B8 18 Bra02CF MOV R0,#$18
  422. 02D1 94 00 CALL Sub0400
  423. 02D3 94 30 CALL Sub0430
  424. 02D5 B9 52 MOV R1,#Mem52
  425. 02D7 F1 MOV A,@R1
  426. 02D8 A9 MOV R1,A
  427. 02D9 94 B0 CALL Sub04B0
  428. 02DB B4 70 Bra02DB CALL Sub0570
  429. 02DD E9 DB DJNZ R1,Bra02DB
  430. 02DF B9 06 MOV R1,#$06
  431. 02E1 D4 6D CALL Sub066D
  432. 02E3 B8 20 MOV R0,#$20
  433. 02E5 94 22 CALL Sub0422
  434. 02E7 B9 7E MOV R1,#$7E
  435. 02E9 B8 5A MOV R0,#$5A
  436. 02EB 94 AB CALL Sub04AB
  437. 02ED 18 INC R0
  438. 02EE F1 MOV A,@R1
  439. 02EF 72 F7 JB3 Bra02F7
  440. 02F1 B8 4A MOV R0,#$4A
  441. 02F3 12 F7 JB0 Bra02F7
  442. 02F5 B8 48 MOV R0,#$48
  443. 02F7 F4 83 Bra02F7 CALL Sub0783
  444. 02F9 B8 40 MOV R0,#$40
  445. 02FB D4 2B CALL Sub062B
  446. 02FD D4 29 CALL Sub0629
  447. 02FF FB MOV A,R3
  448. 0300 4A ORL A,R2
  449. 0301 C6 07 JZ Bra0307
  450. 0303 23 01 MOV A,#$01
  451. 0305 94 3F CALL Sub043F
  452. 0307 D4 2B Bra0307 CALL Sub062B
  453. 0309 94 22 CALL Sub0422
  454. 030B B8 20 MOV R0,#$20
  455. 030D 94 10 CALL Sub0410
  456. 030F 94 22 CALL Sub0422
  457. 0311 D4 29 CALL Sub0629
  458. 0313 B8 39 MOV R0,#$39
  459. 0315 94 3E CALL Sub043E
  460. 0317 F6 1F JC Bra031F
  461. 0319 B8 25 Bra0319 MOV R0,#Mem25
  462. 031B B0 C0 MOV @R0,#$C0
  463. 031D 64 51 JMP Jmp0351
  464.  
  465. 031F 4A Bra031F ORL A,R2
  466. 0320 C6 19 JZ Bra0319
  467. 0322 54 7E CALL Sub027E
  468. 0324 B8 25 MOV R0,#Mem25
  469. 0326 B0 40 MOV @R0,#$40
  470. 0328 FE MOV A,R6
  471. 0329 F2 2D JB7 Bra032D
  472. 032B B0 80 MOV @R0,#$80
  473. 032D B8 70 Bra032D MOV R0,#$70
  474. 032F 94 00 CALL Sub0400
  475. 0331 D4 29 CALL Sub0629
  476. 0333 23 C4 MOV A,#$C4
  477. 0335 94 3F CALL Sub043F
  478. 0337 F6 51 JC Jmp0351
  479. 0339 B8 24 MOV R0,#Mem24
  480. 033B B0 FD MOV @R0,#$FD
  481. 033D B8 6B MOV R0,#$6B
  482. 033F F4 16 CALL Sub0716
  483. 0341 96 5C JNZ Jmp035C
  484. 0343 B8 26 MOV R0,#Mem26
  485. 0345 B0 00 MOV @R0,#$00
  486. 0347 88 C0 ORL BUS,#$C0
  487. 0349 B4 34 Bra0349 CALL Sub0534
  488. 034B D3 01 XRL A,#$01
  489. 034D 96 49 JNZ Bra0349
  490. 034F 04 00 JMP VResetL
  491.  
  492. 0351 B8 24 Jmp0351 MOV R0,#Mem24
  493. 0353 B0 00 MOV @R0,#$00
  494. 0355 B8 6B MOV R0,#Mem6B
  495. 0357 B0 C8 MOV @R0,#$C8
  496. 0359 18 INC R0
  497. 035A B0 FB MOV @R0,#$FB
  498. 035C 42 Jmp035C MOV A,T
  499. 035D F2 5C JB7 Jmp035C
  500. 035F 23 FE MOV A,#$FE
  501. 0361 62 MOV T,A
  502. 0362 25 EN TCNTI
  503. 0363 64 63 Jmp0363 JMP Jmp0363
  504.  
  505. 0365 8A 03 Sub0365 ORL P2,#$03
  506. 0367 B9 11 Sub0367 MOV R1,#$11
  507. 0369 23 30 MOV A,#$30
  508. 036B 39 OUTL P1,A
  509. 036C 94 6C CALL Sub046C
  510. 036E 99 EF ANL P1,#$EF
  511. 0370 94 6F CALL Jmp046F
  512. 0372 83 RET
  513.  
  514. 0373 23 04 Sub0373 MOV A,#$04
  515. 0375 64 82 JMP Jmp0382
  516.  
  517. 0377 23 05 Sub0377 MOV A,#$05
  518. 0379 64 82 JMP Jmp0382
  519.  
  520. 037B 23 0C Sub037B MOV A,#$0C
  521. 037D 74 82 CALL Jmp0382
  522. 037F 53 FE ANL A,#$FE
  523. 0381 83 RET
  524.  
  525. 0382 B9 7E Jmp0382 MOV R1,#Mem7E
  526. 0384 D1 XRL A,@R1
  527. 0385 53 0D ANL A,#$0D
  528. 0387 83 RET
  529.  
  530. 0388 00 00 D0388 DB $00,$00,$00,$00,$00,$00,$00,$00 ;........
  531. 0390 00 00 .... DB $00,$00,$00,$00,$00,$01,$02,$04 ;.....ABD
  532. 0398 00 00 .... DB $08,$10,$20,$21,$06,$38,$28 ;HP !F8(
  533.  
  534. 039F 1C D039F DB $1C ;\
  535.  
  536. 03A0 14 0E D03A0 DB $14,$0E,$0A,$07,$00,$04,$09,$0D ;TNJG.DIM
  537. 03A8 14 0E .... DB $12,$16 ;RV
  538.  
  539. 03AA 1B 1F D03AA DB $1B,$1F,$23,$28,$2C,$31,$35,$39 ;[_#(,159
  540. 03B2 1B 1F .... DB $3E,$42,$46,$4B,$4F,$53,$57,$5B ;>BFKOSW[
  541. 03BA 1B 1F .... DB $60,$61,$68,$6C,$70,$74,$78,$7C ;`ahlptx|
  542. 03C2 1B 1F .... DB $80,$83,$87,$8B,$8F,$92,$96,$99 ;........
  543. 03CA 1B 1F .... DB $9D,$A0,$A4,$A7,$AB,$AE,$B1,$B4 ;........
  544. 03D2 1B 1F .... DB $B7,$BA,$BE,$C0,$C3,$C6,$C9,$CC ;........
  545. 03DA 1B 1F .... DB $CE,$D1,$D3,$D6,$D8,$DB,$DD,$DF ;........
  546. 03E2 1B 1F .... DB $E1,$E3,$E5,$E7,$E9,$EB,$EC,$EE ;........
  547. 03EA 1B 1F .... DB $F0,$F1,$F3,$F4,$F5,$F6,$F7,$F8 ;........
  548. 03F2 1B 1F .... DB $F9,$FA,$FB,$FC,$FD,$FD,$FE,$FE ;........
  549. 03FA 1B 1F .... DB $FE,$FF,$FF,$FF,$FF,$40 ;.....@
  550.  
  551. 0400 F0 Sub0400 MOV A,@R0
  552. 0401 AA MOV R2,A
  553. 0402 18 INC R0
  554. 0403 F0 MOV A,@R0
  555. 0404 AB MOV R3,A
  556. 0405 4A ORL A,R2
  557. 0406 C8 DEC R0
  558. 0407 83 RET
  559.  
  560. 0408 FA Sub0408 MOV A,R2
  561. 0409 03 01 ADD A,#$01
  562. 040B AA MOV R2,A
  563. 040C E6 0F JNC Bra040F
  564. 040E 1B INC R3
  565. 040F 83 Bra040F RET
  566.  
  567. 0410 F0 Sub0410 MOV A,@R0
  568. 0411 6A ADD A,R2
  569. 0412 AA MOV R2,A
  570. 0413 18 INC R0
  571. 0414 F0 MOV A,@R0
  572. 0415 7B ADDC A,R3
  573. 0416 AB MOV R3,A
  574. 0417 C8 DEC R0
  575. 0418 83 RET
  576.  
  577. 0419 F1 Sub0419 MOV A,@R1
  578. 041A 6A ADD A,R2
  579. 041B AA MOV R2,A
  580. 041C 19 INC R1
  581. 041D F1 MOV A,@R1
  582. 041E 7B ADDC A,R3
  583. 041F AB MOV R3,A
  584. 0420 C9 DEC R1
  585. 0421 83 RET
  586.  
  587. 0422 FA Sub0422 MOV A,R2
  588. 0423 A0 MOV @R0,A
  589. 0424 18 INC R0
  590. 0425 FB MOV A,R3
  591. 0426 A0 MOV @R0,A
  592. 0427 C8 DEC R0
  593. 0428 83 RET
  594.  
  595. 0429 FA Sub0429 MOV A,R2
  596. 042A A1 MOV @R1,A
  597. 042B 19 INC R1
  598. 042C FB MOV A,R3
  599. 042D A1 MOV @R1,A
  600. 042E C9 DEC R1
  601. 042F 83 RET
  602.  
  603. 0430 FA Sub0430 MOV A,R2
  604. 0431 2C XCH A,R4
  605. 0432 AA MOV R2,A
  606. 0433 FB MOV A,R3
  607. 0434 2D XCH A,R5
  608. 0435 AB MOV R3,A
  609. 0436 83 RET
  610.  
  611. 0437 94 30 Sub0437 CALL Sub0430
  612. 0439 D4 19 CALL Sub0619
  613. 043B 94 30 CALL Sub0430
  614. 043D 83 RET
  615.  
  616. 043E F0 Sub043E MOV A,@R0
  617. 043F AC Sub043F MOV R4,A
  618. 0440 BD FF MOV R5,#$FF
  619. 0442 F2 45 JB7 Bra0445
  620. 0444 1D INC R5
  621. 0445 B4 70 Bra0445 CALL Sub0570
  622. 0447 83 RET
  623.  
  624. 0448 F0 Sub0448 MOV A,@R0
  625. 0449 AA MOV R2,A
  626. 044A BC B4 MOV R4,#$B4
  627. 044C 27 CLR A
  628. 044D AB MOV R3,A
  629. 044E AD MOV R5,A
  630. 044F C8 DEC R0
  631. 0450 F0 MOV A,@R0
  632. 0451 C6 58 JZ Bra0458
  633. 0453 AF MOV R7,A
  634. 0454 B4 70 Bra0454 CALL Sub0570
  635. 0456 EF 54 DJNZ R7,Bra0454
  636. 0458 83 Bra0458 RET
  637.  
  638. 0459 89 3E Jmp0459 ORL P1,#$3E
  639. 045B BF 03 MOV R7,#$03
  640. 045D B9 04 MOV R1,#$04
  641. 045F 23 01 Bra045F MOV A,#$01
  642. 0461 21 XCH A,@R1
  643. 0462 37 CPL A
  644. 0463 6A ADD A,R2
  645. 0464 AA MOV R2,A
  646. 0465 27 CLR A
  647. 0466 7B ADDC A,R3
  648. 0467 AB MOV R3,A
  649. 0468 19 INC R1
  650. 0469 EF 5F DJNZ R7,Bra045F
  651. 046B 93 RETR
  652.  
  653. 046C E9 6C Sub046C DJNZ R1,Sub046C
  654. 046E 83 RET
  655.  
  656. 046F 9A F0 Jmp046F ANL P2,#$F0
  657. 0471 23 FF MOV A,#$FF
  658. 0473 AE MOV R6,A
  659. 0474 AD MOV R5,A
  660. 0475 AC MOV R4,A
  661. 0476 05 EN I
  662. 0477 23 30 MOV A,#$30
  663. 0479 39 OUTL P1,A
  664. 047A EC 7A Bra047A DJNZ R4,Bra047A
  665. 047C ED 7C Bra047C DJNZ R5,Bra047C
  666. 047E EE 7E Bra047E DJNZ R6,Bra047E
  667. 0480 15 DIS I
  668. 0481 23 3E MOV A,#$3E
  669. 0483 39 OUTL P1,A
  670. 0484 9A F0 ANL P2,#$F0
  671. 0486 83 RET
  672.  
  673. 0487 BD 01 Sub0487 MOV R5,#$01
  674. 0489 B9 7F Sub0489 MOV R1,#Mem7F
  675. 048B F1 MOV A,@R1
  676. 048C A9 MOV R1,A
  677. 048D 8A 08 ORL P2,#$08
  678. 048F BA 2C MOV R2,#$2C
  679. 0491 23 30 MOV A,#$30
  680. 0493 DD Bra0493 XRL A,R5
  681. 0494 E9 A8 DJNZ R1,Bra04A8
  682. 0496 19 INC R1
  683. 0497 4B ORL A,R3
  684. 0498 39 Jmp0498 OUTL P1,A
  685. 0499 53 E7 ANL A,#$E7
  686. 049B 00 NOP
  687. 049C 00 NOP
  688. 049D BC 0A MOV R4,#$0A
  689. 049F 39 OUTL P1,A
  690. 04A0 EC A0 Bra04A0 DJNZ R4,Bra04A0
  691. 04A2 EA 93 DJNZ R2,Bra0493
  692. 04A4 99 20 ANL P1,#$20
  693. 04A6 84 6F JMP Jmp046F
  694.  
  695. 04A8 00 Bra04A8 NOP
  696. 04A9 84 98 JMP Jmp0498
  697.  
  698. 04AB 94 B0 Sub04AB CALL Sub04B0
  699. 04AD 94 22 CALL Sub0422
  700. 04AF 83 RET
  701.  
  702. 04B0 BA 00 Sub04B0 MOV R2,#$00
  703. 04B2 BB 00 MOV R3,#$00
  704. 04B4 83 RET
  705.  
  706. 04B5 74 77 CALL Sub0377
  707. 04B7 96 C1 JNZ Bra04C1
  708. 04B9 B8 67 MOV R0,#$67
  709. 04BB F4 16 CALL Sub0716
  710. 04BD 96 C8 JNZ Bra04C8
  711. 04BF 14 88 CALL Sub0088
  712. 04C1 B8 67 Bra04C1 MOV R0,#Mem67
  713. 04C3 B0 1D MOV @R0,#$1D
  714. 04C5 18 INC R0
  715. 04C6 B0 FE MOV @R0,#$FE
  716. 04C8 B9 69 Bra04C8 MOV R1,#$69
  717. 04CA B8 7E MOV R0,#Mem7E
  718. 04CC F0 MOV A,@R0
  719. 04CD C8 DEC R0
  720. 04CE 20 XCH A,@R0
  721. 04CF D0 XRL A,@R0
  722. 04D0 53 0D ANL A,#$0D
  723. 04D2 96 E6 JNZ Bra04E6
  724. 04D4 F4 22 CALL Sub0722
  725. 04D6 C6 DC JZ Bra04DC
  726. 04D8 88 40 ORL BUS,#$40
  727. 04DA 84 FB JMP Jmp04FB
  728.  
  729. 04DC 19 Bra04DC INC R1
  730. 04DD F4 22 CALL Sub0722
  731. 04DF C9 DEC R1
  732. 04E0 C6 E6 JZ Bra04E6
  733. 04E2 98 BF ANL BUS,#$BF
  734. 04E4 84 FB JMP Jmp04FB
  735.  
  736. 04E6 BA E0 Bra04E6 MOV R2,#$E0
  737. 04E8 BB FD MOV R3,#$FD
  738. 04EA 74 7B CALL Sub037B
  739. 04EC C6 F7 JZ Bra04F7
  740. 04EE FA MOV A,R2
  741. 04EF 2B XCH A,R3
  742. 04F0 AA MOV R2,A
  743. 04F1 74 77 CALL Sub0377
  744. 04F3 C6 F7 JZ Bra04F7
  745. 04F5 BA 00 MOV R2,#$00
  746. 04F7 B8 69 Bra04F7 MOV R0,#$69
  747. 04F9 94 22 CALL Sub0422
  748. 04FB BE 07 Jmp04FB MOV R6,#$07
  749. 04FD 98 DF ANL BUS,#$DF
  750. 04FF B4 1F CALL Sub051F
  751. 0501 98 EF ANL BUS,#$EF
  752. 0503 B4 1F CALL Sub051F
  753. 0505 98 F7 ANL BUS,#$F7
  754. 0507 B4 1F CALL Sub051F
  755. 0509 98 FB ANL BUS,#$FB
  756. 050B B4 1F CALL Sub051F
  757. 050D 98 FD ANL BUS,#$FD
  758. 050F B4 1F CALL Sub051F
  759. 0511 98 FE ANL BUS,#$FE
  760. 0513 B4 1F CALL Sub051F
  761. 0515 B4 1F CALL Sub051F
  762. 0517 B9 00 MOV R1,#$00
  763. 0519 94 6C CALL Sub046C
  764. 051B 94 6C CALL Sub046C
  765. 051D 64 5C JMP Jmp035C
  766.  
  767. 051F FE Sub051F MOV A,R6
  768. 0520 C6 31 JZ Bra0531
  769. 0522 07 DEC A
  770. 0523 AE MOV R6,A
  771. 0524 C6 28 JZ Bra0528
  772. 0526 56 31 JT1 Bra0531
  773. 0528 23 9D Bra0528 MOV A,#$9D
  774. 052A 6E ADD A,R6
  775. 052B E3 MOVP3 A,@A
  776. 052C B8 52 MOV R0,#Mem52
  777. 052E A0 MOV @R0,A
  778. 052F BE 00 MOV R6,#$00
  779. 0531 88 3F Bra0531 ORL BUS,#$3F
  780. 0533 83 RET
  781.  
  782. 0534 B8 26 Sub0534 MOV R0,#$26
  783. 0536 BA 00 MOV R2,#$00
  784. 0538 BE 06 MOV R6,#$06
  785. 053A BC 40 MOV R4,#$40
  786. 053C FC Bra053C MOV A,R4
  787. 053D 77 RR A
  788. 053E AC MOV R4,A
  789. 053F D3 3F XRL A,#$3F
  790. 0541 40 ORL A,@R0
  791. 0542 3A OUTL P2,A
  792. 0543 B9 0A MOV R1,#$0A
  793. 0545 94 6C CALL Sub046C
  794. 0547 36 4C JT0 Bra054C
  795. 0549 FA MOV A,R2
  796. 054A 4C ORL A,R4
  797. 054B AA MOV R2,A
  798. 054C EE 3C Bra054C DJNZ R6,Bra053C
  799. 054E F0 MOV A,@R0
  800. 054F 3A OUTL P2,A
  801. 0550 BE 09 MOV R6,#$09
  802. 0552 B8 94 MOV R0,#$94
  803. 0554 F8 Bra0554 MOV A,R0
  804. 0555 E3 MOVP3 A,@A
  805. 0556 DA XRL A,R2
  806. 0557 C6 5E JZ Bra055E
  807. 0559 18 INC R0
  808. 055A EE 54 DJNZ R6,Bra0554
  809. 055C BA 00 MOV R2,#$00
  810. 055E FA Bra055E MOV A,R2
  811. 055F D3 21 XRL A,#$21
  812. 0561 96 65 JNZ Bra0565
  813. 0563 BA 40 MOV R2,#$40
  814. 0565 FA Bra0565 MOV A,R2
  815. 0566 D3 06 XRL A,#$06
  816. 0568 96 6C JNZ Bra056C
  817. 056A BA 80 MOV R2,#$80
  818. 056C FA Bra056C MOV A,R2
  819. 056D B9 43 MOV R1,#$43
  820. 056F 83 RET
  821.  
  822. 0570 FA Sub0570 MOV A,R2
  823. 0571 6C ADD A,R4
  824. 0572 AA MOV R2,A
  825. 0573 FB MOV A,R3
  826. 0574 7D ADDC A,R5
  827. 0575 AB MOV R3,A
  828. 0576 83 RET
  829.  
  830. 0577 F1 Sub0577 MOV A,@R1
  831. 0578 A0 MOV @R0,A
  832. 0579 19 INC R1
  833. 057A 18 INC R0
  834. 057B F1 MOV A,@R1
  835. 057C A0 MOV @R0,A
  836. 057D 83 RET
  837.  
  838. 057E BA FF Sub057E MOV R2,#$FF
  839. 0580 FD MOV A,R5
  840. 0581 F2 84 JB7 Bra0584
  841. 0583 1A INC R2
  842. 0584 F0 Bra0584 MOV A,@R0
  843. 0585 AC MOV R4,A
  844. 0586 18 INC R0
  845. 0587 F0 MOV A,@R0
  846. 0588 6D ADD A,R5
  847. 0589 AD MOV R5,A
  848. 058A 27 CLR A
  849. 058B 7A ADDC A,R2
  850. 058C F2 A0 JB7 Bra05A0
  851. 058E 23 4C MOV A,#$4C
  852. 0590 6D ADD A,R5
  853. 0591 AD MOV R5,A
  854. 0592 27 CLR A
  855. 0593 13 FF ADDC A,#$FF
  856. 0595 F2 A1 JB7 Bra05A1
  857. 0597 1C INC R4
  858. 0598 FD MOV A,R5
  859. 0599 A0 Jmp0599 MOV @R0,A
  860. 059A C8 DEC R0
  861. 059B FC MOV A,R4
  862. 059C 53 03 ANL A,#$03
  863. 059E A0 MOV @R0,A
  864. 059F 83 RET
  865.  
  866. 05A0 CC Bra05A0 DEC R4
  867. 05A1 23 B4 Bra05A1 MOV A,#$B4
  868. 05A3 6D ADD A,R5
  869. 05A4 A4 99 JMP Jmp0599
  870.  
  871. 05A6 94 30 Jmp05A6 CALL Sub0430
  872. 05A8 85 CLR F0
  873. 05A9 F0 MOV A,@R0
  874. 05AA 12 AD JB0 Bra05AD
  875. 05AC 95 CPL F0
  876. 05AD 18 Bra05AD INC R0
  877. 05AE F0 MOV A,@R0
  878. 05AF 37 CPL A
  879. 05B0 17 INC A
  880. 05B1 03 B4 ADD A,#$B4
  881. 05B3 20 XCH A,@R0
  882. 05B4 B6 B7 JF0 Bra05B7
  883. 05B6 F0 MOV A,@R0
  884. 05B7 97 Bra05B7 CLR C
  885. 05B8 67 RRC A
  886. 05B9 AB MOV R3,A
  887. 05BA E6 BD JNC Bra05BD
  888. 05BC 1B INC R3
  889. 05BD 03 A4 Bra05BD ADD A,#$A4
  890. 05BF E3 MOVP3 A,@A
  891. 05C0 2B XCH A,R3
  892. 05C1 03 A4 ADD A,#$A4
  893. 05C3 E3 MOVP3 A,@A
  894. 05C4 6B ADD A,R3
  895. 05C5 67 RRC A
  896. 05C6 AB MOV R3,A
  897. 05C7 AB MOV R3,A
  898. 05C8 F1 MOV A,@R1
  899. 05C9 AE MOV R6,A
  900. 05CA 19 INC R1
  901. 05CB F1 MOV A,@R1
  902. 05CC F2 D0 JB7 Bra05D0
  903. 05CE A4 D8 JMP Jmp05D8
  904.  
  905. 05D0 37 Bra05D0 CPL A
  906. 05D1 2E XCH A,R6
  907. 05D2 37 CPL A
  908. 05D3 03 01 ADD A,#$01
  909. 05D5 2E XCH A,R6
  910. 05D6 13 00 ADDC A,#$00
  911. 05D8 85 Jmp05D8 CLR F0
  912. 05D9 95 CPL F0
  913. 05DA 67 RRC A
  914. 05DB E6 E1 JNC Bra05E1
  915. 05DD FE MOV A,R6
  916. 05DE 67 RRC A
  917. 05DF AE MOV R6,A
  918. 05E0 85 CLR F0
  919. 05E1 BF 08 Bra05E1 MOV R7,#$08
  920. 05E3 BA 00 MOV R2,#$00
  921. 05E5 FB Bra05E5 MOV A,R3
  922. 05E6 97 CLR C
  923. 05E7 67 RRC A
  924. 05E8 AB MOV R3,A
  925. 05E9 F6 EE JC Bra05EE
  926. 05EB FA MOV A,R2
  927. 05EC A4 F0 JMP Jmp05F0
  928.  
  929. 05EE FE Bra05EE MOV A,R6
  930. 05EF 6A ADD A,R2
  931. 05F0 67 Jmp05F0 RRC A
  932. 05F1 AA MOV R2,A
  933. 05F2 EF E5 DJNZ R7,Bra05E5
  934. 05F4 B6 FB JF0 Bra05FB
  935. 05F6 6A ADD A,R2
  936. 05F7 AA MOV R2,A
  937. 05F8 E6 FB JNC Bra05FB
  938. 05FA 1B INC R3
  939. 05FB C8 Bra05FB DEC R0
  940. 05FC F0 MOV A,@R0
  941. 05FD D3 80 XRL A,#$80
  942. 05FF A0 MOV @R0,A
  943. 0600 00 NOP
  944. 0601 00 NOP
  945. 0602 F2 05 JB7 Bra0605
  946. 0604 17 INC A
  947. 0605 77 Bra0605 RR A
  948. 0606 77 RR A
  949. 0607 D1 XRL A,@R1
  950. 0608 F7 RLC A
  951. 0609 E6 0D JNC Bra060D
  952. 060B D4 19 CALL Sub0619
  953. 060D F0 Bra060D MOV A,@R0
  954. 060E F2 15 JB7 Bra0615
  955. 0610 D4 19 CALL Sub0619
  956. 0612 B4 70 CALL Sub0570
  957. 0614 83 RET
  958.  
  959. 0615 19 Bra0615 INC R1
  960. 0616 19 INC R1
  961. 0617 A4 A6 JMP Jmp05A6
  962.  
  963. 0619 FA Sub0619 MOV A,R2
  964. 061A 37 CPL A
  965. 061B 03 01 ADD A,#$01
  966. 061D AA MOV R2,A
  967. 061E FB MOV A,R3
  968. 061F 37 CPL A
  969. 0620 13 00 ADDC A,#$00
  970. 0622 AB MOV R3,A
  971. 0623 83 RET
  972.  
  973. 0624 94 00 Sub0624 CALL Sub0400
  974. 0626 94 19 CALL Sub0419
  975. 0628 83 RET
  976.  
  977. 0629 FB Sub0629 MOV A,R3
  978. 062A AE MOV R6,A
  979. 062B FE Sub062B MOV A,R6
  980. 062C F7 RLC A
  981. 062D E6 31 JNC Bra0631
  982. 062F D4 19 CALL Sub0619
  983. 0631 83 Bra0631 RET
  984.  
  985. 0632 B9 28 Sub0632 MOV R1,#Mem28
  986. 0634 F1 MOV A,@R1
  987. 0635 AF MOV R7,A
  988. 0636 19 INC R1
  989. 0637 94 19 Sub0637 CALL Sub0419
  990. 0639 D4 19 Sub0639 CALL Sub0619
  991. 063B 94 10 CALL Sub0410
  992. 063D D4 19 CALL Sub0619
  993. 063F 18 INC R0
  994. 0640 18 INC R0
  995. 0641 94 3E CALL Sub043E
  996. 0643 FF MOV A,R7
  997. 0644 A9 MOV R1,A
  998. 0645 D4 6D CALL Sub066D
  999. 0647 FC MOV A,R4
  1000. 0648 A0 MOV @R0,A
  1001. 0649 C8 DEC R0
  1002. 064A C8 DEC R0
  1003. 064B 94 10 CALL Sub0410
  1004. 064D 94 22 CALL Sub0422
  1005. 064F 83 RET
  1006.  
  1007. 0650 B4 A6 CALL Jmp05A6
  1008. 0652 D4 19 CALL Sub0619
  1009. 0654 B9 03 MOV R1,#$03
  1010. 0656 D4 6D CALL Sub066D
  1011. 0658 FA MOV A,R2
  1012. 0659 AD MOV R5,A
  1013. 065A C6 65 JZ Bra0665
  1014. 065C F7 RLC A
  1015. 065D 1D INC R5
  1016. 065E E6 62 JNC Bra0662
  1017. 0660 CD DEC R5
  1018. 0661 CD Bra0661 DEC R5
  1019. 0662 B4 7E Bra0662 CALL Sub057E
  1020. 0664 83 RET
  1021.  
  1022. 0665 FC Bra0665 MOV A,R4
  1023. 0666 C6 62 JZ Bra0662
  1024. 0668 F2 61 JB7 Bra0661
  1025. 066A 1D INC R5
  1026. 066B C4 62 JMP Bra0662
  1027.  
  1028. 066D 27 Sub066D CLR A
  1029. 066E AC MOV R4,A
  1030. 066F AD MOV R5,A
  1031. 0670 F9 MOV A,R1
  1032. 0671 C6 9A JZ Bra069A
  1033. 0673 03 F0 ADD A,#$F0
  1034. 0675 37 CPL A
  1035. 0676 17 INC A
  1036. 0677 AF MOV R7,A
  1037. 0678 D4 29 CALL Sub0629
  1038. 067A 97 Bra067A CLR C
  1039. 067B FB MOV A,R3
  1040. 067C 67 RRC A
  1041. 067D 2A XCH A,R2
  1042. 067E 67 RRC A
  1043. 067F 2A XCH A,R2
  1044. 0680 AB MOV R3,A
  1045. 0681 FD MOV A,R5
  1046. 0682 67 RRC A
  1047. 0683 2C XCH A,R4
  1048. 0684 67 RRC A
  1049. 0685 2C XCH A,R4
  1050. 0686 AD MOV R5,A
  1051. 0687 E9 7A DJNZ R1,Bra067A
  1052. 0689 97 Bra0689 CLR C
  1053. 068A FD MOV A,R5
  1054. 068B 67 RRC A
  1055. 068C 2C XCH A,R4
  1056. 068D 67 RRC A
  1057. 068E 2C XCH A,R4
  1058. 068F AD MOV R5,A
  1059. 0690 EF 89 DJNZ R7,Bra0689
  1060. 0692 FE MOV A,R6
  1061. 0693 F7 RLC A
  1062. 0694 E6 9A JNC Bra069A
  1063. 0696 D4 19 CALL Sub0619
  1064. 0698 94 37 CALL Sub0437
  1065. 069A 83 Bra069A RET
  1066.  
  1067. 069B E4 08 Bra069B JMP Jmp0708
  1068.  
  1069. 069D E4 06 Bra069D JMP Jmp0706
  1070.  
  1071. 069F 89 40 Jmp069F ORL P1,#$40
  1072. 06A1 BD 00 MOV R5,#$00
  1073. 06A3 BB 14 MOV R3,#$14
  1074. 06A5 94 89 CALL Sub0489
  1075. 06A7 D4 19 CALL Sub0619
  1076. 06A9 B8 29 MOV R0,#$29
  1077. 06AB 94 22 CALL Sub0422
  1078. 06AD 8A 07 ORL P2,#$07
  1079. 06AF 74 67 CALL Sub0367
  1080. 06B1 B8 54 MOV R0,#$54
  1081. 06B3 D4 19 CALL Sub0619
  1082. 06B5 94 22 CALL Sub0422
  1083. 06B7 B8 20 MOV R0,#$20
  1084. 06B9 94 00 CALL Sub0400
  1085. 06BB BF 02 MOV R7,#$02
  1086. 06BD B8 72 MOV R0,#$72
  1087. 06BF D4 39 CALL Sub0639
  1088. 06C1 B9 39 MOV R1,#$39
  1089. 06C3 23 FE MOV A,#$FE
  1090. 06C5 21 XCH A,@R1
  1091. 06C6 AF MOV R7,A
  1092. 06C7 74 73 CALL Sub0373
  1093. 06C9 96 9D JNZ Bra069D
  1094. 06CB F1 MOV A,@R1
  1095. 06CC B2 9D JB5 Bra069D
  1096. 06CE B9 3A MOV R1,#$3A
  1097. 06D0 F4 22 CALL Sub0722
  1098. 06D2 96 D9 JNZ Bra06D9
  1099. 06D4 B1 B8 MOV @R1,#$B8
  1100. 06D6 19 INC R1
  1101. 06D7 B1 FE MOV @R1,#$FE
  1102. 06D9 D4 29 Bra06D9 CALL Sub0629
  1103. 06DB FF MOV A,R7
  1104. 06DC 94 3F CALL Sub043F
  1105. 06DE E6 9B JNC Bra069B
  1106. 06E0 B8 22 MOV R0,#$22
  1107. 06E2 FE MOV A,R6
  1108. 06E3 20 XCH A,@R0
  1109. 06E4 D0 XRL A,@R0
  1110. 06E5 37 CPL A
  1111. 06E6 F2 9B JB7 Bra069B
  1112. 06E8 B9 3B MOV R1,#$3B
  1113. 06EA F4 22 CALL Sub0722
  1114. 06EC 96 9B JNZ Bra069B
  1115. 06EE B1 FE MOV @R1,#$FE
  1116. 06F0 C9 DEC R1
  1117. 06F1 B1 B8 MOV @R1,#$B8
  1118. 06F3 CF DEC R7
  1119. 06F4 B8 39 Jmp06F4 MOV R0,#$39
  1120. 06F6 FF MOV A,R7
  1121. 06F7 03 02 ADD A,#$02
  1122. 06F9 F6 9D JC Bra069D
  1123. 06FB 37 CPL A
  1124. 06FC F2 9D JB7 Bra069D
  1125. 06FE FF MOV A,R7
  1126. 06FF A0 MOV @R0,A
  1127. 0700 03 14 ADD A,#$14
  1128. 0702 F6 06 JC Jmp0706
  1129. 0704 B0 EC MOV @R0,#$EC
  1130. 0706 24 76 Jmp0706 JMP Jmp0176
  1131.  
  1132. 0708 B8 3C Jmp0708 MOV R0,#$3C
  1133. 070A F4 16 CALL Sub0716
  1134. 070C 96 14 JNZ Bra0714
  1135. 070E B0 20 MOV @R0,#$20
  1136. 0710 18 INC R0
  1137. 0711 B0 FE MOV @R0,#$FE
  1138. 0713 1F INC R7
  1139. 0714 C4 F4 Bra0714 JMP Jmp06F4
  1140.  
  1141. 0716 94 00 Sub0716 CALL Sub0400
  1142. 0718 96 1C JNZ Bra071C
  1143. 071A E4 20 JMP Jmp0720
  1144.  
  1145. 071C 94 08 Bra071C CALL Sub0408
  1146. 071E 94 22 CALL Sub0422
  1147. 0720 4A Jmp0720 ORL A,R2
  1148. 0721 83 RET
  1149.  
  1150. 0722 F1 Sub0722 MOV A,@R1
  1151. 0723 C6 26 JZ Bra0726
  1152. 0725 11 INC @R1
  1153. 0726 83 Bra0726 RET
  1154.  
  1155. 0727 74 7B CALL Sub037B
  1156. 0729 C6 41 JZ Bra0741
  1157. 072B F1 MOV A,@R1
  1158. 072C 12 58 JB0 Bra0758
  1159. 072E B8 1E MOV R0,#R6
  1160. 0730 F0 MOV A,@R0
  1161. 0731 18 INC R0
  1162. 0732 40 ORL A,@R0
  1163. 0733 96 41 JNZ Bra0741
  1164. 0735 B8 40 MOV R0,#$40
  1165. 0737 94 00 CALL Sub0400
  1166. 0739 D4 29 Jmp0739 CALL Sub0629
  1167. 073B 23 E2 MOV A,#$E2
  1168. 073D 94 3F CALL Sub043F
  1169. 073F F6 4E JC Bra074E
  1170. 0741 B8 31 Bra0741 MOV R0,#Mem31
  1171. 0743 B0 A7 MOV @R0,#$A7
  1172. 0745 18 INC R0
  1173. 0746 B0 FC MOV @R0,#$FC
  1174. 0748 18 INC R0
  1175. 0749 B0 60 MOV @R0,#$60
  1176. 074B 18 INC R0
  1177. 074C B0 FF MOV @R0,#$FF
  1178. 074E B8 33 Bra074E MOV R0,#$33
  1179. 0750 F4 16 Bra0750 CALL Sub0716
  1180. 0752 96 56 JNZ Bra0756
  1181. 0754 14 88 CALL Sub0088
  1182. 0756 64 5C Bra0756 JMP Jmp035C
  1183.  
  1184. 0758 B9 27 Bra0758 MOV R1,#Mem27
  1185. 075A F1 MOV A,@R1
  1186. 075B 12 7B JB0 Bra077B
  1187. 075D B8 4A MOV R0,#$4A
  1188. 075F F4 83 CALL Sub0783
  1189. 0761 D4 29 CALL Sub0629
  1190. 0763 B8 62 MOV R0,#$62
  1191. 0765 94 22 CALL Sub0422
  1192. 0767 23 FD MOV A,#$FD
  1193. 0769 94 3F CALL Sub043F
  1194. 076B B8 31 MOV R0,#$31
  1195. 076D F6 50 JC Bra0750
  1196. 076F B9 27 MOV R1,#Mem27
  1197. 0771 B1 01 MOV @R1,#$01
  1198. 0773 B9 47 MOV R1,#$47
  1199. 0775 B8 35 MOV R0,#$35
  1200. 0777 B4 77 CALL Sub0577
  1201. 0779 E4 41 JMP Bra0741
  1202.  
  1203. 077B B8 48 Bra077B MOV R0,#$48
  1204. 077D B9 36 MOV R1,#$36
  1205. 077F F4 85 CALL Sub0785
  1206. 0781 E4 39 JMP Jmp0739
  1207.  
  1208. 0783 B9 4C Sub0783 MOV R1,#$4C
  1209. 0785 94 48 Sub0785 CALL Sub0448
  1210. 0787 B8 5A MOV R0,#$5A
  1211. 0789 94 22 CALL Sub0422
  1212. 078B F9 MOV A,R1
  1213. 078C 28 XCH A,R0
  1214. 078D A9 MOV R1,A
  1215. 078E 94 48 CALL Sub0448
  1216. 0790 D4 19 CALL Sub0619
  1217. 0792 94 19 CALL Sub0419
  1218. 0794 D4 29 CALL Sub0629
  1219. 0796 BC 98 MOV R4,#$98
  1220. 0798 BD FE MOV R5,#$FE
  1221. 079A B4 70 CALL Sub0570
  1222. 079C 4A ORL A,R2
  1223. 079D C6 A1 JZ Bra07A1
  1224. 079F F6 A3 JC Bra07A3
  1225. 07A1 94 37 Bra07A1 CALL Sub0437
  1226. 07A3 B4 70 Bra07A3 CALL Sub0570
  1227. 07A5 83 RET
  1228.  
  1229. 07A6 B8 28 MOV R0,#Mem28
  1230. 07A8 B0 06 MOV @R0,#$06
  1231. 07AA 74 77 CALL Sub0377
  1232. 07AC C6 B0 JZ Bra07B0
  1233. 07AE B0 03 MOV @R0,#$03
  1234. 07B0 BB 12 Bra07B0 MOV R3,#$12
  1235. 07B2 B8 2B MOV R0,#$2B
  1236. 07B4 94 87 Jmp07B4 CALL Sub0487
  1237. 07B6 D4 32 CALL Sub0632
  1238. 07B8 64 5C JMP Jmp035C
  1239.  
  1240. 07BA BB 14 MOV R3,#$14
  1241. 07BC B8 2E MOV R0,#$2E
  1242. 07BE E4 B4 JMP Jmp07B4
  1243.  
  1244. 07C0 8A 01 ORL P2,#$01
  1245. 07C2 B8 5C MOV R0,#$5C
  1246. 07C4 F4 CE CALL Sub07CE
  1247. 07C6 8A 02 ORL P2,#$02
  1248. 07C8 B8 5F MOV R0,#$5F
  1249. 07CA F4 CE CALL Sub07CE
  1250. 07CC 24 76 JMP Jmp0176
  1251.  
  1252. 07CE B9 0F Sub07CE MOV R1,#$0F
  1253. 07D0 23 30 MOV A,#$30
  1254. 07D2 39 OUTL P1,A
  1255. 07D3 94 6C CALL Sub046C
  1256. 07D5 99 EF ANL P1,#$EF
  1257. 07D7 94 6F CALL Jmp046F
  1258. 07D9 BF 04 MOV R7,#$04
  1259. 07DB B9 54 MOV R1,#$54
  1260. 07DD D4 37 CALL Sub0637
  1261. 07DF 83 RET
  1262.  
  1263. 07E0 94 00 Sub07E0 CALL Sub0400
  1264. 07E2 96 F2 JNZ Bra07F2
  1265. 07E4 B8 18 MOV R0,#$18
  1266. 07E6 94 AB CALL Sub04AB
  1267. 07E8 B8 4B MOV R0,#$4B
  1268. 07EA 94 AB CALL Sub04AB
  1269. 07EC 27 CLR A
  1270. 07ED A1 MOV @R1,A
  1271. 07EE B8 25 MOV R0,#Mem25
  1272. 07F0 B0 00 MOV @R0,#$00
  1273. 07F2 F4 22 Bra07F2 CALL Sub0722
  1274. 07F4 19 INC R1
  1275. 07F5 C6 FB JZ Bra07FB
  1276. 07F7 23 C0 MOV A,#$C0
  1277. 07F9 E4 FC JMP Jmp07FC
  1278.  
  1279. 07FB F1 Bra07FB MOV A,@R1
  1280. 07FC 19 Jmp07FC INC R1
  1281. 07FD A1 MOV @R1,A
  1282. 07FE 3A OUTL P2,A
  1283. 07FF 83 RET
  1284.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement