00000000: 8F nop 00000001: FF ota #$0f ; ; заполнить память пробелами, всего 0x1f00 (7936) штук (размер памяти 0x1000) ; 00000002: 22 20 ldc r2, #$20 00000004: 20 1E ldc r0, #$1e 00000006: 21 FF ldc r1, #$ff 00000008: C0 cfl #0 00000009: D2 lda r2 0000000A: F0 ota #$00 0000000B: F0 ota #$00 0000000C: F1 ota #$01 0000000D: 41 dsr r1 0000000E: 10 08 jmp $0009 00000010: 40 dsr r0 00000011: 10 08 jmp $0009 ; ; записать 0x14 по адресу 0xf1a ; 00000013: 20 F1 ldc r0, #$f1 00000015: D0 lda r0 00000016: F2 ota #$02 00000017: 20 A0 ldc r0, #$a0 00000019: D0 lda r0 0000001A: F3 ota #$03 0000001B: 20 14 ldc r0, #$14 0000001D: D0 lda r0 0000001E: F0 ota #$00 0000001F: F0 ota #$00 00000020: F1 ota #$01 00000021: 20 07 ldc r0, #$07 00000023: F4 ota #$04 00000024: 40 dsr r0 00000025: 10 22 jmp $0023 ; ; пишем заготовку строки состояния ; 09 xx 0a xx 0b xx 0c xx xx 0d xx 0e xx 0f xx 10 xx xx ; 00 xx 01 xx 02 xx 03 xx xx 04 xx 05 xx 06 xx 07 xx xx ; 00000027: 20 01 ldc r0, #$01 00000029: 21 09 ldc r1, #$09 0000002B: 23 01 ldc r3, #$01 0000002D: 22 03 ldc r2, #$03 0000002F: D1 lda r1 00000030: F0 ota #$00 00000031: F0 ota #$00 00000032: F1 ota #$01 00000033: F4 ota #$04 00000034: D1 lda r1 00000035: 51 inc 00000036: E1 sta r1 00000037: 42 dsr r2 00000038: 10 2E jmp $002f ; 0000003A: F4 ota #$04 0000003B: 43 dsr r3 0000003C: 10 2C jmp $002d ; 0000003E: 21 00 ldc r1, #$00 00000040: 40 dsr r0 00000041: 10 2A jmp $002b 00000043: 20 16 ldc r0, #$16 00000045: 21 02 ldc r1, #$02 00000047: D0 lda r0 00000048: F0 ota #$00 00000049: F0 ota #$00 0000004A: F1 ota #$01 0000004B: F4 ota #$04 0000004C: F4 ota #$04 0000004D: 30 02 lca #$02 0000004F: 00 add r0 00000050: E0 sta r0 00000051: 41 dsr r1 00000052: 10 46 jmp $0047 ; ; по адресу 0xf48 и дальше пишем заготовку "часов" ; 30 30 xx 30 30 xx 30 30 xx ; 00000054: 20 30 ldc r0, #$30 00000056: 21 F4 ldc r1, #$f4 00000058: D1 lda r1 00000059: F2 ota #$02 0000005A: 21 80 ldc r1, #$80 0000005C: D1 lda r1 0000005D: F3 ota #$03 0000005E: 21 02 ldc r1, #$02 ; 00000060: D0 lda r0 00000061: F0 ota #$00 00000062: F0 ota #$00 00000063: F8 ota #$08 00000064: F0 ota #$00 00000065: F0 ota #$00 00000066: F1 ota #$01 00000067: F4 ota #$04 00000068: 41 dsr r1 00000069: 10 5F jmp $0060 0000006B: C8 sfl #0 0000006C: FD ota #$0d 0000006D: 67 lla #$07 0000006E: C1 cfl #1 0000006F: C3 cfl #3 00000070: CC sfl #4 00000071: FF ota #$0f ; очистка регистров 00000072: 5F clr 00000073: E0 sta r0 00000074: E1 sta r1 00000075: E2 sta r2 00000076: E3 sta r3 00000077: E4 sta r4 00000078: E8 sta r8 00000079: E9 sta r9 0000007A: EA sta r10 0000007B: EB sta r11 0000007C: FE ota #$0e 0000007D: E0 sta r0 0000007E: E1 sta r1 0000007F: E2 sta r2 00000080: E3 sta r3 00000081: E4 sta r4 00000082: E7 sta r7 00000083: EA sta r10 00000084: EB sta r11 00000085: EC sta r12 00000086: ED sta r13 ; ??? (0x1A = 26) 00000087: 29 1A ldc r9, #$1a ; счетчик кадров для часов (0x31 = 49) 00000089: 28 31 ldc r8, #$31 0000008B: FF ota #$0f ; ждем начала кадра 0000008C: 25 8E ldc r5, #$8e 0000008E: 82 sfc #2 0000008F: 75 jmi r5 00000090: 11 00 jmp $0101 ; 00000092: 5F clr 00000093: F3 ota #$03 00000094: D1 lda r1 00000095: F2 ota #$02 ; ждем начала строки 00000096: 25 98 ldc r5, #$98 00000098: 80 sfc #0 00000099: 75 jmi r5 0000009A: FE ota #$0e 0000009B: DD lda r13 0000009C: 5D com 0000009D: 51 inc 0000009E: 0C add r12 0000009F: 5D com 000000A0: 51 inc 000000A1: 25 01 ldc r5, #$01 000000A3: 05 add r5 000000A4: FF ota #$0f 000000A5: 8D sfs #5 000000A6: 10 AF jmp $00b0 000000A8: 2F AC ldc r15, #$ac 000000AA: 11 09 jmp $010a 000000AC: 25 AE ldc r5, #$ae 000000AE: 80 sfc #0 000000AF: 75 jmi r5 000000B0: 2F B4 ldc r15, #$b4 000000B2: 11 04 jmp $0105 000000B4: 89 sfs #1 000000B5: 10 91 jmp $0092 ; 0xfa0 000000B7: 5F clr 000000B8: F3 ota #$03 000000B9: 25 FA ldc r5, #$fa 000000BB: D5 lda r5 000000BC: F2 ota #$02 000000BD: D1 lda r1 000000BE: B2 cs r2 000000BF: 87 skp 000000C0: C9 sfl #1 000000C1: 6C lla #$0c 000000C2: 85 sfc #5 000000C3: C1 cfl #1 000000C4: 30 EB lca #$eb 000000C6: B1 cs r1 000000C7: 10 D9 jmp $00da 000000C9: 5F clr 000000CA: E1 sta r1 000000CB: 2F CF ldc r15, #$cf 000000CD: 11 08 jmp $0109 000000CF: 89 sfs #1 000000D0: 10 DF jmp $00e0 ; 0xfa0 000000D2: 5F clr 000000D3: F3 ota #$03 000000D4: 25 FA ldc r5, #$fa 000000D6: D5 lda r5 000000D7: F2 ota #$02 000000D8: 10 CA jmp $00cb 000000DA: 30 05 lca #$05 000000DC: 01 add r1 000000DD: E1 sta r1 000000DE: 10 CA jmp $00cb 000000E0: C1 cfl #1 000000E1: 82 sfc #2 000000E2: 10 91 jmp $0092 000000E4: 11 00 jmp $0101 ; ждем маркерную строку 000000E6: 25 E8 ldc r5, #$e8 000000E8: 89 sfs #1 000000E9: 75 jmi r5 000000EA: 25 EC ldc r5, #$ec 000000EC: 81 sfc #1 000000ED: 75 jmi r5 000000EE: 7E jmi r14 ; 000000EF: D5 lda r5 000000F0: 33 ral 000000F1: 33 ral 000000F2: 33 ral 000000F3: 33 ral 000000F4: E5 sta r5 000000F5: C0 cfl #0 000000F6: F3 ota #$03 000000F7: 30 0F lca #$0f 000000F9: 95 and r5 000000FA: 06 add r6 000000FB: F2 ota #$02 000000FC: 7E jmi r14 000000FD: FF ota #$0f 000000FE: FF ota #$0f 000000FF: FF ota #$0f 00000100: 8F nop ; основной цикл 00000101: D0 lda r0 00000102: E1 sta r1 00000103: 2F 07 ldc r15, #$07 00000105: 12 00 jmp $0201 00000107: 2F 0B ldc r15, #$0b 00000109: 12 87 jmp $0288 0000010B: 2F 0F ldc r15, #$0f 0000010D: 14 00 jmp $0401 0000010F: 2E 13 ldc r14, #$13 00000111: 10 E5 jmp $00e6 00000113: 2F 17 ldc r15, #$17 00000115: 12 00 jmp $0201 00000117: 2F 1B ldc r15, #$1b 00000119: 15 A9 jmp $05aa 0000011B: C0 cfl #0 0000011C: 25 F1 ldc r5, #$f1 0000011E: D5 lda r5 0000011F: F2 ota #$02 00000120: 25 B0 ldc r5, #$b0 00000122: D5 lda r5 00000123: F3 ota #$03 00000124: 30 07 lca #$07 00000126: 98 and r8 00000127: FC ota #$0c 00000128: E5 sta r5 00000129: 33 ral 0000012A: 05 add r5 0000012B: 25 30 ldc r5, #$30 0000012D: 05 add r5 0000012E: E5 sta r5 0000012F: 75 jmi r5 ; скорость порта 00000130: 22 96 ldc r2, #$96 00000132: 87 skp 00000133: 22 48 ldc r2, #$48 00000135: 87 skp 00000136: 22 24 ldc r2, #$24 00000138: 87 skp 00000139: 22 12 ldc r2, #$12 0000013B: 87 skp 0000013C: 22 06 ldc r2, #$06 0000013E: 87 skp 0000013F: 22 03 ldc r2, #$03 00000141: 87 skp 00000142: 11 66 jmp $0167 00000144: 87 skp 00000145: 11 6C jmp $016d 00000147: 26 00 ldc r6, #$00 00000149: 27 30 ldc r7, #$30 0000014B: 2C 0F ldc r12, #$0f 0000014D: 2D 01 ldc r13, #$01 0000014F: 2E 01 ldc r14, #$01 00000151: D2 lda r2 00000152: 33 ral 00000153: 33 ral 00000154: 33 ral 00000155: 33 ral 00000156: E2 sta r2 00000157: 9C and r12 00000158: 07 add r7 00000159: F0 ota #$00 0000015A: F0 ota #$00 0000015B: F1 ota #$01 0000015C: F4 ota #$04 0000015D: 4E dsr r14 0000015E: 11 50 jmp $0151 00000160: D6 lda r6 00000161: E2 sta r2 00000162: 4D dsr r13 00000163: 11 4E jmp $014f 00000165: 11 72 jmp $0173 00000167: 22 01 ldc r2, #$01 00000169: 26 50 ldc r6, #$50 0000016B: 11 48 jmp $0149 0000016D: 22 00 ldc r2, #$00 0000016F: 26 75 ldc r6, #$75 00000171: 11 48 jmp $0149 ; отрисовка 16 бит состояния [r10, r11] группами по 4 00000173: F4 ota #$04 00000174: 2D 30 ldc r13, #$30 00000176: DB lda r11 00000177: EC sta r12 00000178: 25 01 ldc r5, #$01 0000017A: 26 01 ldc r6, #$01 0000017C: 27 03 ldc r7, #$03 0000017E: DC lda r12 0000017F: 33 ral 00000180: EC sta r12 00000181: 30 01 lca #$01 00000183: 9C and r12 00000184: 0D add r13 00000185: F0 ota #$00 00000186: F0 ota #$00 00000187: F1 ota #$01 00000188: F4 ota #$04 00000189: 47 dsr r7 0000018A: 11 7D jmp $017e 0000018C: F4 ota #$04 0000018D: 46 dsr r6 0000018E: 11 7B jmp $017c 00000190: DA lda r10 00000191: EC sta r12 00000192: 45 dsr r5 00000193: 11 79 jmp $017a 00000195: C8 sfl #0 00000196: 2F 9A ldc r15, #$9a 00000198: 12 87 jmp $0288 0000019A: 2E 9E ldc r14, #$9e 0000019C: 10 E5 jmp $00e6 0000019E: 2F A2 ldc r15, #$a2 000001A0: 12 00 jmp $0201 000001A2: 2F A6 ldc r15, #$a6 000001A4: 12 87 jmp $0288 000001A6: 30 BF lca #$bf 000001A8: 99 and r9 000001A9: E9 sta r9 000001AA: 25 FA ldc r5, #$fa 000001AC: 6C lla #$0c 000001AD: 8D sfs #5 000001AE: 11 B5 jmp $01b6 000001B0: FE ota #$0e 000001B1: D9 lda r9 000001B2: FF ota #$0f 000001B3: E6 sta r6 000001B4: 11 B7 jmp $01b8 000001B6: D3 lda r3 000001B7: E6 sta r6 000001B8: 2E BC ldc r14, #$bc 000001BA: 13 00 jmp $0301 000001BC: 2E C0 ldc r14, #$c0 000001BE: 10 E5 jmp $00e6 000001C0: 6C lla #$0c 000001C1: 85 sfc #5 000001C2: 11 C9 jmp $01ca ; служебная строка разрешена? 000001C4: DA lda r10 000001C5: 35 rar 000001C6: 85 sfc #5 ; нет 000001C7: 11 CB jmp $01cc ; да 000001C9: 87 skp 000001CA: C9 sfl #1 000001CB: C3 cfl #3 ; рисуем символы 000001CC: 5F clr 000001CD: F3 ota #$03 000001CE: 25 F0 ldc r5, #$f0 000001D0: D5 lda r5 000001D1: F2 ota #$02 000001D2: 2F D6 ldc r15, #$d6 000001D4: 12 00 jmp $0201 000001D6: 89 sfs #1 000001D7: 11 CB jmp $01cc ; рисуем курсор 000001D9: 5F clr 000001DA: F3 ota #$03 000001DB: 25 FA ldc r5, #$fa 000001DD: D5 lda r5 000001DE: F2 ota #$02 000001DF: 2F E3 ldc r15, #$e3 000001E1: 12 87 jmp $0288 000001E3: 81 sfc #1 000001E4: 11 D8 jmp $01d9 000001E6: C1 cfl #1 000001E7: CB sfl #3 000001E8: C5 cfl #5 000001E9: 10 91 jmp $0092 000001EB: 26 10 ldc r6, #$10 000001ED: D4 lda r4 000001EE: 33 ral 000001EF: 33 ral 000001F0: 04 add r4 000001F1: 00 add r0 000001F2: E5 sta r5 000001F3: 86 sfc #6 000001F4: 11 FA jmp $01fb 000001F6: 06 add r6 000001F7: 8E sfs #6 000001F8: D5 lda r5 000001F9: E2 sta r2 000001FA: 7D jmi r13 000001FB: 06 add r6 000001FC: E2 sta r2 000001FD: 7D jmi r13 000001FE: FF ota #$0f 000001FF: FF ota #$0f 00000200: 8F nop ; готовность клавиатуры? 00000201: 6B lla #$0b 00000202: 8D sfs #5 00000203: 12 08 jmp $0209 ; нет; сбрасываем бит 2 в r9 00000205: 30 FB lca #$fb 00000207: 99 and r9 00000208: E9 sta r9 ; да 00000209: 2D 4C ldc r13, #$4c ; режим СДВ? 0000020B: 6C lla #$0c 0000020C: 85 sfc #5 ; да -> $024c 0000020D: 7D jmi r13 ; режим ЛИН? 0000020E: 6F lla #$0f 0000020F: 8D sfs #5 00000210: 7D jmi r13 ; да 00000211: FE ota #$0e 00000212: D0 lda r0 00000213: 52 dsn 00000214: 12 7B jmp $027c 00000216: FF ota #$0f ; готовность линии? 00000217: 61 lla #$01 00000218: 85 sfc #5 00000219: 7D jmi r13 0000021A: 66 lla #$06 0000021B: E7 sta r7 0000021C: 5A dse 0000021D: 12 4B jmp $024c 0000021F: DA lda r10 00000220: 35 rar 00000221: 35 rar 00000222: 35 rar 00000223: E6 sta r6 00000224: 8D sfs #5 00000225: 12 34 jmp $0235 00000227: D7 lda r7 00000228: 2D 2C ldc r13, #$2c 0000022A: 14 ED jmp $04ee 0000022C: E5 sta r5 0000022D: 30 01 lca #$01 0000022F: 96 and r6 00000230: 35 rar 00000231: 05 add r5 00000232: 85 sfc #5 00000233: 27 7F ldc r7, #$7f 00000235: 25 7F ldc r5, #$7f 00000237: D7 lda r7 00000238: 95 and r5 00000239: E7 sta r7 0000023A: FF ota #$0f 0000023B: 87 skp 0000023C: 12 4B jmp $024c 0000023E: D9 lda r9 0000023F: 35 rar 00000240: 8D sfs #5 00000241: 12 5A jmp $025b 00000243: 30 13 lca #$13 00000245: B7 cs r7 00000246: 12 4B jmp $024c 00000248: 30 FE lca #$fe 0000024A: 99 and r9 0000024B: E9 sta r9 ; режим СДВ, !ЛИН 0000024C: 5F clr 0000024D: E7 sta r7 ; отрисовка служебной строки? 0000024E: 2D 52 ldc r13, #$52 00000250: 11 EA jmp $01eb ; ждем ССИ и возвращаемся 00000252: 25 54 ldc r5, #$54 00000254: 80 sfc #0 00000255: 75 jmi r5 00000256: 25 58 ldc r5, #$58 00000258: 88 sfs #0 00000259: 75 jmi r5 0000025A: 7F jmi r15 0000025B: FE ota #$0e 0000025C: DC lda r12 0000025D: 51 inc 0000025E: 25 3F ldc r5, #$3f 00000260: 95 and r5 00000261: EC sta r12 00000262: FF ota #$0f 00000263: 33 ral 00000264: 33 ral 00000265: 33 ral 00000266: 33 ral 00000267: E5 sta r5 00000268: 26 F5 ldc r6, #$f5 0000026A: 30 0F lca #$0f 0000026C: 95 and r5 0000026D: 06 add r6 0000026E: E6 sta r6 ; 0000026F: 2C 71 ldc r12, #$71 00000271: 88 sfs #0 00000272: 7C jmi r12 00000273: D6 lda r6 00000274: F2 ota #$02 00000275: D5 lda r5 00000276: F3 ota #$03 00000277: D7 lda r7 00000278: F0 ota #$00 00000279: F0 ota #$00 0000027A: F1 ota #$01 0000027B: 7F jmi r15 ; запись в линию: 0000027C: FF ota #$0f 0000027D: 68 lla #$08 ; есть готовность? 0000027E: 8D sfs #5 0000027F: 12 16 jmp $0217 00000281: 2E 85 ldc r14, #$85 00000283: 12 EA jmp $02eb 00000285: F6 ota #$06 00000286: 12 16 jmp $0217 00000288: 6C lla #$0c 00000289: 85 sfc #5 0000028A: 12 51 jmp $0252 0000028C: D9 lda r9 0000028D: 35 rar 0000028E: 85 sfc #5 0000028F: 19 00 jmp $0901 00000291: FE ota #$0e 00000292: DC lda r12 00000293: BD cs r13 00000294: 12 98 jmp $0299 00000296: FF ota #$0f 00000297: 12 51 jmp $0252 00000299: DD lda r13 0000029A: 51 inc 0000029B: 26 3F ldc r6, #$3f 0000029D: 96 and r6 0000029E: ED sta r13 0000029F: FF ota #$0f 000002A0: E5 sta r5 000002A1: 26 F5 ldc r6, #$f5 000002A3: 2E A7 ldc r14, #$a7 000002A5: 10 EE jmp $00ef 000002A7: F0 ota #$00 000002A8: C1 cfl #1 000002A9: 60 lla #$00 000002AA: E7 sta r7 000002AB: C8 sfl #0 000002AC: 6A lla #$0a 000002AD: 8D sfs #5 000002AE: 12 CA jmp $02cb 000002B0: D8 lda r8 000002B1: 33 ral 000002B2: 33 ral 000002B3: 85 sfc #5 000002B4: 18 88 jmp $0889 000002B6: 30 60 lca #$60 000002B8: 97 and r7 000002B9: 52 dsn 000002BA: 12 CA jmp $02cb 000002BC: DB lda r11 000002BD: 35 rar 000002BE: 35 rar 000002BF: 85 sfc #5 000002C0: 12 C6 jmp $02c7 000002C2: 25 08 ldc r5, #$08 000002C4: D7 lda r7 000002C5: 16 02 jmp $0603 000002C7: 25 48 ldc r5, #$48 000002C9: 12 C3 jmp $02c4 000002CB: 5F clr 000002CC: 8C sfs #4 000002CD: 30 80 lca #$80 000002CF: 07 add r7 000002D0: E7 sta r7 000002D1: 2D D5 ldc r13, #$d5 000002D3: 11 EA jmp $01eb 000002D5: D3 lda r3 000002D6: E5 sta r5 000002D7: D2 lda r2 000002D8: E6 sta r6 000002D9: 2E DD ldc r14, #$dd 000002DB: 10 EE jmp $00ef 000002DD: D7 lda r7 000002DE: F0 ota #$00 000002DF: F0 ota #$00 000002E0: F1 ota #$01 000002E1: C8 sfl #0 000002E2: 30 10 lca #$10 000002E4: A9 xor r9 000002E5: E9 sta r9 000002E6: 2E 4C ldc r14, #$4c 000002E8: 13 C7 jmp $03c8 000002EA: 8F nop 000002EB: FE ota #$0e 000002EC: D0 lda r0 000002ED: E5 sta r5 000002EE: D1 lda r1 000002EF: E0 sta r0 000002F0: D2 lda r2 000002F1: E1 sta r1 000002F2: D3 lda r3 000002F3: E2 sta r2 000002F4: D4 lda r4 000002F5: E3 sta r3 000002F6: 5F clr 000002F7: E4 sta r4 000002F8: D5 lda r5 000002F9: FF ota #$0f 000002FA: 7E jmi r14 000002FB: FF ota #$0f 000002FC: FF ota #$0f 000002FD: FF ota #$0f 000002FE: FF ota #$0f 000002FF: FF ota #$0f 00000300: 8F nop 00000301: D9 lda r9 00000302: 33 ral 00000303: 8D sfs #5 00000304: 13 2C jmp $032d 00000306: D6 lda r6 00000307: 33 ral 00000308: 33 ral 00000309: 33 ral 0000030A: 33 ral 0000030B: EC sta r12 0000030C: 30 0F lca #$0f 0000030E: 9C and r12 0000030F: 05 add r5 00000310: E5 sta r5 00000311: 30 B1 lca #$b1 00000313: 06 add r6 00000314: 5D com 00000315: 51 inc 00000316: ED sta r13 00000317: C0 cfl #0 00000318: DC lda r12 00000319: F3 ota #$03 0000031A: D5 lda r5 0000031B: F2 ota #$02 0000031C: 25 20 ldc r5, #$20 0000031E: 2C 20 ldc r12, #$20 00000320: DC lda r12 00000321: F0 ota #$00 00000322: F0 ota #$00 00000323: F1 ota #$01 00000324: 4D dsr r13 00000325: 75 jmi r5 00000326: D9 lda r9 00000327: 33 ral 00000328: 8D sfs #5 00000329: 13 32 jmp $0333 0000032B: C8 sfl #0 0000032C: 7E jmi r14 0000032D: 5F clr 0000032E: EC sta r12 0000032F: D6 lda r6 00000330: ED sta r13 00000331: 13 16 jmp $0317 00000333: F5 ota #$05 00000334: 2C 7F ldc r12, #$7f 00000336: DC lda r12 00000337: F0 ota #$00 00000338: F0 ota #$00 00000339: F1 ota #$01 0000033A: 30 B1 lca #$b1 0000033C: 06 add r6 0000033D: 5D com 0000033E: 51 inc 0000033F: ED sta r13 00000340: 30 40 lca #$40 00000342: A9 xor r9 00000343: E9 sta r9 00000344: DB lda r11 00000345: 33 ral 00000346: 33 ral 00000347: 33 ral 00000348: 8D sfs #5 00000349: 13 1D jmp $031e 0000034B: 13 C0 jmp $03c1 0000034D: 30 17 lca #$17 0000034F: B4 cs r4 00000350: 87 skp 00000351: 13 56 jmp $0357 00000353: D4 lda r4 00000354: 51 inc 00000355: E4 sta r4 00000356: 7E jmi r14 00000357: DB lda r11 00000358: 8D sfs #5 00000359: 13 5D jmp $035e 0000035B: 5F clr 0000035C: E4 sta r4 0000035D: 7E jmi r14 0000035E: D9 lda r9 0000035F: 85 sfc #5 00000360: 13 68 jmp $0369 00000362: D9 lda r9 00000363: 33 ral 00000364: 33 ral 00000365: 85 sfc #5 00000366: 7E jmi r14 00000367: 13 5A jmp $035b 00000369: 30 EB lca #$eb 0000036B: B0 cs r0 0000036C: 13 7D jmp $037e 0000036E: 5F clr 0000036F: E0 sta r0 00000370: D9 lda r9 00000371: 33 ral 00000372: 8D sfs #5 00000373: 7E jmi r14 00000374: 2D 78 ldc r13, #$78 00000376: 11 EA jmp $01eb 00000378: D2 lda r2 00000379: E5 sta r5 0000037A: 5F clr 0000037B: E6 sta r6 0000037C: 13 00 jmp $0301 0000037E: 30 05 lca #$05 00000380: 00 add r0 00000381: E0 sta r0 00000382: 13 6F jmp $0370 00000384: D4 lda r4 00000385: 5A dse 00000386: 13 89 jmp $038a 00000388: 44 dsr r4 00000389: 7E jmi r14 0000038A: D9 lda r9 0000038B: 85 sfc #5 0000038C: 13 95 jmp $0396 0000038E: D9 lda r9 0000038F: 33 ral 00000390: 33 ral 00000391: 85 sfc #5 00000392: 7E jmi r14 00000393: 24 17 ldc r4, #$17 00000395: 7E jmi r14 00000396: 5F clr 00000397: B0 cs r0 00000398: 13 A3 jmp $03a4 0000039A: 20 EB ldc r0, #$eb 0000039C: D9 lda r9 0000039D: 33 ral 0000039E: 8D sfs #5 0000039F: 7E jmi r14 000003A0: D0 lda r0 000003A1: E5 sta r5 000003A2: 13 79 jmp $037a 000003A4: 30 FB lca #$fb 000003A6: 00 add r0 000003A7: E0 sta r0 000003A8: 13 9B jmp $039c 000003AA: 5F clr 000003AB: B3 cs r3 000003AC: 13 BD jmp $03be 000003AE: DA lda r10 000003AF: 33 ral 000003B0: 85 sfc #5 000003B1: 7E jmi r14 000003B2: 5F clr 000003B3: B4 cs r4 000003B4: 13 BA jmp $03bb 000003B6: 24 17 ldc r4, #$17 000003B8: 23 4F ldc r3, #$4f 000003BA: 7E jmi r14 000003BB: 44 dsr r4 000003BC: 13 B7 jmp $03b8 000003BE: 43 dsr r3 000003BF: 7E jmi r14 000003C0: 00 add r0 000003C1: 2C 6A ldc r12, #$6a 000003C3: 13 1F jmp $0320 000003C5: FF ota #$0f 000003C6: FF ota #$0f 000003C7: FF ota #$0f 000003C8: 8F nop 000003C9: 30 4F lca #$4f 000003CB: B3 cs r3 000003CC: 13 E7 jmp $03e8 000003CE: D9 lda r9 000003CF: 33 ral 000003D0: 33 ral 000003D1: 33 ral 000003D2: 8D sfs #5 000003D3: 13 DF jmp $03e0 000003D5: 25 E0 ldc r5, #$e0 000003D7: 30 0F lca #$0f 000003D9: 99 and r9 000003DA: A5 xor r5 000003DB: E9 sta r9 000003DC: 5F clr 000003DD: E3 sta r3 000003DE: 13 4C jmp $034d 000003E0: DA lda r10 000003E1: 33 ral 000003E2: 85 sfc #5 000003E3: 7E jmi r14 000003E4: 25 00 ldc r5, #$00 000003E6: 13 D6 jmp $03d7 000003E8: 30 EF lca #$ef 000003EA: 99 and r9 000003EB: E9 sta r9 000003EC: D3 lda r3 000003ED: 51 inc 000003EE: E3 sta r3 000003EF: 30 48 lca #$48 000003F1: B3 cs r3 000003F2: 7E jmi r14 000003F3: 30 08 lca #$08 000003F5: 9B and r11 000003F6: 52 dsn 000003F7: 7E jmi r14 000003F8: C2 cfl #2 000003F9: F8 ota #$08 000003FA: 7E jmi r14 000003FB: FF ota #$0f 000003FC: FF ota #$0f 000003FD: FF ota #$0f 000003FE: FF ota #$0f 000003FF: FF ota #$0f 00000400: 8F nop ; готовность клавиатуры? 00000401: 6B lla #$0b 00000402: 85 sfc #5 00000403: 7F jmi r15 ; да. если бит 2 ["идет обработка введенного символа"?] в r9 сброшен, продолжаем и выставляем его, иначе возврат 00000404: D9 lda r9 00000405: 35 rar 00000406: 35 rar 00000407: 35 rar 00000408: 85 sfc #5 00000409: 7F jmi r15 0000040A: 30 04 lca #$04 0000040C: A9 xor r9 0000040D: E9 sta r9 ; если бит 2 в r11 сброшен, выдать beep 0000040E: DB lda r11 0000040F: 35 rar 00000410: 35 rar 00000411: 35 rar 00000412: 85 sfc #5 00000413: 14 16 jmp $0417 00000415: CA sfl #2 00000416: F8 ota #$08 ; ; читаем символ с клавиатуры ; 00000417: 27 7F ldc r7, #$7f 00000419: 69 lla #$09 0000041A: 97 and r7 0000041B: E7 sta r7 ; если бит 6 в r11 сброшен, выдать "Сброс флага/" 0000041C: DB lda r11 0000041D: 33 ral 0000041E: 8D sfs #5 0000041F: FD ota #$0d ; режим СДВ? 00000420: 6C lla #$0c 00000421: 85 sfc #5 ; да 00000422: 15 00 jmp $0501 ; нет 00000424: 25 10 ldc r5, #$10 00000426: 30 EF lca #$ef 00000428: 98 and r8 00000429: A5 xor r5 0000042A: E8 sta r8 ; режим ЛИН? 0000042B: 6F lla #$0f 0000042C: 8D sfs #5 ; нет 0000042D: 12 AB jmp $02ac ; да 0000042F: D9 lda r9 00000430: 35 rar 00000431: 85 sfc #5 00000432: 7F jmi r15 ; режим ДК? 00000433: 6D lla #$0d 00000434: 85 sfc #5 ; да 00000435: 14 40 jmp $0441 ; нет 00000437: 2E 3C ldc r14, #$3c 00000439: D7 lda r7 0000043A: 14 A8 jmp $04a9 ; режим ДУПЛ? 0000043C: 6E lla #$0e 0000043D: 8D sfs #5 ; нет 0000043E: 12 AB jmp $02ac ; да -> возврат 00000440: 7F jmi r15 ; ДК 00000441: DB lda r11 00000442: 35 rar 00000443: 35 rar 00000444: 8D sfs #5 00000445: 14 36 jmp $0437 00000447: 30 D0 lca #$d0 00000449: 07 add r7 0000044A: 85 sfc #5 0000044B: 14 67 jmp $0468 0000044D: D9 lda r9 0000044E: 35 rar 0000044F: 35 rar 00000450: 35 rar 00000451: 35 rar 00000452: 8D sfs #5 00000453: 14 36 jmp $0437 00000455: 2E 5C ldc r14, #$5c 00000457: 25 1B ldc r5, #$1b 00000459: D5 lda r5 0000045A: 14 A8 jmp $04a9 0000045C: 25 3F ldc r5, #$3f 0000045E: 2E 61 ldc r14, #$61 00000460: 14 58 jmp $0459 00000462: 30 40 lca #$40 00000464: 07 add r7 00000465: E7 sta r7 00000466: 14 36 jmp $0437 00000468: 30 0D lca #$0d 0000046A: B7 cs r7 0000046B: 87 skp 0000046C: 14 4C jmp $044d 0000046E: 30 2C lca #$2c 00000470: B7 cs r7 00000471: 14 76 jmp $0477 00000473: 27 2E ldc r7, #$2e 00000475: 14 4C jmp $044d 00000477: 2E 7B ldc r14, #$7b 00000479: 14 56 jmp $0457 0000047B: D7 lda r7 0000047C: E5 sta r5 0000047D: 30 19 lca #$19 0000047F: B5 cs r5 00000480: 87 skp 00000481: 27 43 ldc r7, #$43 00000483: 30 1A lca #$1a 00000485: B5 cs r5 00000486: 87 skp 00000487: 27 44 ldc r7, #$44 00000489: 30 1C lca #$1c 0000048B: B5 cs r5 0000048C: 87 skp 0000048D: 27 41 ldc r7, #$41 0000048F: 30 1D lca #$1d 00000491: B5 cs r5 00000492: 87 skp 00000493: 27 42 ldc r7, #$42 00000495: 30 02 lca #$02 00000497: B5 cs r5 00000498: 87 skp 00000499: 27 51 ldc r7, #$51 0000049B: 30 12 lca #$12 0000049D: B5 cs r5 0000049E: 87 skp 0000049F: 27 52 ldc r7, #$52 000004A1: 30 16 lca #$16 000004A3: B5 cs r5 000004A4: 87 skp 000004A5: 27 50 ldc r7, #$50 000004A7: 14 36 jmp $0437 ; не ДК 000004A9: E6 sta r6 000004AA: DA lda r10 000004AB: 35 rar 000004AC: 35 rar 000004AD: 35 rar 000004AE: 8D sfs #5 000004AF: 14 C0 jmp $04c1 000004B1: D6 lda r6 000004B2: 2D B6 ldc r13, #$b6 000004B4: 14 ED jmp $04ee 000004B6: AA xor r10 000004B7: 5D com 000004B8: 25 08 ldc r5, #$08 000004BA: 95 and r5 000004BB: 33 ral 000004BC: 33 ral 000004BD: 33 ral 000004BE: 33 ral 000004BF: 06 add r6 000004C0: 87 skp 000004C1: D6 lda r6 000004C2: FE ota #$0e 000004C3: E5 sta r5 000004C4: D0 lda r0 000004C5: 5A dse 000004C6: 14 D9 jmp $04da 000004C8: D1 lda r1 000004C9: 5A dse 000004CA: 14 DD jmp $04de 000004CC: D2 lda r2 000004CD: 5A dse 000004CE: 14 E1 jmp $04e2 000004D0: D3 lda r3 000004D1: 5A dse 000004D2: 14 E5 jmp $04e6 000004D4: D4 lda r4 000004D5: 5A dse 000004D6: 14 E9 jmp $04ea 000004D8: 14 E9 jmp $04ea 000004DA: D5 lda r5 000004DB: E0 sta r0 000004DC: FF ota #$0f 000004DD: 7E jmi r14 000004DE: D5 lda r5 000004DF: E1 sta r1 000004E0: FF ota #$0f 000004E1: 7E jmi r14 000004E2: D5 lda r5 000004E3: E2 sta r2 000004E4: FF ota #$0f 000004E5: 7E jmi r14 000004E6: D5 lda r5 000004E7: E3 sta r3 000004E8: FF ota #$0f 000004E9: 7E jmi r14 000004EA: D5 lda r5 000004EB: E4 sta r4 000004EC: FF ota #$0f 000004ED: 7E jmi r14 000004EE: E5 sta r5 000004EF: D5 lda r5 000004F0: 33 ral 000004F1: 33 ral 000004F2: 33 ral 000004F3: 33 ral 000004F4: A5 xor r5 000004F5: E5 sta r5 000004F6: 33 ral 000004F7: 33 ral 000004F8: A5 xor r5 000004F9: E5 sta r5 000004FA: 33 ral 000004FB: A5 xor r5 000004FC: 7D jmi r13 000004FD: FF ota #$0f 000004FE: FF ota #$0f 000004FF: FF ota #$0f 00000500: 8F nop 00000501: 30 19 lca #$19 00000503: B7 cs r7 00000504: 15 32 jmp $0533 00000506: FE ota #$0e 00000507: 30 4D lca #$4d 00000509: B9 cs r9 0000050A: 87 skp 0000050B: 15 2D jmp $052e 0000050D: 26 01 ldc r6, #$01 0000050F: D9 lda r9 00000510: 51 inc 00000511: E9 sta r9 00000512: FF ota #$0f 00000513: E5 sta r5 00000514: 26 F0 ldc r6, #$f0 00000516: 2E 1A ldc r14, #$1a 00000518: 10 EE jmp $00ef 0000051A: 25 E0 ldc r5, #$e0 0000051C: F0 ota #$00 0000051D: C5 cfl #5 0000051E: 60 lla #$00 0000051F: 95 and r5 00000520: 5A dse 00000521: 15 2F jmp $0530 00000523: FE ota #$0e 00000524: D9 lda r9 00000525: 06 add r6 00000526: E9 sta r9 00000527: 8E sfs #6 00000528: 15 19 jmp $051a 0000052A: F5 ota #$05 0000052B: F5 ota #$05 0000052C: 15 19 jmp $051a 0000052E: 29 1A ldc r9, #$1a 00000530: C8 sfl #0 00000531: FF ota #$0f 00000532: 7F jmi r15 00000533: 30 1A lca #$1a 00000535: B7 cs r7 00000536: 15 46 jmp $0547 00000538: FE ota #$0e 00000539: 30 1A lca #$1a 0000053B: B9 cs r9 0000053C: 15 41 jmp $0542 0000053E: 29 4D ldc r9, #$4d 00000540: 15 2F jmp $0530 00000542: 26 FF ldc r6, #$ff 00000544: 49 dsr r9 00000545: 15 11 jmp $0512 00000547: 30 02 lca #$02 00000549: B7 cs r7 0000054A: 7F jmi r15 0000054B: FE ota #$0e 0000054C: D9 lda r9 0000054D: FF ota #$0f 0000054E: E5 sta r5 0000054F: 26 F0 ldc r6, #$f0 00000551: 2E 55 ldc r14, #$55 00000553: 10 EE jmp $00ef 00000555: F0 ota #$00 00000556: 8F nop 00000557: 60 lla #$00 00000558: E7 sta r7 00000559: C8 sfl #0 0000055A: 30 61 lca #$61 0000055C: 07 add r7 0000055D: E7 sta r7 0000055E: 30 01 lca #$01 00000560: 77 jmi r7 00000561: 33 ral 00000562: 33 ral 00000563: 33 ral 00000564: 33 ral 00000565: 33 ral 00000566: 33 ral 00000567: 33 ral 00000568: 15 EF jmp $05f0 0000056A: 33 ral 0000056B: 33 ral 0000056C: 33 ral 0000056D: 33 ral 0000056E: 33 ral 0000056F: 33 ral 00000570: 33 ral 00000571: AB xor r11 00000572: EB sta r11 00000573: 8F nop 00000574: 7F jmi r15 00000575: 15 7C jmp $057d 00000577: 15 89 jmp $058a 00000579: 15 93 jmp $0594 0000057B: 15 9D jmp $059e 0000057D: D8 lda r8 0000057E: 51 inc 0000057F: E5 sta r5 00000580: 30 07 lca #$07 00000582: 95 and r5 00000583: E5 sta r5 00000584: 30 F8 lca #$f8 00000586: 98 and r8 00000587: 05 add r5 00000588: E8 sta r8 00000589: 7F jmi r15 0000058A: C0 cfl #0 0000058B: 25 90 ldc r5, #$90 0000058D: D5 lda r5 0000058E: F3 ota #$03 0000058F: FE ota #$0e 00000590: 26 00 ldc r6, #$00 00000592: 15 B7 jmp $05b8 00000594: C0 cfl #0 00000595: 25 C0 ldc r5, #$c0 00000597: D5 lda r5 00000598: F3 ota #$03 00000599: FE ota #$0e 0000059A: 26 01 ldc r6, #$01 0000059C: 15 B7 jmp $05b8 0000059E: C0 cfl #0 0000059F: 25 F0 ldc r5, #$f0 000005A1: D5 lda r5 000005A2: F3 ota #$03 000005A3: FE ota #$0e 000005A4: 26 02 ldc r6, #$02 000005A6: 15 B7 jmp $05b8 000005A8: FF ota #$0f 000005A9: FF ota #$0f 000005AA: FE ota #$0e 000005AB: 48 dsr r8 000005AC: 87 skp 000005AD: 15 B0 jmp $05b1 000005AF: 15 F2 jmp $05f3 000005B1: C0 cfl #0 ; вторая цифра секунд 000005B2: 25 F0 ldc r5, #$f0 000005B4: D5 lda r5 000005B5: F3 ota #$03 000005B6: 26 02 ldc r6, #$02 000005B8: 25 F4 ldc r5, #$f4 000005BA: D5 lda r5 000005BB: F2 ota #$02 000005BC: F0 ota #$00 000005BD: 8F nop 000005BE: 60 lla #$00 000005BF: E5 sta r5 000005C0: 30 39 lca #$39 000005C2: B5 cs r5 000005C3: 15 E7 jmp $05e8 000005C5: 25 30 ldc r5, #$30 000005C7: D5 lda r5 000005C8: F5 ota #$05 000005C9: F0 ota #$00 000005CA: F0 ota #$00 000005CB: F1 ota #$01 000005CC: F5 ota #$05 000005CD: F5 ota #$05 000005CE: F0 ota #$00 000005CF: 8F nop 000005D0: 60 lla #$00 000005D1: E5 sta r5 000005D2: 30 35 lca #$35 000005D4: B5 cs r5 000005D5: 15 E7 jmp $05e8 000005D7: 25 30 ldc r5, #$30 000005D9: D5 lda r5 000005DA: F5 ota #$05 000005DB: F0 ota #$00 000005DC: F0 ota #$00 000005DD: F1 ota #$01 000005DE: F5 ota #$05 000005DF: F5 ota #$05 000005E0: F5 ota #$05 000005E1: 46 dsr r6 000005E2: 15 BB jmp $05bc 000005E4: 28 31 ldc r8, #$31 000005E6: FF ota #$0f 000005E7: 7F jmi r15 000005E8: D5 lda r5 000005E9: 51 inc 000005EA: F5 ota #$05 000005EB: F0 ota #$00 000005EC: F0 ota #$00 000005ED: F1 ota #$01 000005EE: 15 E3 jmp $05e4 000005F0: AA xor r10 000005F1: EA sta r10 000005F2: 7F jmi r15 000005F3: FF ota #$0f 000005F4: DB lda r11 000005F5: 33 ral 000005F6: 33 ral 000005F7: 8D sfs #5 000005F8: 15 FC jmp $05fd 000005FA: 8B sfs #3 000005FB: CF sfl #7 000005FC: 7F jmi r15 000005FD: 83 sfc #3 000005FE: C7 cfl #7 000005FF: 7F jmi r15 00000600: 8F nop 00000601: 12 4B jmp $024c 00000603: D7 lda r7 00000604: 33 ral 00000605: 05 add r5 00000606: E5 sta r5 00000607: 75 jmi r5 00000608: FF ota #$0f 00000609: FF ota #$0f 0000060A: FF ota #$0f 0000060B: FF ota #$0f 0000060C: FF ota #$0f 0000060D: FF ota #$0f 0000060E: FF ota #$0f 0000060F: FF ota #$0f 00000610: FF ota #$0f 00000611: FF ota #$0f 00000612: 16 00 jmp $0601 00000614: 19 A9 jmp $09aa 00000616: 17 02 jmp $0703 00000618: 17 06 jmp $0707 0000061A: 16 00 jmp $0601 0000061C: 17 A9 jmp $07aa 0000061E: 17 96 jmp $0797 00000620: 18 02 jmp $0803 00000622: 17 0B jmp $070c 00000624: 17 0E jmp $070f 00000626: 17 10 jmp $0711 00000628: 16 00 jmp $0601 0000062A: 19 B8 jmp $09b9 0000062C: 17 13 jmp $0714 0000062E: 17 48 jmp $0749 00000630: 17 70 jmp $0771 00000632: 17 ED jmp $07ee 00000634: 17 1B jmp $071c 00000636: 17 F1 jmp $07f2 00000638: 16 00 jmp $0601 0000063A: 17 24 jmp $0725 0000063C: 17 30 jmp $0731 0000063E: 16 00 jmp $0601 00000640: 17 38 jmp $0739 00000642: 17 40 jmp $0741 00000644: 19 C0 jmp $09c1 00000646: 18 41 jmp $0842 00000648: FF ota #$0f 00000649: FF ota #$0f 0000064A: FF ota #$0f 0000064B: FF ota #$0f 0000064C: FF ota #$0f 0000064D: FF ota #$0f 0000064E: FF ota #$0f 0000064F: FF ota #$0f 00000650: 16 00 jmp $0601 00000652: 18 97 jmp $0898 00000654: 16 00 jmp $0601 00000656: 17 02 jmp $0703 00000658: 17 34 jmp $0735 0000065A: 18 5D jmp $085e 0000065C: 18 78 jmp $0879 0000065E: 18 78 jmp $0879 00000660: 18 78 jmp $0879 00000662: 18 80 jmp $0881 00000664: 17 0E jmp $070f 00000666: 17 10 jmp $0711 00000668: 16 00 jmp $0601 0000066A: 19 B8 jmp $09b9 0000066C: FF ota #$0f 0000066D: FF ota #$0f 0000066E: FF ota #$0f 0000066F: FF ota #$0f 00000670: FF ota #$0f 00000671: FF ota #$0f 00000672: FF ota #$0f 00000673: FF ota #$0f 00000674: FF ota #$0f 00000675: FF ota #$0f 00000676: 16 00 jmp $0601 00000678: 16 D7 jmp $06d8 0000067A: 16 00 jmp $0601 0000067C: 16 D7 jmp $06d8 0000067E: 16 A5 jmp $06a6 00000680: FF ota #$0f 00000681: FF ota #$0f 00000682: FF ota #$0f 00000683: FF ota #$0f 00000684: FF ota #$0f 00000685: FF ota #$0f 00000686: 16 00 jmp $0601 00000688: 19 D7 jmp $09d8 0000068A: 19 E5 jmp $09e6 0000068C: FF ota #$0f 0000068D: FF ota #$0f 0000068E: 16 00 jmp $0601 00000690: 16 B4 jmp $06b5 00000692: 16 B7 jmp $06b8 00000694: 16 BA jmp $06bb 00000696: 16 BD jmp $06be 00000698: 19 F0 jmp $09f1 0000069A: FF ota #$0f 0000069B: FF ota #$0f 0000069C: 16 00 jmp $0601 0000069E: 19 F6 jmp $09f7 000006A0: 16 E4 jmp $06e5 000006A2: 16 D1 jmp $06d2 000006A4: 16 D4 jmp $06d5 000006A6: 25 20 ldc r5, #$20 000006A8: 30 1F lca #$1f 000006AA: 98 and r8 000006AB: A5 xor r5 000006AC: E8 sta r8 000006AD: 16 00 jmp $0601 000006AF: FF ota #$0f 000006B0: FF ota #$0f 000006B1: FF ota #$0f 000006B2: FF ota #$0f 000006B3: FF ota #$0f 000006B4: FF ota #$0f 000006B5: 26 CA ldc r6, #$ca 000006B7: 87 skp 000006B8: 26 CC ldc r6, #$cc 000006BA: 87 skp 000006BB: 26 CE ldc r6, #$ce 000006BD: 87 skp 000006BE: 26 D0 ldc r6, #$d0 000006C0: 2C 20 ldc r12, #$20 000006C2: 30 1F lca #$1f 000006C4: 99 and r9 000006C5: AC xor r12 000006C6: E9 sta r9 000006C7: 2E D8 ldc r14, #$d8 000006C9: 76 jmi r6 000006CA: 13 83 jmp $0384 000006CC: 13 4C jmp $034d 000006CE: 13 C7 jmp $03c8 000006D0: 13 A9 jmp $03aa 000006D2: 26 DF ldc r6, #$df 000006D4: 87 skp 000006D5: 26 E1 ldc r6, #$e1 000006D7: 87 skp 000006D8: 26 E3 ldc r6, #$e3 000006DA: 30 1F lca #$1f 000006DC: 98 and r8 000006DD: E8 sta r8 000006DE: 76 jmi r6 000006DF: 18 41 jmp $0842 000006E1: 17 96 jmp $0797 000006E3: 16 00 jmp $0601 000006E5: 25 E0 ldc r5, #$e0 000006E7: 30 1F lca #$1f 000006E9: 99 and r9 000006EA: A5 xor r5 000006EB: E9 sta r9 000006EC: 2E D8 ldc r14, #$d8 000006EE: 13 83 jmp $0384 000006F0: FF ota #$0f 000006F1: FF ota #$0f 000006F2: FF ota #$0f 000006F3: FF ota #$0f 000006F4: FF ota #$0f 000006F5: FF ota #$0f 000006F6: FF ota #$0f 000006F7: FF ota #$0f 000006F8: FF ota #$0f 000006F9: FF ota #$0f 000006FA: FF ota #$0f 000006FB: 25 0E ldc r5, #$0e 000006FD: 16 02 jmp $0603 000006FF: FF ota #$0f 00000700: 8F nop 00000701: 16 00 jmp $0601 00000703: C2 cfl #2 00000704: F8 ota #$08 00000705: 16 00 jmp $0601 00000707: 5F clr 00000708: E4 sta r4 00000709: E3 sta r3 0000070A: 16 00 jmp $0601 0000070C: 5F clr 0000070D: E3 sta r3 0000070E: 87 skp 0000070F: C4 cfl #4 00000710: 87 skp 00000711: CC sfl #4 00000712: 16 00 jmp $0601 00000714: 30 3F lca #$3f 00000716: 99 and r9 00000717: E9 sta r9 00000718: 2E 00 ldc r14, #$00 0000071A: 13 68 jmp $0369 0000071C: 30 3F lca #$3f 0000071E: 99 and r9 0000071F: E9 sta r9 00000720: 2E 00 ldc r14, #$00 00000722: 13 95 jmp $0396 00000724: 00 add r0 00000725: 30 0F lca #$0f 00000727: 99 and r9 00000728: E9 sta r9 00000729: 30 BF lca #$bf 0000072B: 9A and r10 0000072C: EA sta r10 0000072D: 2E 00 ldc r14, #$00 0000072F: 13 C7 jmp $03c8 00000731: 30 3F lca #$3f 00000733: 9A and r10 00000734: EA sta r10 00000735: 2E 00 ldc r14, #$00 00000737: 13 A9 jmp $03aa 00000739: 30 1F lca #$1f 0000073B: 99 and r9 0000073C: E9 sta r9 0000073D: 2E 00 ldc r14, #$00 0000073F: 13 83 jmp $0384 00000741: 30 1F lca #$1f 00000743: 99 and r9 00000744: E9 sta r9 00000745: 2E 00 ldc r14, #$00 00000747: 13 4C jmp $034d 00000749: 2D 4D ldc r13, #$4d 0000074B: 11 EA jmp $01eb 0000074D: 30 B1 lca #$b1 0000074F: 03 add r3 00000750: 5D com 00000751: E5 sta r5 00000752: 30 05 lca #$05 00000754: 02 add r2 00000755: C0 cfl #0 00000756: F2 ota #$02 00000757: 5F clr 00000758: F3 ota #$03 00000759: 26 5B ldc r6, #$5b 0000075B: F5 ota #$05 0000075C: F5 ota #$05 0000075D: F0 ota #$00 0000075E: 00 add r0 0000075F: 60 lla #$00 00000760: F0 ota #$00 00000761: F0 ota #$00 00000762: F1 ota #$01 00000763: F5 ota #$05 00000764: 45 dsr r5 00000765: 76 jmi r6 00000766: F5 ota #$05 00000767: 25 20 ldc r5, #$20 00000769: D5 lda r5 0000076A: F0 ota #$00 0000076B: F0 ota #$00 0000076C: F1 ota #$01 0000076D: C8 sfl #0 0000076E: 16 00 jmp $0601 00000770: 00 add r0 00000771: 2D 75 ldc r13, #$75 00000773: 11 EA jmp $01eb 00000775: D3 lda r3 00000776: E5 sta r5 00000777: D2 lda r2 00000778: E6 sta r6 00000779: 2E 7D ldc r14, #$7d 0000077B: 10 EE jmp $00ef 0000077D: 30 B1 lca #$b1 0000077F: 03 add r3 00000780: 5D com 00000781: E5 sta r5 00000782: 26 84 ldc r6, #$84 00000784: F4 ota #$04 00000785: F0 ota #$00 00000786: 00 add r0 00000787: 60 lla #$00 00000788: F5 ota #$05 00000789: F5 ota #$05 0000078A: F0 ota #$00 0000078B: F0 ota #$00 0000078C: F1 ota #$01 0000078D: 45 dsr r5 0000078E: 76 jmi r6 0000078F: 25 20 ldc r5, #$20 00000791: D5 lda r5 00000792: F0 ota #$00 00000793: F0 ota #$00 00000794: C8 sfl #0 00000795: 16 00 jmp $0601 00000797: 25 40 ldc r5, #$40 00000799: 30 BF lca #$bf 0000079B: 99 and r9 0000079C: A5 xor r5 0000079D: E9 sta r9 0000079E: 2D A2 ldc r13, #$a2 000007A0: 11 EA jmp $01eb 000007A2: D3 lda r3 000007A3: E6 sta r6 000007A4: D2 lda r2 000007A5: E5 sta r5 000007A6: 2E 00 ldc r14, #$00 000007A8: 13 00 jmp $0301 000007AA: 6F lla #$0f 000007AB: 8D sfs #5 000007AC: 17 CB jmp $07cc 000007AE: D8 lda r8 000007AF: 33 ral 000007B0: 33 ral 000007B1: 33 ral 000007B2: 85 sfc #5 000007B3: 17 E7 jmp $07e8 000007B5: DB lda r11 000007B6: 35 rar 000007B7: 8D sfs #5 000007B8: 17 CB jmp $07cc 000007BA: 30 17 lca #$17 000007BC: FE ota #$0e 000007BD: B7 cs r7 000007BE: 17 D6 jmp $07d7 000007C0: FF ota #$0f 000007C1: 2E C8 ldc r14, #$c8 000007C3: 25 13 ldc r5, #$13 000007C5: D5 lda r5 000007C6: 14 A8 jmp $04a9 000007C8: 5F clr 000007C9: FE ota #$0e 000007CA: E7 sta r7 000007CB: FF ota #$0f 000007CC: 25 C0 ldc r5, #$c0 000007CE: 30 3F lca #$3f 000007D0: 99 and r9 000007D1: A5 xor r5 000007D2: E9 sta r9 000007D3: 2E 0A ldc r14, #$0a 000007D5: 13 4C jmp $034d 000007D7: FF ota #$0f 000007D8: 30 17 lca #$17 000007DA: B4 cs r4 000007DB: 17 E3 jmp $07e4 000007DD: FE ota #$0e 000007DE: D7 lda r7 000007DF: 51 inc 000007E0: E7 sta r7 000007E1: FF ota #$0f 000007E2: 17 CB jmp $07cc 000007E4: FE ota #$0e 000007E5: 27 15 ldc r7, #$15 000007E7: FF ota #$0f 000007E8: 30 EF lca #$ef 000007EA: 98 and r8 000007EB: E8 sta r8 000007EC: 17 CB jmp $07cc 000007EE: 5F clr 000007EF: E3 sta r3 000007F0: 17 A9 jmp $07aa 000007F2: 25 02 ldc r5, #$02 000007F4: 30 FD lca #$fd 000007F6: 9B and r11 000007F7: A5 xor r5 000007F8: FF ota #$0f 000007F9: EB sta r11 000007FA: 16 00 jmp $0601 000007FC: FF ota #$0f 000007FD: FF ota #$0f 000007FE: FF ota #$0f 000007FF: FF ota #$0f 00000800: 00 add r0 00000801: 16 00 jmp $0601 00000803: 5F clr 00000804: E0 sta r0 00000805: E1 sta r1 00000806: E4 sta r4 00000807: E3 sta r3 00000808: FE ota #$0e 00000809: EF sta r15 0000080A: 2E 2F ldc r14, #$2f 0000080C: FF ota #$0f 0000080D: 25 40 ldc r5, #$40 0000080F: 30 3F lca #$3f 00000811: 99 and r9 00000812: A5 xor r5 00000813: E9 sta r9 00000814: FE ota #$0e 00000815: DF lda r15 00000816: FF ota #$0f 00000817: E5 sta r5 00000818: 5F clr 00000819: E6 sta r6 0000081A: 2E 1E ldc r14, #$1e 0000081C: 13 00 jmp $0301 0000081E: 25 20 ldc r5, #$20 00000820: 88 sfs #0 00000821: 75 jmi r5 00000822: 2F 26 ldc r15, #$26 00000824: 12 00 jmp $0201 00000826: FE ota #$0e 00000827: 4E dsr r14 00000828: 18 32 jmp $0833 0000082A: FF ota #$0f 0000082B: 8A sfs #2 0000082C: 11 00 jmp $0101 0000082E: 81 sfc #1 0000082F: 10 B5 jmp $00b6 00000831: 10 91 jmp $0092 00000833: 30 EB lca #$eb 00000835: BF cs r15 00000836: 18 3B jmp $083c 00000838: 5F clr 00000839: EF sta r15 0000083A: 18 14 jmp $0815 0000083C: 30 05 lca #$05 0000083E: 0F add r15 0000083F: EF sta r15 00000840: 18 14 jmp $0815 00000842: 25 40 ldc r5, #$40 00000844: 30 3F lca #$3f 00000846: 99 and r9 00000847: A5 xor r5 00000848: E9 sta r9 00000849: 2D 4D ldc r13, #$4d 0000084B: 11 EA jmp $01eb 0000084D: 30 E9 lca #$e9 0000084F: 04 add r4 00000850: 5D com 00000851: 51 inc 00000852: FE ota #$0e 00000853: EE sta r14 00000854: FF ota #$0f 00000855: D2 lda r2 00000856: E5 sta r5 00000857: FE ota #$0e 00000858: EF sta r15 00000859: FF ota #$0f 0000085A: D3 lda r3 0000085B: E6 sta r6 0000085C: 18 19 jmp $081a 0000085E: 30 4F lca #$4f 00000860: B3 cs r3 00000861: 87 skp 00000862: 16 00 jmp $0601 00000864: 30 B8 lca #$b8 00000866: 03 add r3 00000867: 8D sfs #5 00000868: 18 72 jmp $0873 0000086A: 25 08 ldc r5, #$08 0000086C: 30 F8 lca #$f8 0000086E: 93 and r3 0000086F: 05 add r5 00000870: E3 sta r3 00000871: 16 00 jmp $0601 00000873: D3 lda r3 00000874: 51 inc 00000875: E3 sta r3 00000876: 17 02 jmp $0703 00000878: 00 add r0 00000879: DA lda r10 0000087A: 33 ral 0000087B: 33 ral 0000087C: 8D sfs #5 0000087D: 17 A9 jmp $07aa 0000087F: 17 ED jmp $07ee 00000881: DA lda r10 00000882: 33 ral 00000883: 33 ral 00000884: 8D sfs #5 00000885: 17 0B jmp $070c 00000887: 17 ED jmp $07ee 00000889: 30 60 lca #$60 0000088B: 97 and r7 0000088C: 5A dse 0000088D: 12 C6 jmp $02c7 0000088F: D8 lda r8 00000890: 85 sfc #5 00000891: 18 D7 jmp $08d8 00000893: 30 5A lca #$5a 00000895: B7 cs r7 00000896: 18 B4 jmp $08b5 00000898: 25 1B ldc r5, #$1b 0000089A: 2E 9F ldc r14, #$9f 0000089C: D5 lda r5 0000089D: 14 A8 jmp $04a9 0000089F: 25 2F ldc r5, #$2f 000008A1: 2E A6 ldc r14, #$a6 000008A3: D5 lda r5 000008A4: 14 A8 jmp $04a9 000008A6: 25 5A ldc r5, #$5a 000008A8: 2E AD ldc r14, #$ad 000008AA: D5 lda r5 000008AB: 14 A8 jmp $04a9 000008AD: 30 DF lca #$df 000008AF: 98 and r8 000008B0: E8 sta r8 000008B1: 5F clr 000008B2: E7 sta r7 000008B3: 16 00 jmp $0601 000008B5: 30 59 lca #$59 000008B7: B7 cs r7 000008B8: 18 C3 jmp $08c4 000008BA: 30 80 lca #$80 000008BC: 08 add r8 000008BD: E8 sta r8 000008BE: 30 BF lca #$bf 000008C0: 98 and r8 000008C1: E8 sta r8 000008C2: 18 B0 jmp $08b1 000008C4: 30 C3 lca #$c3 000008C6: 07 add r7 000008C7: 85 sfc #5 000008C8: 18 AC jmp $08ad 000008CA: 30 B4 lca #$b4 000008CC: 07 add r7 000008CD: 8D sfs #5 000008CE: 18 AC jmp $08ad 000008D0: 25 4B ldc r5, #$4b 000008D2: 30 1F lca #$1f 000008D4: 98 and r8 000008D5: E8 sta r8 000008D6: 16 FA jmp $06fb 000008D8: D8 lda r8 000008D9: 33 ral 000008DA: 85 sfc #5 000008DB: 18 EC jmp $08ed 000008DD: 30 C8 lca #$c8 000008DF: 07 add r7 000008E0: 8D sfs #5 000008E1: 19 CD jmp $09ce 000008E3: 30 E0 lca #$e0 000008E5: 07 add r7 000008E6: E4 sta r4 000008E7: 30 40 lca #$40 000008E9: A8 xor r8 000008EA: E8 sta r8 000008EB: 18 B0 jmp $08b1 000008ED: 30 90 lca #$90 000008EF: 07 add r7 000008F0: 8D sfs #5 000008F1: 18 F7 jmp $08f8 000008F3: 30 E0 lca #$e0 000008F5: 07 add r7 000008F6: E3 sta r3 000008F7: 87 skp 000008F8: 23 4F ldc r3, #$4f 000008FA: 30 7F lca #$7f 000008FC: 98 and r8 000008FD: E8 sta r8 000008FE: 18 AC jmp $08ad 00000900: 00 add r0 00000901: FE ota #$0e 00000902: D0 lda r0 00000903: 52 dsn 00000904: 19 6D jmp $096e 00000906: C1 cfl #1 00000907: FF ota #$0f 00000908: D4 lda r4 00000909: E7 sta r7 0000090A: FE ota #$0e 0000090B: DA lda r10 0000090C: FF ota #$0f 0000090D: E4 sta r4 0000090E: 2D 12 ldc r13, #$12 00000910: 11 EA jmp $01eb 00000912: D7 lda r7 00000913: E4 sta r4 00000914: FE ota #$0e 00000915: DB lda r11 00000916: FF ota #$0f 00000917: E5 sta r5 00000918: E7 sta r7 00000919: D2 lda r2 0000091A: E6 sta r6 0000091B: 2E 1F ldc r14, #$1f 0000091D: 10 EE jmp $00ef 0000091F: 25 4F ldc r5, #$4f 00000921: D7 lda r7 00000922: 5D com 00000923: 51 inc 00000924: 05 add r5 00000925: E5 sta r5 00000926: 26 7F ldc r6, #$7f 00000928: 2C 20 ldc r12, #$20 0000092A: 2D 43 ldc r13, #$43 0000092C: 2E 39 ldc r14, #$39 0000092E: F0 ota #$00 0000092F: 8F nop 00000930: 60 lla #$00 00000931: E7 sta r7 00000932: 96 and r6 00000933: BC cs r12 00000934: 7D jmi r13 00000935: 45 dsr r5 00000936: 87 skp 00000937: 19 70 jmp $0971 00000939: F0 ota #$00 0000093A: 8F nop 0000093B: 60 lla #$00 0000093C: 96 and r6 0000093D: BC cs r12 0000093E: 7D jmi r13 0000093F: 45 dsr r5 00000940: 7E jmi r14 00000941: 19 70 jmp $0971 00000943: C8 sfl #0 00000944: 84 sfc #4 00000945: 19 64 jmp $0965 00000947: D7 lda r7 00000948: 85 sfc #5 00000949: 19 52 jmp $0953 0000094B: CC sfl #4 0000094C: 2C 0F ldc r12, #$0f 0000094E: 2E 53 ldc r14, #$53 00000950: DC lda r12 00000951: 14 A8 jmp $04a9 00000953: 2E 5A ldc r14, #$5a 00000955: 30 7F lca #$7f 00000957: 97 and r7 00000958: 14 A8 jmp $04a9 0000095A: FE ota #$0e 0000095B: 26 50 ldc r6, #$50 0000095D: DB lda r11 0000095E: 51 inc 0000095F: EB sta r11 00000960: B6 cs r6 00000961: 19 6D jmp $096e 00000963: 19 70 jmp $0971 00000965: D7 lda r7 00000966: 8D sfs #5 00000967: 19 52 jmp $0953 00000969: C4 cfl #4 0000096A: 2C 0E ldc r12, #$0e 0000096C: 19 4D jmp $094e 0000096E: FF ota #$0f 0000096F: 12 4C jmp $024d 00000971: C8 sfl #0 00000972: FF ota #$0f 00000973: D9 lda r9 00000974: 35 rar 00000975: 35 rar 00000976: 8D sfs #5 00000977: 19 82 jmp $0983 00000979: FE ota #$0e 0000097A: 5F clr 0000097B: EB sta r11 0000097C: FF ota #$0f 0000097D: 30 FC lca #$fc 0000097F: 99 and r9 00000980: E9 sta r9 00000981: 19 6D jmp $096e 00000983: FE ota #$0e 00000984: 30 17 lca #$17 00000986: BA cs r10 00000987: 19 8D jmp $098e 00000989: 5F clr 0000098A: EA sta r10 0000098B: EB sta r11 0000098C: 19 78 jmp $0979 0000098E: DA lda r10 0000098F: 51 inc 00000990: EA sta r10 00000991: 5F clr 00000992: EB sta r11 00000993: FF ota #$0f 00000994: DA lda r10 00000995: 35 rar 00000996: 35 rar 00000997: 85 sfc #5 00000998: 19 6D jmp $096e 0000099A: 2C 0D ldc r12, #$0d 0000099C: 2E A1 ldc r14, #$a1 0000099E: DC lda r12 0000099F: 14 A8 jmp $04a9 000009A1: 2C 0A ldc r12, #$0a 000009A3: 2E 6E ldc r14, #$6e 000009A5: DC lda r12 000009A6: 14 A8 jmp $04a9 000009A8: 00 add r0 000009A9: 00 add r0 000009AA: D4 lda r4 000009AB: FE ota #$0e 000009AC: EA sta r10 000009AD: 5F clr 000009AE: EB sta r11 000009AF: FF ota #$0f 000009B0: 25 03 ldc r5, #$03 000009B2: 30 FC lca #$fc 000009B4: 99 and r9 000009B5: A5 xor r5 000009B6: E9 sta r9 000009B7: 16 00 jmp $0601 000009B9: 30 FE lca #$fe 000009BB: 99 and r9 000009BC: 51 inc 000009BD: E9 sta r9 000009BE: 16 00 jmp $0601 000009C0: 00 add r0 000009C1: FE ota #$0e 000009C2: 5F clr 000009C3: EA sta r10 000009C4: EB sta r11 000009C5: FF ota #$0f 000009C6: 30 FC lca #$fc 000009C8: 99 and r9 000009C9: 51 inc 000009CA: E9 sta r9 000009CB: 16 00 jmp $0601 000009CD: FF ota #$0f 000009CE: 24 17 ldc r4, #$17 000009D0: 18 E6 jmp $08e7 000009D2: FF ota #$0f 000009D3: FF ota #$0f 000009D4: FF ota #$0f 000009D5: FF ota #$0f 000009D6: FF ota #$0f 000009D7: FF ota #$0f 000009D8: 25 08 ldc r5, #$08 000009DA: 30 F7 lca #$f7 000009DC: 99 and r9 000009DD: A5 xor r5 000009DE: E9 sta r9 000009DF: 30 F7 lca #$f7 000009E1: 9A and r10 000009E2: A5 xor r5 000009E3: FF ota #$0f 000009E4: 16 D7 jmp $06d8 000009E6: 25 F7 ldc r5, #$f7 000009E8: D9 lda r9 000009E9: 95 and r5 000009EA: E9 sta r9 000009EB: DA lda r10 000009EC: 95 and r5 000009ED: FF ota #$0f 000009EE: 16 D7 jmp $06d8 000009F0: FF ota #$0f 000009F1: 30 FD lca #$fd 000009F3: 9B and r11 000009F4: EB sta r11 000009F5: 16 D7 jmp $06d8 000009F7: 5F clr 000009F8: E4 sta r4 000009F9: E3 sta r3 000009FA: 16 D7 jmp $06d8