0000 .word #%0000 ;RST c000 .word #%c000 ;RST FCW 8000 .word #%8000 ;RST SEG 0070 .word #%0070 ;RST PC 434f5059 sub r15,%5059(r4) 52494748 subl rr9,%4748(r4) 542c205a ldl rr12,%205a(r2) 494c4f47 xor r12,%4f47(r4) 2c20 exb rh0,@r2 494e432e xor r14,%432e(r4) 2031 ldb rh1,@r3 3938 .word #%3938 3020002f ldb rh0,r2(#%002f) 53383030 push @r3,%3030(r8) 30204d6f ldb rh0,r2(#%4d6f) 6e69746f ldb %746f(r6),rl1 7220322e ldb r2(r2),rh0 32202d20 ldb r2(#%2d20),rh0 50726573 cpl rr2,%6573(r7) 73205354 ld r2(r3),r0 41525420 add r2,%5420(r5) 746f204c lda r15,r6(r0) 6f616420 ld %6420(r6),r1 53797374 push @r7,%7374(r9) 656d0d00 set %0d00(r6),#13 0a4a cpb rl2,@r4 0a68 cpb rl0,@r6 09d8 xor r8,@r13 0a80 cpb rh0,@r8 050c0540 or r12,#%0540 0594 or r4,@r9 0544 or r4,@r4 0398 sub r8,@r9 03a4 sub r4,@r10 11aa pushl @r10,@r10 0cae .word #%0cae 016c add r12,@r6 8de8 clr r14 7dec .word #%7dec 21014000 ld r1,#%4000 7d1a ldctl fcw,r1 8d38 clr r3 3b3700f0 sout %00f0,r3 3ab4ffc1 inb rl3,%ffc1 b2b1fffc srlb rl3,#4 060b0303 andb rl3,#%03 603802f0 ldb rl0,%02f0(r3) c947 ldb rl1,#%47 3a96ffa3 outb %ffa3,rl1 3a86ffa3 outb %ffa3,rl0 3a96ffa1 outb %ffa1,rl1 3a86ffa1 outb %ffa1,rl0 21020202 ld r2,#%0202 2100000b ld r0,#%000b 2101ff87 ld r1,#%ff87 3a220010 otirb @r1,@r2,r0 2102020e ld r2,#%020e 21000009 ld r0,#%0009 2101ff85 ld r1,#%ff85 3a220010 otirb @r1,@r2,r0 21010000 ld r1,#%0000 7d1b ldctl refresh,r1 6f0143e4 ld %43e4,r1 21044000 ld r4,#%4000 21024002 ld r2,#%4002 0d450000 ld @r4,#%0000 21010200 ld r1,#%0200 bb410120 ldir @r2,@r4,r1 21044000 ld r4,#%4000 21024002 ld r2,#%4002 0d450000 ld @r4,#%0000 21010020 ld r1,#%0020 bb410120 ldir @r2,@r4,r1 4d0540b02020 ld %40b0,#%2020 210440b0 ld r4,#%40b0 210240b2 ld r2,#%40b2 21010080 ld r1,#%0080 bb410120 ldir @r2,@r4,r1 210401f4 ld r4,#%01f4 210243f2 ld r2,#%43f2 bd17 ldk r1,#7 bb410120 ldir @r2,@r4,r1 21040250 ld r4,#%0250 21024400 ld r2,#%4400 21010048 ld r1,#%0048 bb410120 ldir @r2,@r4,r1 210e8000 ld r14,#%8000 210f4020 ld r15,#%4020 5d0e43da ldl %43da,rr14 210f40a0 ld r15,#%40a0 21014400 ld r1,#%4400 7d1d ldctl psap,r1 6f0e43ea ld %43ea,r14 6f0e43de ld %43de,r14 6f0143ec ld %43ec,r1 4d0543e08000 ld %43e0,#%8000 4d0543e2c000 ld %43e2,#%c000 640343f1 setb %43f1,#3 620443f1 resb %43f1,#4 5f000a80 call %0a80 21020024 ld r2,#%0024 5f00050c call %050c 7c05 ei vi 210f40a0 ld r15,#%40a0 0df9016c push @r15,#%016c 600943f0 ldb rl1,%43f0 07010006 and r1,#%0006 6e0943f0 ldb %43f0,rl1 600843fe ldb rl0,%43fe 5f000a68 call %0a68 5f000a8c call %0a8c ee04 jr nz,%0196 660243f1 bitb %43f1,#2 e601 jr z,%0196 c84e ldb rl0,#%4e 620243f1 resb %43f1,#2 21010010 ld r1,#%0010 761201b1 lda r2,%01b1(r1) ba2c0186 cpdrb rl0,@r2,r1,z ee1c jr nz,%01e0 b3110001 sll r1,#1 611201c2 ld r2,%01c2(r1) 1e28 jp @r2 42434446 subb rh3,%4446(r4) 47494a4c and r9,%4a4c(r4) 4d4e .word #%4d4e 5451525a ldl rr1,%525a(r5) 50000c3e cpl rr0,%0c3e 033e sub r14,@r3 03b2 sub r2,@r11 02f4 subb rh4,@r15 0b54 cp r4,@r5 06d4 andb rh4,@r13 0b42 cp r2,@r4 0dc2 neg @r12 0316 sub r6,@r1 0bc6 cp r6,@r12 1468 ldl rr8,@r6 0bf8 cp r8,@r15 07a6 and r6,@r10 126e subl rr14,@r6 06de andb rl6,@r13 c83f ldb rl0,#%3f 5f000a68 call %0a68 4d05439e0000 ld %439e,#%0000 210f40a0 ld r15,#%40a0 5e08016c jp %016c 087f xorb rl7,@r7 1113 pushl @r1,@r3 00007f00 addb rh0,#%00 00040001 addb rh4,#%01 20001802 ldb rh0,#%00 1014 cpl rr4,@r1 cc03 ldb rl4,#%03 c105 ldb rh1,#%05 ea11 jr gt,%022e 1c00 .word #%1c00 1814 multl rq4,@r1 cc03 ldb rl4,#%03 c105 ldb rh1,#%05 ea11 jr gt,%0238 180021f52102 multl rq0,#%21f52102 022e subb rl6,@r2 5f00050c call %050c 5f000540 call %0540 5f000594 call %0594 5e08016c jp %016c 0020 addb rh0,@r2 554e494e popl %494e(r14),@r4 49544941 xor r4,%4941(r5) 4c49 .word #%4c49 5a454420 divl rq5,%4420(r4) 56454354 addl rr5,%4354(r4) 4f5220454e54 ext4f #%4f522045,%4e54 52592020 subl rr9,%2020(r5) 49443d20 xor r4,%3d20(r4) 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00004000 addb rh0,#%00 8000 addb rh0,rh0 0218 subb rl0,@r1 00004000 addb rh0,#%00 8000 addb rh0,rh0 0218 subb rl0,@r1 0000c000 addb rh0,#%00 8000 addb rh0,rh0 0f2c0000 ext0f #%0f2c0000 40008000 addb rh0,%8000 0218 subb rl0,@r1 00004000 addb rh0,#%00 8000 addb rh0,rh0 12d6 subl rr6,@r13 00004000 addb rh0,#%00 8000 addb rh0,rh0 0218 subb rl0,@r1 00004000 addb rh0,#%00 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0abc cpb rl4,@r11 8000 addb rh0,rh0 10c0 cpl rr0,@r12 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 1090 cpl rr0,@r9 8000 addb rh0,rh0 10ca cpl rr10,@r12 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 8000 addb rh0,rh0 0218 subb rl0,@r1 40100201 addb rh0,%0201(r1) dee8 calr %0526 e704 jr c,%0300 a770 bit r7,#0 5e0e01e0 jp nz,%01e0 8375 sub r5,r7 5e0701e0 jp c,%01e0 b351ffff srl r5,#1 a950 inc r5,#1 7f01 sc #%01 2f63 ld @r6,r3 a971 inc r7,#2 f583 djnz r5,%030c 7f02 sc #%02 9e08 ret def9 calr %0526 e7f3 jr c,%0300 8b64 cp r4,r6 ee02 jr nz,%0322 8b57 cp r7,r5 e705 jr c,%032c 7f01 sc #%01 ba610340 ldirb @r4,@r6,r3 7f02 sc #%02 9e08 ret 8137 add r7,r3 ab70 dec r7,#1 8135 add r5,r3 ab50 dec r5,#1 7f01 sc #%01 ba690340 lddrb @r6,@r4,r3 7f02 sc #%02 9e08 ret df0d calr %0526 e7df jr c,%0300 9448 ldl rr8,rr4 a13a ld r10,r3 8d34 test r3 5e0601e0 jp z,%01e0 7f01 sc #%01 2069 ldb rl1,@r6 ba800a96 cpib rl1,@r8,r10,z 7f02 sc #%02 e606 jr z,%0364 9484 ldl rr4,rr8 ab50 dec r5,#1 dff9 calr %036c 9464 ldl rr4,rr6 dffb calr %036c dee8 calr %0594 8da4 test r10 9e06 ret z a970 inc r7,#1 e8f0 jr %034c dff1 calr %038c a152 ld r2,r5 a04d ldb rl5,rh4 dfed calr %039a a125 ld r5,r2 df1c calr %0540 21013d20 ld r1,#%3d20 df45 calr %04f4 7f01 sc #%01 204d ldb rl5,@r4 7f02 sc #%02 df21 calr %0544 6901439e inc %439e,#2 9e08 ret 21013c20 ld r1,#%3c20 df4f calr %04f4 6b00439e dec %439e,#1 9e08 ret d007 calr %038c a2d7 resb rl5,#7 df2d calr %0544 21013e20 ld r1,#%3e20 e8f6 jr %0390 6102439e ld r2,%439e 6e294130 ldb %4130(r2),rl1 6900439e inc %439e,#1 9e08 ret 620143f1 resb %43f1,#1 dea2 calr %0674 21070202 ld r7,#%0202 610a43de ld r10,%43de ee02 jr nz,%03c6 a13b ld r11,r3 e850 jr %0466 dedd calr %060e ee02 jr nz,%03ce 640143f1 setb %43f1,#1 942a ldl rr10,rr2 660143f1 bitb %43f1,#1 ee44 jr nz,%045e df8e calr %04bc e642 jr z,%045e dec6 calr %0650 a13d ld r13,r3 e603 jr z,%03e6 df93 calr %04bc 5e0e01e0 jp nz,%01e0 8dd4 test r13 5e0601e0 jp z,%01e0 21060010 ld r6,#%0010 d033 calr %038c a1a5 ld r5,r10 a05d ldb rl5,rh5 d02f calr %039a a1b5 ld r5,r11 df5e calr %0540 6900439e inc %439e,#1 2108003a ld r8,#%003a 4c8541302a2a ldb %4130(r8),#%2a a980 inc r8,#1 7f01 sc #%01 20ad ldb rl5,@r10 7f02 sc #%02 6e8d4130 ldb %4130(r8),rl5 0a0d2020 cpb rl5,#%20 e703 jr c,%0422 0a0d7f7f cpb rl5,#%7f e703 jr c,%0428 4c8541302e2e ldb %4130(r8),#%2e a980 inc r8,#1 4c8541302a2a ldb %4130(r8),#%2a df77 calr %0544 a9b0 inc r11,#1 ab60 dec r6,#1 ee08 jr nz,%0448 a980 inc r8,#1 6f08439e ld %439e,r8 df56 calr %0594 a07f ldb rl7,rh7 abd0 dec r13,#1 eed3 jr nz,%03ec 9e08 ret ff1f dbjnz rl7,%040c 6900439e inc %439e,#1 a07f ldb rl7,rh7 abd0 dec r13,#1 eedc jr nz,%040c a980 inc r8,#1 6f08439e ld %439e,r8 df64 calr %0594 9e08 ret 0a0f0101 cpb rl7,#%01 e601 jr z,%0466 a3b0 res r11,#0 94a8 ldl rr8,rr10 d06f calr %038c a1a5 ld r5,r10 a05d ldb rl5,rh5 d06b calr %039a a1b5 ld r5,r11 df9a calr %0540 6900439e inc %439e,#1 7f01 sc #%01 20ad ldb rl5,@r10 7f02 sc #%02 df9e calr %0544 a9b0 inc r11,#1 ff06 dbjnz rl7,%0478 6900439e inc %439e,#1 a07f ldb rl7,rh7 dfd0 calr %04ec ef09 jr nc,%04a0 0a085151 cpb rl0,#%51 9e06 ret z 93f7 push @r15,r7 8c78 clrb rh7 837b sub r11,r7 837b sub r11,r7 97f7 pop r7,@r15 e8e3 jr %0466 e6e2 jr z,%0466 aaf0 decb rl7,#1 7f01 sc #%01 ee02 jr nz,%04ac 2e8b ldb @r8,rl3 e805 jr %04b6 aaf0 decb rl7,#1 ee02 jr nz,%04b4 2f83 ld @r8,r3 e801 jr %04b6 1d82 ldl @r8,rr2 7f02 sc #%02 a07f ldb rl7,rh7 e8d5 jr %0466 21070202 ld r7,#%0202 0a080d0d cpb rl0,#%0d 9e06 ret z 0a085757 cpb rl0,#%57 9e06 ret z 21070101 ld r7,#%0101 0a084242 cpb rl0,#%42 9e06 ret z 21070404 ld r7,#%0404 0a084c4c cpb rl0,#%4c 9e06 ret z 21070202 ld r7,#%0202 9e08 ret dfd4 calr %0540 6900439e inc %439e,#1 dfa6 calr %05a2 5f000992 call %0992 9e08 ret 93f4 push @r15,r4 6104439e ld r4,%439e 6e414130 ldb %4130(r4),rh1 a940 inc r4,#1 6e494130 ldb %4130(r4),rl1 6901439e inc %439e,#2 97f4 pop r4,@r15 9e08 ret 2120 ld r0,@r2 0b000000 cp r0,#%0000 9e06 ret z 6f00439e ld %439e,r0 a921 inc r2,#2 21044130 ld r4,#%4130 ba210040 ldirb @r4,@r2,r0 5e0805a2 jp %05a2 df5a calr %0674 df8e calr %060e e608 jr z,%053c 9426 ldl rr6,rr2 e801 jr %0532 df5f calr %0674 df93 calr %060e e603 jr z,%053c 9424 ldl rr4,rr2 df75 calr %0650 9e0f ret nc 8d81 setflg c 9e08 ret a050 ldb rh0,rh5 dfff calr %0546 a0d0 ldb rh0,rl5 be08 rldb rl0,rh0 dfff calr %054c be08 rldb rl0,rh0 93f1 push @r15,r1 06080f0f andb rl0,#%0f 600940af ldb rl1,%40af 8089 addb rl1,rl0 6e0940af ldb %40af,rl1 0a080a0a cpb rl0,#%0a e702 jr c,%0566 00080707 addb rl0,#%07 00083030 addb rl0,#%30 93f6 push @r15,r6 6106439e ld r6,%439e 6e684130 ldb %4130(r6),rl0 6900439e inc %439e,#1 97f6 pop r6,@r15 97f1 pop r1,@r15 9e08 ret 4d0443f6 test %43f6 9e06 ret z 610143f6 ld r1,%43f6 8d08 clr r0 5f000a68 call %0a68 ab10 dec r1,#1 eefc jr nz,%058a 9e08 ret 6103439e ld r3,%439e 4c3541300d0d ldb %4130(r3),#%0d 6900439e inc %439e,#1 8d38 clr r3 60384130 ldb rl0,%4130(r3) a930 inc r3,#1 5f000a68 call %0a68 e604 jr z,%05b8 4b03439e cp r3,%439e e7f7 jr c,%05a4 e808 jr %05c8 c80a ldb rl0,#%0a 5f000a68 call %0a68 5f00057e call %057e 660443f1 bitb %43f1,#4 eeee jr nz,%05a4 4d05439e0000 ld %439e,#%0000 21000040 ld r0,#%0040 4d0541302020 ld %4130,#%2020 21024130 ld r2,#%4130 21044132 ld r4,#%4132 bb210040 ldir @r4,@r2,r0 9e08 ret 0a083030 cpb rl0,#%30 9e07 ret c 0a083a3a cpb rl0,#%3a e708 jr c,%0602 0a084141 cpb rl0,#%41 9e07 ret c 0a084747 cpb rl0,#%47 ef06 jr nc,%060a 02080707 subb rl0,#%07 06080f0f andb rl0,#%0f 8d83 resflg c 9e08 ret 8d81 setflg c 9e08 ret dffe calr %0614 dfe1 calr %0650 9e08 ret 610243de ld r2,%43de a52f set r2,#15 620043f1 resb %43f1,#0 0a080d0d cpb rl0,#%0d 9e06 ret z 0a083c3c cpb rl0,#%3c 9e0e ret nz 8d38 clr r3 dfd2 calr %068a 5e0601e0 jp z,%01e0 d027 calr %05e6 e702 jr c,%063a beb8 rldb rl0,rl3 e8f9 jr %062c 0a083e3e cpb rl0,#%3e 5e0e01e0 jp nz,%01e0 dfe3 calr %067e a0b2 ldb rh2,rl3 8ca8 clrb rl2 a52f set r2,#15 640043f1 setb %43f1,#0 9e08 ret 8d38 clr r3 0a080d0d cpb rl0,#%0d 8d81 setflg c 9e06 ret z d03b calr %05e6 5e0701e0 jp c,%01e0 beb8 rldb rl0,rl3 be38 rldb rl0,rh3 dfee calr %068a 9e06 ret z 0a082020 cpb rl0,#%20 eef6 jr nz,%065a dff9 calr %067e 8d83 resflg c 9e08 ret dff6 calr %068a 9e06 ret z 0a082020 cpb rl0,#%20 eefb jr nz,%0674 dffb calr %068a 9e06 ret z 0a082020 cpb rl0,#%20 e6fb jr z,%067e 9e08 ret 93f2 push @r15,r2 6102439c ld r2,%439c 602840b0 ldb rl0,%40b0(r2) 6900439c inc %439c,#1 0a080d0d cpb rl0,#%0d 97f2 pop r2,@r15 9e08 ret 30203120 ldb rh0,r2(#%3120) 32203320 ldb r2(#%3320),rh0 34203520 lda r0,r2(#%3520) 3620 .word #%3620 37203820 ldl r2(#%3820),rr0 3920 ldps @r2 31303131 ld r0,r3(#%3131) 31323133 ld r2,r3(#%3133) 31343135 ld r4,r3(#%3135) 53475043 push @r4,%5043(r7) 46435246 andb rh3,%5246(r4) 4e344e355053 ext4e #%4e344e35,%5053 504f524c cpl rr15,%524c(r4) 52482105 subl rr8,%2105(r4) 0786 and r6,@r8 21070766 ld r7,#%0766 e804 jr %06e6 21050796 ld r5,#%0796 21070776 ld r7,#%0776 6f0543bc ld %43bc,r5 6f0743ba ld %43ba,r7 5f000674 call %0674 5e0601e0 jp z,%01e0 5f000650 call %0650 a136 ld r6,r3 8d78 clr r7 e607 jr z,%070e 0a085757 cpb rl0,#%57 e605 jr z,%0710 0a084242 cpb rl0,#%42 5e0e01e0 jp nz,%01e0 bd71 ldk r7,#1 210543b8 ld r5,#%43b8 8175 add r5,r7 610343ba ld r3,%43ba 1f30 call @r3 610143b8 ld r1,%43b8 a165 ld r5,r6 5f000540 call %0540 6900439e inc %439e,#1 a115 ld r5,r1 a770 bit r7,#0 ee03 jr nz,%0736 5f000540 call %0540 e802 jr %073a 5f000544 call %0544 6900439e inc %439e,#1 5f0005a2 call %05a2 5f000992 call %0992 e802 jr %074c 5f000998 call %0998 9e07 ret c 9e06 ret z 8c81 ldctlb rl0,flags 210543b8 ld r5,#%43b8 2f53 ld @r5,r3 8175 add r5,r7 610343bc ld r3,%43bc 1f30 call @r3 a684 bitb rl0,#4 9e0e ret nz e8f1 jr %0748 a770 bit r7,#0 ee03 jr nz,%0770 3b600358 ini @r5,@r6,r3 9e08 ret 3a600358 inib @r5,@r6,r3 9e08 ret a770 bit r7,#0 ee03 jr nz,%0780 3b610358 sini @r5,@r6,r3 9e08 ret 3a610358 sinib @r5,@r6,r3 9e08 ret a770 bit r7,#0 ee03 jr nz,%0790 3b520368 outi @r6,@r5,r3 9e08 ret 3a520368 outib @r6,@r5,r3 9e08 ret a770 bit r7,#0 ee03 jr nz,%07a0 3b530368 souti @r6,@r5,r3 9e08 ret 3a530368 soutib @r6,@r5,r3 9e08 ret 5f000674 call %0674 5e0608fa jp z,%08fa 0a085252 cpb rl0,#%52 ee06 jr nz,%07c0 5f00068a call %068a e615 jr z,%07e4 0a084646 cpb rl0,#%46 e60e jr z,%07dc 8d68 clr r6 0a084c4c cpb rl0,#%4c e60c jr z,%07e0 a961 inc r6,#2 0a084848 cpb rl0,#%48 e608 jr z,%07e0 a963 inc r6,#4 0a085252 cpb rl0,#%52 ee08 jr nz,%07e8 ab61 dec r6,#2 e802 jr %07e0 c152 ldb rh1,#%52 e809 jr %07f2 5f00068a call %068a 5e0601e0 jp z,%01e0 a081 ldb rh1,rl0 5f00068a call %068a ee01 jr nz,%07f2 c820 ldb rl0,#%20 a089 ldb rl1,rl0 21070018 ld r7,#%0018 210806ce ld r8,#%06ce bb8c0716 cpdr r1,@r8,r7,z 5e0e01e0 jp nz,%01e0 a981 inc r8,#2 8177 add r7,r7 0a0e0404 cpb rl6,#%04 e753 jr c,%08b4 e62b jr z,%0866 21015220 ld r1,#%5220 5f0004f4 call %04f4 6b00439e dec %439e,#1 2181 ld r1,@r8 5f0004f4 call %04f4 6900439e inc %439e,#1 617543be ld r5,%43be(r7) 5f0004e6 call %04e6 9e07 ret c e614 jr z,%085a 2182 ld r2,@r8 0b025043 cp r2,#%5043 ee02 jr nz,%083e a330 res r3,#0 e80c jr %0856 0b025246 cp r2,#%5246 ee01 jr nz,%0846 7d3b ldctl refresh,r3 0b025347 cp r2,#%5347 ee05 jr nz,%0856 0a030000 cpb rh3,#%00 ee02 jr nz,%0856 a0b3 ldb rh3,rl3 8cb8 clrb rl3 6f7343be ld %43be(r7),r3 a971 inc r7,#2 a981 inc r8,#2 0b0806cf cp r8,#%06cf e7d6 jr c,%0810 9e08 ret 0b0806be cp r8,#%06be ef26 jr nc,%08b8 0a092020 cpb rl1,#%20 e602 jr z,%0876 a710 bit r1,#0 e801 jr %0878 a718 bit r1,#8 eec3 jr nz,%0800 21015252 ld r1,#%5252 5f0004f4 call %04f4 2181 ld r1,@r8 5f0004f4 call %04f4 6900439e inc %439e,#1 617543be ld r5,%43be(r7) 5f000540 call %0540 617543c0 ld r5,%43c0(r7) 5f0004e6 call %04e6 9e07 ret c e604 jr z,%08a8 6f7243be ld %43be(r7),r2 6f7343c0 ld %43c0(r7),r3 a973 inc r7,#4 a983 inc r8,#4 0b0806bf cp r8,#%06bf e7e4 jr c,%087a 9e08 ret 0b0806b0 cp r8,#%06b0 5e0f01e0 jp nc,%01e0 8d64 test r6 ee01 jr nz,%08c2 a970 inc r7,#1 616106d0 ld r1,%06d0(r6) 5f0004f4 call %04f4 2181 ld r1,@r8 5f0004f4 call %04f4 607d43be ldb rl5,%43be(r7) 5f000544 call %0544 6900439e inc %439e,#1 5f0004ec call %04ec 9e07 ret c e602 jr z,%08e8 6e7b43be ldb %43be(r7),rl3 a970 inc r7,#1 ab61 dec r6,#2 e6ea jr z,%08c2 a963 inc r6,#4 a981 inc r8,#2 0b0806b0 cp r8,#%06b0 e7e5 jr c,%08c2 9e08 ret dffc calr %0904 dfd6 calr %0952 dfde calr %0944 5e080984 jp %0984 bd0c ldk r0,#12 210406a0 ld r4,#%06a0 bd68 ldk r6,#8 210806be ld r8,#%06be 6103439e ld r3,%439e 4c3541305252 ldb %4130(r3),#%52 6900439e inc %439e,#1 2141 ld r1,@r4 5f0004f4 call %04f4 ab00 dec r0,#1 5e060594 jp z,%0594 ab60 dec r6,#1 ee01 jr nz,%0930 a184 ld r4,r8 a941 inc r4,#2 0b060000 cp r6,#%0000 ea03 jr gt,%093e 6903439e inc %439e,#4 e8ee jr %091a 6901439e inc %439e,#2 e8e6 jr %0910 bd0c ldk r0,#12 210406b0 ld r4,#%06b0 210806c6 ld r8,#%06c6 bd68 ldk r6,#8 e8df jr %0910 bd2c ldk r2,#12 210643be ld r6,#%43be bd88 ldk r8,#8 210a43dc ld r10,#%43dc 2165 ld r5,@r6 5f000540 call %0540 ab20 dec r2,#1 5e060594 jp z,%0594 ab80 dec r8,#1 ee01 jr nz,%0970 a1a6 ld r6,r10 a961 inc r6,#2 0b080000 cp r8,#%0000 ea03 jr gt,%097e 6902439e inc %439e,#3 e8f0 jr %095e 6900439e inc %439e,#1 e8ed jr %095e bd2c ldk r2,#12 210643ce ld r6,#%43ce bd88 ldk r8,#8 210a43e4 ld r10,#%43e4 e8e6 jr %095e c83f ldb rl0,#%3f df97 calr %0a68 df86 calr %0a8c 8d28 clr r2 8d38 clr r3 5f00067e call %067e 9e06 ret z 0a085151 cpb rl0,#%51 e603 jr z,%09ae 0a082d2d cpb rl0,#%2d ee02 jr nz,%09b2 8d81 setflg c 9e08 ret 5f0005e6 call %05e6 5e0701e0 jp c,%01e0 beb8 rldb rl0,rl3 be38 rldb rl0,rh3 bea8 rldb rl0,rl2 be28 rldb rl0,rh2 5f00068a call %068a ee02 jr nz,%09cc 8d11 setflg p e804 jr %09d4 0a082020 cpb rl0,#%20 eef0 jr nz,%09b2 8d83 resflg c 8d43 resflg z 9e08 ret 6f01439a ld %439a,r1 8d18 clr r1 dfce calr %0a44 660343f1 bitb %43f1,#3 ee07 jr nz,%09f4 0a086161 cpb rl0,#%61 e704 jr c,%09f4 0a087b7b cpb rl0,#%7b ef01 jr nc,%09f4 a285 resb rl0,#5 72280100 ldb r2(r1),rl0 4a0843f2 cpb rl0,%43f2 e60c jr z,%0a16 4a0843f3 cpb rl0,%43f3 e60e jr z,%0a20 0a080d0d cpb rl0,#%0d e611 jr z,%0a2c a910 inc r1,#1 4b01439a cp r1,%439a e7e6 jr c,%09de 8d41 setflg z 9e08 ret dff0 calr %0a38 ede2 jr pl,%09de c85b ldb rl0,#%5b dfdb calr %0a68 e8de jr %09dc 8d14 test r1 e6dd jr z,%09de c808 ldb rl0,#%08 dfe0 calr %0a68 dff9 calr %0a38 e8fa jr %0a20 c80a ldb rl0,#%0a dfe4 calr %0a68 74220100 lda r2,r2(r1) 8d43 resflg z 9e08 ret c820 ldb rl0,#%20 dfea calr %0a68 c808 ldb rl0,#%08 dfec calr %0a68 ab10 dec r1,#1 9e08 ret dffe calr %0a4a dff0 calr %0a68 9e08 ret 4c0443a0 testb %43a0 e6fd jr z,%0a4a 93f2 push @r15,r2 610043a4 ld r0,%43a4 dfd5 calr %0aae 6f0043a4 ld %43a4,r0 602841b0 ldb rl0,%41b0(r2) 6a0043a0 decb %43a0,#1 97f2 pop r2,@r15 9e08 ret 660243f0 bitb %43f0,#2 eefd jr nz,%0a68 3a04ff87 inb rh0,%ff87 a602 bitb rh0,#2 e6f9 jr z,%0a68 3a86ff83 outb %ff83,rl0 0a080d0d cpb rl0,#%0d 9e08 ret c80d ldb rl0,#%0d d00e calr %0a68 c80a ldb rl0,#%0a d010 calr %0a68 5e08057e jp %057e 210240b0 ld r2,#%40b0 21010080 ld r1,#%0080 4d05439c0000 ld %439c,#%0000 d062 calr %09d8 5e0601e0 jp z,%01e0 5f00067e call %067e 6b00439c dec %439c,#1 0a080d0d cpb rl0,#%0d 9e08 ret a102 ld r2,r0 a900 inc r0,#1 0b000100 cp r0,#%0100 9e07 ret c 8d08 clr r0 9e08 ret 93f0 push @r15,r0 93f1 push @r15,r1 93f2 push @r15,r2 4d01442e12d6 cp %442e,#%12d6 ee06 jr nz,%0ad6 4d0543fe5b20 ld %43fe,#%5b20 4d05442e0ef8 ld %442e,#%0ef8 3a94ff83 inb rl1,%ff83 660043f0 bitb %43f0,#0 ee19 jr nz,%0b12 a297 resb rl1,#7 4a0943f4 cpb rl1,%43f4 ee03 jr nz,%0aee 620243f0 resb %43f0,#2 e81b jr %0b24 4a0943f5 cpb rl1,%43f5 ee03 jr nz,%0afa 640243f0 setb %43f0,#2 e815 jr %0b24 0a091b1b cpb rl1,#%1b ee09 jr nz,%0b12 660343f0 bitb %43f0,#3 ee03 jr nz,%0b0c 660443f0 bitb %43f0,#4 e603 jr z,%0b12 640543f0 setb %43f0,#5 e809 jr %0b24 610043a2 ld r0,%43a2 d035 calr %0aae 6f0043a2 ld %43a2,r0 6e2941b0 ldb %41b0(r2),rl1 680043a0 incb %43a0,#1 c938 ldb rl1,#%38 3a96ff85 outb %ff85,rl1 97f2 pop r2,@r15 97f1 pop r1,@r15 97f0 pop r0,@r15 7f01 sc #%01 8d07 nop 7b00 iret 00094241 addb rl1,#%41 44204441 orb rh0,%4441(r2) 54410d00 ldl rr1,%0d00(r4) 5f000674 call %0674 5e0601e0 jp z,%01e0 5f00060e call %060e a330 res r3,#0 5d0243de ldl %43de,rr2 540243de ldl rr2,%43de 500243ac cpl rr2,%43ac e607 jr z,%0b6c 5f00102a call %102a 540e43da ldl rr14,%43da abf7 dec r15,#8 7f01 sc #%01 7b00 iret 540243ac ldl rr2,%43ac 610143aa ld r1,%43aa 7f01 sc #%01 2f21 ld @r2,r1 7f02 sc #%02 21020ecc ld r2,#%0ecc 7c01 di vi 6f02444a ld %444a,r2 5f00102a call %102a 540e43da ldl rr14,%43da abf7 dec r15,#8 7f01 sc #%01 93e1 push @r14,r1 31e10004 ld r1,r14(#%0004) 7f02 sc #%02 6f0143b6 ld %43b6,r1 05011000 or r1,#%1000 7f01 sc #%01 33e10004 ld r14(#%0004),r1 7f02 sc #%02 8c98 clrb rl1 3a96ffa1 outb %ffa1,rl1 c9c7 ldb rl1,#%c7 3a96ffa7 outb %ffa7,rl1 610143fa ld r1,%43fa 3a96ffa7 outb %ffa7,rl1 7d12 ldctl r1,fcw a51f set r1,#15 7d1a ldctl fcw,r1 97e1 pop r1,@r14 7b00 iret 640243f1 setb %43f1,#2 5f000674 call %0674 e604 jr z,%0bd8 5f000650 call %0650 8d34 test r3 ee01 jr nz,%0bda bd31 ldk r3,#1 6f0343fc ld %43fc,r3 21020e7c ld r2,#%0e7c 540443ac ldl rr4,%43ac 500443de cpl rr4,%43de eec9 jr nz,%0b7e 610143aa ld r1,%43aa 7f01 sc #%01 2f41 ld @r4,r1 7f02 sc #%02 e8c3 jr %0b7e 4d0843a6 clr %43a6 4d0843a8 clr %43a8 640043f0 setb %43f0,#0 4c0443a0 testb %43a0 e60c jr z,%0c22 610043a4 ld r0,%43a4 5f000aae call %0aae 6f0043a4 ld %43a4,r0 602841b0 ldb rl0,%41b0(r2) 6a0043a0 decb %43a0,#1 dfb9 calr %0cae eef1 jr nz,%0c04 610043a8 ld r0,%43a8 4b0043a6 cp r0,%43a6 e6ec jr z,%0c04 5f001082 call %1082 6f0043a8 ld %43a8,r0 602842b0 ldb rl0,%42b0(r2) 5f000a68 call %0a68 e8f2 jr %0c22 540243ac ldl rr2,%43ac 610143aa ld r1,%43aa 7f01 sc #%01 2f21 ld @r2,r1 7f02 sc #%02 4d0843ac clr %43ac 4d0843ae clr %43ae 4d0843aa clr %43aa 4d0543fc0001 ld %43fc,#%0001 5f000674 call %0674 9e06 ret z 5f00060e call %060e 9424 ldl rr4,rr2 e606 jr z,%0c78 5f000650 call %0650 8d34 test r3 e602 jr z,%0c78 6f0343fc ld %43fc,r3 9442 ldl rr2,rr4 a330 res r3,#0 5d0243ac ldl %43ac,rr2 610143f8 ld r1,%43f8 7f01 sc #%01 2d21 ex r1,@r2 a114 ld r4,r1 2121 ld r1,@r2 7f02 sc #%02 6f0443aa ld %43aa,r4 4b0143f8 cp r1,%43f8 9e06 ret z 4d0543fc0001 ld %43fc,#%0001 4d0843ac clr %43ac 4d0843ae clr %43ae 4d0843aa clr %43aa 5e0801e0 jp %01e0 3a04ff85 inb rh0,%ff85 a602 bitb rh0,#2 e6fc jr z,%0cae 3a86ff81 outb %ff81,rl0 0a080d0d cpb rl0,#%0d 9e08 ret 4d0843a6 clr %43a6 4d0843a8 clr %43a8 5f000674 call %0674 8d28 clr r2 c303 ldb rh3,#%03 dff7 calr %0ce4 9e07 ret c 6e0b40af ldb %40af,rl3 8c34 testb rh3 9e06 ret z 93f3 push @r15,r3 dffe calr %0ce4 97f3 pop r3,@r15 9e08 ret 8cb8 clrb rl3 dff5 calr %0cfe 9e07 ret c f303 dbjnz rh3,%0ce6 a083 ldb rh3,rl0 93f3 push @r15,r3 dffa calr %0cfe 97f3 pop r3,@r15 9e07 ret c 8ab8 cpb rl0,rl3 9e06 ret z 8d81 setflg c 9e08 ret 602840b0 ldb rl0,%40b0(r2) a920 inc r2,#1 5f0005e6 call %05e6 9e07 ret c 808b addb rl3,rl0 b309000c sla r0,#12 602840b0 ldb rl0,%40b0(r2) a920 inc r2,#1 5f0005e6 call %05e6 9e07 ret c 808b addb rl3,rl0 8408 orb rl0,rh0 8d83 resflg c 9e08 ret a039 ldb rl1,rh3 dff9 calr %0d36 21020008 ld r2,#%0008 d018 calr %0cfe 2e48 ldb @r4,rl0 a940 inc r4,#1 f904 dbjnz rl1,%0d2c 9e08 ret 8d28 clr r2 d01e calr %0cfe a084 ldb rh4,rl0 d020 calr %0cfe a08c ldb rl4,rl0 9e08 ret 0019 addb rl1,@r1 2f49 ld @r4,r9 4e434f525245 ext4e #%4e434f52,%5245 4354204c sub r4,%204c(r5) 4f4144204144 ext4f #%4f414420,%4144 44524553 orb rh2,%4553(r5) 53200d00 push @r2,%0d00 000d2f43 addb rl5,#%43 4b53554d cp r3,%554d(r5) 2045 ldb rh5,@r4 52524f52 subl rr2,%4f52(r5) 0d00 .word #%0d00 0013 addb rh3,@r1 2f46 ld @r4,r6 494c4520 xor r12,%4520(r4) 57524954 pop %4954(r2),@r5 45204552 or r0,%4552(r2) 524f5220 subl rr15,%5220(r4) 0d00 .word #%0d00 0011 addb rh1,@r1 2f4f ld @r4,r15 50454e20 cpl rr5,%4e20(r4) 46494c45 andb rl1,%4c45(r4) 2045 ldb rh5,@r4 52524f52 subl rr2,%4f52(r5) 0d00 .word #%0d00 00072f41 addb rh7,#%41 424f5254 subb rl7,%5254(r4) 0d00 .word #%0d00 454e5452 or r14,%5452(r4) 5920504f mult rr0,%504f(r2) 494e5420 xor r14,%5420(r4) 00094252 addb rl1,#%52 45414b20 or r1,%4b20(r4) 41542020 add r4,%2020(r5) 00054e4d addb rh5,#%4d 49200d00 xor r0,%0d00(r2) 5f000cc0 call %0cc0 53f043de push @r15,%43de 5f000674 call %0674 5f000614 call %0614 6f0243de ld %43de,r2 640443f0 setb %43f0,#4 5f00112c call %112c e64b jr z,%0e76 5f0010de call %10de 210240b0 ld r2,#%40b0 2028 ldb rl0,@r2 0a082f2f cpb rl0,#%2f ee0c jr nz,%0e08 21044130 ld r4,#%4130 2101007f ld r1,#%007f bb210140 ldir @r4,@r2,r1 4d05439e007f ld %439e,#%007f 5f0005a2 call %05a2 e837 jr %0e76 660543f0 bitb %43f0,#5 ee2e jr nz,%0e6a 5f000ccc call %0ccc ef03 jr nc,%0e1a 5f001112 call %1112 e8e3 jr %0de0 c82e ldb rl0,#%2e 5f000a68 call %0a68 8c34 testb rh3 ee16 jr nz,%0e50 5f00111a call %111a 5f000a80 call %0a80 540040b0 ldl rr0,%40b0 5d00413c ldl %413c,rr0 21040da2 ld r4,#%0da2 21024130 ld r2,#%4130 21010006 ld r1,#%0006 bb410120 ldir @r2,@r4,r1 4d05439e0010 ld %439e,#%0010 5f000594 call %0594 e813 jr %0e76 5f000d36 call %0d36 0b048000 cp r4,#%8000 ef03 jr nc,%0e60 21020d42 ld r2,#%0d42 e807 jr %0e6e 5f00111a call %111a 5f000d24 call %0d24 e8bb jr %0de0 21020d98 ld r2,#%0d98 5f00050c call %050c 5f001116 call %1116 57f043de pop %43de,@r15 9e08 ret 5d0e43da ldl %43da,rr14 210f40a0 ld r15,#%40a0 6f0043be ld %43be,r0 df5e calr %0fce 690743dc inc %43dc,#8 df6b calr %0fba 540243ac ldl rr2,%43ac 610143f8 ld r1,%43f8 7f01 sc #%01 2f21 ld @r2,r1 7f02 sc #%02 670c43b6 bit %43b6,#12 ee02 jr nz,%0ea8 630c43e2 res %43e2,#12 5f000904 call %0904 5f000952 call %0952 5f000944 call %0944 5f000984 call %0984 6b0043fc dec %43fc,#1 5e0e0bde jp nz,%0bde 4d0543fc0001 ld %43fc,#%0001 7c05 ei vi 5e08016c jp %016c 93f2 push @r15,r2 93f1 push @r15,r1 df8c calr %0fba 540243ac ldl rr2,%43ac 610143f8 ld r1,%43f8 7f01 sc #%01 2f21 ld @r2,r1 7f02 sc #%02 670c43b6 bit %43b6,#12 ee05 jr nz,%0ef0 31f20006 ld r2,r15(#%0006) a32c res r2,#12 33f20006 ld r15(#%0006),r2 97f1 pop r1,@r15 97f2 pop r2,@r15 7f01 sc #%01 7b00 iret 660043f0 bitb %43f0,#0 ee0a jr nz,%0f12 5d0e43da ldl %43da,rr14 210f40a0 ld r15,#%40a0 6f0043be ld %43be,r0 df9f calr %0fce 690743dc inc %43dc,#8 e804 jr %0f1a 620043f0 resb %43f0,#0 210f40a0 ld r15,#%40a0 7c05 ei vi 5f000a80 call %0a80 21020dba ld r2,#%0dba 5f00050c call %050c 5e08016c jp %016c 4cf100010101 cpb %0001(r15),#%01 ee03 jr nz,%0f3a 65ff0002 set %0002(r15),#15 7b00 iret 4cf100010202 cpb %0001(r15),#%02 ee03 jr nz,%0f48 63ff0002 res %0002(r15),#15 7b00 iret 93e0 push @r14,r0 7d02 ldctl r0,fcw a30f res r0,#15 7d0a ldctl fcw,r0 97f0 pop r0,@r15 4cf40001 testb %0001(r15) ee20 jr nz,%0f98 6f0043be ld %43be,r0 5d0e43da ldl %43da,rr14 210f40a0 ld r15,#%40a0 dfcc calr %0fce 690743dc inc %43dc,#8 6b0143e0 dec %43e0,#2 6b0043fc dec %43fc,#1 5e0e0b6c jp nz,%0b6c 4d0543fc0001 ld %43fc,#%0001 dfe2 calr %0fba 7c05 ei vi 21020dae ld r2,#%0dae 5f00050c call %050c 610543e0 ld r5,%43e0 5f000540 call %0540 5f000594 call %0594 5e08016c jp %016c 93f0 push @r15,r0 60f00003 ldb rh0,%0003(r15) a00b ldb rl3,rh0 8c38 clrb rh3 03030004 sub r3,#%0004 61330056 ld r3,%0056(r3) 7c05 ei vi 1f30 call @r3 a103 ld r3,r0 7d02 ldctl r0,fcw a50f set r0,#15 7d0a ldctl fcw,r0 97e0 pop r0,@r14 7b00 iret c9ed ldb rl1,#%ed 3a96ffe1 outb %ffe1,rl1 c94d ldb rl1,#%4d 3a96ffe1 outb %ffe1,rl1 c903 ldb rl1,#%03 3a96ffa7 outb %ffa7,rl1 9e08 ret 5d0e43b0 ldl %43b0,rr14 540e43da ldl rr14,%43da 31f00000 ld r0,r15(#%0000) 6f0043b4 ld %43b4,r0 31f00002 ld r0,r15(#%0002) 6f0043e2 ld %43e2,r0 31f00004 ld r0,r15(#%0004) 6f0043de ld %43de,r0 31f00006 ld r0,r15(#%0006) 6f0043e0 ld %43e0,r0 7f01 sc #%01 7d06 .word #%7d06 7f02 sc #%02 6f0043e6 ld %43e6,r0 7d07 ldctl r0,nsp 6f0043e8 ld %43e8,r0 7f01 sc #%01 7d04 .word #%7d04 7f02 sc #%02 6f0043ea ld %43ea,r0 7df5 ldctl r15,psap 6f0f43ec ld %43ec,r15 7df3 ldctl r15,refresh 6f0f43e4 ld %43e4,r15 210f43c0 ld r15,#%43c0 1cf9010c ldm @r15,r1,#13 540e43b0 ldl rr14,%43b0 9e08 ret 5d0e43b0 ldl %43b0,rr14 540e43da ldl rr14,%43da abf7 dec r15,#8 610143b4 ld r1,%43b4 33f10000 ld r15(#%0000),r1 610143e2 ld r1,%43e2 33f10002 ld r15(#%0002),r1 610143de ld r1,%43de 33f10004 ld r15(#%0004),r1 610143e0 ld r1,%43e0 33f10006 ld r15(#%0006),r1 610143e6 ld r1,%43e6 7f01 sc #%01 7d1e .word #%7d1e 7f02 sc #%02 610143e8 ld r1,%43e8 7d1f ldctl nsp,r1 610143ea ld r1,%43ea 7f01 sc #%01 7d1c .word #%7d1c 7f02 sc #%02 610143ec ld r1,%43ec 7d1d ldctl psap,r1 210f43be ld r15,#%43be 1cf1000d ldm r0,@r15,#14 540e43b0 ldl rr14,%43b0 9e08 ret a102 ld r2,r0 a900 inc r0,#1 0b0000e8 cp r0,#%00e8 9e07 ret c 8d08 clr r0 9e08 ret 93f0 push @r15,r0 93f1 push @r15,r1 93f2 push @r15,r2 3a94ff81 inb rl1,%ff81 660043f0 bitb %43f0,#0 ee01 jr nz,%10a2 a297 resb rl1,#7 610043a6 ld r0,%43a6 d013 calr %1082 6f0043a6 ld %43a6,r0 6e2942b0 ldb %42b0(r2),rl1 c938 ldb rl1,#%38 3a96ff85 outb %ff85,rl1 97f2 pop r2,@r15 97f1 pop r1,@r15 97f0 pop r0,@r15 7f01 sc #%01 7b00 iret 93f1 push @r15,r1 c930 ldb rl1,#%30 3a96ff87 outb %ff87,rl1 e804 jr %10d2 93f1 push @r15,r1 c930 ldb rl1,#%30 3a96ff85 outb %ff85,rl1 c938 ldb rl1,#%38 3a96ff85 outb %ff85,rl1 97f1 pop r1,@r15 7f01 sc #%01 7b00 iret df9b calr %11aa 0a082f2f cpb rl0,#%2f eefc jr nz,%10de 8d48 clr r4 cb50 ldb rl3,#%50 dfa1 calr %11aa 6e4840b0 ldb %40b0(r4),rl0 0a080d0d cpb rl0,#%0d ee02 jr nz,%10fa dfb7 calr %118a 9e08 ret 0a082020 cpb rl0,#%20 e7f5 jr c,%10ea a940 inc r4,#1 fb0d dbjnz rl3,%10ea dfae calr %11aa 0a080d0d cpb rl0,#%0d eefc jr nz,%1104 6e084100 ldb %4100,rl0 9e08 ret c837 ldb rl0,#%37 e803 jr %111c c839 ldb rl0,#%39 e801 jr %111c c830 ldb rl0,#%30 6e084130 ldb %4130,rl0 4d05439e0001 ld %439e,#%0001 dfb3 calr %11c2 dfd4 calr %1182 9e08 ret 660543f0 bitb %43f0,#5 e602 jr z,%1136 8d41 setflg z 9e08 ret 21044130 ld r4,#%4130 210240b0 ld r2,#%40b0 21010040 ld r1,#%0040 bb210140 ldir @r4,@r2,r1 4d05439e0080 ld %439e,#%0080 dfbf calr %11d0 dfe7 calr %1182 dfa9 calr %1200 0a094c4c cpb rl1,#%4c e601 jr z,%115a e802 jr %115e dfed calr %1182 dfaf calr %1200 0a093939 cpb rl1,#%39 e60d jr z,%117e 0a093030 cpb rl1,#%30 e60a jr z,%117e 0a093737 cpb rl1,#%37 e607 jr z,%117e dfe4 calr %11aa 5f000a68 call %0a68 0a080a0a cpb rl0,#%0a 9e06 ret z e8f9 jr %1170 8d43 resflg z 9e08 ret dfed calr %11aa 0a080d0d cpb rl0,#%0d eefc jr nz,%1182 21010200 ld r1,#%0200 610043a8 ld r0,%43a8 4b0043a6 cp r0,%43a6 ee03 jr nz,%119e ab10 dec r1,#1 eef9 jr nz,%118e 9e06 ret z dfd0 calr %1200 0a092020 cpb rl1,#%20 9e0d ret pl dfff calr %11aa e8f0 jr %118a 610043a8 ld r0,%43a8 4b0043a6 cp r0,%43a6 e6fb jr z,%11aa 5f001082 call %1082 6f0043a8 ld %43a8,r0 602842b0 ldb rl0,%42b0(r2) 9e08 ret 6102439e ld r2,%439e 4c2541300d0d ldb %4130(r2),#%0d 6900439e inc %439e,#1 8d18 clr r1 60184130 ldb rl0,%4130(r1) a910 inc r1,#1 5f000cae call %0cae e603 jr z,%11e4 4b01439e cp r1,%439e e7f7 jr c,%11d2 4d08439e clr %439e 2101003f ld r1,#%003f 4d0541302020 ld %4130,#%2020 21044130 ld r4,#%4130 21024132 ld r2,#%4132 bb410120 ldir @r2,@r4,r1 9e08 ret 610043a8 ld r0,%43a8 4b0043a6 cp r0,%43a6 e6fb jr z,%1200 5f001082 call %1082 602942b0 ldb rl1,%42b0(r2) 9e08 ret 0012 addb rh2,@r1 424f4f54 subb rl7,%4f54(r4) 494e4720 xor r14,%4720(r4) 46524f4d andb rh2,%4f4d(r5) 2044 ldb rh4,@r4 49534b0d xor r3,%4b0d(r5) 0012 addb rh2,@r1 424f4f54 subb rl7,%4f54(r4) 494e4720 xor r14,%4720(r4) 46524f4d andb rh2,%4f4d(r5) 2054 ldb rh4,@r5 4150450d add r0,%450d(r5) 0011 addb rh1,@r1 424f4f54 subb rl7,%4f54(r4) 494e4720 xor r14,%4720(r4) 46524f4d andb rh2,%4f4d(r5) 2053 ldb rh3,@r5 4d440d00 test %0d00(r4) 0017 addb rh7,@r1 424f4f54 subb rl7,%4f54(r4) 494e4720 xor r14,%4720(r4) 46524f4d andb rh2,%4f4d(r5) 204d ldb rl5,@r4 494e492d xor r14,%492d(r4) 4449534b orb rl1,%534b(r4) 0d00 .word #%0d00 00000008 addb rh0,#%08 5f000674 call %0674 5e0601e0 jp z,%01e0 0a084444 cpb rl0,#%44 e60b jr z,%1292 0a085454 cpb rl0,#%54 e60e jr z,%129e 0a085353 cpb rl0,#%53 e610 jr z,%12a8 0a084d4d cpb rl0,#%4d e613 jr z,%12b4 5e0801e0 jp %01e0 21021214 ld r2,#%1214 dfea calr %12c4 ce03 ldb rl6,#%03 5e082b36 jp %2b36 21021228 ld r2,#%1228 dff0 calr %12c4 5e083012 jp %3012 2102123c ld r2,#%123c dff5 calr %12c4 ce01 ldb rl6,#%01 5e082b36 jp %2b36 21021250 ld r2,#%1250 dffb calr %12c4 ce02 ldb rl6,#%02 4d08fe00 clr %fe00 5e082b36 jp %2b36 5f00050c call %050c 6107126a ld r7,%126a 6105126c ld r5,%126c 21040001 ld r4,#%0001 9e08 ret 5f001468 call %1468 6107126a ld r7,%126a 600e474a ldb rl6,%474a 0a0e0000 cpb rl6,#%00 e606 jr z,%12f4 6105126c ld r5,%126c a124 ld r4,r2 8d24 test r2 5e062b36 jp z,%2b36 4d05442e0ef8 ld %442e,#%0ef8 4d0543fe5b20 ld %43fe,#%5b20 7c05 ei vi 5e08016c jp %016c 504f5745 cpl rr15,%5745(r4) 52205550 subl rr0,%5550(r2) 2044 ldb rh4,@r4 4941474e xor r1,%474e(r4) 4f5354494353 ext4f #%4f535449,%4353 0013 addb rh3,@r1 41435449 add r3,%5449(r4) 56452050 addl rr5,%2050(r4) 45524950 or r2,%4950(r5) 48455241 xorb rh5,%5241(r4) 4c53 .word #%4c53 3a00 .word #%3a00 0008434f addb rl0,#%4f 4d504c45 com %4c45(r5) 54450019 ldl rr5,%0019(r4) 2a2a decb @r2,#11 2049 ldb rl1,@r4 4e56414c4944 ext4e #%4e56414c,%4944 2053 ldb rh3,@r5 57495443 pop %5443(r9),@r4 4820434f xorb rh0,%434f(r2) 4445202a orb rh5,%202a(r4) 2a00 .word #%2a00 00034543 addb rh3,#%43 43000003 sub r0,%0003 57444300 pop %4300(r4),@r4 00034d44 addb rh3,#%44 43000003 sub r0,%0003 534d4300 push @r4,%4300(r13) 00034d54 addb rh3,#%54 43000003 sub r0,%0003 54434300 ldl rr3,%4300(r4) 00045353 addb rh4,#%53 42000004 subb rh0,%0004 49435000 xor r3,%5000(r4) 00034650 addb rh3,#%50 5000000b cpl rr0,%000b 2a2a decb @r2,#11 2a20 decb @r2,#1 4552524f or r2,%524f(r5) 52202300 subl rr0,%2300(r2) 0010 addb rh0,@r1 072a and r10,@r2 2a2a decb @r2,#11 2046 ldb rh6,@r4 4154414c add r4,%414c(r5) 2045 ldb rh5,@r4 52524f52 subl rr2,%4f52(r5) 00095345 addb rl1,#%45 474d454e and r13,%454e(r4) 54454400 ldl rr5,%4400(r4) 000d4e4f addb rl5,#%4f 4e2d5345474d ext4e #%4e2d5345,%474d 454e5445 or r14,%5445(r4) 44000008 orb rh0,%0008 204a ldb rl2,@r4 554d5045 popl %5045(r13),@r4 52530007 subl rr3,%0007(r5) 4d4158534547 cp %5853(r4),#%4547 3d00 in r0,@r0 ff47 dbjnz rl7,%1350 ff07 dbjnz rl7,%13d2 ef01 jr nc,%13e4 ef03 jr nc,%13ea ef05 jr nc,%13f0 ef07 jr nc,%13f6 ef09 jr nc,%13fc ef0b jr nc,%1402 ef0d jr nc,%1408 ef0f jr nc,%140e 00fc addb rl4,@r15 00fa addb rl2,@r15 00f6 addb rh6,@r15 00fc addb rl4,@r15 00fa addb rl2,@r15 a000 ldb rh0,rh0 a100 ld r0,r0 a100 ld r0,r0 00000000 addb rh0,#%00 01010002 add r1,#%0002 02000303 subb rh0,#%03 01000402 add r0,#%0402 00080400 addb rl0,#%00 100800201000 cpl rr8,#%00201000 40200080 addb rh0,%0080(r2) 0000ff00 addb rh0,#%00 00000000 addb rh0,#%00 0000ff20 addb rh0,#%20 0000ff01 addb rh0,#%01 01000000 add r0,#%0000 01010000 add r1,#%0000 00000020 addb rh0,#%20 00000000 addb rh0,#%00 01090000 add r9,#%0000 43454607 sub r5,%4607(r4) 61626426 ld r2,%6426(r6) 2949 inc @r4,#10 4a0b4c0d cpb rl3,%4c0d 0e4f3451 ext0e #%0e4f3451 52135415 subl rr3,%5415(r1) 1657 addl rr7,@r5 58191a5b multl rq9,%1a5b(r1) 1c793e1f ldm @r7,r14,#16 2760 bit @r6,#0 2650 bitb @r5,#0 2548 set @r4,#8 8888 xorb rl0,rl0 3a86ffc1 outb %ffc1,rl0 a880 incb rl0,#1 3a860000 outb %0000,rl0 3a84ffc1 inb rl0,%ffc1 b281fffa srlb rl0,#6 06080303 andb rl0,#%03 6e08474a ldb %474a,rl0 21041306 ld r4,#%1306 6f044744 ld %4744,r4 7f0a sc #%0a 5f0021b8 call %21b8 8988 xor r8,r8 8811 xorb rh1,rh1 6f084740 ld %4740,r8 8966 xor r6,r6 4d0547480000 ld %4748,#%0000 6f064742 ld %4742,r6 cda5 ldb rl5,#%a5 c802 ldb rl0,#%02 a065 ldb rh5,rh6 21078000 ld r7,#%8000 7f01 sc #%01 2f65 ld @r6,r5 2164 ld r4,@r6 7f02 sc #%02 8b45 cp r5,r4 e609 jr z,%14ce 2107fffe ld r7,#%fffe f809 dbjnz rl0,%14b0 aa60 decb rh6,#1 0a060000 cpb rh6,#%00 e906 jr ge,%14d6 5e0821a6 jp %21a6 6f064742 ld %4742,r6 a860 incb rh6,#1 e8e9 jr %14a8 5f0021b8 call %21b8 4d05474800e1 ld %4748,#%00e1 a980 inc r8,#1 c802 ldb rl0,#%02 21078000 ld r7,#%8000 7f01 sc #%01 206c ldb rl4,@r6 7f02 sc #%02 8ac6 cpb rh6,rl4 e605 jr z,%14fc 2107fffe ld r7,#%fffe f808 dbjnz rl0,%14e8 5e0821a6 jp %21a6 aa60 decb rh6,#1 0a060000 cpb rh6,#%00 e9ef jr ge,%14e2 5f0021b8 call %21b8 4d05473a0000 ld %473a,#%0000 8811 xorb rh1,rh1 61064742 ld r6,%4742 7d92 ldctl r9,fcw 21080100 ld r8,#%0100 5f001b5e call %1b5e a980 inc r8,#1 4d0547480000 ld %4748,#%0000 61024740 ld r2,%4740 4b02473a cp r2,%473a e60c jr z,%1548 6f02473a ld %473a,r2 4b064742 cp r6,%4742 ee07 jr nz,%1548 aa60 decb rh6,#1 8c64 testb rh6 5e0621a6 jp z,%21a6 6f064742 ld %4742,r6 a860 incb rh6,#1 aa60 decb rh6,#1 0a060000 cpb rh6,#%00 eae3 jr gt,%1516 5f0021b8 call %21b8 8966 xor r6,r6 21080100 ld r8,#%0100 2103ffc1 ld r3,#%ffc1 a16a ld r10,r6 610c4742 ld r12,%4742 210b1306 ld r11,#%1306 a1bd ld r13,r11 21094764 ld r9,#%4764 03091306 sub r9,#%1306 7f01 sc #%01 bba109c0 ldir @r12,@r10,r9 210d1c08 ld r13,#%1c08 210b1582 ld r11,#%1582 1ec8 jp @r12 7f02 sc #%02 41034740 add r3,%4740 6f034740 ld %4740,r3 8d34 test r3 5e0e21aa jp nz,%21aa 21070000 ld r7,#%0000 21020014 ld r2,#%0014 3f72 out @r7,r2 3d73 in r3,@r7 0703001e and r3,#%001e 8b23 cp r3,r2 ee26 jr nz,%15f2 4d0547480000 ld %4748,#%0000 93f3 push @r15,r3 93f9 push @r15,r9 140600000000 ldl rr6,#%00000000 5d064760 ldl %4760,rr6 5d06476c ldl %476c,rr6 6f064770 ld %4770,r6 140600000001 ldl rr6,#%00000001 5d064764 ldl %4764,rr6 5d064768 ldl %4768,rr6 21060040 ld r6,#%0040 6f064772 ld %4772,r6 5f001c42 call %1c42 5f001d4a call %1d4a 5f0021b8 call %21b8 7f02 sc #%02 97f9 pop r9,@r15 97f3 pop r3,@r15 4d0547540001 ld %4754,#%0001 e808 jr %1602 4d084754 clr %4754 5f0021b8 call %21b8 5f0021b8 call %21b8 5f0021b8 call %21b8 5f0021b8 call %21b8 8811 xorb rh1,rh1 88aa xorb rl2,rl2 3aa700fc soutb %00fc,rl2 a8a0 incb rl2,#1 3aa700fa soutb %00fa,rl2 a8a0 incb rl2,#1 3aa700f6 soutb %00f6,rl2 3aa700f0 soutb %00f0,rl2 3aa711f0 soutb %11f0,rl2 7d95 ldctl r9,psap 61940026 ld r4,%0026(r9) 6f04473a ld %473a,r4 61940016 ld r4,%0016(r9) 6f04473c ld %473c,r4 4d9500240000 ld %0024(r9),#%0000 4d9500224000 ld %0022(r9),#%4000 4d9500262324 ld %0026(r9),#%2324 4d9500124000 ld %0012(r9),#%4000 4d9500140000 ld %0014(r9),#%0000 4d950016231c ld %0016(r9),#%231c 210aa100 ld r10,#%a100 210ba101 ld r11,#%a101 8955 xor r5,r5 210000ff ld r0,#%00ff 2ead ldb @r10,rl5 baa100b0 ldirb @r11,@r10,r0 210aa000 ld r10,#%a000 2ead ldb @r10,rl5 a9a0 inc r10,#1 a950 inc r5,#1 a650 bitb rh5,#0 e6fb jr z,%1670 210aa200 ld r10,#%a200 210ba201 ld r11,#%a201 2105aaaa ld r5,#%aaaa 210000ff ld r0,#%00ff 2ead ldb @r10,rl5 baa100b0 ldirb @r11,@r10,r0 210aa300 ld r10,#%a300 210ba301 ld r11,#%a301 21055555 ld r5,#%5555 210000ff ld r0,#%00ff 2ead ldb @r10,rl5 baa100b0 ldirb @r11,@r10,r0 8922 xor r2,r2 8933 xor r3,r3 21080300 ld r8,#%0300 612613f0 ld r6,%13f0(r2) 210ba000 ld r11,#%a000 5f0023b2 call %23b2 a8a1 incb rl2,#2 612613f0 ld r6,%13f0(r2) 210ba100 ld r11,#%a100 5f0023b2 call %23b2 a8a1 incb rl2,#2 612613f0 ld r6,%13f0(r2) 5f0023b2 call %23b2 aaa3 decb rl2,#4 a139 ld r9,r3 8129 add r9,r2 619613f0 ld r6,%13f0(r9) 613b13fa ld r11,%13fa(r3) 5f0023d8 call %23d8 a8b1 incb rl3,#2 0a0b0606 cpb rl3,#%06 eef4 jr nz,%16d4 06010101 andb rh1,#%01 a980 inc r8,#1 2100001e ld r0,#%001e 612613f0 ld r6,%13f0(r2) 21031400 ld r3,#%1400 a16a ld r10,r6 010a0100 add r10,#%0100 203f ldb rl7,@r3 b2f10002 sllb rl7,#2 3a3300a8 soutib @r10,@r3,r0 a16a ld r10,r6 010a2000 add r10,#%2000 003f addb rl7,@r3 3a3300a8 soutib @r10,@r3,r0 a16a ld r10,r6 010a0f00 add r10,#%0f00 203d ldb rl5,@r3 2109473e ld r9,#%473e 3aa10098 sinib @r9,@r10,r0 ab90 dec r9,#1 209c ldb rl4,@r9 5f00217c call %217c a617 bitb rh1,#7 ee04 jr nz,%173e a930 inc r3,#1 8c84 testb rl0 eee1 jr nz,%16fe a980 inc r8,#1 210ba200 ld r11,#%a200 5f0023b2 call %23b2 5f0023d8 call %23d8 210ba300 ld r11,#%a300 5f0023b2 call %23b2 5f0023d8 call %23d8 8811 xorb rh1,rh1 a980 inc r8,#1 4d05474800a5 ld %4748,#%00a5 2109473e ld r9,#%473e 0d95aaaa ld @r9,#%aaaa c802 ldb rl0,#%02 209d ldb rl5,@r9 3ad700f0 soutb %00f0,rl5 3ad701f0 soutb %01f0,rl5 3ad720f0 soutb %20f0,rl5 a16a ld r10,r6 010a0000 add r10,#%0000 3aa10b98 sinib @r9,@r10,r11 ab90 dec r9,#1 209c ldb rl4,@r9 a167 ld r7,r6 5f00217c call %217c a16a ld r10,r6 010a0100 add r10,#%0100 3aa10b98 sinib @r9,@r10,r11 ab90 dec r9,#1 209c ldb rl4,@r9 060d3f3f andb rl5,#%3f a870 incb rh7,#1 5f00217c call %217c a16a ld r10,r6 010a2000 add r10,#%2000 3aa10b98 sinib @r9,@r10,r11 ab90 dec r9,#1 209c ldb rl4,@r9 060d0303 andb rl5,#%03 c720 ldb rh7,#%20 5f00217c call %217c 0d955555 ld @r9,#%5555 f82c dbjnz rl0,%176a a8a1 incb rl2,#2 0a0a0606 cpb rl2,#%06 5e0e16a8 jp nz,%16a8 a980 inc r8,#1 210a0100 ld r10,#%0100 89bb xor r11,r11 7f01 sc #%01 0da50001 ld @r10,#%0001 a1ab ld r11,r10 0da50000 ld @r10,#%0000 7f02 sc #%02 7603141e lda r3,%141e a134 ld r4,r3 76051436 lda r5,%1436 8977 xor r7,r7 5f0023a8 call %23a8 c802 ldb rl0,#%02 21060ffc ld r6,#%0ffc 21070ffa ld r7,#%0ffa 21090ff6 ld r9,#%0ff6 21020004 ld r2,#%0004 3a330260 sotirb @r6,@r3,r2 21020004 ld r2,#%0004 3a430270 sotirb @r7,@r4,r2 21020004 ld r2,#%0004 3a530290 sotirb @r9,@r5,r2 7603142e lda r3,%142e 76041432 lda r4,%1432 a145 ld r5,r4 f812 dbjnz rl0,%1800 c8d0 ldb rl0,#%d0 3a8700f0 soutb %00f0,rl0 c802 ldb rl0,#%02 3a86ffc1 outb %ffc1,rl0 89bb xor r11,r11 7f01 sc #%01 21ac ld r12,@r10 7f02 sc #%02 8900 xor r0,r0 3a86ffc1 outb %ffc1,rl0 3a8700f0 soutb %00f0,rl0 6f00474e ld %474e,r0 6f0c474c ld %474c,r12 8dc4 test r12 e604 jr z,%1856 6500474e set %474e,#0 5e081882 jp %1882 4d0547480094 ld %4748,#%0094 8811 xorb rh1,rh1 c802 ldb rl0,#%02 2106ffc9 ld r6,#%ffc9 2105aaaa ld r5,#%aaaa 3e6d outb @r6,rl5 3c6c inb rl4,@r6 5f00217c call %217c 21055555 ld r5,#%5555 3e6d outb @r6,rl5 3c6c inb rl4,@r6 5f00217c call %217c 2106ffd1 ld r6,#%ffd1 f80f dbjnz rl0,%1864 5f0021b8 call %21b8 a980 inc r8,#1 21029000 ld r2,#%9000 3a26ffc9 outb %ffc9,rh2 3a26ffd1 outb %ffd1,rh2 2103141e ld r3,#%141e a134 ld r4,r3 21051426 ld r5,#%1426 4d04474c test %474c e602 jr z,%18a8 21051422 ld r5,#%1422 5f00241c call %241c 2103a000 ld r3,#%a000 c004 ldb rh0,#%04 ccd2 ldb rl4,#%d2 5f002462 call %2462 5f0021b8 call %21b8 21038000 ld r3,#%8000 8800 xorb rh0,rh0 ccd1 ldb rl4,#%d1 5f002462 call %2462 2103141e ld r3,#%141e 21041426 ld r4,#%1426 a135 ld r5,r3 4d04474c test %474c e600 jr z,%18d8 5f00241c call %241c 5f0021b8 call %21b8 2103a000 ld r3,#%a000 8800 xorb rh0,rh0 ccd2 ldb rl4,#%d2 5f002462 call %2462 5f0021b8 call %21b8 21038000 ld r3,#%8000 c002 ldb rh0,#%02 ccd1 ldb rl4,#%d1 5f002462 call %2462 2103141e ld r3,#%141e 2104142a ld r4,#%142a a145 ld r5,r4 5f00241c call %241c 5f0021b8 call %21b8 2103a000 ld r3,#%a000 c004 ldb rh0,#%04 ccd2 ldb rl4,#%d2 5f002462 call %2462 5f0021b8 call %21b8 21038000 ld r3,#%8000 c002 ldb rh0,#%02 ccd1 ldb rl4,#%d1 5f002462 call %2462 5f0021b8 call %21b8 a980 inc r8,#1 4d054748009a ld %4748,#%009a 8811 xorb rh1,rh1 a411 setb rh1,#1 2102ffff ld r2,#%ffff 3aa6ffc9 outb %ffc9,rl2 3aa6ffd1 outb %ffd1,rl2 2103141e ld r3,#%141e a134 ld r4,r3 a135 ld r5,r3 5f00241c call %241c 8922 xor r2,r2 21039000 ld r3,#%9000 2105aaaa ld r5,#%aaaa 210600fa ld r6,#%00fa 210000d1 ld r0,#%00d1 0d350000 ld @r3,#%0000 4d0547360000 ld %4736,#%0000 cc02 ldb rl4,#%02 4d04474c test %474c e601 jr z,%1978 cc06 ldb rl4,#%06 3ac6ffc1 outb %ffc1,rl4 3a8700fa soutb %00fa,rl0 7d92 ldctl r9,fcw a59f set r9,#15 4d04474e test %474e e601 jr z,%198c a39e res r9,#14 7d9a ldctl fcw,r9 2f25 ld @r2,r5 7f02 sc #%02 3a0700fa soutb %00fa,rh0 3a06ffc1 outb %ffc1,rh0 a02f ldb rl7,rh2 4d044736 test %4736 ee0a jr nz,%19b6 2134 ld r4,@r3 5f00217c call %217c a617 bitb rh1,#7 ee0d jr nz,%19c6 a820 incb rh2,#1 0a024040 cpb rh2,#%40 eed8 jr nz,%1964 e808 jr %19c6 a980 inc r8,#1 4d0547480098 ld %4748,#%0098 61054734 ld r5,%4734 5f0021f2 call %21f2 5f0021b8 call %21b8 21080308 ld r8,#%0308 4d054748009a ld %4748,#%009a 8811 xorb rh1,rh1 a411 setb rh1,#1 210000d2 ld r0,#%00d2 3a06ffc9 outb %ffc9,rh0 3a06ffd1 outb %ffd1,rh0 8922 xor r2,r2 4d04474c test %474c e602 jr z,%19f0 21020040 ld r2,#%0040 210600f6 ld r6,#%00f6 0d350000 ld @r3,#%0000 4d0547360000 ld %4736,#%0000 cc02 ldb rl4,#%02 4d04474c test %474c e601 jr z,%1a08 cc06 ldb rl4,#%06 3ac6ffc1 outb %ffc1,rl4 3a8700f6 soutb %00f6,rl0 7d92 ldctl r9,fcw a59f set r9,#15 4d04474e test %474e e601 jr z,%1a1c a39e res r9,#14 7d9a ldctl fcw,r9 2f25 ld @r2,r5 7f02 sc #%02 3a0700f6 soutb %00f6,rh0 3a06ffc1 outb %ffc1,rh0 a02f ldb rl7,rh2 4d044736 test %4736 ee11 jr nz,%1a54 2134 ld r4,@r3 5f00217c call %217c a617 bitb rh1,#7 ee14 jr nz,%1a64 a820 incb rh2,#1 4d04474c test %474c e604 jr z,%1a4c 0a028080 cpb rh2,#%80 eed5 jr nz,%19f4 e80c jr %1a64 0a024040 cpb rh2,#%40 eed1 jr nz,%19f4 e808 jr %1a64 a980 inc r8,#1 4d0547480098 ld %4748,#%0098 61054734 ld r5,%4734 5f0021f2 call %21f2 5f0021b8 call %21b8 21080310 ld r8,#%0310 4d054748009a ld %4748,#%009a 8811 xorb rh1,rh1 a411 setb rh1,#1 4d08474e clr %474e 7d95 ldctl r9,psap 4d950026237a ld %0026(r9),#%237a 21041b5a ld r4,#%1b5a 21059000 ld r5,#%9000 21030004 ld r3,#%0004 ba410350 ldirb @r5,@r4,r3 210000d0 ld r0,#%00d0 210600fc ld r6,#%00fc cb02 ldb rl3,#%02 c302 ldb rh3,#%02 4d04474c test %474c e601 jr z,%1aa6 c306 ldb rh3,#%06 8922 xor r2,r2 a125 ld r5,r2 a12a ld r10,r2 210b1acc ld r11,#%1acc 210d9000 ld r13,#%9000 a12c ld r12,r2 4d0547360000 ld %4736,#%0000 2104aaaa ld r4,#%aaaa 3a36ffc1 outb %ffc1,rh3 3a8700fc soutb %00fc,rl0 7f01 sc #%01 1ec8 jp @r12 7f02 sc #%02 3a0700fc soutb %00fc,rh0 3a06ffc1 outb %ffc1,rh0 a02f ldb rl7,rh2 a6b0 bitb rl3,#0 ee20 jr nz,%1b1c 4d044736 test %4736 ee24 jr nz,%1b2a 5f00217c call %217c a617 bitb rh1,#7 ee07 jr nz,%1af8 a820 incb rh2,#1 0a024040 cpb rh2,#%40 eee1 jr nz,%1ab4 aab0 decb rl3,#1 8cb4 testb rl3 e621 jr z,%1b3a 5f0021b8 call %21b8 21080312 ld r8,#%0312 8811 xorb rh1,rh1 93f3 push @r15,r3 21031422 ld r3,#%1422 2104141e ld r4,#%141e a145 ld r5,r4 5f00241c call %241c 97f3 pop r3,@r15 8922 xor r2,r2 2105aaaa ld r5,#%aaaa e8cc jr %1ab4 4d044736 test %4736 eee4 jr nz,%1aea 4d0547480090 ld %4748,#%0090 e806 jr %1b36 a980 inc r8,#1 4d0547480098 ld %4748,#%0098 61054734 ld r5,%4734 5f0021f2 call %21f2 7d95 ldctl r9,psap 6104473a ld r4,%473a 6f940026 ld %0026(r9),r4 6104473c ld r4,%473c 6f940016 ld %0016(r9),r4 8888 xorb rl0,rl0 3a86ffc1 outb %ffc1,rl0 3a8700f0 soutb %00f0,rl0 5e08226c jp %226c 8944 xor r4,r4 1ea8 jp @r10 06010101 andb rh1,#%01 4d05474800e5 ld %4748,#%00e5 21070003 ld r7,#%0003 cd0f ldb rl5,#%0f a59f set r9,#15 7d9a ldctl fcw,r9 2e6d ldb @r6,rl5 a39f res r9,#15 7d9a ldctl fcw,r9 b370 rl r7,#1 fd07 dbjnz rl5,%1b6e b370 rl r7,#1 cd0f ldb rl5,#%0f a59f set r9,#15 7d9a ldctl fcw,r9 206c ldb rl4,@r6 a39f res r9,#15 7d9a ldctl fcw,r9 5f00217c call %217c a617 bitb rh1,#7 ee02 jr nz,%1b96 b370 rl r7,#1 fd0b dbjnz rl5,%1b80 06010101 andb rh1,#%01 a411 setb rh1,#1 4d05474800ea ld %4748,#%00ea a980 inc r8,#1 21078000 ld r7,#%8000 21050001 ld r5,#%0001 c811 ldb rl0,#%11 a59f set r9,#15 7d9a ldctl fcw,r9 2f65 ld @r6,r5 2164 ld r4,@r6 a39f res r9,#15 7d9a ldctl fcw,r9 5f00217c call %217c a617 bitb rh1,#7 ee02 jr nz,%1bc6 b350 rl r5,#1 f80c dbjnz rl0,%1bae 2105aaaa ld r5,#%aaaa a980 inc r8,#1 06010303 andb rh1,#%03 a16c ld r12,r6 210d0002 ld r13,#%0002 8977 xor r7,r7 21007fff ld r0,#%7fff a59f set r9,#15 7d9a ldctl fcw,r9 2f65 ld @r6,r5 bb6100c0 ldir @r12,@r6,r0 8977 xor r7,r7 21008000 ld r0,#%8000 bb64005e cpir r5,@r6,r0,nz ab71 dec r7,#2 2164 ld r4,@r6 a39f res r9,#15 7d9a ldctl fcw,r9 5f00217c call %217c 0a0d5555 cpb rl5,#%55 9e06 ret z 21055555 ld r5,#%5555 e8e1 jr %1bca 7d92 ldctl r9,fcw a39f res r9,#15 7d9a ldctl fcw,r9 2102ff87 ld r2,#%ff87 21040001 ld r4,#%0001 3e2c outb @r2,rl4 3e24 outb @r2,rh4 3c32 inb rh2,@r3 a420 setb rh2,#0 3e32 outb @r3,rh2 a410 setb rh1,#0 5f001b5e call %1b5e 3c32 inb rh2,@r3 a220 resb rh2,#0 3e32 outb @r3,rh2 2102ff87 ld r2,#%ff87 2104011c ld r4,#%011c 3e24 outb @r2,rh4 3e2c outb @r2,rl4 61034740 ld r3,%4740 a59f set r9,#15 7d9a ldctl fcw,r9 1ea8 jp @r10 5f0021b8 call %21b8 8811 xorb rh1,rh1 4d0547560000 ld %4756,#%0000 140800000000 ldl rr8,#%00000000 21070001 ld r7,#%0001 21060000 ld r6,#%0000 3f76 out @r7,r6 4d0547540000 ld %4754,#%0000 54064764 ldl rr6,%4764 100680000000 cpl rr6,#%80000000 e604 jr z,%1c78 b3650001 slll rr6,#1 5e081c7e jp %1c7e 140600000001 ldl rr6,#%00000001 5d064764 ldl %4764,rr6 948c ldl rr12,rr8 010c0100 add r12,#%0100 54064760 ldl rr6,%4760 5f00206e call %206e 54064760 ldl rr6,%4760 54044764 ldl rr4,%4764 8964 xor r4,r6 8975 xor r5,r7 21078000 ld r7,#%8000 21060000 ld r6,#%0000 a123 ld r3,r2 5f0020be call %20be 21078000 ld r7,#%8000 21060000 ld r6,#%0000 5f0020ea call %20ea 50024760 cpl rr2,%4760 e604 jr z,%1cc4 69004756 inc %4756,#1 5e081cfa jp %1cfa 69004754 inc %4754,#1 21070001 ld r7,#%0001 3d72 in r2,@r7 070200ff and r2,#%00ff 0b0200ff cp r2,#%00ff ee04 jr nz,%1ce0 4d0147540100 cp %4754,#%0100 e60d jr z,%1cfa 4b024754 cp r2,%4754 e60a jr z,%1cfa 69004756 inc %4756,#1 4d0547540000 ld %4754,#%0000 21070001 ld r7,#%0001 21060000 ld r6,#%0000 3f76 out @r7,r6 540a4760 ldl rr10,%4760 160a00010001 addl rr10,#%00010001 5d0a4760 ldl %4760,rr10 54064764 ldl rr6,%4764 100680000000 cpl rr6,#%80000000 ee05 jr nz,%1d1e 140600000001 ldl rr6,#%00000001 5e081d22 jp %1d22 b3650001 slll rr6,#1 5d064764 ldl %4764,rr6 160800000001 addl rr8,#%00000001 908c cpl rr12,rr8 e7ac jr c,%1c88 100800000400 cpl rr8,#%00000400 e78e jr c,%1c54 4d0147560000 cp %4756,#%0000 9e06 ret z 21080200 ld r8,#%0200 5f0021f2 call %21f2 9e08 ret 5f0021b8 call %21b8 8811 xorb rh1,rh1 5f002098 call %2098 5f00210c call %210c 140600000000 ldl rr6,#%00000000 5d064760 ldl %4760,rr6 140600000000 ldl rr6,#%00000000 5d064750 ldl %4750,rr6 4d0547540000 ld %4754,#%0000 21070001 ld r7,#%0001 21060000 ld r6,#%0000 3f76 out @r7,r6 540c4750 ldl rr12,%4750 160c00000100 addl rr12,#%00000100 540a4768 ldl rr10,%4768 5408476c ldl rr8,%476c 61034772 ld r3,%4772 100a00000000 cpl rr10,#%00000000 e60a jr z,%1dae 908a cpl rr10,rr8 e608 jr z,%1dae b385ffff srll rr8,#1 100800000000 cpl rr8,#%00000000 ee02 jr nz,%1dae 21030040 ld r3,#%0040 4d0147700000 cp %4770,#%0000 e614 jr z,%1dde 4b034770 cp r3,%4770 ee11 jr nz,%1dde b331ffff srl r3,#1 0b030000 cp r3,#%0000 ee0c jr nz,%1dde 100a80000000 cpl rr10,#%80000000 e605 jr z,%1dd8 140880000000 ldl rr8,#%80000000 5e081dde jp %1dde 140840000000 ldl rr8,#%40000000 54064760 ldl rr6,%4760 5f00206e call %206e 6f034772 ld %4772,r3 54044760 ldl rr4,%4760 89a4 xor r4,r10 89b5 xor r5,r11 8984 xor r4,r8 8995 xor r5,r9 49024770 xor r2,%4770 8923 xor r3,r2 21078000 ld r7,#%8000 21060000 ld r6,#%0000 5f0020be call %20be 21078000 ld r7,#%8000 21060000 ld r6,#%0000 5f0020ea call %20ea 5f002126 call %2126 5f00210c call %210c 61024738 ld r2,%4738 4d0547380000 ld %4738,#%0000 0b020004 cp r2,#%0004 5e0e1f12 jp nz,%1f12 69004754 inc %4754,#1 21070001 ld r7,#%0001 3d72 in r2,@r7 070200ff and r2,#%00ff 0b0200ff cp r2,#%00ff ee04 jr nz,%1e4a 4d0147540100 cp %4754,#%0100 e604 jr z,%1e52 4b024754 cp r2,%4754 5e0e1f18 jp nz,%1f18 54064760 ldl rr6,%4760 160600010001 addl rr6,#%00010001 5d064760 ldl %4760,rr6 61034770 ld r3,%4770 61044772 ld r4,%4772 100a00000000 cpl rr10,#%00000000 e60f jr z,%1e8e 100a80000000 cpl rr10,#%80000000 e604 jr z,%1e80 b3a50001 slll rr10,#1 5e081ea6 jp %1ea6 140a00000000 ldl rr10,#%00000000 21030001 ld r3,#%0001 5e081ea6 jp %1ea6 0b030040 cp r3,#%0040 e604 jr z,%1e9c b3310001 sll r3,#1 5e081ea6 jp %1ea6 21030000 ld r3,#%0000 140a00000001 ldl rr10,#%00000001 100800000000 cpl rr8,#%00000000 5e061ece jp z,%1ece 100800000001 cpl rr8,#%00000001 e604 jr z,%1ec0 b385ffff srll rr8,#1 5e081ee6 jp %1ee6 140800000000 ldl rr8,#%00000000 21040040 ld r4,#%0040 5e081ee6 jp %1ee6 0b040001 cp r4,#%0001 e604 jr z,%1edc b341ffff srl r4,#1 5e081ee6 jp %1ee6 21040000 ld r4,#%0000 140880000000 ldl rr8,#%80000000 6f034770 ld %4770,r3 6f044772 ld %4772,r4 54064750 ldl rr6,%4750 160600000001 addl rr6,#%00000001 5d064750 ldl %4750,rr6 500c4750 cpl rr12,%4750 5e071d92 jp c,%1d92 100600000400 cpl rr6,#%00000400 5e071d6c jp c,%1d6c 5e081f20 jp %1f20 21080201 ld r8,#%0201 e802 jr %1f1c 21080202 ld r8,#%0202 5f0021f2 call %21f2 5f0020b0 call %20b0 5f002126 call %2126 9e08 ret 5f0021b8 call %21b8 8811 xorb rh1,rh1 4d05474800e0 ld %4748,#%00e0 4d0547580001 ld %4758,#%0001 21070001 ld r7,#%0001 21060000 ld r6,#%0000 3f76 out @r7,r6 61074758 ld r7,%4758 21060000 ld r6,#%0000 21058000 ld r5,#%8000 21040000 ld r4,#%0000 5f002160 call %2160 210c0000 ld r12,#%0000 4d05475a0000 ld %475a,#%0000 21084000 ld r8,#%4000 54c4143a ldl rr4,%143a(r12) 6107475a ld r7,%475a 61064758 ld r6,%4758 ace6 exb rh6,rl6 7d92 ldctl r9,fcw a59f set r9,#15 7d9a ldctl fcw,r9 2f64 ld @r6,r4 01070002 add r7,#%0002 2f65 ld @r6,r5 a39f res r9,#15 7d9a ldctl fcw,r9 a971 inc r7,#2 f88b djnz r8,%1f76 21084000 ld r8,#%4000 6107475a ld r7,%475a 61064758 ld r6,%4758 5f0020ea call %20ea 50c2143a cpl rr2,%143a(r12) e61a jr z,%1fd6 a617 bitb rh1,#7 e605 jr z,%1fb0 4d044758 test %4758 5e0e15e4 jp nz,%15e4 e851 jr %2052 140400000000 ldl rr4,#%00000000 61064758 ld r6,%4758 ace6 exb rh6,rl6 6107475a ld r7,%475a 21080203 ld r8,#%0203 5f0021f2 call %21f2 91f6 pushl @r15,rr6 21060000 ld r6,#%0000 21070001 ld r7,#%0001 3f76 out @r7,r6 95f6 popl rr6,@r15 a973 inc r7,#4 f8a3 djnz r8,%1f94 a9c0 inc r12,#1 0b0c0002 cp r12,#%0002 e7be jr c,%1f5e 61054758 ld r5,%4758 0b050000 cp r5,#%0000 5e062052 jp z,%2052 4b054742 cp r5,%4742 e604 jr z,%1ffc 69004758 inc %4758,#1 5e081f3c jp %1f3c 5e0815e4 jp %15e4 8966 xor r6,r6 2103ffc1 ld r3,#%ffc1 a16a ld r10,r6 610c4742 ld r12,%4742 210b1306 ld r11,#%1306 a1bd ld r13,r11 21094764 ld r9,#%4764 03091306 sub r9,#%1306 7f01 sc #%01 bba109c0 ldir @r12,@r10,r9 210d202a ld r13,#%202a 210b15e4 ld r11,#%15e4 1ec8 jp @r12 7d92 ldctl r9,fcw a39f res r9,#15 7d9a ldctl fcw,r9 2102ff87 ld r2,#%ff87 21040001 ld r4,#%0001 3e2c outb @r2,rl4 3e24 outb @r2,rh4 3c32 inb rh2,@r3 a420 setb rh2,#0 3e32 outb @r3,rh2 a410 setb rh1,#0 4d0547580000 ld %4758,#%0000 93f2 push @r15,r2 93f3 push @r15,r3 5e081f3c jp %1f3c 97f3 pop r3,@r15 97f2 pop r2,@r15 3c32 inb rh2,@r3 a220 resb rh2,#0 3e32 outb @r3,rh2 2102ff87 ld r2,#%ff87 2104011c ld r4,#%011c 3e24 outb @r2,rh4 3e2c outb @r2,rl4 a59f set r9,#15 7d9a ldctl fcw,r9 1ea8 jp @r10 8d28 clr r2 8d58 clr r5 a17a ld r10,r7 070a0001 and r10,#%0001 e602 jr z,%207e 485a1442 xorb rl2,%1442(r5) a950 inc r5,#1 0b050020 cp r5,#%0020 e603 jr z,%208c 5f002092 call %2092 e8f3 jr %2072 0702007f and r2,#%007f 9e08 ret b365ffff srll rr6,#1 9e08 ret 4d0547380000 ld %4738,#%0000 7d75 ldctl r7,psap 0107002e add r7,#%002e 2176 ld r6,@r7 6f06473a ld %473a,r6 0d752140 ld @r7,#%2140 9e08 ret 7d75 ldctl r7,psap 0107002e add r7,#%002e 6106473a ld r6,%473a 2f76 ld @r7,r6 9e08 ret ace6 exb rh6,rl6 3b360002 out %0002,r3 7f01 sc #%01 2f64 ld @r6,r4 01070002 add r7,#%0002 3b340000 in r3,%0000 05030080 or r3,#%0080 3b360000 out %0000,r3 2f65 ld @r6,r5 3b340000 in r3,%0000 0703ff7f and r3,#%ff7f 3b360000 out %0000,r3 7f02 sc #%02 9e08 ret ace6 exb rh6,rl6 7f01 sc #%01 3b240000 in r2,%0000 05020040 or r2,#%0040 3b260000 out %0000,r2 1462 ldl rr2,@r6 3b740000 in r7,%0000 0707ffbf and r7,#%ffbf 3b760000 out %0000,r7 7f02 sc #%02 9e08 ret 3aa4ffc1 inb rl2,%ffc1 040a0808 orb rl2,#%08 3aa6ffc1 outb %ffc1,rl2 3b240000 in r2,%0000 05020020 or r2,#%0020 3b260000 out %0000,r2 9e08 ret 3aa4ffc1 inb rl2,%ffc1 060af7f7 andb rl2,#%f7 3aa6ffc1 outb %ffc1,rl2 3b240000 in r2,%0000 0702ffdf and r2,#%ffdf 3b260000 out %0000,r2 9e08 ret 21f2 ld r2,@r15 07020007 and r2,#%0007 0b020004 cp r2,#%0004 ee02 jr nz,%2150 6f024738 ld %4738,r2 7f01 sc #%01 7b00 iret 2102002e ld r2,#%002e 6103473a ld r3,%473a 2f23 ld @r2,r3 1e38 jp @r3 ad76 ex r6,r7 ace6 exb rh6,rl6 9462 ldl rr2,rr6 a931 inc r3,#2 ab50 dec r5,#1 7d92 ldctl r9,fcw a59f set r9,#15 7d9a ldctl fcw,r9 2f64 ld @r6,r4 bb610520 ldir @r2,@r6,r5 a39f res r9,#15 7d9a ldctl fcw,r9 9e08 ret a611 bitb rh1,#1 e603 jr z,%2186 8b45 cp r5,r4 9e06 ret z e802 jr %218a 8acd cpb rl5,rl4 9e06 ret z a610 bitb rh1,#0 e609 jr z,%21a0 3c32 inb rh2,@r3 a220 resb rh2,#0 3e32 outb @r3,rh2 5f0021f2 call %21f2 3c32 inb rh2,@r3 a420 setb rh2,#0 3e32 outb @r3,rh2 9e08 ret 5f0021f2 call %21f2 9e08 ret 5f0021f2 call %21f2 2102139a ld r2,#%139a 7f0c sc #%0c 7f10 sc #%10 61024740 ld r2,%4740 9e08 ret 93f2 push @r15,r2 61024744 ld r2,%4744 a920 inc r2,#1 c901 ldb rl1,#%01 0c212020 cpb @r2,#%20 ee01 jr nz,%21ca a890 incb rl1,#1 5f0021d2 call %21d2 97f2 pop r2,@r15 9e08 ret 91f0 pushl @r15,rr0 91f2 pushl @r15,rr2 61024744 ld r2,%4744 2028 ldb rl0,@r2 7f06 sc #%06 a920 inc r2,#1 f904 dbjnz rl1,%21da 6f024744 ld %4744,r2 4d0547460000 ld %4746,#%0000 95f2 popl rr2,@r15 95f0 popl rr0,@r15 9e08 ret 5c09000e4700 ldm %4700,r0,#15 93f4 push @r15,r4 93f5 push @r15,r5 93f7 push @r15,r7 93f6 push @r15,r6 93f8 push @r15,r8 4d044746 test %4746 ee01 jr nz,%220a 7f0a sc #%0a 4d054746ffff ld %4746,#%ffff 2102138c ld r2,#%138c 7f0c sc #%0c 97f5 pop r5,@r15 7f0e sc #%0e c920 ldb rl1,#%20 7f16 sc #%16 61074748 ld r7,%4748 21060004 ld r6,#%0004 8877 xorb rh7,rh7 b372 rl r7,#2 97f5 pop r5,@r15 0a070101 cpb rh7,#%01 ee02 jr nz,%2236 7f12 sc #%12 e80a jr %224a 0a070202 cpb rh7,#%02 ee02 jr nz,%2240 7f0e sc #%0e e805 jr %224a 0a070303 cpb rh7,#%03 ee02 jr nz,%224a a05d ldb rl5,rh5 7f14 sc #%14 c920 ldb rl1,#%20 7f16 sc #%16 f695 djnz r6,%2226 7f10 sc #%10 5c01000e4700 ldm r0,%4700,#15 a612 bitb rh1,#2 ee02 jr nz,%2260 69004740 inc %4740,#1 a212 resb rh1,#2 a616 bitb rh1,#6 e601 jr z,%2268 a417 setb rh1,#7 a416 setb rh1,#6 9e08 ret 7f0a sc #%0a 7f0a sc #%0a 2102131a ld r2,#%131a 7f0c sc #%0c 7f10 sc #%10 4d0547360001 ld %4736,#%0001 8911 xor r1,r1 6009474a ldb rl1,%474a 0a090000 cpb rl1,#%00 ee06 jr nz,%2296 c901 ldb rl1,#%01 2102133a ld r2,#%133a 7f0c sc #%0c 7f10 sc #%10 e805 jr %22a0 6102442e ld r2,%442e 0b0212d6 cp r2,#%12d6 e602 jr z,%22a4 4d084736 clr %4736 ab10 dec r1,#1 21000003 ld r0,#%0003 91f0 pushl @r15,rr0 b3110001 sll r1,#1 61181462 ld r8,%1462(r1) 1f80 call @r8 95f0 popl rr0,@r15 a910 inc r1,#1 0b010003 cp r1,#%0003 ee01 jr nz,%22c2 8911 xor r1,r1 f08d djnz r0,%22aa 5f00290c call %290c 4d044754 test %4754 e604 jr z,%22d6 21021356 ld r2,#%1356 7f0c sc #%0c 7f10 sc #%10 5f002ade call %2ade 5f002a26 call %2a26 5f0029fc call %29fc 5f002aa8 call %2aa8 7f0a sc #%0a 21021330 ld r2,#%1330 7f0c sc #%0c 7f10 sc #%10 210213b8 ld r2,#%13b8 4d04474c test %474c e602 jr z,%22fe 210213ac ld r2,#%13ac 7f0c sc #%0c 210213c8 ld r2,#%13c8 7f0c sc #%0c 7f10 sc #%10 210213d2 ld r2,#%13d2 7f0c sc #%0c 600d4742 ldb rl5,%4742 7f14 sc #%14 7f10 sc #%10 61024740 ld r2,%4740 9e08 ret 65fe0002 set %0002(r15),#14 7f01 sc #%01 7b00 iret 91f2 pushl @r15,rr2 61f20004 ld r2,%0004(r15) ac2a exb rl2,rh2 07020007 and r2,#%0007 0a0a0101 cpb rl2,#%01 e609 jr z,%2348 0a0a0202 cpb rl2,#%02 e60b jr z,%2352 0a0a0404 cpb rl2,#%04 e60d jr z,%235c c2ff ldb rh2,#%ff 8933 xor r3,r3 e80e jr %2364 3ab502fc sinb rl3,%02fc 3a3505fc sinb rh3,%05fc e809 jr %2364 3ab502fa sinb rl3,%02fa 3a3505fa sinb rh3,%05fa e804 jr %2364 3ab502f6 sinb rl3,%02f6 3a3505f6 sinb rh3,%05f6 6f024736 ld %4736,r2 6f034734 ld %4734,r3 3aa711f0 soutb %11f0,rl2 95f2 popl rr2,@r15 7d92 ldctl r9,fcw a59f set r9,#15 7d9a ldctl fcw,r9 7b00 iret 3a0700fc soutb %00fc,rh0 3a06ffc1 outb %ffc1,rh0 010f0009 add r15,#%0009 93f2 push @r15,r2 3aa502fc sinb rl2,%02fc 3a2505fc sinb rh2,%05fc 6f024734 ld %4734,r2 4d054736ffff ld %4736,#%ffff 3aa711fc soutb %11fc,rl2 21025000 ld r2,#%5000 7d2a ldctl fcw,r2 97f2 pop r2,@r15 1eb8 jp @r11 3af701f0 soutb %01f0,rl7 3a7720f0 soutb %20f0,rh7 9e08 ret 5c09000e4700 ldm %4700,r0,#15 8977 xor r7,r7 5f0023a8 call %23a8 01060f00 add r6,#%0f00 21000100 ld r0,#%0100 3ab30060 sotirb @r6,@r11,r0 8977 xor r7,r7 5f0023a8 call %23a8 5c01000e4700 ldm r0,%4700,#15 9e08 ret 91f2 pushl @r15,rr2 93fb push @r15,r11 4d0547480095 ld %4748,#%0095 8811 xorb rh1,rh1 01060f00 add r6,#%0f00 210aa400 ld r10,#%a400 21000100 ld r0,#%0100 3a6100a0 sinirb @r10,@r6,r0 210aa400 ld r10,#%a400 21000100 ld r0,#%0100 baa600be cpsirb @r11,@r10,r0,nz aba0 dec r10,#1 abb0 dec r11,#1 20ac ldb rl4,@r10 20bd ldb rl5,@r11 030aa400 sub r10,#%a400 a1a7 ld r7,r10 03060f00 sub r6,#%0f00 5f00217c call %217c 97fb pop r11,@r15 95f2 popl rr2,@r15 9e08 ret 5c09000e4700 ldm %4700,r0,#15 8977 xor r7,r7 5f0023a8 call %23a8 c840 ldb rl0,#%40 21090ffc ld r9,#%0ffc 210a0ffa ld r10,#%0ffa 210b0ff6 ld r11,#%0ff6 21020004 ld r2,#%0004 3a330290 sotirb @r9,@r3,r2 ab33 dec r3,#4 21020004 ld r2,#%0004 3a4302a0 sotirb @r10,@r4,r2 ab43 dec r4,#4 21020004 ld r2,#%0004 3a5302b0 sotirb @r11,@r5,r2 ab53 dec r5,#4 f810 dbjnz rl0,%2436 5f0023a8 call %23a8 5c01000e4700 ldm r0,%4700,#15 9e08 ret 91f2 pushl @r15,rr2 93f9 push @r15,r9 8811 xorb rh1,rh1 8922 xor r2,r2 4d04474c test %474c e604 jr z,%2478 c202 ldb rh2,#%02 a6c1 bitb rl4,#1 e601 jr z,%2478 c242 ldb rh2,#%42 4d0547480050 ld %4748,#%0050 4d0547360000 ld %4736,#%0000 c802 ldb rl0,#%02 4d04474c test %474c e623 jr z,%24d2 c806 ldb rl0,#%06 3a86ffc1 outb %ffc1,rl0 8844 xorb rh4,rh4 a6c1 bitb rl4,#1 e609 jr z,%24aa 3ac700f6 soutb %00f6,rl4 c480 ldb rh4,#%80 3a4700fc soutb %00fc,rh4 c481 ldb rh4,#%81 3a4700fa soutb %00fa,rh4 e81f jr %24e8 a6c0 bitb rl4,#0 e609 jr z,%24c0 3ac700fa soutb %00fa,rl4 c480 ldb rh4,#%80 3a4700fc soutb %00fc,rh4 c482 ldb rh4,#%82 3a4700f6 soutb %00f6,rh4 e814 jr %24e8 3ac700fc soutb %00fc,rl4 c481 ldb rh4,#%81 3a4700fa soutb %00fa,rh4 c482 ldb rh4,#%82 3a4700f6 soutb %00f6,rh4 e80b jr %24e8 3a86ffc1 outb %ffc1,rl0 c8d0 ldb rl0,#%d0 3a8700fc soutb %00fc,rl0 a880 incb rl0,#1 3a8700fa soutb %00fa,rl0 a880 incb rl0,#1 3a8700f6 soutb %00f6,rl0 7d92 ldctl r9,fcw a59f set r9,#15 4d04474e test %474e e601 jr z,%24f4 a39e res r9,#14 7d9a ldctl fcw,r9 2f25 ld @r2,r5 7b0a mbit 7f02 sc #%02 8888 xorb rl0,rl0 3a8700f0 soutb %00f0,rl0 3a86ffc1 outb %ffc1,rl0 61064736 ld r6,%4736 8c64 testb rh6 ee15 jr nz,%2538 8ae0 cpb rh0,rl6 ee0e jr nz,%252e a820 incb rh2,#1 4d04474c test %474c e606 jr z,%2526 a6c1 bitb rl4,#1 e604 jr z,%2526 0a028080 cpb rh2,#%80 eeaa jr nz,%2478 e80e jr %2542 0a024040 cpb rh2,#%40 eea6 jr nz,%2478 e80a jr %2542 4d0547480058 ld %4748,#%0058 61054734 ld r5,%4734 a02f ldb rl7,rh2 5f0021f2 call %21f2 a617 bitb rh1,#7 e6e8 jr z,%2512 97f9 pop r9,@r15 95f2 popl rr2,@r15 9e08 ret 21081000 ld r8,#%1000 4d0547480000 ld %4748,#%0000 8811 xorb rh1,rh1 21078001 ld r7,#%8001 cea5 ldb rl6,#%a5 3e7e outb @r7,rl6 3c76 inb rh6,@r7 8ae6 cpb rh6,rl6 e605 jr z,%256c 4c01474a0303 cpb %474a,#%03 9e0e ret nz e821 jr %25ae 91f0 pushl @r15,rr0 2102135c ld r2,#%135c 7f0c sc #%0c 7f10 sc #%10 95f0 popl rr0,@r15 4c01474a0303 cpb %474a,#%03 9e0e ret nz 21081002 ld r8,#%1002 3a168001 outb %8001,rh1 21078000 ld r7,#%8000 21068010 ld r6,#%8010 ca04 ldb rl2,#%04 5f0025b4 call %25b4 ee01 jr nz,%259a 9e08 ret 4c01474a0303 cpb %474a,#%03 e601 jr z,%25a4 a412 setb rh1,#2 4d0547480055 ld %4748,#%0055 5f00260e call %260e 5f0021f2 call %21f2 9e08 ret 3c6d inb rl5,@r6 a0d5 ldb rh5,rl5 06050303 andb rh5,#%03 0a050303 cpb rh5,#%03 e616 jr z,%25ee 21040007 ld r4,#%0007 5f0025f6 call %25f6 e613 jr z,%25f2 3e7a outb @r7,rl2 21040007 ld r4,#%0007 5f0025f6 call %25f6 e60d jr z,%25f2 21040003 ld r4,#%0003 5f0025f6 call %25f6 e608 jr z,%25f2 3c6d inb rl5,@r6 a6d1 bitb rl5,#1 ee05 jr nz,%25f2 a6d2 bitb rl5,#2 ee03 jr nz,%25f2 9e08 ret 21081001 ld r8,#%1001 8d43 resflg z 9e08 ret 91f2 pushl @r15,rr2 21000fa0 ld r0,#%0fa0 3c6a inb rl2,@r6 26040a00 bitb rl2,r4 ee03 jr nz,%260a 5f0029ee call %29ee f087 djnz r0,%25fc 95f2 popl rr2,@r15 9e08 ret 88aa xorb rl2,rl2 3aa6800c outb %800c,rl2 3aa68001 outb %8001,rl2 21028000 ld r2,#%8000 3aa6800a outb %800a,rl2 3a26800b outb %800b,rh2 ca03 ldb rl2,#%03 5f0025b4 call %25b4 ee09 jr nz,%263e 600e8000 ldb rl6,%8000 600f8001 ldb rl7,%8001 600d8004 ldb rl5,%8004 600c8005 ldb rl4,%8005 9e08 ret 3c6d inb rl5,@r6 4d0547480004 ld %4748,#%0004 9e08 ret 21000004 ld r0,#%0004 dffb calr %2658 9e08 ret 21000000 ld r0,#%0000 dfff calr %2658 9e08 ret 8811 xorb rh1,rh1 4d0547480000 ld %4748,#%0000 210af000 ld r10,#%f000 0ca5ffff ldb @r10,#%ff a1ab ld r11,r10 a9b0 inc r11,#1 210c004a ld r12,#%004a baa10cb0 ldirb @r11,@r10,r12 210df1f1 ld r13,#%f1f1 3bd680f0 out %80f0,r13 df96 calr %2752 89dd xor r13,r13 3bd680f0 out %80f0,r13 df9a calr %2752 210bf000 ld r11,#%f000 3bb680f0 out %80f0,r11 210a00b4 ld r10,#%00b4 dfa1 calr %2752 0db15555 cp @r11,#%5555 ee01 jr nz,%269c fa85 djnz r10,%2692 21083000 ld r8,#%3000 0db1ffff cp @r11,#%ffff ee05 jr nz,%26b0 4c01474a0202 cpb %474a,#%02 9e0e ret nz e84e jr %274c 93f0 push @r15,r0 21021362 ld r2,#%1362 7f0c sc #%0c 7f10 sc #%10 97f0 pop r0,@r15 21083001 ld r8,#%3001 0db15555 cp @r11,#%5555 e63e jr z,%2742 0db1aaaa cp @r11,#%aaaa ee03 jr nz,%26d2 21083003 ld r8,#%3003 e838 jr %2742 0db10000 cp @r11,#%0000 e607 jr z,%26e6 21083002 ld r8,#%3002 21b6 ld r6,@r11 4d0547480080 ld %4748,#%0080 e82e jr %2742 610af00c ld r10,%f00c 0b000004 cp r0,#%0004 e114 jr lt,%2718 4d05f0320012 ld %f032,#%0012 4d05f0000100 ld %f000,#%0100 21000000 ld r0,#%0000 3b0680f0 out %80f0,r0 2100003c ld r0,#%003c 4d01f0000000 cp %f000,#%0000 e602 jr z,%2714 dfe0 calr %2752 f086 djnz r0,%2708 610af03c ld r10,%f03c b3a1fff8 srl r10,#8 a7a4 bit r10,#4 9e0e ret nz 070a001f and r10,#%001f 9e06 ret z 4c01474a0202 cpb %474a,#%02 9e0e ret nz a1a8 ld r8,r10 0b080007 cp r8,#%0007 e903 jr ge,%273c 01083003 add r8,#%3003 e803 jr %2742 01083009 add r8,#%3009 e800 jr %2742 4c01474a0202 cpb %474a,#%02 e601 jr z,%274c a412 setb rh1,#2 5f0021f2 call %21f2 9e08 ret 210d0004 ld r13,#%0004 210cffff ld r12,#%ffff fc81 djnz r12,%275a fd84 djnz r13,%2756 9e08 ret 2101feba ld r1,#%feba 2100feec ld r0,#%feec 0d18 clr @r1 a911 inc r1,#2 8b10 cp r0,r1 eefc jr nz,%2768 210401fe ld r4,#%01fe 21000080 ld r0,#%0080 3b067f00 out %7f00,r0 4d05fec4fed2 ld %fec4,#%fed2 4d08fec2 clr %fec2 21084000 ld r8,#%4000 8811 xorb rh1,rh1 4d0547480000 ld %4748,#%0000 3b047f00 in r0,%7f00 0b00ffff cp r0,#%ffff ee06 jr nz,%27a8 4c01474a0101 cpb %474a,#%01 9e0e ret nz 5e0828c0 jp %28c0 21021368 ld r2,#%1368 7f0c sc #%0c 7f10 sc #%10 210003e8 ld r0,#%03e8 5f0029ee call %29ee f083 djnz r0,%27b4 21084003 ld r8,#%4003 4d0547480080 ld %4748,#%0080 3b047f00 in r0,%7f00 06080101 andb rl0,#%01 e605 jr z,%27d8 ab40 dec r4,#1 eef4 jr nz,%27ba 3b647f00 in r6,%7f00 e86f jr %28b6 2100feba ld r0,#%feba ac08 exb rl0,rh0 c804 ldb rl0,#%04 df8e calr %28c6 2100feba ld r0,#%feba c805 ldb rl0,#%05 df92 calr %28c6 8d08 clr r0 c806 ldb rl0,#%06 df95 calr %28c6 2100c207 ld r0,#%c207 df98 calr %28c6 21000001 ld r0,#%0001 df9b calr %28c6 21084001 ld r8,#%4001 4d0547480000 ld %4748,#%0000 3b047f00 in r0,%7f00 06088080 andb rl0,#%80 ee53 jr nz,%28b6 4c01474a0101 cpb %474a,#%01 9e0e ret nz 21084004 ld r8,#%4004 4d08fee0 clr %fee0 4d05fee2ffff ld %fee2,#%ffff 4d05fed20007 ld %fed2,#%0007 dfac calr %28d6 6100fed4 ld r0,%fed4 0a080000 cpb rl0,#%00 ee3f jr nz,%28b6 6100fed8 ld r0,%fed8 a08c ldb rl4,rl0 07000100 and r0,#%0100 e639 jr z,%28b6 a0c8 ldb rl0,rl4 07000e00 and r0,#%0e00 ee35 jr nz,%28b6 a980 inc r8,#1 a0c8 ldb rl0,rl4 06080101 andb rl0,#%01 e630 jr z,%28b6 a980 inc r8,#1 a0c8 ldb rl0,rl4 06080202 andb rl0,#%02 e62b jr z,%28b6 a980 inc r8,#1 a0c8 ldb rl0,rl4 06081010 andb rl0,#%10 ee26 jr nz,%28b6 a980 inc r8,#1 a0c8 ldb rl0,rl4 06080808 andb rl0,#%08 ee21 jr nz,%28b6 a980 inc r8,#1 060c0404 andb rl4,#%04 ee1d jr nz,%28b6 21084010 ld r8,#%4010 4d0547480080 ld %4748,#%0080 21040002 ld r4,#%0002 4d08fee0 clr %fee0 4d05fed2000f ld %fed2,#%000f dfe0 calr %28d6 6106fed4 ld r6,%fed4 0a0e0000 cpb rl6,#%00 9e06 ret z 4d08fee0 clr %fee0 4d05fee2ffff ld %fee2,#%ffff 4d05fed20007 ld %fed2,#%0007 dfee calr %28d6 ab40 dec r4,#1 eeea jr nz,%288a 4c01474a0101 cpb %474a,#%01 e601 jr z,%28c0 a412 setb rh1,#2 5f0021f2 call %21f2 9e08 ret 3b067f00 out %7f00,r0 3b047f00 in r0,%7f00 06080101 andb rl0,#%01 eefb jr nz,%28ca 9e08 ret 4d05feba0001 ld %feba,#%0001 21000008 ld r0,#%0008 3b067f00 out %7f00,r0 3b047f00 in r0,%7f00 a702 bit r0,#2 e6fc jr z,%28e4 21000040 ld r0,#%0040 3b067f00 out %7f00,r0 4d05feba0000 ld %feba,#%0000 07003f00 and r0,#%3f00 0b000300 cp r0,#%0300 ee03 jr nz,%290a 4d05fed40003 ld %fed4,#%0003 9e08 ret 4d0547480000 ld %4748,#%0000 8811 xorb rh1,rh1 21082000 ld r8,#%2000 cda5 ldb rl5,#%a5 a0d5 ldb rh5,rl5 3b560048 out %0048,r5 3b440048 in r4,%0048 8b45 cp r5,r4 9e0e ret nz 93f1 push @r15,r1 21021374 ld r2,#%1374 7f0c sc #%0c 7f10 sc #%10 97f1 pop r1,@r15 5f0029d0 call %29d0 a616 bitb rh1,#6 9e0e ret nz 4d054748001a ld %4748,#%001a a980 inc r8,#1 21070042 ld r7,#%0042 21050010 ld r5,#%0010 a411 setb rh1,#1 210000c8 ld r0,#%00c8 3f75 out @r7,r5 ab71 dec r7,#2 21055555 ld r5,#%5555 3d74 in r4,@r7 8b45 cp r5,r4 e604 jr z,%2968 5f0029ee call %29ee f086 djnz r0,%295a e82f jr %29c6 a971 inc r7,#2 3d74 in r4,@r7 5f00217c call %217c a616 bitb rh1,#6 ee2b jr nz,%29ca 0b07004e cp r7,#%004e eef7 jr nz,%2968 06010202 andb rh1,#%02 a980 inc r8,#1 21070040 ld r7,#%0040 2105aaaa ld r5,#%aaaa 3f75 out @r7,r5 3d74 in r4,@r7 5f00217c call %217c a616 bitb rh1,#6 ee1b jr nz,%29ca a971 inc r7,#2 0b07004e cp r7,#%004e e3f6 jr ule,%2988 5f0029ee call %29ee 8811 xorb rh1,rh1 4d05474800a8 ld %4748,#%00a8 a980 inc r8,#1 210a0040 ld r10,#%0040 3da6 in r6,@r10 a660 bitb rh6,#0 9e06 ret z 210c004a ld r12,#%004a 210b004e ld r11,#%004e 3dc7 in r7,@r12 3db5 in r5,@r11 a6f2 bitb rl7,#2 e601 jr z,%29c6 a980 inc r8,#1 5f0021f2 call %21f2 6b004740 dec %4740,#1 9e08 ret a980 inc r8,#1 21002ee0 ld r0,#%2ee0 3b440040 in r4,%0040 a641 bitb rh4,#1 9e06 ret z 5f0029ee call %29ee f087 djnz r0,%29d6 a412 setb rh1,#2 a416 setb rh1,#6 5f0021f2 call %21f2 9e08 ret 93f0 push @r15,r0 21000c0f ld r0,#%0c0f 8d07 nop f082 djnz r0,%29f4 97f0 pop r0,@r15 9e08 ret 8811 xorb rh1,rh1 4d0547480000 ld %4748,#%0000 210aaaaa ld r10,#%aaaa 3ba61010 out %1010,r10 89aa xor r10,r10 3ba41010 in r10,%1010 0b0aaaaa cp r10,#%aaaa 9e0e ret nz 93f1 push @r15,r1 2102136e ld r2,#%136e 7f0c sc #%0c 7f10 sc #%10 97f1 pop r1,@r15 9e08 ret 8811 xorb rh1,rh1 4d0547480000 ld %4748,#%0000 8900 xor r0,r0 21047000 ld r4,#%7000 a146 ld r6,r4 a860 incb rh6,#1 21051234 ld r5,#%1234 2107abcd ld r7,#%abcd 7f01 sc #%01 2f47 ld @r4,r7 2f65 ld @r6,r5 214a ld r10,@r4 216b ld r11,@r6 7f02 sc #%02 8ba7 cp r7,r10 e609 jr z,%2a62 8bb5 cp r5,r11 e607 jr z,%2a62 a841 incb rh4,#2 a861 incb rh6,#2 a880 incb rl0,#1 0a080808 cpb rl0,#%08 9e06 ret z e8ef jr %2a40 a10d ld r13,r0 b3d10001 sll r13,#1 61dc13e0 ld r12,%13e0(r13) 3ec0 outb @r12,rh0 a405 setb rh0,#5 3ec0 outb @r12,rh0 7f01 sc #%01 214a ld r10,@r4 216b ld r11,@r6 7f02 sc #%02 8ba7 cp r7,r10 e6eb jr z,%2a54 8bb5 cp r5,r11 e6e9 jr z,%2a54 a205 resb rh0,#5 3ec0 outb @r12,rh0 030f001e sub r15,#%001e 1cf9000e ldm @r15,r0,#15 21021380 ld r2,#%1380 7f0c sc #%0c a089 ldb rl1,rl0 00093030 addb rl1,#%30 7f16 sc #%16 7f10 sc #%10 1cf1000e ldm r0,@r15,#15 010f001e add r15,#%001e e8d6 jr %2a54 8811 xorb rh1,rh1 4d0547480000 ld %4748,#%0000 3b36200e out %200e,r3 3b362000 out %2000,r3 21034321 ld r3,#%4321 3b362002 out %2002,r3 3b36200e out %200e,r3 3b362000 out %2000,r3 3b442002 in r4,%2002 8b43 cp r3,r4 9e0e ret nz 3b36200e out %200e,r3 21021386 ld r2,#%1386 7f0c sc #%0c 7f10 sc #%10 9e08 ret 8811 xorb rh1,rh1 4d0547480000 ld %4748,#%0000 8900 xor r0,r0 ca02 ldb rl2,#%02 c2a0 ldb rh2,#%a0 a10d ld r13,r0 b3d10001 sll r13,#1 61d413dc ld r4,%13dc(r13) 3e4a outb @r4,rl2 3e42 outb @r4,rh2 3e4a outb @r4,rl2 3c4b inb rl3,@r4 060bf0f0 andb rl3,#%f0 8ab2 cpb rh2,rl3 ee02 jr nz,%2b0a 5f002b14 call %2b14 a880 incb rl0,#1 0a080202 cpb rl0,#%02 9e06 ret z e8ec jr %2aec 030f001e sub r15,#%001e 1cf9000e ldm @r15,r0,#15 2102137a ld r2,#%137a 7f0c sc #%0c a089 ldb rl1,rl0 00093030 addb rl1,#%30 7f16 sc #%16 7f10 sc #%10 1cf1000e ldm r0,@r15,#15 010f001e add r15,#%001e 9e08 ret 21024000 ld r2,#%4000 7d2a ldctl fcw,r2 2102f000 ld r2,#%f000 a12f ld r15,r2 76012b50 lda r1,%2b50 210e0453 ld r14,#%0453 ba110e20 ldirb @r2,@r1,r14 1ef8 jp @r15 91f6 pushl @r15,rr6 6e0efff0 ldb %fff0,rl6 0a0e0303 cpb rl6,#%03 ee01 jr nz,%2b5e df29 calr %2d0c 0a0e0101 cpb rl6,#%01 ee01 jr nz,%2b66 dee5 calr %2d9c 0a0e0202 cpb rl6,#%02 ee01 jr nz,%2b6e de53 calr %2ec8 91f4 pushl @r15,rr4 8d44 test r4 ee02 jr nz,%2b78 340e03ed ldar r14,%2f65 df72 calr %2c96 c801 ldb rl0,#%01 3a86ffc1 outb %ffc1,rl0 340803de ldar r8,%2f62 df7e calr %2c8a 210afe28 ld r10,#%fe28 a1ab ld r11,r10 a1bc ld r12,r11 df73 calr %2caa 0a080a0a cpb rl0,#%0a e60a jr z,%2baa 0a082f2f cpb rl0,#%2f e603 jr z,%2ba2 2ec8 ldb @r12,rl0 a9c0 inc r12,#1 e8f6 jr %2b8e 8bbc cp r12,r11 e6f4 jr z,%2b8e df95 calr %2c7e e8f1 jr %2b8c df97 calr %2c7e 0cb8 clrb @r11 bdb2 ldk r11,#2 dfd1 calr %2c10 0ca4 testb @r10 e611 jr z,%2bd8 dfa6 calr %2c6c e627 jr z,%2c08 979b pop r11,@r9 8db4 test r11 e607 jr z,%2bce bd0e ldk r0,#14 a191 ld r1,r9 a1a2 ld r2,r10 ba1600ae cpsirb @r10,@r1,r0,nz eef2 jr nz,%2bb0 a12a ld r10,r2 a99d inc r9,#14 0b09fc00 cp r9,#%fc00 e9f0 jr ge,%2bb6 e8f1 jr %2bba dfb7 calr %2c6c 0d91e707 cp @r9,#%e707 ee14 jr nz,%2c08 619b0010 ld r11,%0010(r9) 21000018 ld r0,#%0018 4190000a add r0,%000a(r9) 8109 add r9,r0 bda0 ldk r10,#0 8d02 neg r0 01000200 add r0,#%0200 ba9100a0 ldirb @r10,@r9,r0 dfc8 calr %2c6c 21000200 ld r0,#%0200 eefa jr nz,%2bf6 95f4 popl rr4,@r15 95f6 popl rr6,@r15 1eb8 jp @r11 3408035e ldar r8,%2f6a dfc2 calr %2c8a e8b8 jr %2b80 a9be inc r11,#15 a1b5 ld r5,r11 b351fffd srl r5,#3 8944 xor r4,r4 df99 calr %2cea 070b0007 and r11,#%0007 b3b10006 sll r11,#6 010bfa08 add r11,#%fa08 95bc popl rr12,@r11 160c000001ff addl rr12,#%000001ff b3c5fff7 srll rr12,#9 210cfc00 ld r12,#%fc00 a1c9 ld r9,r12 bd1a ldk r1,#10 0c98 clrb @r9 a990 inc r9,#1 bd03 ldk r0,#3 bab10090 ldirb @r9,@r11,r0 ab10 dec r1,#1 eef9 jr nz,%2c3c 0b0d000a cp r13,#%000a 9e02 ret le 8844 xorb rh4,rh4 20bc ldb rl4,@r11 a9b0 inc r11,#1 20b5 ldb rh5,@r11 a9b0 inc r11,#1 20bd ldb rl5,@r11 dfba calr %2cea 2101fa00 ld r1,#%fa00 21000200 ld r0,#%0200 ba110090 ldirb @r9,@r1,r0 9e08 ret 8dd4 test r13 9e06 ret z 95c4 popl rr4,@r12 dfc5 calr %2cea 2109fa00 ld r9,#%fa00 abd0 dec r13,#1 8d43 resflg z 9e08 ret a9bd inc r11,#14 8bbc cp r12,r11 9e09 ret ge 0cc8 clrb @r12 a9c0 inc r12,#1 e8fb jr %2c80 2088 ldb rl0,@r8 8c84 testb rl0 9e06 ret z dfe4 calr %2cca a980 inc r8,#1 e8fa jr %2c8a 2102ff87 ld r2,#%ff87 340102cf ldar r1,%2f6d bd09 ldk r0,#9 3a120020 otirb @r2,@r1,r0 9e08 ret 340e02bb ldar r14,%2f65 8de4 test r14 e603 jr z,%2cb4 20e8 ldb rl0,@r14 a9e0 inc r14,#1 e806 jr %2cc0 3a84ff87 inb rl0,%ff87 a680 bitb rl0,#0 e6fc jr z,%2cb4 3a84ff83 inb rl0,%ff83 a287 resb rl0,#7 0a080d0d cpb rl0,#%0d ee01 jr nz,%2cca bd0a ldk r0,#10 0a080a0a cpb rl0,#%0a ee06 jr nz,%2cdc 8bac cp r12,r10 e6e9 jr z,%2ca6 bde0 ldk r14,#0 bd0d ldk r0,#13 dfff calr %2cdc bd0a ldk r0,#10 3a04ff87 inb rh0,%ff87 a602 bitb rh0,#2 e6fc jr z,%2cdc 3a86ff83 outb %ff83,rl0 9e08 ret 6008fff0 ldb rl0,%fff0 0a080303 cpb rl0,#%03 ee02 jr nz,%2cf8 dfd3 calr %2d50 9e08 ret 0a080101 cpb rl0,#%01 ee02 jr nz,%2d02 df5d calr %2e46 9e08 ret 0a080202 cpb rl0,#%02 9e0e ret nz def7 calr %2f1c 9e08 ret 4c05feb60303 ldb %feb6,#%03 4c05feb71818 ldb %feb7,#%18 2100feb4 ld r0,#%feb4 3b06800a out %800a,r0 ac80 exb rh0,rl0 3b06800b out %800b,r0 8900 xor r0,r0 3b06800c out %800c,r0 3b068010 out %8010,r0 21000016 ld r0,#%0016 e800 jr %2d36 3b068000 out %8000,r0 3b048010 in r0,%8010 a707 bit r0,#7 e6fc jr z,%2d3a 3b048010 in r0,%8010 a701 bit r0,#1 9e0e ret nz a703 bit r0,#3 e6fa jr z,%2d42 9e08 ret 9442 ldl rr2,rr4 9200 subl rr0,rr0 1a0000000018 divl rq0,#%00000018 3b168005 out %8005,r1 6008feb6 ldb rl0,%feb6 8800 xorb rh0,rh0 9b02 div rr2,r0 3b268002 out %8002,r2 8900 xor r0,r0 3b068010 out %8010,r0 3b068001 out %8001,r0 3b068008 out %8008,r0 3b06800a out %800a,r0 3b06800c out %800c,r0 ac38 exb rl0,rh3 3b368003 out %8003,r3 3b068004 out %8004,r0 2100fa00 ld r0,#%fa00 ac08 exb rl0,rh0 3b06800b out %800b,r0 bd01 ldk r0,#1 3b068009 out %8009,r0 e8cd jr %2d36 2101feba ld r1,#%feba 2100feec ld r0,#%feec 0d18 clr @r1 a911 inc r1,#2 8b10 cp r0,r1 eefc jr nz,%2da4 210101fe ld r1,#%01fe a112 ld r2,r1 21000080 ld r0,#%0080 3b067f00 out %7f00,r0 4d05fec4fed2 ld %fec4,#%fed2 4d08fec2 clr %fec2 3b047f00 in r0,%7f00 06080101 andb rl0,#%01 e60a jr z,%2de2 ab10 dec r1,#1 eef9 jr nz,%2dc4 ab20 dec r2,#1 eef7 jr nz,%2dc4 21022f76 ld r2,#%2f76 5f00050c call %050c 5e08016c jp %016c 2100feba ld r0,#%feba ac08 exb rl0,rh0 c804 ldb rl0,#%04 dfdb calr %2e36 2100feba ld r0,#%feba c805 ldb rl0,#%05 dfdf calr %2e36 8d08 clr r0 c806 ldb rl0,#%06 dfe2 calr %2e36 2100c207 ld r0,#%c207 dfe5 calr %2e36 21000001 ld r0,#%0001 dfe8 calr %2e36 3b047f00 in r0,%7f00 06088080 andb rl0,#%80 e606 jr z,%2e1c 21022f82 ld r2,#%2f82 5f00050c call %050c 5e08016c jp %016c 4d08fee0 clr %fee0 4d05fed2000f ld %fed2,#%000f dfd7 calr %2e7a 6100fee8 ld r0,%fee8 6101fee4 ld r1,%fee4 5d00feb6 ldl %feb6,rr0 9e08 ret 3b067f00 out %7f00,r0 3b247f00 in r2,%7f00 060a0101 andb rl2,#%01 eefb jr nz,%2e3a 9e08 ret 9442 ldl rr2,rr4 9200 subl rr0,rr0 4d08feb4 clr %feb4 5a00feb4 divl rq0,%feb4 6f01fee8 ld %fee8,r1 5b02feb8 div rr2,%feb8 ad32 ex r2,r3 5d02fee2 ldl %fee2,rr2 4d08fee0 clr %fee0 4d08fedc clr %fedc 4d05feda0200 ld %feda,#%0200 4d05fedefa00 ld %fede,#%fa00 4d05fed2000e ld %fed2,#%000e 4d05feba0001 ld %feba,#%0001 21000008 ld r0,#%0008 3b067f00 out %7f00,r0 3b047f00 in r0,%7f00 a702 bit r0,#2 e6fc jr z,%2e88 4d05feba0000 ld %feba,#%0000 07003f00 and r0,#%3f00 03000300 sub r0,#%0300 ee03 jr nz,%2ea6 4d05fed40003 ld %fed4,#%0003 4d04fed4 test %fed4 e609 jr z,%2ebe 88aa xorb rl2,rl2 3aa6ffc1 outb %ffc1,rl2 21022f90 ld r2,#%2f90 5f00050c call %050c 5e08016c jp %016c 21000040 ld r0,#%0040 3b067f00 out %7f00,r0 9e08 ret 2102ffff ld r2,#%ffff dfea calr %2efa 2101f1f1 ld r1,#%f1f1 3b1680f0 out %80f0,r1 dfe6 calr %2f0c 8d18 clr r1 3b1680f0 out %80f0,r1 dfea calr %2f0c 2101feb4 ld r1,#%feb4 3b1680f0 out %80f0,r1 210000e1 ld r0,#%00e1 8d18 clr r1 4d04feb4 test %feb4 9e06 ret z f184 djnz r1,%2eee f085 djnz r0,%2eee e8e7 jr %2ec8 2101feb4 ld r1,#%feb4 2100fefe ld r0,#%fefe 2f12 ld @r1,r2 a911 inc r1,#2 8b10 cp r0,r1 eefc jr nz,%2f02 9e08 ret 8d18 clr r1 21000005 ld r0,#%0005 ab10 dec r1,#1 eefe jr nz,%2f12 ab00 dec r0,#1 eefc jr nz,%2f12 9e08 ret 2107feb4 ld r7,#%feb4 21000010 ld r0,#%0010 33700002 ld r7(#%0002),r0 33750004 ld r7(#%0004),r5 bd01 ldk r0,#1 33700006 ld r7(#%0006),r0 2100fa00 ld r0,#%fa00 33700008 ld r7(#%0008),r0 8900 xor r0,r0 3370000a ld r7(#%000a),r0 3370000c ld r7(#%000c),r0 0d750001 ld @r7,#%0001 3b0680f0 out %80f0,r0 0d74 test @r7 eefe jr nz,%2f4c 3170000c ld r0,r7(#%000c) 8d04 test r0 eee2 jr nz,%2f1c 9e08 ret 8988 xor r8,r8 f881 djnz r8,%2f5c f083 djnz r0,%2f5a 9e08 ret 3e20 outb @r2,rh0 0062 addb rh2,@r6 6f6f740a ld %740a(r6),r15 3f0a out @r0,r10 0018 addb rl0,@r1 14cc ldl rr12,@r12 03c1 sub r1,@r12 05ea or r10,@r14 1100 .word #%1100 0009494e addb rl1,#%4e 49542045 xor r4,%2045(r5) 52520d00 subl rr2,%0d00(r5) 000c4454 addb rl4,#%54 204e ldb rl6,@r4 4f542053454e ext4f #%4f542053,%454e 540d0011 ldl rr13,%0011 4430204e orb rh0,%204e(r3) 4f5420464f52 ext4f #%4f542046,%4f52 4d4154544544 cp %5454(r4),#%4544 0d00 .word #%0d00 210ff800 ld r15,#%f800 c801 ldb rl0,#%01 3a86ffc1 outb %ffc1,rl0 dfd7 calr %3002 21000003 ld r0,#%0003 dfdc calr %2ffe 2100000a ld r0,#%000a dfdf calr %2ffe 2100000b ld r0,#%000b dfe2 calr %2ffe 2100000f ld r0,#%000f dfe5 calr %2ffe 2100000e ld r0,#%000e dfe8 calr %2ffe bd00 ldk r0,#0 3b06004e out %004e,r0 21000009 ld r0,#%0009 dfee calr %2ffe 3b04004a in r0,%004a a700 bit r0,#0 eee6 jr nz,%2fae bd00 ldk r0,#0 3b060044 out %0044,r0 3b060046 out %0046,r0 21004000 ld r0,#%4000 3b060048 out %0048,r0 21000001 ld r0,#%0001 dffe calr %2ffe 5e080000 jp %0000 3b060042 out %0042,r0 2100012c ld r0,#%012c f081 djnz r0,%3006 3b040040 in r0,%0040 a709 bit r0,#9 eefc jr nz,%3008 9e08 ret 21004000 ld r0,#%4000 7d0a ldctl fcw,r0 2102f800 ld r2,#%f800 76012fa4 lda r1,%2fa4 2100006e ld r0,#%006e ba110020 ldirb @r2,@r1,r0 5e08f800 jp %f800 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00 00000000 addb rh0,#%00