API tools faq
paste
Advertisement
Guest User

WD1003-CMD controller firmware

a guest
Aug 23rd, 2014
328
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 96.80 KB | None | 0 0
raw download clone embed print report
  1. 000-1000 root
  2. ;-----------------------------------------------------------------------------------------
  3. ;-----------------------------------------------------------------------------------------
  4. 000 e4 01 | | JMP 0x701 ; >:T:701
  5. 002 03 | | .XXX
  6. 003 93 | | RETR ; R:T:None
  7. 004 00 00 | | .Fill 00[03]
  8. 006 00 | |
  9. 007 93 | | RETR ; R:T:None
  10. 008 00 00 | | .Fill 00[02]
  11. 00a c0 | | .BYTE 0xc0
  12. 00b 21 |! | .BYTE 0x21
  13. 00c 8f | | .BYTE 0x8f
  14. 00d a4 | | .BYTE 0xa4
  15. 00e 8f | | .BYTE 0x8f
  16. 00f 23 |# | .BYTE 0x23
  17. 010 25 |% | .BYTE 0x25
  18. 011 8f | | .BYTE 0x8f
  19. 012 27 |' | .BYTE 0x27
  20. 013 8f | | .BYTE 0x8f
  21. 014 29 |) | .BYTE 0x29
  22. 015 2b |+ | .BYTE 0x2b
  23. 016 2f |/ | .BYTE 0x2f
  24. 017 2d |- | .BYTE 0x2d
  25. 018 8f | | .BYTE 0x8f
  26. 019 d2 | | .BYTE 0xd2
  27. 01a 8f | | .BYTE 0x8f
  28. 01b 8f | | .BYTE 0x8f
  29. 01c 8f | | .BYTE 0x8f
  30. 01d 8f | | .BYTE 0x8f
  31. 01e e7 | | .BYTE 0xe7
  32. 01f 31 |1 | .BYTE 0x31
  33. 020 33 |3 | .BYTE 0x33
  34. 021-147 segment
  35. 021-023 bb
  36. 021 84 03 | | CMD_01: JMP CMD_01 ; >:T:403
  37. 023-025 bb
  38. 023 84 49 | I| CMD_05: JMP CMD_05 ; >:T:449
  39. 025-027 bb
  40. 025 84 38 | 8| CMD_06: JMP CMD_06 ; >:T:438
  41. 027-029 bb
  42. 027 64 04 |d | CMD_08: JMP CMD_08 ; >:T:304
  43. 029-02b bb
  44. 029 64 e9 |d | CMD_0a: JMP CMD_0a ; >:T:3e9
  45. 02b-02d bb
  46. 02b 84 00 | | CMD_0b: JMP CMD_0b ; >:T:400
  47. 02d-02f bb
  48. 02d 84 17 | | CMD_0d: JMP CMD_0d ; >:T:417
  49. 02f-031 bb
  50. 02f 24 9e |$ | CMD_0c: JMP CMD_0c ; >:T:19e
  51. 031-033 bb
  52. 031 64 00 |d | CMD_15: JMP CMD_15 ; >:T:300
  53. 033-035 bb
  54. 033 64 e5 |d | CMD_16: JMP CMD_16 ; >:T:3e5
  55. 035-038 bb
  56. 035 fb | | MOV A,R3
  57. 036 c6 3c | <| JZ 0x03c ; >:Z:03c >:NZ:038
  58. 038-03c bb
  59. 038 23 1a |# | MOV A,#0x1a
  60. 03a 04 3e | >| JMP 0x03e ; >:T:03e
  61. 03c-03e bb
  62. 03c 23 0a |# | MOV A,#0x0a
  63. 03e-040 bb
  64. 03e 6a |j | ADD A,R2
  65. 03f b3 | | JMPP @A ; >:?:None >:x:0c0 >:x:021 >:x:08f >:x:0a4 >:x:08f
  66. ; >:x:023 >:x:025 >:x:08f >:x:027 >:x:08f >:x:029
  67. ; >:x:02b >:x:02f >:x:02d >:x:08f >:x:0d2 >:x:08f
  68. ; >:x:08f >:x:08f >:x:08f >:x:0e7 >:x:031 >:x:033
  69. 040-042 bb
  70. 040 26 40 |&@| JNT0 0x040 ; >:NT0:040 >:NNT0:042
  71. 042-044 bb
  72. 042 04 44 | D| JMP 0x044 ; >:T:044
  73. 044-05b bb
  74. 044 85 | | CLR F0
  75. 045 a5 | | CLR F1
  76. 046 27 |' | CLR A
  77. 047 d7 | | MOV PSW,A
  78. 048 b8 3d | =| MOV R0,#0x3d
  79. 04a a0 | | MOV @R0,A
  80. 04b 89 08 | | ORL P1,#0x08
  81. 04d 54 4d |TM| CALL 0x24d ; C:T:24d
  82. 04f b8 20 | | MOV R0,#0x20
  83. 051 bc 01 | | MOV R4,#0x01
  84. 053 54 5f |T_| CALL 0x25f ; C:T:25f
  85. 055 b8 20 | | MOV R0,#0x20
  86. 057 f0 | | MOV A,@R0
  87. 058 37 |7 | CPL A
  88. 059 c6 63 | c| JZ 0x063 ; >:Z:063 >:NZ:05b
  89. 05b-05d bb
  90. 05b 99 b0 | | ANL P1,#0xb0
  91. 05d-05f bb
  92. 05d 36 5d |6]| JT0 0x05d ; >:T0:05d >:NT0:05f
  93. 05f-063 bb
  94. 05f 89 40 | @| ORL P1,#0x40
  95. 061 04 40 | @| JMP 0x040 ; >:T:040
  96. 063-086 bb
  97. 063 23 9f |# | MOV A,#0x9f
  98. 065 02 | | OUTL BUS,A
  99. 066 54 f0 |T | CALL toggle_P1.7() ; C:T:2f0
  100. 068 d4 b2 | | CALL memcpy(0x1d,0x35,3) ; C:T:6b2
  101. 06a b9 1d | | MOV R1,#0x1d
  102. 06c bc 05 | | MOV R4,#0x05
  103. 06e 54 5f |T_| CALL 0x25f ; C:T:25f
  104. 070 54 cf |T | CALL 0x2cf ; C:T:2cf
  105. 072 f0 | | MOV A,@R0
  106. 073 53 7f |S | ANL A,#0x7f
  107. 075 a0 | | MOV @R0,A
  108. 076 b9 26 | &| MOV R1,#0x26
  109. 078 14 dd | | CALL 0x0dd ; C:T:0dd
  110. 07a b9 20 | | MOV R1,#0x20
  111. 07c f1 | | MOV A,@R1
  112. 07d 53 1f |S | ANL A,#0x1f
  113. 07f aa | | MOV R2,A
  114. 080 f1 | | MOV A,@R1
  115. 081 53 e0 |S | ANL A,#0xe0
  116. 083 ab | | MOV R3,A
  117. 084 c6 93 | | JZ 0x093 ; >:Z:093 >:NZ:086
  118. 086-08a bb
  119. 086 03 20 | | ADD A,#0x20
  120. 088 96 8f | | JNZ CMD_13 ; >:NZ:08f >:NNZ:08a
  121. 08a-08f bb
  122. 08a fa | | MOV A,R2
  123. 08b 03 f9 | | ADD A,#0xf9
  124. 08d e6 98 | | JNC 0x098 ; >:NC:098 >:NNC:08f
  125. 08f-093 bb
  126. 08f ba 20 | | CMD_13: MOV R2,#0x20
  127. 091 04 9e | | JMP 0x09e ; >:T:09e
  128. 093-098 bb
  129. 093 fa | | MOV A,R2
  130. 094 03 f0 | | ADD A,#0xf0
  131. 096 f6 8f | | JC CMD_13 ; >:C:08f >:NC:098
  132. 098-09e bb
  133. 098 14 35 | 5| CALL 0x035 ; C:T:035
  134. 09a ba 00 | | MOV R2,#0x00
  135. 09c 04 a2 | | JMP 0x0a2 ; >:T:0a2
  136. 09e-0a2 bb
  137. 09e 9a 7f | | ANL P2,#0x7f
  138. 0a0 8a 80 | | ORL P2,#0x80
  139. 0a2-0a4 bb
  140. 0a2 54 db |T | CALL 0x2db ; C:T:2db
  141. 0a4-0b7 bb
  142. 0a4 54 4d |TM| CMD_03: CALL 0x24d ; C:T:24d
  143. 0a6 54 cf |T | CALL 0x2cf ; C:T:2cf
  144. 0a8 85 | | CLR F0
  145. 0a9 95 | | CPL F0
  146. 0aa bc 02 | | MOV R4,#0x02
  147. 0ac 54 5f |T_| CALL 0x25f ; C:T:25f
  148. 0ae 23 fb |# | MOV A,#0xfb
  149. 0b0 02 | | OUTL BUS,A
  150. 0b1 23 80 |# | MOV A,#0x80
  151. 0b3 02 | | OUTL BUS,A
  152. 0b4 23 bf |# | MOV A,#0xbf
  153. 0b6 02 | | OUTL BUS,A
  154. 0b7-0c0 bb
  155. 0b7 99 70 | p| ANL P1,#0x70
  156. 0b9 80 | | MOVX A,@R0
  157. 0ba 89 f0 | | ORL P1,#0xf0
  158. 0bc 8a f0 | | ORL P2,#0xf0
  159. 0be 04 40 | @| JMP 0x040 ; >:T:040
  160. 0c0-0c8 bb
  161. 0c0 b4 11 | | CMD_00: CALL 0x511 ; C:T:511
  162. 0c2 b4 09 | | CALL 0x509 ; C:T:509
  163. 0c4 ba 03 | | MOV R2,#0x03
  164. 0c6 b2 9e | | JP5 0x09e ; >:P5:09e >:NP5:0c8
  165. 0c8-0cd bb
  166. 0c8 ba 04 | | MOV R2,#0x04
  167. 0ca 37 |7 | CPL A
  168. 0cb d2 9e | | JP6 0x09e ; >:P6:09e >:NP6:0cd
  169. 0cd-0d1 bb
  170. 0cd ba 02 | | MOV R2,#0x02
  171. 0cf 92 9e | | JP4 0x09e ; >:P4:09e >:NP4:0d1
  172. 0d1-0d2 bb
  173. 0d1 83 | | RET ; R:T:None
  174. 0d2-0dd bb
  175. 0d2 b8 34 | 4| CMD_0f: MOV R0,#0x34
  176. 0d4 bc 04 | | MOV R4,#0x04
  177. 0d6 54 5d |T]| CALL 0x25d ; C:T:25d
  178. 0d8 b9 35 | 5| MOV R1,#0x35
  179. 0da 14 dd | | CALL 0x0dd ; C:T:0dd
  180. 0dc 19 | | INC R1
  181. 0dd-0df bb
  182. 0dd bc 03 | | MOV R4,#0x03
  183. 0df-0e0 bb
  184. rr(adr=@r1,wid=r4):
  185. 0df 97 | | CLR C
  186. 0e0-0e6 bb
  187. 0e0 f1 | | MOV A,@R1
  188. 0e1 67 |g | RRC A
  189. 0e2 a1 | | MOV @R1,A
  190. 0e3 19 | | INC R1
  191. 0e4 ec e0 | | DJNZ R4,0x0e0 ; >:NZ:0e0 >:Z:0e6
  192. 0e6-0e7 bb
  193. 0e6 83 | | RET ; R:T:None
  194. 0e7-0ea bb
  195. 0e7 b5 | | CMD_14: CPL F1
  196. 0e8 e4 01 | | JMP 0x701 ; >:T:701
  197. 0ea 00 00 | | .Fill 00[14]
  198. 0fe a3 | | MOVP A,@A
  199. 0ff 83 | | RET ; R:T:None
  200. 100-114 bb
  201. 100 54 cf |T | CALL 0x2cf ; C:T:2cf
  202. 102 23 80 |# | MOV A,#0x80
  203. 104 a0 | | MOV @R0,A
  204. 105 18 | | INC R0
  205. 106 b9 21 | !| MOV R1,#0x21
  206. 108 be 03 | | MOV R6,#0x03
  207. 10a d4 b8 | | CALL memcpy(r0,r1,r6) ; C:T:6b8
  208. 10c 34 47 |4G| CALL 0x147 ; C:T:147
  209. 10e b8 4a | J| MOV R0,#0x4a
  210. 110 a0 | | MOV @R0,A
  211. 111 fb | | MOV A,R3
  212. 112 96 43 | C| JNZ 0x143 ; >:NZ:143 >:NNZ:114
  213. 114-117 bb
  214. 114 fc | | MOV A,R4
  215. 115 f2 43 | C| JP7 0x143 ; >:P7:143 >:NP7:117
  216. 117-119 bb
  217. 117 d2 43 | C| JP6 0x143 ; >:P6:143 >:NP6:119
  218. 119-12d bb
  219. 119 18 | | INC R0
  220. 11a b9 04 | | MOV R1,#0x04
  221. 11c be 02 | | MOV R6,#0x02
  222. 11e d4 b8 | | CALL memcpy(r0,r1,r6) ; C:T:6b8
  223. 120 b9 2e | .| MOV R1,#0x2e
  224. 122 f1 | | MOV A,@R1
  225. 123 37 |7 | CPL A
  226. 124 17 | | INC A
  227. 125 34 56 |4V| CALL 0x156 ; C:T:156
  228. 127 b8 47 | G| MOV R0,#0x47
  229. 129 a0 | | MOV @R0,A
  230. 12a 61 |a | ADD A,@R1
  231. 12b f6 43 | C| JC 0x143 ; >:C:143 >:NC:12d
  232. 12d-138 bb
  233. 12d 18 | | INC R0
  234. 12e b9 04 | | MOV R1,#0x04
  235. 130 be 02 | | MOV R6,#0x02
  236. 132 d4 b8 | | CALL memcpy(r0,r1,r6) ; C:T:6b8
  237. 134 34 6f |4o| CALL r2:r3=sum(0x48:0x49,0x2f:0x30) ; C:T:16f
  238. 136 f6 43 | C| JC 0x143 ; >:C:143 >:NC:138
  239. 138-143 bb
  240. 138 b4 11 | | CALL 0x511 ; C:T:511
  241. 13a b4 8e | | CALL 0x58e ; C:T:58e
  242. 13c 34 8a |4 | CALL 0x18a ; C:T:18a
  243. 13e b4 46 | F| CALL 0x546 ; C:T:546
  244. 140 d4 7b | {| CALL 0x67b ; C:T:67b
  245. 142 83 | | RET ; R:T:None
  246. 143-147 bb
  247. 143 ba 21 | !| MOV R2,#0x21
  248. 145 04 9e | | JMP 0x09e ; >:T:09e
  249. 147-16f segment
  250. 147-156 bb
  251. 147 b8 03 | | MOV R0,#0x03
  252. 149 b9 21 | !| MOV R1,#0x21
  253. 14b be 03 | | MOV R6,#0x03
  254. 14d d4 b8 | | CALL memcpy(r0,r1,r6) ; C:T:6b8
  255. 14f fb | | MOV A,R3
  256. 150 53 1f |S | ANL A,#0x1f
  257. 152 ab | | MOV R3,A
  258. 153 b9 33 | 3| MOV R1,#0x33
  259. 155 f1 | | MOV A,@R1
  260. 156-15c bb
  261. 156 37 |7 | CPL A
  262. 157 17 | | INC A
  263. 158 aa | | MOV R2,A
  264. 159 be 19 | | MOV R6,#0x19
  265. 15b 27 |' | CLR A
  266. 15c-160 bb
  267. 15c a8 | | MOV R0,A
  268. 15d 6a |j | ADD A,R2
  269. 15e f6 61 | a| JC 0x161 ; >:C:161 >:NC:160
  270. 160-161 bb
  271. 160 f8 | | MOV A,R0
  272. 161-16d bb
  273. 161 2d |- | XCH A,R5
  274. 162 f7 | | RLC A
  275. 163 2d |- | XCH A,R5
  276. 164 2c |, | XCH A,R4
  277. 165 f7 | | RLC A
  278. 166 2c |, | XCH A,R4
  279. 167 2b |+ | XCH A,R3
  280. 168 f7 | | RLC A
  281. 169 2b |+ | XCH A,R3
  282. 16a f7 | | RLC A
  283. 16b ee 5c | \| DJNZ R6,0x15c ; >:NZ:15c >:Z:16d
  284. 16d-16f bb
  285. 16d 67 |g | RRC A
  286. 16e 83 | | RET ; R:T:None
  287. 16f-17c segment
  288. 16f-173 bb
  289. r2:r3=sum(0x48:0x49,0x2f:0x30):
  290. 16f b8 49 | I| MOV R0,#0x49
  291. 171 b9 30 | 0| MOV R1,#0x30
  292. 173-17c bb
  293. 173 f0 | | MOV A,@R0
  294. 174 61 |a | ADD A,@R1
  295. 175 ab | | MOV R3,A
  296. 176 c8 | | DEC R0
  297. 177 c9 | | DEC R1
  298. 178 f0 | | MOV A,@R0
  299. 179 71 |q | ADDC A,@R1
  300. 17a aa | | MOV R2,A
  301. 17b 83 | | RET ; R:T:None
  302. 17c-18a segment
  303. 17c-18a bb
  304. 17c b9 30 | 0| MOV R1,#0x30
  305. 17e f1 | | MOV A,@R1
  306. 17f 37 |7 | CPL A
  307. 180 03 01 | | ADD A,#0x01
  308. 182 a1 | | MOV @R1,A
  309. 183 c9 | | DEC R1
  310. 184 f1 | | MOV A,@R1
  311. 185 37 |7 | CPL A
  312. 186 13 00 | | ADDC A,#0x00
  313. 188 a1 | | MOV @R1,A
  314. 189 83 | | RET ; R:T:None
  315. 18a-19e segment
  316. 18a-19b bb
  317. 18a b9 4a | J| MOV R1,#0x4a
  318. 18c f1 | | MOV A,@R1
  319. 18d 37 |7 | CPL A
  320. 18e 17 | | INC A
  321. 18f b8 33 | 3| MOV R0,#0x33
  322. 191 60 |` | ADD A,@R0
  323. 192 ad | | MOV R5,A
  324. 193 17 | | INC A
  325. 194 37 |7 | CPL A
  326. 195 17 | | INC A
  327. 196 b9 24 | $| MOV R1,#0x24
  328. 198 61 |a | ADD A,@R1
  329. 199 f6 9d | | JC 0x19d ; >:C:19d >:NC:19b
  330. 19b-19d bb
  331. 19b f1 | | MOV A,@R1
  332. 19c ad | | MOV R5,A
  333. 19d-19e bb
  334. 19d 83 | | RET ; R:T:None
  335. 19e-1dd segment
  336. 19e-1cb bb
  337. 19e b8 2e | .| CMD_0c: MOV R0,#0x2e
  338. 1a0 bc 03 | | MOV R4,#0x03
  339. 1a2 54 5d |T]| CALL 0x25d ; C:T:25d
  340. 1a4 c8 | | DEC R0
  341. 1a5 c8 | | DEC R0
  342. 1a6 f0 | | MOV A,@R0
  343. 1a7 37 |7 | CPL A
  344. 1a8 17 | | INC A
  345. 1a9 a0 | | MOV @R0,A
  346. 1aa c8 | | DEC R0
  347. 1ab f0 | | MOV A,@R0
  348. 1ac e7 | | RL A
  349. 1ad e7 | | RL A
  350. 1ae a0 | | MOV @R0,A
  351. 1af ab | | MOV R3,A
  352. 1b0 b8 f1 | | MOV R0,#0xf1
  353. 1b2 b4 02 | | CALL 0x502 ; C:T:502
  354. 1b4 b8 2f | /| MOV R0,#0x2f
  355. 1b6 f0 | | MOV A,@R0
  356. 1b7 53 0f |S | ANL A,#0x0f
  357. 1b9 20 | | XCH A,@R0
  358. 1ba 53 f0 |S | ANL A,#0xf0
  359. 1bc 47 |G | SWAP A
  360. 1bd 37 |7 | CPL A
  361. 1be 17 | | INC A
  362. 1bf c8 | | DEC R0
  363. 1c0 20 | | XCH A,@R0
  364. 1c1 aa | | MOV R2,A
  365. 1c2 53 0f |S | ANL A,#0x0f
  366. 1c4 c8 | | DEC R0
  367. 1c5 a0 | | MOV @R0,A
  368. 1c6 b9 5f | _| MOV R1,#0x5f
  369. 1c8 d1 | | XRL A,@R1
  370. 1c9 c6 cf | | JZ 0x1cf ; >:Z:1cf >:NZ:1cb
  371. 1cb-1cf bb
  372. 1cb b9 3c | <| MOV R1,#0x3c
  373. 1cd 27 |' | CLR A
  374. 1ce a1 | | MOV @R1,A
  375. 1cf-1dd bb
  376. 1cf fa | | MOV A,R2
  377. 1d0 53 f0 |S | ANL A,#0xf0
  378. 1d2 c8 | | DEC R0
  379. 1d3 a0 | | MOV @R0,A
  380. 1d4 53 80 |S | ANL A,#0x80
  381. 1d6 e7 | | RL A
  382. 1d7 ab | | MOV R3,A
  383. 1d8 b4 59 | Y| CALL 0x559 ; C:T:559
  384. 1da 34 7c |4|| CALL 0x17c ; C:T:17c
  385. 1dc 83 | | RET ; R:T:None
  386. 1dd-1e9 segment
  387. 1dd-1e1 bb
  388. inc(adr=@R0,wid=R1):
  389. 1dd f0 | | MOV A,@R0
  390. 1de 03 01 | | ADD A,#0x01
  391. 1e0 a0 | | MOV @R0,A
  392. 1e1-1e8 bb
  393. 1e1 c8 | | DEC R0
  394. 1e2 f0 | | MOV A,@R0
  395. 1e3 13 00 | | ADDC A,#0x00
  396. 1e5 a0 | | MOV @R0,A
  397. 1e6 e9 e1 | | DJNZ R1,0x1e1 ; >:NZ:1e1 >:Z:1e8
  398. 1e8-1e9 bb
  399. 1e8 83 | | RET ; R:T:None
  400. 1e9-1ef segment
  401. 1e9-1ef bb
  402. 1e9 99 f0 | | ANL P1,#0xf0
  403. 1eb 80 | | MOVX A,@R0
  404. 1ec 89 08 | | ORL P1,#0x08
  405. 1ee 83 | | RET ; R:T:None
  406. 1ef 00 00 | | .Fill 00[0f]
  407. 1fe a3 | | MOVP A,@A
  408. 1ff 83 | | RET ; R:T:None
  409. 200-24d segment
  410. 200-201 bb
  411. 200 97 | | CLR C
  412. 201-208 bb
  413. 201 23 ef |# | MOV A,#0xef
  414. 203 02 | | OUTL BUS,A
  415. 204 23 80 |# | MOV A,#0x80
  416. 206 62 |b | MOV T,A
  417. 207 55 |U | STRT T
  418. 208-20e bb
  419. 208 80 | | MOVX A,@R0
  420. 209 37 |7 | CPL A
  421. 20a 53 e0 |S | ANL A,#0xe0
  422. 20c e6 12 | | JNC 0x212 ; >:NC:212 >:NNC:20e
  423. 20e-210 bb
  424. 20e 76 12 |v | JF1 0x212 ; >:F1:212 >:NF1:210
  425. 210-212 bb
  426. 210 53 bf |S | ANL A,#0xbf
  427. 212-214 bb
  428. 212 c6 4b | K| JZ 0x24b ; >:Z:24b >:NZ:214
  429. 214-216 bb
  430. 214 16 18 | | JTF 0x218 ; >:TF:218 >:NTF:216
  431. 216-218 bb
  432. 216 44 08 |D | JMP 0x208 ; >:T:208
  433. 218-21c bb
  434. 218 ba 32 | 2| MOV R2,#0x32
  435. 21a f2 22 | "| JP7 0x222 ; >:P7:222 >:NP7:21c
  436. 21c-220 bb
  437. 21c ba 34 | 4| MOV R2,#0x34
  438. 21e b2 22 | "| JP5 0x222 ; >:P5:222 >:NP5:220
  439. 220-222 bb
  440. 220 ba 33 | 3| MOV R2,#0x33
  441. 222-22d bb
  442. 222 54 e3 |T | CALL 0x2e3 ; C:T:2e3
  443. 224 23 ef |# | MOV A,#0xef
  444. 226 02 | | OUTL BUS,A
  445. 227 80 | | MOVX A,@R0
  446. 228 37 |7 | CPL A
  447. 229 53 e0 |S | ANL A,#0xe0
  448. 22b c6 48 | H| JZ 0x248 ; >:Z:248 >:NZ:22d
  449. 22d-234 bb
  450. 22d 99 f0 | | ANL P1,#0xf0
  451. 22f b8 21 | !| MOV R0,#0x21
  452. 231 f0 | | MOV A,@R0
  453. 232 b2 3e | >| JP5 0x23e ; >:P5:23e >:NP5:234
  454. 234-23e bb
  455. 234 d4 a5 | | CALL delay(someN) ; C:T:6a5
  456. 236 8a 10 | | ORL P2,#0x10
  457. 238 d4 a5 | | CALL delay(someN) ; C:T:6a5
  458. 23a 9a ef | | ANL P2,#0xef
  459. 23c 44 34 |D4| JMP 0x234 ; >:T:234
  460. 23e-248 bb
  461. 23e d4 a5 | | CALL delay(someN) ; C:T:6a5
  462. 240 8a 20 | | ORL P2,#0x20
  463. 242 d4 a5 | | CALL delay(someN) ; C:T:6a5
  464. 244 9a df | | ANL P2,#0xdf
  465. 246 44 3e |D>| JMP 0x23e ; >:T:23e
  466. 248-24b bb
  467. 248 65 |e | STOP TCNT
  468. 249 04 9e | | JMP 0x09e ; >:T:09e
  469. 24b-24d bb
  470. 24b 65 |e | STOP TCNT
  471. 24c 83 | | RET ; R:T:None
  472. 24d-25d segment
  473. 24d-25d bb
  474. 24d d4 b2 | | CALL memcpy(0x1d,0x35,3) ; C:T:6b2
  475. 24f c8 | | DEC R0
  476. 250 03 06 | | ADD A,#0x06
  477. 252 a0 | | MOV @R0,A
  478. 253 b9 02 | | MOV R1,#0x02
  479. 255 34 e1 |4 | CALL 0x1e1 ; C:T:1e1
  480. 257 53 7f |S | ANL A,#0x7f
  481. 259 a0 | | MOV @R0,A
  482. 25a b9 1d | | MOV R1,#0x1d
  483. 25c 83 | | RET ; R:T:None
  484. 25d-2b5 segment
  485. 25d-25f bb
  486. 25d b9 26 | &| MOV R1,#0x26
  487. 25f-265 bb
  488. 25f 23 fb |# | MOV A,#0xfb
  489. 261 02 | | OUTL BUS,A
  490. 262 f1 | | MOV A,@R1
  491. 263 b6 67 | g| JF0 0x267 ; >:F0:267 >:NF0:265
  492. 265-267 bb
  493. 265 43 80 |C | ORL A,#0x80
  494. 267-26b bb
  495. 267 02 | | OUTL BUS,A
  496. 268 54 e8 |T | CALL 0x2e8 ; C:T:2e8
  497. 26a 19 | | INC R1
  498. 26b-271 bb
  499. 26b 23 fd |# | MOV A,#0xfd
  500. 26d 02 | | OUTL BUS,A
  501. 26e f1 | | MOV A,@R1
  502. 26f 02 | | OUTL BUS,A
  503. 270 19 | | INC R1
  504. 271-278 bb
  505. 271 23 de |# | MOV A,#0xde
  506. 273 02 | | OUTL BUS,A
  507. 274 f1 | | MOV A,@R1
  508. 275 02 | | OUTL BUS,A
  509. 276 b6 a4 | | JF0 0x2a4 ; >:F0:2a4 >:NF0:278
  510. 278-285 bb
  511. 278 54 00 |T | CALL 0x200 ; C:T:200
  512. 27a 23 f7 |# | MOV A,#0xf7
  513. 27c 02 | | OUTL BUS,A
  514. 27d 54 f0 |T | CALL toggle_P1.7() ; C:T:2f0
  515. 27f 80 | | MOVX A,@R0
  516. 280 a0 | | MOV @R0,A
  517. 281 18 | | INC R0
  518. 282 80 | | MOVX A,@R0
  519. 283 a0 | | MOV @R0,A
  520. 284 18 | | INC R0
  521. 285-28b bb
  522. 285 f1 | | MOV A,@R1
  523. 286 03 01 | | ADD A,#0x01
  524. 288 a1 | | MOV @R1,A
  525. 289 e6 a0 | | JNC 0x2a0 ; >:NC:2a0 >:NNC:28b
  526. 28b-292 bb
  527. 28b c9 | | DEC R1
  528. 28c f1 | | MOV A,@R1
  529. 28d 13 00 | | ADDC A,#0x00
  530. 28f a1 | | MOV @R1,A
  531. 290 e6 9c | | JNC 0x29c ; >:NC:29c >:NNC:292
  532. 292-29a bb
  533. 292 c9 | | DEC R1
  534. 293 f1 | | MOV A,@R1
  535. 294 13 00 | | ADDC A,#0x00
  536. 296 53 7f |S | ANL A,#0x7f
  537. 298 ec 5f | _| DJNZ R4,0x25f ; >:NZ:25f >:Z:29a
  538. 29a-29c bb
  539. 29a 44 a2 |D | JMP 0x2a2 ; >:T:2a2
  540. 29c-29e bb
  541. 29c ec 6b | k| DJNZ R4,0x26b ; >:NZ:26b >:Z:29e
  542. 29e-2a0 bb
  543. 29e 44 a2 |D | JMP 0x2a2 ; >:T:2a2
  544. 2a0-2a2 bb
  545. 2a0 ec 71 | q| DJNZ R4,0x271 ; >:NZ:271 >:Z:2a2
  546. 2a2-2a4 bb
  547. 2a2 85 | | CLR F0
  548. 2a3 83 | | RET ; R:T:None
  549. 2a4-2b5 bb
  550. 2a4 23 f7 |# | MOV A,#0xf7
  551. 2a6 02 | | OUTL BUS,A
  552. 2a7 99 7f | | ANL P1,#0x7f
  553. 2a9 f0 | | MOV A,@R0
  554. 2aa 90 | | MOVX @R0,A
  555. 2ab 18 | | INC R0
  556. 2ac f0 | | MOV A,@R0
  557. 2ad 90 | | MOVX @R0,A
  558. 2ae 89 80 | | ORL P1,#0x80
  559. 2b0 18 | | INC R0
  560. 2b1 54 00 |T | CALL 0x200 ; C:T:200
  561. 2b3 44 85 |D | JMP 0x285 ; >:T:285
  562. 2b5-2cf segment
  563. 2b5-2b7 bb
  564. 2b5 b9 26 | &| MOV R1,#0x26
  565. 2b7-2cf bb
  566. 2b7 b8 1d | | MOV R0,#0x1d
  567. 2b9 f1 | | MOV A,@R1
  568. 2ba a0 | | MOV @R0,A
  569. 2bb 23 fb |# | MOV A,#0xfb
  570. 2bd 02 | | OUTL BUS,A
  571. 2be f1 | | MOV A,@R1
  572. 2bf 02 | | OUTL BUS,A
  573. 2c0 54 e8 |T | CALL 0x2e8 ; C:T:2e8
  574. 2c2 18 | | INC R0
  575. 2c3 19 | | INC R1
  576. 2c4 f1 | | MOV A,@R1
  577. 2c5 a0 | | MOV @R0,A
  578. 2c6 18 | | INC R0
  579. 2c7 19 | | INC R1
  580. 2c8 f1 | | MOV A,@R1
  581. 2c9 a0 | | MOV @R0,A
  582. 2ca d5 | | SEL RB1
  583. 2cb 85 | | CLR F0
  584. 2cc 74 5f |t_| CALL 0x35f ; C:T:35f
  585. 2ce 83 | | RET ; R:T:None
  586. 2cf-2db segment
  587. 2cf-2d4 bb
  588. 2cf b8 21 | !| MOV R0,#0x21
  589. 2d1 f0 | | MOV A,@R0
  590. 2d2 b2 d8 | | JP5 0x2d8 ; >:P5:2d8 >:NP5:2d4
  591. 2d4-2d8 bb
  592. 2d4 b8 3e | >| MOV R0,#0x3e
  593. 2d6 44 da |D | JMP 0x2da ; >:T:2da
  594. 2d8-2da bb
  595. 2d8 b8 42 | B| MOV R0,#0x42
  596. 2da-2db bb
  597. 2da 83 | | RET ; R:T:None
  598. 2db-2e3 segment
  599. 2db-2dd bb
  600. 2db 54 cf |T | CALL 0x2cf ; C:T:2cf
  601. 2dd-2e3 bb
  602. 2dd f0 | | MOV A,@R0
  603. 2de 53 80 |S | ANL A,#0x80
  604. 2e0 6a |j | ADD A,R2
  605. 2e1 a0 | | MOV @R0,A
  606. 2e2 83 | | RET ; R:T:None
  607. 2e3-2f0 segment
  608. 2e3-2e8 bb
  609. 2e3 23 7f |# | MOV A,#0x7f
  610. 2e5 02 | | OUTL BUS,A
  611. 2e6 54 f0 |T | CALL toggle_P1.7() ; C:T:2f0
  612. 2e8-2f0 bb
  613. 2e8 23 ff |# | MOV A,#0xff
  614. 2ea 02 | | OUTL BUS,A
  615. 2eb 54 f0 |T | CALL toggle_P1.7() ; C:T:2f0
  616. 2ed 34 e9 |4 | CALL 0x1e9 ; C:T:1e9
  617. 2ef 83 | | RET ; R:T:None
  618. 2f0-2f5 segment
  619. 2f0-2f5 bb
  620. toggle_P1.7():
  621. 2f0 99 7f | | ANL P1,#0x7f
  622. 2f2 89 80 | | ORL P1,#0x80
  623. 2f4 83 | | RET ; R:T:None
  624. 2f5 00 00 | | .Fill 00[09]
  625. 2fe a3 | | MOVP A,@A
  626. 2ff 83 | | RET ; R:T:None
  627. 300-3ed segment
  628. 300-304 bb
  629. 300 bf 27 | '| CMD_15: MOV R7,#0x27
  630. 302 64 06 |d | JMP 0x306 ; >:T:306
  631. 304-306 bb
  632. 304 bf 25 | %| CMD_08: MOV R7,#0x25
  633. 306-307 bb
  634. 306 b5 | | CPL F1
  635. 307-30b bb
  636. 307 d4 00 | | CALL 0x600 ; C:T:600
  637. 309 34 00 |4 | CALL 0x100 ; C:T:100
  638. 30b-312 bb
  639. 30b b8 2c | ,| MOV R0,#0x2c
  640. 30d f0 | | MOV A,@R0
  641. 30e be 01 | | MOV R6,#0x01
  642. 310 d2 18 | | JP6 0x318 ; >:P6:318 >:NP6:312
  643. 312-316 bb
  644. 312 b8 3d | =| MOV R0,#0x3d
  645. 314 b0 ff | | MOV @R0,#0xff
  646. 316-318 bb
  647. 316 be 08 | | MOV R6,#0x08
  648. 318-323 bb
  649. 318 54 b5 |T | CALL 0x2b5 ; C:T:2b5
  650. 31a b4 46 | F| CALL 0x546 ; C:T:546
  651. 31c 23 f7 |# | MOV A,#0xf7
  652. 31e 39 |9 | OUTL P1,A
  653. 31f ff | | MOV A,R7
  654. 320 90 | | MOVX @R0,A
  655. 321 89 08 | | ORL P1,#0x08
  656. 323-333 bb
  657. 323 b8 1e | | MOV R0,#0x1e
  658. 325 b9 01 | | MOV R1,#0x01
  659. 327 34 dd |4 | CALL inc(adr=@R0,wid=R1) ; C:T:1dd
  660. 329 b8 24 | $| MOV R0,#0x24
  661. 32b f0 | | MOV A,@R0
  662. 32c 07 | | DEC A
  663. 32d a0 | | MOV @R0,A
  664. 32e cd | | DEC R5
  665. 32f 85 | | CLR F0
  666. 330 95 | | CPL F0
  667. 331 97 | | CLR C
  668. 332 a7 | | CPL C
  669. 333-336 bb
  670. 333 09 | | IN A,P1
  671. 334 b2 38 | 8| JP5 0x338 ; >:P5:338 >:NP5:336
  672. 336-338 bb
  673. 336 64 33 |d3| JMP 0x333 ; >:T:333
  674. 338-33b bb
  675. 338 99 ef | | ANL P1,#0xef
  676. 33a d5 | | SEL RB1
  677. 33b-33d bb
  678. 33b 86 7e | ~| JNI 0x37e ; >:NI:37e >:NNI:33d
  679. 33d-33f bb
  680. 33d 26 3b |&;| JNT0 0x33b ; >:NT0:33b >:NNT0:33f
  681. 33f-348 bb
  682. 33f f8 | | MOV A,R0
  683. 340 02 | | OUTL BUS,A
  684. 341 00 | | NOP
  685. 342 80 | | MOVX A,@R0
  686. 343 37 |7 | CPL A
  687. 344 53 e0 |S | ANL A,#0xe0
  688. 346 76 4a |vJ| JF1 0x34a ; >:F1:34a >:NF1:348
  689. 348-34a bb
  690. 348 53 bf |S | ANL A,#0xbf
  691. 34a-34c bb
  692. 34a c6 5d | ]| JZ 0x35d ; >:Z:35d >:NZ:34c
  693. 34c-352 bb
  694. 34c 9a bf | | ANL P2,#0xbf
  695. 34e 8a 40 | @| ORL P2,#0x40
  696. 350 99 e0 | | ANL P1,#0xe0
  697. 352-354 bb
  698. 352 86 56 | V| JNI 0x356 ; >:NI:356 >:NNI:354
  699. 354-356 bb
  700. 354 64 52 |dR| JMP 0x352 ; >:T:352
  701. 356-35d bb
  702. 356 89 18 | | ORL P1,#0x18
  703. 358 c5 | | SEL RB0
  704. 359 54 01 |T | CALL 0x201 ; C:T:201
  705. 35b 64 18 |d | JMP 0x318 ; >:T:318
  706. 35d-35f bb
  707. 35d 89 10 | | ORL P1,#0x10
  708. 35f-377 bb
  709. 35f f9 | | MOV A,R1
  710. 360 02 | | OUTL BUS,A
  711. 361 fd | | MOV A,R5
  712. 362 02 | | OUTL BUS,A
  713. 363 fa | | MOV A,R2
  714. 364 02 | | OUTL BUS,A
  715. 365 fe | | MOV A,R6
  716. 366 02 | | OUTL BUS,A
  717. 367 fb | | MOV A,R3
  718. 368 02 | | OUTL BUS,A
  719. 369 ff | | MOV A,R7
  720. 36a 02 | | OUTL BUS,A
  721. 36b fc | | MOV A,R4
  722. 36c 02 | | OUTL BUS,A
  723. 36d 99 f0 | | ANL P1,#0xf0
  724. 36f 80 | | MOVX A,@R0
  725. 370 89 08 | | ORL P1,#0x08
  726. 372 c5 | | SEL RB0
  727. 373 54 f0 |T | CALL toggle_P1.7() ; C:T:2f0
  728. 375 b6 78 | x| JF0 0x378 ; >:F0:378 >:NF0:377
  729. 377-378 bb
  730. 377 83 | | RET ; R:T:None
  731. 378-37a bb
  732. 378 86 7e | ~| JNI 0x37e ; >:NI:37e >:NNI:37a
  733. 37a-37e bb
  734. 37a b4 9e | | CALL 0x59e ; C:T:59e
  735. 37c 64 23 |d#| JMP 0x323 ; >:T:323
  736. 37e-387 bb
  737. 37e c5 | | SEL RB0
  738. 37f 89 10 | | ORL P1,#0x10
  739. 381 54 e3 |T | CALL 0x2e3 ; C:T:2e3
  740. 383 b4 5f | _| CALL 0x55f ; C:T:55f
  741. 385 e6 b2 | | JNC 0x3b2 ; >:NC:3b2 >:NNC:387
  742. 387-38b bb
  743. 387 ba 15 | | MOV R2,#0x15
  744. 389 92 9f | | JP4 0x39f ; >:P4:39f >:NP4:38b
  745. 38b-38f bb
  746. 38b ba 12 | | MOV R2,#0x12
  747. 38d 12 9f | | JP0 0x39f ; >:P0:39f >:NP0:38f
  748. 38f-394 bb
  749. 38f b8 2c | ,| MOV R0,#0x2c
  750. 391 f0 | | MOV A,@R0
  751. 392 d2 9d | | JP6 0x39d ; >:P6:39d >:NP6:394
  752. 394-398 bb
  753. 394 d4 1c | | CALL 0x61c ; C:T:61c
  754. 396 b6 9d | | JF0 0x39d ; >:F0:39d >:NF0:398
  755. 398-39b bb
  756. 398 fd | | MOV A,R5
  757. 399 c6 b2 | | JZ 0x3b2 ; >:Z:3b2 >:NZ:39b
  758. 39b-39d bb
  759. 39b 64 12 |d | JMP 0x312 ; >:T:312
  760. 39d-39f bb
  761. 39d ba 11 | | MOV R2,#0x11
  762. 39f-3a5 bb
  763. 39f 1d | | INC R5
  764. 3a0 b8 24 | $| MOV R0,#0x24
  765. 3a2 10 | | INC @R0
  766. 3a3 ee 18 | | DJNZ R6,0x318 ; >:NZ:318 >:Z:3a5
  767. 3a5-3aa bb
  768. 3a5 b8 3d | =| MOV R0,#0x3d
  769. 3a7 f0 | | MOV A,@R0
  770. 3a8 96 ac | | JNZ 0x3ac ; >:NZ:3ac >:NNZ:3aa
  771. 3aa-3ac bb
  772. 3aa 04 9e | | JMP 0x09e ; >:T:09e
  773. 3ac-3b2 bb
  774. 3ac b0 00 | | MOV @R0,#0x00
  775. 3ae 94 0d | | CALL 0x40d ; C:T:40d
  776. 3b0 64 16 |d | JMP 0x316 ; >:T:316
  777. 3b2-3b7 bb
  778. 3b2 b8 24 | $| MOV R0,#0x24
  779. 3b4 f0 | | MOV A,@R0
  780. 3b5 c6 dd | | JZ 0x3dd ; >:Z:3dd >:NZ:3b7
  781. 3b7-3c6 bb
  782. 3b7 b8 4a | J| MOV R0,#0x4a
  783. 3b9 27 |' | CLR A
  784. 3ba a0 | | MOV @R0,A
  785. 3bb 34 8a |4 | CALL 0x18a ; C:T:18a
  786. 3bd b9 47 | G| MOV R1,#0x47
  787. 3bf 11 | | INC @R1
  788. 3c0 b8 2e | .| MOV R0,#0x2e
  789. 3c2 f0 | | MOV A,@R0
  790. 3c3 61 |a | ADD A,@R1
  791. 3c4 e6 d3 | | JNC 0x3d3 ; >:NC:3d3 >:NNC:3c6
  792. 3c6-3d1 bb
  793. 3c6 a1 | | MOV @R1,A
  794. 3c7 b8 49 | I| MOV R0,#0x49
  795. 3c9 b9 01 | | MOV R1,#0x01
  796. 3cb 34 dd |4 | CALL inc(adr=@R0,wid=R1) ; C:T:1dd
  797. 3cd 34 6f |4o| CALL r2:r3=sum(0x48:0x49,0x2f:0x30) ; C:T:16f
  798. 3cf f6 d9 | | JC 0x3d9 ; >:C:3d9 >:NC:3d1
  799. 3d1-3d3 bb
  800. 3d1 d4 7b | {| CALL 0x67b ; C:T:67b
  801. 3d3-3d9 bb
  802. 3d3 b4 9e | | CALL 0x59e ; C:T:59e
  803. 3d5 b4 11 | | CALL 0x511 ; C:T:511
  804. 3d7 64 0b |d | JMP 0x30b ; >:T:30b
  805. 3d9-3dd bb
  806. 3d9 ba 21 | !| MOV R2,#0x21
  807. 3db 04 9e | | JMP 0x09e ; >:T:09e
  808. 3dd-3e2 bb
  809. 3dd 23 e8 |# | MOV A,#0xe8
  810. 3df 6a |j | ADD A,R2
  811. 3e0 96 e4 | | JNZ 0x3e4 ; >:NZ:3e4 >:NNZ:3e2
  812. 3e2-3e4 bb
  813. 3e2 04 9e | | JMP 0x09e ; >:T:09e
  814. 3e4-3e5 bb
  815. 3e4 83 | | RET ; R:T:None
  816. 3e5-3e9 bb
  817. 3e5 bf 37 | 7| CMD_16: MOV R7,#0x37
  818. 3e7 64 07 |d | JMP 0x307 ; >:T:307
  819. 3e9-3ed bb
  820. 3e9 bf 35 | 5| CMD_0a: MOV R7,#0x35
  821. 3eb 64 07 |d | JMP 0x307 ; >:T:307
  822. 3ed 00 00 | | .Fill 00[11]
  823. 3fe a3 | | MOVP A,@A
  824. 3ff 83 | | RET ; R:T:None
  825. 400-417 segment
  826. 400-403 bb
  827. 400 34 00 |4 | CMD_0b: CALL 0x100 ; C:T:100
  828. 402 95 | | CPL F0
  829. 403-40d bb
  830. 403 b4 11 | | CMD_01: CALL 0x511 ; C:T:511
  831. 405 b8 3c | <| MOV R0,#0x3c
  832. 407 b0 ff | | MOV @R0,#0xff
  833. 409 23 70 |#p| MOV A,#0x70
  834. 40b b6 0f | | JF0 0x40f ; >:F0:40f >:NF0:40d
  835. 40d-40f bb
  836. 40d 23 10 |# | MOV A,#0x10
  837. 40f-417 bb
  838. 40f 85 | | CLR F0
  839. 410 b8 2d | -| MOV R0,#0x2d
  840. 412 40 |@ | ORL A,@R0
  841. 413 ab | | MOV R3,A
  842. 414 b4 59 | Y| CALL 0x559 ; C:T:559
  843. 416 83 | | RET ; R:T:None
  844. 417-438 segment
  845. 417-41f bb
  846. 417 b9 39 | 9| CMD_0d: MOV R1,#0x39
  847. 419 54 b7 |T | CALL 0x2b7 ; C:T:2b7
  848. 41b bb 08 | | MOV R3,#0x08
  849. 41d b4 00 | | CALL 0x500 ; C:T:500
  850. 41f-422 bb
  851. 41f 09 | | IN A,P1
  852. 420 b2 24 | $| JP5 0x424 ; >:P5:424 >:NP5:422
  853. 422-424 bb
  854. 422 84 1f | | JMP 0x41f ; >:T:41f
  855. 424-427 bb
  856. 424 09 | | IN A,P1
  857. 425 b2 24 | $| JP5 0x424 ; >:P5:424 >:NP5:427
  858. 427-42a bb
  859. 427 99 7f | | ANL P1,#0x7f
  860. 429 27 |' | CLR A
  861. 42a-42d bb
  862. 42a 90 | | MOVX @R0,A
  863. 42b 26 2a |&*| JNT0 0x42a ; >:NT0:42a >:NNT0:42d
  864. 42d-433 bb
  865. 42d 89 80 | | ORL P1,#0x80
  866. 42f b4 5b | [| CALL 0x55b ; C:T:55b
  867. 431 e6 37 | 7| JNC 0x437 ; >:NC:437 >:NNC:433
  868. 433-437 bb
  869. 433 ba 11 | | MOV R2,#0x11
  870. 435 04 9e | | JMP 0x09e ; >:T:09e
  871. 437-438 bb
  872. 437 83 | | RET ; R:T:None
  873. 438-449 segment
  874. 438-449 bb
  875. 438 34 00 |4 | CMD_06: CALL 0x100 ; C:T:100
  876. 43a bb 28 | (| MOV R3,#0x28
  877. 43c b8 f3 | | MOV R0,#0xf3
  878. 43e b4 02 | | CALL 0x502 ; C:T:502
  879. 440 d4 00 | | CALL 0x600 ; C:T:600
  880. 442 54 b7 |T | CALL 0x2b7 ; C:T:2b7
  881. 444 bb 50 | P| MOV R3,#0x50
  882. 446 b4 59 | Y| CALL 0x559 ; C:T:559
  883. 448 83 | | RET ; R:T:None
  884. 449-462 segment
  885. 449-455 bb
  886. 449 34 00 |4 | CMD_05: CALL 0x100 ; C:T:100
  887. 44b bb 25 | %| MOV R3,#0x25
  888. 44d b4 00 | | CALL 0x500 ; C:T:500
  889. 44f 99 f0 | | ANL P1,#0xf0
  890. 451 b4 5b | [| CALL 0x55b ; C:T:55b
  891. 453 e6 61 | a| JNC 0x461 ; >:NC:461 >:NNC:455
  892. 455-459 bb
  893. 455 ba 15 | | MOV R2,#0x15
  894. 457 92 5f | _| JP4 0x45f ; >:P4:45f >:NP4:459
  895. 459-45d bb
  896. 459 ba 12 | | MOV R2,#0x12
  897. 45b 12 5f | _| JP0 0x45f ; >:P0:45f >:NP0:45d
  898. 45d-45f bb
  899. 45d ba 11 | | MOV R2,#0x11
  900. 45f-461 bb
  901. 45f 04 9e | | JMP 0x09e ; >:T:09e
  902. 461-462 bb
  903. 461 83 | | RET ; R:T:None
  904. 462 00 00 | | .Fill 00[9c]
  905. 4fe a3 | | MOVP A,@A
  906. 4ff 83 | | RET ; R:T:None
  907. 500-509 segment
  908. 500-502 bb
  909. 500 b8 f7 | | MOV R0,#0xf7
  910. 502-509 bb
  911. 502 f8 | | MOV A,R0
  912. 503 39 |9 | OUTL P1,A
  913. 504 fb | | MOV A,R3
  914. 505 90 | | MOVX @R0,A
  915. 506 89 08 | | ORL P1,#0x08
  916. 508 83 | | RET ; R:T:None
  917. 509-511 segment
  918. 509-50b bb
  919. 509 b8 f7 | | MOV R0,#0xf7
  920. 50b-511 bb
  921. 50b f8 | | MOV A,R0
  922. 50c 39 |9 | OUTL P1,A
  923. 50d 80 | | MOVX A,@R0
  924. 50e 89 08 | | ORL P1,#0x08
  925. 510 83 | | RET ; R:T:None
  926. 511-546 segment
  927. 511-51c bb
  928. 511 b8 47 | G| MOV R0,#0x47
  929. 513 f0 | | MOV A,@R0
  930. 514 43 f0 |C | ORL A,#0xf0
  931. 516 ac | | MOV R4,A
  932. 517 b9 2c | ,| MOV R1,#0x2c
  933. 519 f1 | | MOV A,@R1
  934. 51a b2 21 | !| JP5 0x521 ; >:P5:521 >:NP5:51c
  935. 51c-521 bb
  936. 51c 0a | | IN A,P2
  937. 51d 53 f8 |S | ANL A,#0xf8
  938. 51f 4c |L | ORL A,R4
  939. 520 ac | | MOV R4,A
  940. 521-528 bb
  941. 521 fc | | MOV A,R4
  942. 522 3a |: | OUTL P2,A
  943. 523 b9 21 | !| MOV R1,#0x21
  944. 525 f1 | | MOV A,@R1
  945. 526 f2 42 | B| JP7 0x542 ; >:P7:542 >:NP7:528
  946. 528-52a bb
  947. 528 d2 42 | B| JP6 0x542 ; >:P6:542 >:NP6:52a
  948. 52a-52c bb
  949. 52a b2 30 | 0| JP5 0x530 ; >:P5:530 >:NP5:52c
  950. 52c-530 bb
  951. 52c 9a ef | | ANL P2,#0xef
  952. 52e a4 32 | 2| JMP 0x532 ; >:T:532
  953. 530-532 bb
  954. 530 9a df | | ANL P2,#0xdf
  955. 532-542 bb
  956. 532 53 e0 |S | ANL A,#0xe0
  957. 534 77 |w | RR A
  958. 535 77 |w | RR A
  959. 536 40 |@ | ORL A,@R0
  960. 537 43 a0 |C | ORL A,#0xa0
  961. 539 b8 46 | F| MOV R0,#0x46
  962. 53b a0 | | MOV @R0,A
  963. 53c b8 f6 | | MOV R0,#0xf6
  964. 53e ab | | MOV R3,A
  965. 53f b4 02 | | CALL 0x502 ; C:T:502
  966. 541 83 | | RET ; R:T:None
  967. 542-546 bb
  968. 542 ba 22 | "| MOV R2,#0x22
  969. 544 04 9e | | JMP 0x09e ; >:T:09e
  970. 546-559 segment
  971. 546-550 bb
  972. 546 b8 f2 | | MOV R0,#0xf2
  973. 548 fd | | MOV A,R5
  974. 549 ab | | MOV R3,A
  975. 54a b4 02 | | CALL 0x502 ; C:T:502
  976. 54c b9 4a | J| MOV R1,#0x4a
  977. 54e bc 03 | | MOV R4,#0x03
  978. 550-558 bb
  979. 550 18 | | INC R0
  980. 551 f1 | | MOV A,@R1
  981. 552 ab | | MOV R3,A
  982. 553 b4 02 | | CALL 0x502 ; C:T:502
  983. 555 c9 | | DEC R1
  984. 556 ec 50 | P| DJNZ R4,0x550 ; >:NZ:550 >:Z:558
  985. 558-559 bb
  986. 558 83 | | RET ; R:T:None
  987. 559-58e segment
  988. 559-55b bb
  989. 559 b4 00 | | CALL 0x500 ; C:T:500
  990. 55b-55d bb
  991. 55b 86 5f | _| JNI 0x55f ; >:NI:55f >:NNI:55d
  992. 55d-55f bb
  993. 55d a4 5b | [| JMP 0x55b ; >:T:55b
  994. 55f-562 bb
  995. 55f 23 f7 |# | MOV A,#0xf7
  996. 561 39 |9 | OUTL P1,A
  997. 562-565 bb
  998. 562 80 | | MOVX A,@R0
  999. 563 32 62 |2b| JP1 0x562 ; >:P1:562 >:NP1:565
  1000. 565-56b bb
  1001. 565 89 08 | | ORL P1,#0x08
  1002. 567 a9 | | MOV R1,A
  1003. 568 67 |g | RRC A
  1004. 569 e6 79 | y| JNC 0x579 ; >:NC:579 >:NNC:56b
  1005. 56b-573 bb
  1006. 56b b8 f1 | | MOV R0,#0xf1
  1007. 56d b4 0b | | CALL 0x50b ; C:T:50b
  1008. 56f ba 19 | | MOV R2,#0x19
  1009. 571 f2 7a | z| JP7 0x57a ; >:P7:57a >:NP7:573
  1010. 573-577 bb
  1011. 573 ba 06 | | MOV R2,#0x06
  1012. 575 32 7a |2z| JP1 0x57a ; >:P1:57a >:NP1:577
  1013. 577-579 bb
  1014. 577 52 7c |R|| JP2 0x57c ; >:P2:57c >:NP2:579
  1015. 579-57a bb
  1016. 579 83 | | RET ; R:T:None
  1017. 57a-57c bb
  1018. 57a 04 9e | | JMP 0x09e ; >:T:09e
  1019. 57c-57f bb
  1020. 57c f9 | | MOV A,R1
  1021. 57d d2 83 | | JP6 0x583 ; >:P6:583 >:NP6:57f
  1022. 57f-583 bb
  1023. 57f ba 04 | | MOV R2,#0x04
  1024. 581 04 9e | | JMP 0x09e ; >:T:09e
  1025. 583-586 bb
  1026. 583 37 |7 | CPL A
  1027. 584 b2 8a | | JP5 0x58a ; >:P5:58a >:NP5:586
  1028. 586-58a bb
  1029. 586 ba 03 | | MOV R2,#0x03
  1030. 588 04 9e | | JMP 0x09e ; >:T:09e
  1031. 58a-58e bb
  1032. 58a ba 02 | | MOV R2,#0x02
  1033. 58c 04 9e | | JMP 0x09e ; >:T:09e
  1034. 58e-59e segment
  1035. 58e-593 bb
  1036. 58e b8 3c | <| MOV R0,#0x3c
  1037. 590 f0 | | MOV A,@R0
  1038. 591 c6 94 | | JZ 0x594 ; >:Z:594 >:NZ:593
  1039. 593-594 bb
  1040. 593 83 | | RET ; R:T:None
  1041. 594-59e bb
  1042. 594 b0 ff | | MOV @R0,#0xff
  1043. 596 b8 2d | -| MOV R0,#0x2d
  1044. 598 f0 | | MOV A,@R0
  1045. 599 b8 5f | _| MOV R0,#0x5f
  1046. 59b a0 | | MOV @R0,A
  1047. 59c 84 0d | | JMP 0x40d ; >:T:40d
  1048. 59e-5ae segment
  1049. 59e-5ae bb
  1050. 59e b8 27 | '| MOV R0,#0x27
  1051. 5a0 b9 01 | | MOV R1,#0x01
  1052. 5a2 34 dd |4 | CALL inc(adr=@R0,wid=R1) ; C:T:1dd
  1053. 5a4 54 cf |T | CALL 0x2cf ; C:T:2cf
  1054. 5a6 18 | | INC R0
  1055. 5a7 18 | | INC R0
  1056. 5a8 18 | | INC R0
  1057. 5a9 b9 02 | | MOV R1,#0x02
  1058. 5ab 34 dd |4 | CALL inc(adr=@R0,wid=R1) ; C:T:1dd
  1059. 5ad 83 | | RET ; R:T:None
  1060. 5ae 43 6f |Co| .TXT 'Copyright (C) 1984 Western Digital CorporationWritten by Chandru Sippy',0
  1061. 5b0 70 79 |py|
  1062. 5b2 72 69 |ri|
  1063. 5b4 67 68 |gh|
  1064. 5b6 74 20 |t |
  1065. 5b8 28 43 |(C|
  1066. 5ba 29 20 |) |
  1067. 5bc 31 39 |19|
  1068. 5be 38 34 |84|
  1069. 5c0 20 57 | W|
  1070. 5c2 65 73 |es|
  1071. 5c4 74 65 |te|
  1072. 5c6 72 6e |rn|
  1073. 5c8 20 44 | D|
  1074. 5ca 69 67 |ig|
  1075. 5cc 69 74 |it|
  1076. 5ce 61 6c |al|
  1077. 5d0 20 43 | C|
  1078. 5d2 6f 72 |or|
  1079. 5d4 70 6f |po|
  1080. 5d6 72 61 |ra|
  1081. 5d8 74 69 |ti|
  1082. 5da 6f 6e |on|
  1083. 5dc 57 72 |Wr|
  1084. 5de 69 74 |it|
  1085. 5e0 74 65 |te|
  1086. 5e2 6e 20 |n |
  1087. 5e4 62 79 |by|
  1088. 5e6 20 43 | C|
  1089. 5e8 68 61 |ha|
  1090. 5ea 6e 64 |nd|
  1091. 5ec 72 75 |ru|
  1092. 5ee 20 53 | S|
  1093. 5f0 69 70 |ip|
  1094. 5f2 70 79 |py|
  1095. 5f4 00 | |
  1096. 5f5 00 00 | | .Fill 00[09]
  1097. 5fe a3 | | MOVP A,@A
  1098. 5ff 83 | | RET ; R:T:None
  1099. 600-60b segment
  1100. 600-607 bb
  1101. 600 b9 26 | &| MOV R1,#0x26
  1102. 602 f1 | | MOV A,@R1
  1103. 603 53 7f |S | ANL A,#0x7f
  1104. 605 76 09 |v | JF1 0x609 ; >:F1:609 >:NF1:607
  1105. 607-609 bb
  1106. 607 43 80 |C | ORL A,#0x80
  1107. 609-60b bb
  1108. 609 a1 | | MOV @R1,A
  1109. 60a 83 | | RET ; R:T:None
  1110. 60b-61c segment
  1111. 60b-61c bb
  1112. 60b d5 | | SEL RB1
  1113. 60c 23 ef |# | MOV A,#0xef
  1114. 60e a8 | | MOV R0,A
  1115. 60f 23 fb |# | MOV A,#0xfb
  1116. 611 a9 | | MOV R1,A
  1117. 612 23 fd |# | MOV A,#0xfd
  1118. 614 aa | | MOV R2,A
  1119. 615 17 | | INC A
  1120. 616 ab | | MOV R3,A
  1121. 617 23 f7 |# | MOV A,#0xf7
  1122. 619 ac | | MOV R4,A
  1123. 61a c5 | | SEL RB0
  1124. 61b 83 | | RET ; R:T:None
  1125. 61c-67b segment
  1126. 61c-627 bb
  1127. 61c 94 17 | | CALL CMD_0d ; C:T:417
  1128. 61e b9 1d | | MOV R1,#0x1d
  1129. 620 bc 02 | | MOV R4,#0x02
  1130. 622 b8 57 | W| MOV R0,#0x57
  1131. 624 fe | | MOV A,R6
  1132. 625 12 29 | )| JP0 0x629 ; >:P0:629 >:NP0:627
  1133. 627-629 bb
  1134. 627 b8 4d | M| MOV R0,#0x4d
  1135. 629-632 bb
  1136. 629 54 5f |T_| CALL 0x25f ; C:T:25f
  1137. 62b b8 4d | M| MOV R0,#0x4d
  1138. 62d b9 57 | W| MOV R1,#0x57
  1139. 62f bc 04 | | MOV R4,#0x04
  1140. 631 95 | | CPL F0
  1141. 632-636 bb
  1142. 632 f0 | | MOV A,@R0
  1143. 633 d1 | | XRL A,@R1
  1144. 634 96 78 | x| JNZ 0x678 ; >:NZ:678 >:NNZ:636
  1145. 636-63a bb
  1146. 636 18 | | INC R0
  1147. 637 19 | | INC R1
  1148. 638 ec 32 | 2| DJNZ R4,0x632 ; >:NZ:632 >:Z:63a
  1149. 63a-64b bb
  1150. 63a 85 | | CLR F0
  1151. 63b b8 51 | Q| MOV R0,#0x51
  1152. 63d b9 1d | | MOV R1,#0x1d
  1153. 63f bc 03 | | MOV R4,#0x03
  1154. 641 54 5f |T_| CALL 0x25f ; C:T:25f
  1155. 643 b9 52 | R| MOV R1,#0x52
  1156. 645 b8 2b | +| MOV R0,#0x2b
  1157. 647 34 73 |4s| CALL 0x173 ; C:T:173
  1158. 649 f6 78 | x| JC 0x678 ; >:C:678 >:NC:64b
  1159. 64b-652 bb
  1160. 64b 23 02 |# | MOV A,#0x02
  1161. 64d 6b |k | ADD A,R3
  1162. 64e bb 02 | | MOV R3,#0x02
  1163. 650 12 53 | S| JP0 0x653 ; >:P0:653 >:NP0:652
  1164. 652-653 bb
  1165. 652 cb | | DEC R3
  1166. 653-659 bb
  1167. 653 27 |' | CLR A
  1168. 654 7a |z | ADDC A,R2
  1169. 655 ba 01 | | MOV R2,#0x01
  1170. 657 f6 5c | \| JC 0x65c ; >:C:65c >:NC:659
  1171. 659-65c bb
  1172. 659 bb 03 | | MOV R3,#0x03
  1173. 65b 1a | | INC R2
  1174. 65c-66a bb
  1175. 65c d4 bf | | CALL 0x6bf ; C:T:6bf
  1176. 65e fa | | MOV A,R2
  1177. 65f ac | | MOV R4,A
  1178. 660 54 5f |T_| CALL 0x25f ; C:T:25f
  1179. 662 23 5b |#[| MOV A,#0x5b
  1180. 664 b8 4f | O| MOV R0,#0x4f
  1181. 666 60 |` | ADD A,@R0
  1182. 667 a9 | | MOV R1,A
  1183. 668 b8 53 | S| MOV R0,#0x53
  1184. 66a-671 bb
  1185. 66a f0 | | MOV A,@R0
  1186. 66b d1 | | XRL A,@R1
  1187. 66c a1 | | MOV @R1,A
  1188. 66d 18 | | INC R0
  1189. 66e 19 | | INC R1
  1190. 66f eb 6a | j| DJNZ R3,0x66a ; >:NZ:66a >:Z:671
  1191. 671-678 bb
  1192. 671 95 | | CPL F0
  1193. 672 d4 dc | | CALL 0x6dc ; C:T:6dc
  1194. 674 fa | | MOV A,R2
  1195. 675 ac | | MOV R4,A
  1196. 676 54 5f |T_| CALL 0x25f ; C:T:25f
  1197. 678-67b bb
  1198. 678 ba 18 | | MOV R2,#0x18
  1199. 67a 83 | | RET ; R:T:None
  1200. 67b-695 segment
  1201. 67b-67f bb
  1202. 67b b8 2c | ,| MOV R0,#0x2c
  1203. 67d b2 94 | | JP5 0x694 ; >:P5:694 >:NP5:67f
  1204. 67f-682 bb
  1205. 67f bc 04 | | MOV R4,#0x04
  1206. 681 97 | | CLR C
  1207. 682-68b bb
  1208. 682 b9 48 | H| MOV R1,#0x48
  1209. 684 f1 | | MOV A,@R1
  1210. 685 67 |g | RRC A
  1211. 686 19 | | INC R1
  1212. 687 f1 | | MOV A,@R1
  1213. 688 67 |g | RRC A
  1214. 689 ec 82 | | DJNZ R4,0x682 ; >:NZ:682 >:Z:68b
  1215. 68b-692 bb
  1216. 68b b8 32 | 2| MOV R0,#0x32
  1217. 68d 60 |` | ADD A,@R0
  1218. 68e 9a f7 | | ANL P2,#0xf7
  1219. 690 e6 94 | | JNC 0x694 ; >:NC:694 >:NNC:692
  1220. 692-694 bb
  1221. 692 8a 08 | | ORL P2,#0x08
  1222. 694-695 bb
  1223. 694 83 | | RET ; R:T:None
  1224. 695 b8 f2 | | MOV R0,#0xf2
  1225. 697 b9 5f | _| MOV R1,#0x5f
  1226. 699 bc 05 | | MOV R4,#0x05
  1227. 69b-6a5 segment
  1228. 69b-6a2 bb
  1229. 69b b4 0b | | CALL 0x50b ; C:T:50b
  1230. 69d a1 | | MOV @R1,A
  1231. 69e 19 | | INC R1
  1232. 69f 18 | | INC R0
  1233. 6a0 ec 9b | | DJNZ R4,0x69b ; >:NZ:69b >:Z:6a2
  1234. 6a2-6a5 bb
  1235. 6a2 99 f8 | | ANL P1,#0xf8
  1236. 6a4 83 | | RET ; R:T:None
  1237. 6a5-6b2 segment
  1238. 6a5-6aa bb
  1239. delay(someN):
  1240. 6a5 27 |' | CLR A
  1241. 6a6 b8 31 | 1| MOV R0,#0x31
  1242. 6a8 62 |b | MOV T,A
  1243. 6a9 55 |U | STRT T
  1244. 6aa-6ac bb
  1245. 6aa 16 ae | | JTF 0x6ae ; >:TF:6ae >:NTF:6ac
  1246. 6ac-6ae bb
  1247. 6ac c4 aa | | JMP 0x6aa ; >:T:6aa
  1248. 6ae-6b0 bb
  1249. 6ae e8 aa | | DJNZ R0,0x6aa ; >:NZ:6aa >:Z:6b0
  1250. 6b0-6b2 bb
  1251. 6b0 65 |e | STOP TCNT
  1252. 6b1 83 | | RET ; R:T:None
  1253. 6b2-6bf segment
  1254. 6b2-6b8 bb
  1255. memcpy(0x1d,0x35,3):
  1256. 6b2 b8 1d | | MOV R0,#0x1d
  1257. 6b4 b9 35 | 5| MOV R1,#0x35
  1258. 6b6 be 03 | | MOV R6,#0x03
  1259. 6b8-6be bb
  1260. memcpy(r0,r1,r6):
  1261. 6b8 f1 | | MOV A,@R1
  1262. 6b9 a0 | | MOV @R0,A
  1263. 6ba 18 | | INC R0
  1264. 6bb 19 | | INC R1
  1265. 6bc ee b8 | | DJNZ R6,memcpy(r0,r1,r6) ; >:NZ:6b8 >:Z:6be
  1266. 6be-6bf bb
  1267. 6be 83 | | RET ; R:T:None
  1268. 6bf-6ed segment
  1269. 6bf-6dc bb
  1270. 6bf b9 51 | Q| MOV R1,#0x51
  1271. 6c1 bc 02 | | MOV R4,#0x02
  1272. 6c3 14 df | | CALL rr(adr=@r1,wid=r4) ; C:T:0df
  1273. 6c5 27 |' | CLR A
  1274. 6c6 f7 | | RLC A
  1275. 6c7 b8 4f | O| MOV R0,#0x4f
  1276. 6c9 a0 | | MOV @R0,A
  1277. 6ca c9 | | DEC R1
  1278. 6cb b8 28 | (| MOV R0,#0x28
  1279. 6cd f0 | | MOV A,@R0
  1280. 6ce 61 |a | ADD A,@R1
  1281. 6cf a1 | | MOV @R1,A
  1282. 6d0 c8 | | DEC R0
  1283. 6d1 c9 | | DEC R1
  1284. 6d2 f0 | | MOV A,@R0
  1285. 6d3 13 00 | | ADDC A,#0x00
  1286. 6d5 a1 | | MOV @R1,A
  1287. 6d6 c8 | | DEC R0
  1288. 6d7 c9 | | DEC R1
  1289. 6d8 f0 | | MOV A,@R0
  1290. 6d9 13 00 | | ADDC A,#0x00
  1291. 6db a1 | | MOV @R1,A
  1292. 6dc-6ed bb
  1293. 6dc b8 52 | R| MOV R0,#0x52
  1294. 6de b9 1f | | MOV R1,#0x1f
  1295. 6e0 f0 | | MOV A,@R0
  1296. 6e1 a1 | | MOV @R1,A
  1297. 6e2 c8 | | DEC R0
  1298. 6e3 c9 | | DEC R1
  1299. 6e4 f0 | | MOV A,@R0
  1300. 6e5 a1 | | MOV @R1,A
  1301. 6e6 c8 | | DEC R0
  1302. 6e7 c9 | | DEC R1
  1303. 6e8 f0 | | MOV A,@R0
  1304. 6e9 a1 | | MOV @R1,A
  1305. 6ea b8 5b | [| MOV R0,#0x5b
  1306. 6ec 83 | | RET ; R:T:None
  1307. 6ed 00 00 | | .Fill 00[11]
  1308. 6fe a3 | | MOVP A,@A
  1309. 6ff 83 | | RET ; R:T:None
  1310. 700 0f | | MOVD A,P3
  1311. 701-7df segment
  1312. 701-70d bb
  1313. 701 99 70 | p| ANL P1,#0x70
  1314. 703 89 f0 | | ORL P1,#0xf0
  1315. 705 b9 ff | | MOV R1,#0xff
  1316. 707 bb ff | | MOV R3,#0xff
  1317. 709 ba 30 | 0| MOV R2,#0x30
  1318. 70b e4 2f | /| JMP 0x72f ; >:T:72f
  1319. 70d b8 08 | | MOV R0,#0x08
  1320. 70f b0 20 | | MOV @R0,#0x20
  1321. 711 18 | | INC R0
  1322. 712 b0 07 | | MOV @R0,#0x07
  1323. 714 18 | | INC R0
  1324. 715 b0 fe | | MOV @R0,#0xfe
  1325. 717 18 | | INC R0
  1326. 718 23 07 |# | MOV A,#0x07
  1327. 71a-71b bb
  1328. 71a a0 | | MOV @R0,A
  1329. 71b-720 bb
  1330. 71b 23 02 |# | MOV A,#0x02
  1331. 71d d7 | | MOV PSW,A
  1332. 71e f9 | | MOV A,R1
  1333. 71f 83 | | RET ; R:T:None
  1334. 720 6b |k | ADD A,R3
  1335. 721 e7 | | RL A
  1336. 722 ab | | MOV R3,A
  1337. 723 e9 1b | | DJNZ R1,0x71b ; >:NZ:71b >:Z:725
  1338. 725-72a bb
  1339. 725 f0 | | MOV A,@R0
  1340. 726 03 ff | | ADD A,#0xff
  1341. 728 f6 1a | | JC 0x71a ; >:C:71a >:NC:72a
  1342. 72a-72f bb
  1343. 72a 27 |' | CLR A
  1344. 72b a3 | | MOVP A,@A
  1345. 72c db | | XRL A,R3
  1346. 72d 96 80 | | JNZ 0x780 ; >:NZ:780 >:NNZ:72f
  1347. 72f-731 bb
  1348. 72f b9 01 | | MOV R1,#0x01
  1349. 731-735 bb
  1350. 731 b8 04 | | MOV R0,#0x04
  1351. 733 f9 | | MOV A,R1
  1352. 734 ab | | MOV R3,A
  1353. 735-739 bb
  1354. 735 fb | | MOV A,R3
  1355. 736 97 | | CLR C
  1356. 737 96 3a | :| JNZ 0x73a ; >:NZ:73a >:NNZ:739
  1357. 739-73a bb
  1358. 739 a7 | | CPL C
  1359. 73a-742 bb
  1360. 73a f7 | | RLC A
  1361. 73b ab | | MOV R3,A
  1362. 73c a0 | | MOV @R0,A
  1363. 73d 18 | | INC R0
  1364. 73e f8 | | MOV A,R0
  1365. 73f 37 |7 | CPL A
  1366. 740 f2 35 | 5| JP7 0x735 ; >:P7:735 >:NP7:742
  1367. 742-746 bb
  1368. 742 b8 04 | | MOV R0,#0x04
  1369. 744 f9 | | MOV A,R1
  1370. 745 ab | | MOV R3,A
  1371. 746-74a bb
  1372. 746 fb | | MOV A,R3
  1373. 747 97 | | CLR C
  1374. 748 96 4b | K| JNZ 0x74b ; >:NZ:74b >:NNZ:74a
  1375. 74a-74b bb
  1376. 74a a7 | | CPL C
  1377. 74b-750 bb
  1378. 74b f7 | | RLC A
  1379. 74c ab | | MOV R3,A
  1380. 74d d0 | | XRL A,@R0
  1381. 74e 96 80 | | JNZ 0x780 ; >:NZ:780 >:NNZ:750
  1382. 750-755 bb
  1383. 750 18 | | INC R0
  1384. 751 f8 | | MOV A,R0
  1385. 752 37 |7 | CPL A
  1386. 753 f2 46 | F| JP7 0x746 ; >:P7:746 >:NP7:755
  1387. 755-758 bb
  1388. 755 f9 | | MOV A,R1
  1389. 756 c6 5d | ]| JZ 0x75d ; >:Z:75d >:NZ:758
  1390. 758-75d bb
  1391. 758 97 | | CLR C
  1392. 759 f7 | | RLC A
  1393. 75a a9 | | MOV R1,A
  1394. 75b e4 31 | 1| JMP 0x731 ; >:T:731
  1395. 75d-764 bb
  1396. 75d 1a | | INC R2
  1397. 75e b8 f2 | | MOV R0,#0xf2
  1398. 760 bb a5 | | MOV R3,#0xa5
  1399. 762 bc 03 | | MOV R4,#0x03
  1400. 764-76b bb
  1401. 764 b4 02 | | CALL 0x502 ; C:T:502
  1402. 766 18 | | INC R0
  1403. 767 37 |7 | CPL A
  1404. 768 ab | | MOV R3,A
  1405. 769 ec 64 | d| DJNZ R4,0x764 ; >:NZ:764 >:Z:76b
  1406. 76b-776 bb
  1407. 76b 18 | | INC R0
  1408. 76c ab | | MOV R3,A
  1409. 76d b4 02 | | CALL 0x502 ; C:T:502
  1410. 76f b4 0b | | CALL 0x50b ; C:T:50b
  1411. 771 ab | | MOV R3,A
  1412. 772 c8 | | DEC R0
  1413. 773 c8 | | DEC R0
  1414. 774 bc 03 | | MOV R4,#0x03
  1415. 776-77d bb
  1416. 776 b4 0b | | CALL 0x50b ; C:T:50b
  1417. 778 c8 | | DEC R0
  1418. 779 db | | XRL A,R3
  1419. 77a ab | | MOV R3,A
  1420. 77b ec 76 | v| DJNZ R4,0x776 ; >:NZ:776 >:Z:77d
  1421. 77d-77f bb
  1422. 77d 96 80 | | JNZ 0x780 ; >:NZ:780 >:NNZ:77f
  1423. 77f-780 bb
  1424. 77f aa | | MOV R2,A
  1425. 780-7c8 bb
  1426. 780 bb 20 | | MOV R3,#0x20
  1427. 782 b4 02 | | CALL 0x502 ; C:T:502
  1428. 784 23 a0 |# | MOV A,#0xa0
  1429. 786 b8 46 | F| MOV R0,#0x46
  1430. 788 a0 | | MOV @R0,A
  1431. 789 9a f0 | | ANL P2,#0xf0
  1432. 78b b8 2a | *| MOV R0,#0x2a
  1433. 78d 23 fe |# | MOV A,#0xfe
  1434. 78f a0 | | MOV @R0,A
  1435. 790 18 | | INC R0
  1436. 791 27 |' | CLR A
  1437. 792 a0 | | MOV @R0,A
  1438. 793 18 | | INC R0
  1439. 794 a0 | | MOV @R0,A
  1440. 795 18 | | INC R0
  1441. 796 23 06 |# | MOV A,#0x06
  1442. 798 a0 | | MOV @R0,A
  1443. 799 18 | | INC R0
  1444. 79a 23 fc |# | MOV A,#0xfc
  1445. 79c a0 | | MOV @R0,A
  1446. 79d 18 | | INC R0
  1447. 79e 23 fe |# | MOV A,#0xfe
  1448. 7a0 a0 | | MOV @R0,A
  1449. 7a1 18 | | INC R0
  1450. 7a2 23 ce |# | MOV A,#0xce
  1451. 7a4 a0 | | MOV @R0,A
  1452. 7a5 18 | | INC R0
  1453. 7a6 23 20 |# | MOV A,#0x20
  1454. 7a8 a0 | | MOV @R0,A
  1455. 7a9 18 | | INC R0
  1456. 7aa 23 e0 |# | MOV A,#0xe0
  1457. 7ac a0 | | MOV @R0,A
  1458. 7ad 18 | | INC R0
  1459. 7ae 23 11 |# | MOV A,#0x11
  1460. 7b0 a0 | | MOV @R0,A
  1461. 7b1 18 | | INC R0
  1462. 7b2 18 | | INC R0
  1463. 7b3 23 04 |# | MOV A,#0x04
  1464. 7b5 a0 | | MOV @R0,A
  1465. 7b6 18 | | INC R0
  1466. 7b7 27 |' | CLR A
  1467. 7b8 a0 | | MOV @R0,A
  1468. 7b9 18 | | INC R0
  1469. 7ba a0 | | MOV @R0,A
  1470. 7bb 18 | | INC R0
  1471. 7bc 18 | | INC R0
  1472. 7bd 23 04 |# | MOV A,#0x04
  1473. 7bf a0 | | MOV @R0,A
  1474. 7c0 18 | | INC R0
  1475. 7c1 77 |w | RR A
  1476. 7c2 77 |w | RR A
  1477. 7c3 a0 | | MOV @R0,A
  1478. 7c4 18 | | INC R0
  1479. 7c5 27 |' | CLR A
  1480. 7c6 bc 0b | | MOV R4,#0x0b
  1481. 7c8-7cc bb
  1482. 7c8 a0 | | MOV @R0,A
  1483. 7c9 18 | | INC R0
  1484. 7ca ec c8 | | DJNZ R4,0x7c8 ; >:NZ:7c8 >:Z:7cc
  1485. 7cc-7db bb
  1486. 7cc b8 3e | >| MOV R0,#0x3e
  1487. 7ce 54 dd |T | CALL 0x2dd ; C:T:2dd
  1488. 7d0 b8 42 | B| MOV R0,#0x42
  1489. 7d2 54 dd |T | CALL 0x2dd ; C:T:2dd
  1490. 7d4 54 e3 |T | CALL 0x2e3 ; C:T:2e3
  1491. 7d6 d4 0b | | CALL 0x60b ; C:T:60b
  1492. 7d8 b5 | | CPL F1
  1493. 7d9 76 dd |v | JF1 0x7dd ; >:F1:7dd >:NF1:7db
  1494. 7db-7dd bb
  1495. 7db 04 a4 | | CMD_03: JMP CMD_03 ; >:T:0a4
  1496. 7dd-7df bb
  1497. 7dd 04 b7 | | JMP 0x0b7 ; >:T:0b7
  1498. 7df 00 00 | | .Fill 00[1f]
  1499. 7fe a3 | | MOVP A,@A
  1500. 7ff 83 | | RET ; R:T:None
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!