======================================================================== ======================================================================== ======================================================================== ======================================================================== Camputers LYNX ROM disassembly by Pete June 2003 Camputers LYNX ROM disassembly by Pete June 2003 Camputers LYNX ROM disassembly by Pete June 2003 Camputers LYNX ROM disassembly by Pete June 2003 NOTE: NO Interrupts - anywhere !!! ======================================================================== ======================================================================== ======================================================================== ======================================================================== 00000000:f3 DI rst 0 00000001:3e20 LD A,20h 00000003:d380 OUTA (80h) 80 = 0010 0000 00000005:c33b00 JP 003Bh rst 5 00000008: JP 351Bh rst 8 **** Output Char in A reg **** 0000000B: JR NZ,+4Ch to 59?hmmm ------ 0000000D: JR NC,+31h to 3e? 0000000F: INC (HL) loop - search for 20h 32d incing hl looking thru de 00000010: LD A,(DE) rst 10 **** Find non Blank - adr DE **** 00000011: CP 20h 00000013: RET NZ 00000014: INC DE 00000015: JR -07h --------------------------------------------- 00000017: NOP 00000018: JP 2363h rst 18 **** Eval rev polish into HL **** 0000001B: LD D,E ? 0000001C: LD (HL),L 0000001D: LD (HL),E 0000001E: LD A,C 0000001F: NOP 00000020: EX HL,(SP) 00000021: CP (HL) 00000022: INC HL 00000023: EX HL,(SP) 00000024: RET Z 00000025: CALL 3B3Bh 00000028: JP 2059h ---------------------------------------- 0000002B: NOP 0000002C: NOP 0000002D: NOP 0000002E: NOP 0000002F: NOP 00000030: JP 3B64h rst 30 **** Monitor Trap **** 00000033: POP HL 00000034: LD PC,HL ? run from stack? 00000035: NOP 00000036: NOP 00000037: NOP 00000038: JP 6297h rst 38 0000003B: XOR A ------------------------------------------------------
00000DF0: INC DE 00000DF1: LD A,00h 00000DF3: CALL 62BBh 00000DF6: CALL 1F05h check b6 of 80 00000DF9: RET NZ 00000DFA: POP DE 00000DFB: POP DE 00000DFC: POP BC 00000DFD: LD IX,(61F6h) 00000E01: JP 1E3Eh --------jp 00000E04: RST 38h rst 38 and rst 18 00000E05: RST 18h 00000E06: JP 3B4Fh f----jp 00000E09: CALL 3497h 00000E0C: LD A,L 00000E0D: CP 20h 00000E0F: CALL C,3B29h 00000E12: CALL 00CEh 00000E15: JP 34C4h ---------------jp 00000E18: CALL 3542h rets 00000E1B: CALL 3434h 00000E1E: CALL 2F2Ch 00000E21: CALL 2F2Ch 00000E24: CALL 3542h 00000E27: CALL 37B0h 00000E2A: CALL 3475h 00000E2D: CALL 2F3Ch 00000E30: CALL 36C8h 00000E33: CALL 2F3Ch 00000E36: LD A,(62E5h) 00000E39: CALL 3FF1h 00000E3C: JP 3456h -- 00000E3F: CALL 37B0h 00000E42: JR -08h 00000E44: LD HL,(625Bh) 00000E47: LD H,00h 00000E49: JP 34C4h -- 00000E4C: LD HL,(625Ch) 00000E4F: JR -0Ah 00000E51: LD HL,(6254h) 00000E54: JR -0Fh 00000E56: LD HL,(6255h) 00000E59: JR -14h 00000E5B: LD HL,6271h 00000E5E: JR -17h 00000E60: LD HL,626Fh 00000E63: JR -1Ch 00000E65: LD HL,0E6Bh 00000E68: JP 35B1h 00000E6B: RST 38h rst 38 00000E6C: SBC C 00000E6D: SBC C 00000E6E: SBC C 00000E6F: SBC C hmmm 00000E70: CALL 3497h 00000E73: PUSH HL 00000E74: LD HL,62E0h 00000E77: CALL 35B1h 00000E7A: CALL 3497h 00000E7D: POP BC 00000E7E: RET ------------------------------------ 00000E7F: CALL 0E70h rets 00000E82: LD A,B 00000E83: OR H 00000E84: LD H,A 00000E85: LD A,C 00000E86: OR L 00000E87: LD L,A 00000E88: JP 34C4h 00000E8B: CALL 0E70h 00000E8E: LD A,B 00000E8F: XOR H 00000E90: LD H,A 00000E91: LD A,C 00000E92: XOR L 00000E93: JR -0Eh 00000E95: CALL 0E70h 00000E98: LD A,B 00000E99: AND H 00000E9A: LD H,A 00000E9B: LD A,C 00000E9C: AND L 00000E9D: JR -18h 00000E9F: CALL 2F2Ch 00000EA2: CALL 1E57h 00000EA5: CALL 2F3Ch 00000EA8: CALL 36C8h 00000EAB: JP 3456h --------------- 00000EAE: RST 18h 00000EAF: LD (625Dh),HL rst 18 00000EB2: RET ---------------------------------------- 00000EB3: RST 18h 00000EB4: LD (625Fh),HL 00000EB7: RET ------------------------------- 00000EB8: XOR A 00000EB9: INC A 00000EBA: LD B,AFh 00000EBC: INC A 00000EBD: LD B,AFh 00000EBF: INC A 00000EC0: LD B,AFh 00000EC2: INC A 00000EC3: LD B,AFh 00000EC5: INC A 00000EC6: LD B,AFh jp fr 00000EC8: INC A 00000EC9: LD B,AFh 00000ECB: INC A 00000ECC: LD B,AFh 00000ECE: LD L,A 00000ECF: LD H,00h 00000ED1: JP 34C4h ------------ 00000ED4: CALL 25E2h 00000ED7: LD (HL),A 00000ED8: CP 0Dh 00000EDA: RET Z 00000EDB: INC HL 00000EDC: CP 2Ch 00000EDE: JR Z,-0Ch 00000EE0: CALL 3B3Bh 00000EE3: RST 18h 00000EE4: RST 08h 00000EE5: LD A,(DE) 00000EE6: CP 0Dh 00000EE8: RET Z 00000EE9: INC DE 00000EEA: JR -09h 00000EEC: LD B,05h 00000EEE: JR +06h 00000EF0: LD B,03h 00000EF2: JR +02h 00000EF4: LD B,02h 00000EF6: PUSH BC 00000EF7: CALL 25E2h 00000EFA: RST 20h rst 20 00000EFB: INC L 00000EFC: LD (HL),A 00000EFD: INC HL 00000EFE: POP BC 00000EFF: DJNZ -0Bh 00000F01: JP 2707h 00000F04: DEC HL 00000F05: LD A,1Dh 00000F07: JP 27BCh 00000F0A: LD A,(IX+FFh) 00000F0D: SUB 08h 00000F0F: LD B,A 00000F10: CALL 352Ah 00000F13: LD A,(DE) 00000F14: INC DE 00000F15: CALL 2239h 00000F18: DJNZ -0Ah 00000F1A: JP 2840h 00000F1D: LD A,(DE) 00000F1E: LD (HL),A 00000F1F: CP 0Dh 00000F21: RET Z 00000F22: RST 20h 00000F23: JR NZ,-29h 00000F25: CALL 0F2Ch 00000F28: LD (HL),C 00000F29: INC HL alll look susp like character string printing routines 00000F2A: JR -0Fh 00000F2C: LD C,00h 00000F2E: LD A,(DE) 00000F2F: SUB 30h 00000F31: RET C 00000F32: CP 0Ah 00000F34: JR C,+08h 00000F36: SUB 07h 00000F38: CP 0Ah 00000F3A: RET C 00000F3B: CP 10h 00000F3D: RET NC 00000F3E: SLA C 00000F40: SLA C 00000F42: SLA C 00000F44: SLA C 00000F46: ADD C 00000F47: LD C,A 00000F48: INC DE 00000F49: JR -1Dh 00000F4B: RST 18h 00000F4C: LD (625Bh),A 00000F4F: RET ---------------------------------- 00000F50: RST 18h 00000F51: LD (625Ch),A 00000F54: RET 00000F55: RST 18h 00000F56: INC DE 00000F57: LD (6265h),HL 00000F5A: RST 18h 00000F5B: LD (6267h),A 00000F5E: RET -------------- 00000F5F: RST 18h 00000F60: INC DE 00000F61: LD (6268h),HL 00000F64: RST 18h 00000F65: LD (626Ah),A 00000F68: JP 6262h 00000F6B: RST 18h 00000F6C: INC DE 00000F6D: LD BC,(6265h) 00000F71: ADD HL,BC 00000F72: LD (6265h),HL 00000F75: RST 18h 00000F76: LD A,(6267h) 00000F79: ADD L 00000F7A: LD (6267h),A 00000F7D: RET 00000F7E: RST 18h 00000F7F: INC DE 00000F80: LD BC,(6265h) 00000F84: ADD HL,BC 00000F85: LD (6268h),HL 00000F88: RST 18h 00000F89: LD A,(6267h) 00000F8C: ADD L 00000F8D: LD (626Ah),A 00000F90: JP 6262h 00000F93: RST 18h 00000F94: INC DE 00000F95: LD (6268h),HL 00000F98: LD (6265h),HL 00000F9B: RST 18h 00000F9C: LD (626Ah),A 00000F9F: LD (6267h),A 00000FA2: JP 6262h 00000FA5: RST 18h 00000FA6: INC DE 00000FA7: OR A 00000FA8: JP Z,0F55h 00000FAB: DEC L 00000FAC: JP Z,0F6Bh 00000FAF: DEC L 00000FB0: JP Z,0F5Fh 00000FB3: DEC L 00000FB4: JP Z,0F7Eh 00000FB7: DEC L 00000FB8: JP Z,0F93h 00000FBB: CALL 3B32h 00000FBE: LD HL,(6268h) 00000FC1: PUSH HL 00000FC2: LD DE,(6265h) 00000FC6: LD H,00h 00000FC8: LD D,H 00000FC9: OR A 00000FCA: SBC HL,DE 00000FCC: EX DE,HL 00000FCD: LD HL,(6264h) 00000FD0: LD L,80h 00000FD2: EXX 00000FD3: LD HL,(626Ah) 00000FD6: PUSH HL 00000FD7: LD DE,(6267h) 00000FDB: LD H,00h 00000FDD: LD D,H 00000FDE: OR A 00000FDF: SBC HL,DE 00000FE1: EX DE,HL 00000FE2: LD HL,(6266h) 00000FE5: LD L,80h 00000FE7: LD A,D 00000FE8: OR E 00000FE9: EXX 00000FEA: LD B,01h 00000FEC: OR E 00000FED: OR D 00000FEE: JR Z,+18h 00000FF0: DEC B 00000FF1: CALL 1051h 00000FF4: JR NZ,+0Bh 00000FF6: SCF 00000FF7: RR B 00000FF9: CALL 1046h 00000FFC: CALL 1051h 00000FFF: JR Z,-0Ah 00001001: CALL 1017h 00001004: ADD HL,DE 00001005: EXX 00001006: ADD HL,DE 00001007: EXX 00001008: CALL 1017h 0000100B: DJNZ -09h 0000100D: POP HL 0000100E: LD A,L 0000100F: LD (6267h),A 00001012: POP HL 00001013: LD (6265h),HL 00001016: RET ------------------------------------------- 00001017: EXX hmmm - who knows graphics related 00001018: LD A,H 00001019: EXX 0000101A: PUSH HL 0000101B: PUSH DE 0000101C: PUSH BC 0000101D: LD L,A 0000101E: LD A,H 0000101F: LD H,00h 00001021: ADD HL,HL 00001022: ADD HL,HL 00001023: ADD HL,HL 00001024: ADD HL,HL 00001025: ADD HL,HL 00001026: LD C,A 00001027: SRL C 00001029: SRL C 0000102B: SRL C 0000102D: LD B,00h 0000102F: ADD HL,BC 00001030: LD C,80h 00001032: AND 07h 00001034: JR Z,+05h 00001036: SRL C 00001038: DEC A 00001039: JR NZ,-05h 0000103B: LD A,C 0000103C: CPL 0000103D: LD C,A 0000103E: CPL 0000103F: CALL 626Ch plot som on the screen via jumpblock to 85e above 00001042: POP BC 00001043: POP DE 00001044: POP HL 00001045: RET ----------------------------------------------- 00001046: SLA E 00001048: RL D 0000104A: EXX 0000104B: SLA E 0000104D: RL D 0000104F: EXX 00001050: RET -------------- 00001051: EXX 00001052: LD A,D 00001053: XOR E 00001054: AND 80h 00001056: EXX 00001057: LD C,A 00001058: LD A,D 00001059: XOR E 0000105A: AND 80h 0000105C: OR C 0000105D: RET --------------------------- 0000105E: LD A,(HL) **** Output chars line until 0D **** 0000105F: CP 0Dh 00001061: RET Z 00001062: RST 08h 00001063: INC HL 00001064: JR -08h ------------------------------- 00001066: CALL 1095h call Y below (prints couple of chars?) **** Flash cursor and scan keys **** 00001069: CALL 202Fh called from below main loop 0000106C: OR A 0000106D: JR Z,-09h 0000106F: RET --------------------------------- 00001070: PUSH HL **** display buffer **** 00001071: PUSH DE 00001072: LD DE,(6254h) 00001076: LD A,20h 00001078: RST 08h 00001079: DEC HL 0000107A: INC HL 0000107B: LD A,(HL) 0000107C: CP 0Dh 0000107E: JR Z,+03h 00001080: RST 08h 00001081: JR -09h 00001083: LD A,20h 00001085: RST 08h 00001086: LD (6254h),DE 0000108A: POP DE 0000108B: POP HL 0000108C: RET ---------------------------------- 0000108D: LD A,(DE) find length before 0d ( return ?) put length in B 0000108E: CP 0Dh 00001090: RET Z 00001091: INC B 00001092: INC DE 00001093: JR -08h ---------------------- 00001095: EXX Y called from above main loop 00001096: DEC HL 00001097: LD A,H 00001098: OR L 00001099: JR NZ,+0Ah 0000109B: LD HL,(625Dh) 0000109E: LD A,B 0000109F: LD B,C 000010A0: LD C,A 000010A1: RST 08h ? who knows 000010A2: LD A,16h 000010A4: RST 08h 000010A5: EXX 000010A6: RET ---------------------------------------- 000010A7: EX AF,AF' 000010A8: LD A,B 000010A9: CP F0h 000010AB: JR NC,+48h 000010AD: EX AF,AF' 000010AE: RST 08h 000010AF: INC DE 000010B0: PUSH HL 000010B1: PUSH DE 000010B2: PUSH BC 000010B3: PUSH DE 000010B4: EX DE,HL 000010B5: OR A 000010B6: SBC HL,DE 000010B8: LD C,L 000010B9: LD B,H 000010BA: POP DE 000010BB: LD L,E 000010BC: LD H,D 000010BD: DEC HL 000010BE: LDDR 000010C0: POP BC 000010C1: POP DE 000010C2: POP HL 000010C3: LD (HL),A 000010C4: INC HL 000010C5: CALL 1070h 000010C8: INC B 000010C9: INC C 000010CA: JR +29h --------------------------------------------------- 000010CC: LD HL,6000h T called from below 000010CF: LD D,H 000010D0: LD E,L 000010D1: LD BC,0000h 000010D4: EXX 000010D5: LD HL,(625Dh) ? 000010D8: LD BC,(625Fh) ? contrls cursor blink speed initially 2 000010DC: EXX 000010DD: RET 000010DE: LD (HL),0Dh 000010E0: JR +1Dh ---------------------------------------------------------- 000010E2: CALL 10CCh above T called from jblock 62bb in main loop 000010E5: LD A,0Fh print a 0F 000010E7: RST 08h 000010E8: CALL 1066h 000010EB: CP 11h 000010ED: JR NZ,-11h 000010EF: CALL 108Dh 000010F2: CALL 1070h 000010F5: EXX 000010F6: LD A,B 000010F7: RST 08h 000010F8: LD A,16h print a 22 " symbol = chek charset tho 000010FA: RST 08h 000010FB: EXX 000010FC: CALL 1066h 000010FF: CP 20h 00001101: JR NC,-5Ch 00001103: CP 08h 00001105: JR Z,+3Eh 00001107: CP 0Bh 00001109: JP Z,11C7h 0000110C: CP 0Ah 0000110E: JP Z,11D6h 00001111: CP 16h 00001113: JR Z,+19h 00001115: CP 0Ch 00001117: JR Z,+23h 00001119: CP 05h 0000111B: JP Z,1167h 0000111E: CP 0Dh 00001120: JR NZ,-2Dh 00001122: CALL 105Eh 00001125: LD A,20h 00001127: RST 08h print a space 00001128: LD A,0Dh 0000112A: RST 08h print return 0000112B: INC B 0000112C: DEC B 0000112D: RET -------------------------------------------- 0000112E: DEC C 0000112F: INC C 00001130: JR Z,-3Dh 00001132: DEC HL 00001133: DEC C 00001134: LD A,(HL) 00001135: RST 08h 00001136: LD A,16h 00001138: RST 08h 00001139: RST 08h 0000113A: JR -47h 0000113C: LD A,(HL) 0000113D: CP 0Dh 0000113F: JR Z,-4Ch 00001141: INC HL 00001142: INC C 00001143: JR -0Ch 00001145: DEC C 00001146: INC C 00001147: JR Z,-54h 00001149: DEC HL 0000114A: PUSH HL 0000114B: PUSH DE 0000114C: PUSH BC 0000114D: EX DE,HL 0000114E: OR A 0000114F: SBC HL,DE 00001151: LD C,L 00001152: LD B,H 00001153: LD L,E 00001154: LD H,D 00001155: INC HL 00001156: LDIR 00001158: POP BC 00001159: POP DE 0000115A: POP HL 0000115B: DEC DE 0000115C: DEC B 0000115D: DEC C 0000115E: LD A,16h 00001160: RST 08h 00001161: CALL 1070h 00001164: JP 10F5h 00001167: INC B 00001168: DEC B 00001169: JP NZ,10F5h 0000116C: LD HL,11B9h 0000116F: CALL 3539h 00001172: CALL 10CCh 00001175: CALL 10DEh 00001178: LD DE,6000h 0000117B: RST 10h rst 10 0000117C: CALL 1B98h 0000117F: CALL 2B1Fh 00001182: CALL NZ,3B2Ch 00001185: LD HL,(6200h) 00001188: PUSH HL 00001189: LD HL,11A6h 0000118C: LD (6200h),HL 0000118F: LD HL,6000h 00001192: LD (62F1h),HL 00001195: XOR A 00001196: LD (62EEh),A 00001199: CALL 62B2h 0000119C: POP HL 0000119D: LD (6200h),HL 000011A0: CALL 10CCh 000011A3: JP 10EFh 000011A6: PUSH AF 000011A7: CP 1Eh 000011A9: JR NZ,+02h 000011AB: LD A,0Dh 000011AD: PUSH HL 000011AE: LD HL,(62F1h) 000011B1: LD (HL),A 000011B2: INC HL 000011B3: LD (62F1h),HL 000011B6: POP HL 000011B7: POP AF 000011B8: RET -------------------------------------- 000011B9: LD C,H 000011BA: LD L,C 000011BB: LD L,(HL) 000011BC: LD H,L 000011BD: JR NZ,+6Eh 000011BF: LD (HL),L 000011C0: LD L,L 000011C1: LD H,D 000011C2: LD H,L 000011C3: LD (HL),D 000011C4: CCF 000011C5: JR NZ,+00h 000011C7: DEC C 000011C8: INC C 000011C9: JP Z,10F5h 000011CC: DEC HL 000011CD: DEC C 000011CE: LD A,(HL) 000011CF: RST 08h 000011D0: LD A,16h 000011D2: RST 08h 000011D3: RST 08h 000011D4: JR -0Fh 000011D6: LD A,(HL) 000011D7: CP 0Dh 000011D9: JP Z,10F5h 000011DC: INC HL 000011DD: INC C 000011DE: RST 08h 000011DF: JR -0Bh -------------------- 000011E1: CALL 4D45h NOPE - THE NEXT LOT is all data for stuff eg: DEFPROCTAPECOLOR etc. ========================================================================= ========================================================================= MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN MAIN ========================================================================= ========================================================================= 0000168A: LD (F321h),A nonsense from above 0000168c: DI only interrupt command in the ROM !!!!!!!! MAIN startup entry after ?vid start 0000168D: LD HL,1715h f3 21 15 17 00001690: LD DE,61EEh 00001693: LD BC,00D3h copy 211 bytes from 1715? to 61EE - sys vars? no poss not is zeroed later ??! 00001696: LDIR 00001698: LD HL,(61FAh) start of program (4d69 usually) 0000169B: LD (HL),80h put end of program marker at this address 0000169D: DEC HL 0000169E: LD (HL),0Dh put a return chr in just before 000016A0: JP 0DCBh ------ set up stack and init SP - jumps straights back here 000016A3: LD A,(4000h) 000016A6: OR A check if contents of 4000 is zero (usually memory bus reads FF if not connected); 000016A7: CALL Z,4000h check if theres a ROM at 4000 and run its init if used 000016AA: CALL 1F6Eh setup variable Space and more 211 stuff 000016AD: LD HL,6000h 000016B0: LD (HL),0Dh put a return in 6000 - the keyboard buffer 000016B2: ADD HL,SP // ? 000016B3: LD HL,17EDh 1 beep 48k 000016B6: JR NC,+04h 000016B8: LD HL,17EBh print the LYNX logo and beep 1, 2 or 3 times - overwritten by CAMLYnx emu 000016BB: NOP 000016BC: CALL 3539h print string - the LOGO!!! 000016BF: CALL 16C4h aha 16c4 is the end of the line, main loop forever here :~ LLLLOOOOOPPPPPPP HEERE 000016C2: JR -05h ===========LLLLOOOOOPPPPPPP HEERE 000016C4: LD HL,0DEFh the prompt TEXT!!! > ------------------------------- 000016C7: CALL 3539h print chars pointed to by HL until hit a zero - PRINT A PROMPT 000016CA: LD A,(622Eh) test 622e for ? 000016CD: OR A 000016CE: JR Z,+15h to H THIS IS THE MAIN LOOP waiting for commands 000016D0: LD HL,62F3h 000016D3: CALL 35B1h 000016D6: CALL 2B1Fh 000016D9: LD A,20h 000016DB: JR NZ,+02h this is all done each time round the 'wait for input' loop 000016DD: LD A,21h 000016DF: PUSH AF jmp H above 000016E0: CALL 1D59h 000016E3: POP AF 000016E4: RST 08h rst8 a 20 or 21 - non printing chars 000016E5: CALL 62BBh jblock: jp 10e2 000016E8: JR NZ,+06h go back until call 62bb rets a zero 000016EA: LD HL,622Eh 000016ED: LD (HL),00h 000016EF: RET ----------------------------------------- 000016F0: LD (61EEh),SP 000016F4: LD DE,6000h 000016F7: CALL 2524h 000016FA: LD A,(622Eh) 000016FD: OR A 000016FE: JR Z,-3Ch 00001700: LD HL,62F3h 00001703: CALL 35B1h 00001706: LD HL,62F8h 00001709: CALL 35BAh 0000170C: CALL 366Dh 0000170F: LD DE,62F3h 00001712: JP 275Ch --------------------- 00001715: NOP 00001716: RST 38h 00001717: LD BC,0000h 0000171A: NOP 0000171B: NOP 0000171C: NOP 0000171D: DEC B 0000171E: LD (HL),4Ch 00001720: LD L,C 00001721: LD C,L 00001722: LD L,C 00001723: LD C,L 00001724: LD L,C 00001725: RLCA 00001726: LD H,E 00001727: AND H 00001728: LD B,5Fh 0000172A: INC H 0000172B: LD E,E 0000172C: DEC BC 0000172D: LD BC,0100h 00001730: NOP 00001731: NOP 00001732: RLCA 00001733: LD H,(HL) 00001734: RLCA 00001735: LD H,(HL) 00001736: RLCA 00001737: LD H,A 00001738: DJNZ +68h 0000173A: CALL PO,6868h 0000173D: INC DE 0000173E: POP HL 0000173F: LD DE,1416h 00001742: LD H,B 00001743: DEC D 00001744: OR 15h 00001746: LD C,(HL) 00001747: LD L,C 00001748: JP 273Ch 0000174B: JP 3B32h 0000174E: RET ----------------------------- 0000174F: NOP 00001750: NOP 00001751: RET 00001752: NOP 00001753: NOP 00001754: LD BC,1800h 00001757: DEC (HL) 00001758: NOP 00001759: NOP 0000175A: NOP 0000175B: EX AF,AF' 0000175C: NOP 0000175D: NOP 0000175E: NOP 0000175F: NOP 00001760: NOP 00001761: INC E 00001762: JR NC,+15h 00001764: DEC DE 00001765: ADD HL,DE 00001766: LD (BC),A 00001767: DJNZ +11h 00001769: DEC H 0000176A: CPL 0000176B: LD A,28h 0000176D: LD (DE),A 0000176E: DEC B 0000176F: INC B 00001770: INC BC 00001771: RLA 00001772: JR C,+0Eh 00001774: LD B,H 00001775: ADD HL,SP 00001776: ADD HL,BC 00001777: LD (HL),37h 00001779: INC D 0000177A: JR NZ,+03h 0000177C: DEC B 0000177D: INC BC 0000177E: LD A,E 0000177F: DEC B 00001780: PUSH AF 00001781: NOP 00001782: RLCA 00001783: NOP 00001784: NOP 00001785: LD (BC),A 00001786: JR NZ,-11h 00001788: NOP 00001789: JP 0FBEh 0000178C: NOP 0000178D: NOP 0000178E: NOP 0000178F: NOP 00001790: NOP 00001791: NOP 00001792: NOP 00001793: JP 085Eh traced - to io routin 00001796: SUB H 00001797: NOP 00001798: CALL NC,2001h 0000179B: NOP 0000179C: NOP 0000179D: JP 3B32h 000017A0: JP 3B32h 000017A3: JP 3B32h ALL OF THIS IS JUMPOINTS FROM THE 000017A6: JP 3B32h BASIC INTERP I THINK 000017A9: JP 3B32h probab some sort of index 000017AC: JP 3B32h 000017AF: RET 000017B0: NOP 000017B1: NOP 000017B2: RET 000017B3: NOP 000017B4: NOP 000017B5: NOP 000017B6: ADD B 000017B7: NOP 000017B8: RET NZ 000017B9: NOP 000017BA: RET NZ 000017BB: JP 3B32h 000017BE: JP 3B32h 000017C1: RST 28h 000017C2: JR C,+50h 000017C4: LD BC,0304h 000017C7: JR Z,+09h 000017C9: DEC C 000017CA: JP 0CD4h Jump point to io routine ################################ 000017CD: JP 0D67h Jump point to io routine ################################ 000017D0: JP 18D7h 000017D3: JP 19BEh 000017D6: JP 33A9h 000017D9: JP 27E5h 000017DC: JP 24E5h 000017DF: JP 009Ah 000017E2: JP 10E2h 000017E5: JP 2D5Ch 000017E8: NOP 000017E9: INC B 000017EA: RLCA 000017EB: INC B 000017EC: RLCA 000017ED: INC B 000017EE: RLCA 000017EF: JR -0Dh 000017F1: CALL P,F6F5h 000017F4: RST 30h 000017F5: RET M 000017F6: LD SP,HL 000017F7: ADD HL,DE 000017F8: LD A,(BC) 000017F9: LD A,(BC) 000017FA: DEC C 000017FB: NOP ------------------------------------------------ 000017FC: LD A,(DE) from main loop 000017FD: INC DE 000017FE: CP 7Ch 124 00001800: JR Z,+1Dh 00001802: CP 79h 121 00001804: JR Z,+19h 00001806: CP 85h 133 00001808: JR Z,-0Eh 0000180A: CP 87h 135 0000180C: JR Z,-12h 0000180E: CP 86h 134 00001810: JR Z,-16h 00001812: CP 7Ah 122 00001814: JR Z,+03h 00001816: CP 7Eh 126 00001818: RET NZ 00001819: INC DE 0000181A: INC DE 0000181B: INC DE 0000181C: INC DE 0000181D: INC DE 0000181E: RET 0000181F: CALL 17FCh 00001822: CP 7Bh 00001824: JR NZ,-07h 00001826: RET 00001827: PUSH DE 00001828: CALL 2808h 0000182B: POP DE 0000182C: RET ---------------------------- 0000182D: LD A,(DE) 0000182E: CP 7Ch 124 | 00001830: JR Z,-0Bh 00001832: CP 80h 128 ? 00001834: JR NC,+21h 00001836: CP 7Eh 126 ~ ? 00001838: JR Z,+12h 0000183A: CP 7Ah 122 z 0000183C: JR Z,+3Dh 0000183E: RES 6,A 00001840: ADD 40h 00001842: CP 5Bh 00001844: JP C,351Bh 00001847: ADD 06h 00001849: JP 351Bh 0000184C: PUSH DE 0000184D: INC DE 0000184E: EX DE,HL 0000184F: CALL 35B1h 00001852: CALL 1D59h 00001855: POP DE 00001856: RET ------------------------------------ 00001857: CP 85h 00001859: JR Z,+08h 0000185B: CP 87h 0000185D: JR Z,+04h 0000185F: CP 86h 00001861: JR NZ,+0Ah 00001863: CALL 186Dh 00001866: PUSH DE 00001867: INC DE 00001868: CALL 1827h 0000186B: POP DE 0000186C: RET --------------------------------------------- 0000186D: CALL 188Ch 00001870: LD A,(HL) 00001871: RES 7,A 00001873: RST 08h 00001874: INC HL 00001875: BIT 7,(HL) 00001877: RET NZ 00001878: LD A,(HL) 00001879: JR -08h 0000187B: PUSH DE 0000187C: LD A,26h 0000187E: RST 08h 0000187F: INC DE 00001880: EX DE,HL 00001881: CALL 35B1h 00001884: CALL 3497h 00001887: CALL 2234h 0000188A: POP DE 0000188B: RET ------------------------------------- 0000188C: SUB 7Fh 0000188E: LD B,A 0000188F: LD HL,(6217h) 00001892: DEC HL 00001893: INC HL 00001894: BIT 7,(HL) 00001896: JR Z,-05h 00001898: DJNZ -07h 0000189A: RET -------------------------- 0000189B: CP C2h 0000189D: RET NC 0000189E: CP BFh 000018A0: RET C 000018A1: POP IX 000018A3: JR +0Eh 000018A5: POP IX 000018A7: CP C5h 000018A9: JR C,+1Eh 000018AB: CP D0h 000018AD: JR C,+04h 000018AF: LD HL,2020h 000018B2: PUSH HL 000018B3: LD C,A 000018B4: INC A 000018B5: CALL 188Ch 000018B8: DEC HL 000018B9: LD A,(HL) 000018BA: BIT 7,A 000018BC: RES 7,A 000018BE: PUSH AF 000018BF: JR Z,-09h 000018C1: LD A,C 000018C2: CP D0h 000018C4: JR C,+03h 000018C6: LD A,20h 000018C8: PUSH AF 000018C9: LD PC,IX 000018CB: POP IX 000018CD: POP AF 000018CE: OR A 000018CF: JR Z,+03h 000018D1: RST 08h 000018D2: JR -07h 000018D4: PUSH AF 000018D5: LD PC,IX strange way - probab clever redirect 000018D7: XOR A --------------------------------------------------- 000018D8: PUSH AF ?within main loop 000018D9: LD IY,62EAh 000018DD: LD A,(DE) 000018DE: CP 7Fh 127 000018E0: JP Z,1941h below 000018E3: CP BFh 191 LOOP 000018E5: JR C,+0Ah 000018E7: LD A,29h 000018E9: CALL Z,351Bh print a char 000018EC: CALL 17FCh 000018EF: JR -14h 000018F1: LD (IY+00h),00h ------ 000018F5: LD L,E 000018F6: LD H,D 000018F7: INC (IY+00h) 000018FA: DEC (IY+00h) 000018FD: JP M,1932h below 00001900: CALL 17FCh 00001903: LD A,(DE) LOOP 00001904: CP 7Fh 127 00001906: JR Z,+2Ah 00001908: CP BFh 191 0000190A: JP NC,1912h 0000190D: INC (IY+00h) 00001910: JR -1Bh --------- 00001912: CP C3h 195 00001914: JR C,+03h 00001916: DEC (IY+00h) 00001919: EXX 0000191A: INC (IY+00h) 0000191D: DEC (IY+00h) 00001920: CALL Z,189Bh 00001923: INC (IY+00h) 00001926: PUSH AF 00001927: DEC (IY+00h) 0000192A: POP AF 0000192B: CALL Z,18A5h 0000192E: EXX 0000192F: JP 18F7h --------------------------------------------------------- 00001932: CALL 18CBh from above 00001935: LD E,L 00001936: LD D,H 00001937: LD A,(DE) 00001938: CALL 182Dh 0000193B: CALL 17FCh 0000193E: JP 18DDh ---------------------------- 00001941: POP AF 00001942: RET ---------------------------- 00001943: LD HL,(6217h) from above 00001946: DEC HL 00001947: LD B,80h 00001949: CALL 197Eh 0000194C: INC HL 0000194D: BIT 7,(HL) 0000194F: JR Z,-05h 00001951: CP (HL) 00001952: JR Z,+05h 00001954: DJNZ -0Ah 00001956: LD A,(DE) 00001957: SCF 00001958: RET ---------------------------------- 00001959: PUSH DE 0000195A: INC DE 0000195B: INC HL 0000195C: EX DE,HL 0000195D: RST 10h rst 10 0000195E: EX DE,HL 0000195F: RST 10h 00001960: BIT 7,(HL) rst 10 00001962: JR NZ,+15h 00001964: CP 2Eh cmp 2e 46 . 00001966: JR Z,+0Fh 00001968: CP 40h cmp 40 @ 0000196A: JR C,+02h 0000196C: AND DFh 0000196E: CP (HL) 0000196F: JR Z,-17h 00001971: POP DE 00001972: CALL 197Eh 00001975: JR -23h 00001977: INC DE 00001978: RST 10h 00001979: POP HL 0000197A: XOR A 0000197B: SUB B 0000197C: OR A 0000197D: RET ------------------------------------ 0000197E: RST 10h 0000197F: OR 80h 00001981: CP C0h 00001983: RET C 00001984: AND DFh 00001986: RET ---------------------------------------- 00001987: LD B,(IX+02h) 0000198A: LD C,(IX+00h) 0000198D: PUSH IX 0000198F: PUSH BC 00001990: LD (HL),7Ch 00001992: INC HL 00001993: CALL 2C9Dh 00001996: RST 10h 00001997: CP 3Dh 00001999: JR Z,+05h 0000199B: CP 3Eh 0000199D: CALL NZ,3B38h 000019A0: LD (HL),A 000019A1: INC HL 000019A2: INC DE 000019A3: CALL 2C9Dh 000019A6: LD (HL),7Bh 000019A8: INC HL 000019A9: POP BC 000019AA: POP IX 000019AC: LD (IX+02h),B 000019AF: LD (IX+00h),C 000019B2: LD (IX+01h),01h 000019B6: INC (IX+02h) 000019B9: LD A,01h 000019BB: JP 19D1h 000019BE: XOR A 000019BF: PUSH AF 000019C0: LD IX,62EAh 000019C4: LD (IX+00h),04h 000019C8: LD (IX+01h),04h 000019CC: LD (IX+02h),FFh 000019D0: XOR A 000019D1: LD (62EDh),A 000019D4: CALL 1B70h 000019D7: RST 10h 000019D8: CALL 2B4Bh 000019DB: JR Z,-56h 000019DD: LD A,(DE) 000019DE: CP 2Dh 000019E0: JP Z,1AF7h 000019E3: CP 28h 000019E5: JP Z,1A8Fh 000019E8: CP 29h 000019EA: JP Z,1AA8h 000019ED: CALL 2D08h 000019F0: JP NC,1A2Bh 000019F3: CALL 34F5h 000019F6: JP NC,1AC4h 000019F9: CALL 34EDh 000019FC: JP NC,1AD8h 000019FF: CP 26h 00001A01: JP Z,1AD4h 00001A04: CP 2Eh 00001A06: JP Z,1AD8h 00001A09: LD (IX+01h),08h 00001A0D: CALL 1B70h 00001A10: POP AF 00001A11: OR A 00001A12: JR Z,+0Ch 00001A14: CP 28h 00001A16: CALL Z,3B44h 00001A19: LD (HL),A 00001A1A: INC HL 00001A1B: CALL 1B32h 00001A1E: JR -10h 00001A20: LD (HL),7Fh 00001A22: INC HL 00001A23: XOR A 00001A24: OR (IX+02h) 00001A27: CALL NZ,3B38h 00001A2A: RET ------------------------------------ 00001A2B: LD (62EDh),A 00001A2E: CP C0h 00001A30: JP Z,1B02h 00001A33: CP D7h 00001A35: JR NC,-2Eh 00001A37: CP BFh 00001A39: JP NC,1B0Ah 00001A3C: LD (HL),A 00001A3D: INC HL 00001A3E: INC (IX+02h) 00001A41: LD B,C3h 00001A43: LD C,03h 00001A45: CP 9Bh 00001A47: JR NC,+40h 00001A49: LD B,C2h 00001A4B: INC (IX+02h) 00001A4E: LD (IX+03h),00h 00001A52: CP 85h 00001A54: JR Z,+08h 00001A56: CP 87h 00001A58: JR Z,+04h 00001A5A: CP 86h 00001A5C: JR NZ,+29h 00001A5E: PUSH BC 00001A5F: CALL 2B4Bh 00001A62: CALL NZ,3B23h 00001A65: LD (HL),79h 00001A67: INC HL 00001A68: PUSH IX 00001A6A: LD B,(IX+02h) 00001A6D: LD C,(IX+00h) 00001A70: PUSH BC 00001A71: CALL 2C9Dh 00001A74: POP BC 00001A75: POP IX 00001A77: LD (IX+00h),C 00001A7A: LD (IX+02h),B 00001A7D: RST 10h 00001A7E: RST 20h 00001A7F: ADD HL,HL 00001A80: LD (HL),A 00001A81: INC HL 00001A82: INC DE 00001A83: LD (HL),7Bh 00001A85: INC HL 00001A86: POP BC 00001A87: LD C,02h 00001A89: LD (IX+01h),C 00001A8C: JP 1B0Fh 00001A8F: PUSH AF 00001A90: INC DE 00001A91: LD A,(62EAh) 00001A94: CP 01h 00001A96: JR NZ,+09h 00001A98: POP BC 00001A99: LD A,C4h 00001A9B: PUSH AF 00001A9C: PUSH BC 00001A9D: DEC HL 00001A9E: SET 6,(HL) 00001AA0: INC HL 00001AA1: LD (IX+01h),04h 00001AA5: JP 19D0h 00001AA8: POP AF 00001AA9: CP 28h 00001AAB: JR Z,+0Bh 00001AAD: OR A 00001AAE: JP Z,1A20h 00001AB1: LD (HL),A 00001AB2: INC HL 00001AB3: CALL 1B32h 00001AB6: JR -10h 00001AB8: LD A,BFh 00001ABA: INC DE 00001ABB: LD (HL),A 00001ABC: INC HL 00001ABD: LD (IX+01h),05h 00001AC1: JP 19D1h 00001AC4: CALL 3504h 00001AC7: LD (HL),A 00001AC8: INC HL 00001AC9: INC DE 00001ACA: LD (IX+01h),01h 00001ACE: INC (IX+02h) 00001AD1: JP 19D1h 00001AD4: LD (HL),7Ah 00001AD6: JR +02h 00001AD8: LD (HL),7Eh 00001ADA: INC HL 00001ADB: PUSH HL 00001ADC: CALL 1B98h 00001ADF: POP HL 00001AE0: PUSH DE 00001AE1: EX DE,HL 00001AE2: LD HL,62E5h 00001AE5: LD BC,0005h 00001AE8: LDIR 00001AEA: EX DE,HL 00001AEB: POP DE 00001AEC: LD A,02h 00001AEE: LD (62EBh),A 00001AF1: INC (IX+02h) 00001AF4: JP 19D1h 00001AF7: LD A,(62EDh) 00001AFA: OR A 00001AFB: LD A,C9h 00001AFD: INC DE 00001AFE: JR NZ,+0Ah 00001B00: LD A,C1h 00001B02: PUSH AF 00001B03: LD (IX+01h),06h 00001B07: JP 19D0h 00001B0A: LD B,A 00001B0B: LD (IX+01h),07h 00001B0F: POP AF 00001B10: OR A 00001B11: JR Z,+12h 00001B13: CP 28h 00001B15: JR Z,+0Eh 00001B17: LD C,A 00001B18: CALL 1B42h 00001B1B: LD A,C 00001B1C: JR C,+07h 00001B1E: LD (HL),A 00001B1F: INC HL 00001B20: CALL 1B32h 00001B23: JR -16h 00001B25: PUSH AF 00001B26: PUSH BC 00001B27: LD A,(IX+03h) 00001B2A: OR A 00001B2B: JP NZ,19D0h 00001B2E: INC A 00001B2F: JP 19D1h 00001B32: CP C1h 00001B34: RET Z 00001B35: CP BFh 00001B37: RET Z 00001B38: CP C0h 00001B3A: RET Z 00001B3B: DEC (IX+02h) 00001B3E: CALL M,3B38h 00001B41: RET -------------------------------------- 00001B42: PUSH HL 00001B43: PUSH DE 00001B44: LD DE,1A95h 00001B47: LD H,00h 00001B49: LD L,C 00001B4A: ADD HL,DE 00001B4B: LD A,(HL) 00001B4C: LD H,00h 00001B4E: LD L,B 00001B4F: ADD HL,DE 00001B50: CP (HL) 00001B51: POP DE 00001B52: POP HL 00001B53: RET --------------------------------------- 00001B54: NOP 00001B55: LD B,0Eh 00001B57: INC D 00001B58: LD (DE),A 00001B59: LD D,10h 00001B5B: INC C 00001B5C: INC C 00001B5D: LD A,(BC) 00001B5E: LD A,(BC) 00001B5F: EX AF,AF' 00001B60: EX AF,AF' 00001B61: EX AF,AF' 00001B62: EX AF,AF' 00001B63: EX AF,AF' 00001B64: EX AF,AF' 00001B65: LD (BC),A 00001B66: INC B 00001B67: LD (BC),A 00001B68: LD (BC),A 00001B69: INC B 00001B6A: INC C 00001B6B: INC C 00001B6C: INC C 00001B6D: INC C 00001B6E: INC C 00001B6F: INC C 00001B70: PUSH HL ------------------------------- 00001B71: LD A,(62EAh) 00001B74: LD BC,1B90h 00001B77: LD L,A 00001B78: LD H,00h 00001B7A: ADD HL,BC 00001B7B: LD A,(62EBh) 00001B7E: LD (62EAh),A 00001B81: LD C,01h 00001B83: DEC A 00001B84: JR Z,+04h 00001B86: SLA C 00001B88: JR -07h 00001B8A: LD A,C 00001B8B: AND (HL) 00001B8C: CALL Z,3B3Bh 00001B8F: POP HL 00001B90: RET ----------------------------------- 00001B91: RET C 00001B92: RET NC 00001B93: EX AF,AF' 00001B94: CPL 00001B95: RET NC 00001B96: RRCA 00001B97: CPL 00001B98: LD A,(DE) 00001B99: CP 45h 00001B9B: JR Z,+29h 00001B9D: CP 26h 00001B9F: JR NZ,+2Bh 00001BA1: LD HL,0000h 00001BA4: INC DE 00001BA5: LD A,(DE) 00001BA6: SUB 30h 00001BA8: JR C,+16h 00001BAA: CP 0Ah 00001BAC: JR C,+0Ah 00001BAE: SUB 07h 00001BB0: CP 0Ah 00001BB2: JR C,+0Ch 00001BB4: CP 10h 00001BB6: JR NC,+08h 00001BB8: ADD HL,HL 00001BB9: ADD HL,HL 00001BBA: ADD HL,HL 00001BBB: ADD HL,HL 00001BBC: ADD L 00001BBD: LD L,A 00001BBE: JR -1Ch 00001BC0: PUSH DE 00001BC1: CALL 34C4h 00001BC4: POP DE 00001BC5: RET --------------------- 00001BC6: PUSH DE 00001BC7: CALL 35AEh 00001BCA: POP DE 00001BCB: RET ---------------------- 00001BCC: LD C,C0h 00001BCE: CALL 350Dh 00001BD1: LD A,(DE) 00001BD2: CP 2Dh 00001BD4: EX AF,AF' 00001BD5: LD A,(DE) 00001BD6: CP 2Dh 00001BD8: JR NZ,+03h 00001BDA: RES 7,C 00001BDC: INC DE 00001BDD: LD A,(DE) 00001BDE: CP 30h 00001BE0: JR Z,-06h 00001BE2: CP 2Eh 00001BE4: JR Z,+57h 00001BE6: SUB 30h 00001BE8: CP 0Ah 00001BEA: JR NC,+2Bh 00001BEC: LD B,08h 00001BEE: DEC C 00001BEF: LD A,(DE) 00001BF0: CP 2Eh 00001BF2: JR Z,+53h 00001BF4: SUB 30h 00001BF6: CP 0Ah 00001BF8: JR NC,+18h 00001BFA: INC C 00001BFB: CALL 3657h 00001BFE: INC DE 00001BFF: DJNZ -12h 00001C01: DEC DE 00001C02: DEC C 00001C03: LD A,(DE) 00001C04: CP 2Eh 00001C06: JR Z,+4Ch 00001C08: SUB 30h 00001C0A: CP 0Ah 00001C0C: JR NC,+09h 00001C0E: INC DE 00001C0F: INC C 00001C10: JR -0Fh 00001C12: CALL 3656h 00001C15: DJNZ -05h 00001C17: LD A,(62E5h) 00001C1A: OR C 00001C1B: PUSH AF 00001C1C: CALL 1C5Eh 00001C1F: POP AF 00001C20: ADD L 00001C21: BIT 7,A 00001C23: JR Z,+06h 00001C25: EX AF,AF' 00001C26: CALL Z,3B3Eh 00001C29: JR +04h 00001C2B: EX AF,AF' 00001C2C: CALL NZ,3B3Eh 00001C2F: EX AF,AF' 00001C30: LD (62E5h),A 00001C33: LD A,(62E6h) 00001C36: OR A 00001C37: PUSH DE 00001C38: CALL Z,35AEh 00001C3B: POP DE 00001C3C: RET -------------------------------- 00001C3D: INC DE 00001C3E: LD A,(DE) 00001C3F: DEC C 00001C40: CP 30h 00001C42: JR Z,-07h 00001C44: LD B,08h 00001C46: DEC DE 00001C47: INC DE 00001C48: LD A,(DE) 00001C49: SUB 30h 00001C4B: CP 0Ah 00001C4D: JR NC,-3Dh 00001C4F: CALL 3657h 00001C52: DJNZ -0Dh 00001C54: INC DE 00001C55: LD A,(DE) 00001C56: SUB 30h 00001C58: CP 0Ah 00001C5A: JR C,-08h 00001C5C: JR -47h 00001C5E: LD L,00h 00001C60: LD A,(DE) 00001C61: CP 45h 00001C63: RET NZ 00001C64: INC DE 00001C65: LD A,(DE) 00001C66: CP 2Dh 00001C68: JR Z,+27h 00001C6A: CP 2Bh 00001C6C: INC DE 00001C6D: JR Z,+08h 00001C6F: DEC DE 00001C70: CALL 34EDh 00001C73: JR NC,+02h 00001C75: DEC DE 00001C76: RET ----------------------------------- 00001C77: LD A,(DE) 00001C78: SUB 30h 00001C7A: CP 0Ah 00001C7C: RET NC 00001C7D: LD L,A 00001C7E: INC DE 00001C7F: LD A,(DE) 00001C80: SUB 30h 00001C82: CP 0Ah 00001C84: RET NC 00001C85: PUSH AF 00001C86: LD A,L 00001C87: RLCA 00001C88: RLCA 00001C89: ADD L 00001C8A: RLCA 00001C8B: LD L,A 00001C8C: POP AF 00001C8D: ADD L 00001C8E: LD L,A 00001C8F: INC DE 00001C90: RET -------------------------------------- 00001C91: INC DE 00001C92: CALL 1C77h 00001C95: LD A,L 00001C96: NEG 00001C98: LD L,A 00001C99: RET ------------------------------------------ 00001C9A: PUSH IY 00001C9C: CALL 1CA2h 00001C9F: POP IY 00001CA1: RET ------------------------ 00001CA2: LD IY,1CCCh 00001CA6: LD D,00h 00001CA8: XOR A 00001CA9: LD B,(IY+01h) 00001CAC: LD C,(IY+00h) 00001CAF: OR A 00001CB0: SBC HL,BC 00001CB2: JR C,+03h 00001CB4: INC A 00001CB5: JR -07h 00001CB7: ADD HL,BC 00001CB8: OR A 00001CB9: JR Z,+01h 00001CBB: DEC D 00001CBC: BIT 7,D 00001CBE: JR Z,+03h 00001CC0: ADD 30h 00001CC2: RST 08h 00001CC3: BIT 0,C 00001CC5: RET NZ 00001CC6: INC IY 00001CC8: INC IY 00001CCA: JR -24h 00001CCC: DJNZ +27h 00001CCE: RET PE 00001CCF: INC BC 00001CD0: LD H,H 00001CD1: NOP 00001CD2: LD A,(BC) 00001CD3: NOP 00001CD4: LD BC,CD00h 00001CD7: JP PO,2B1Ch 00001CDA: CALL 1CEEh 00001CDD: CP 2Eh 00001CDF: RET Z 00001CE0: INC HL 00001CE1: RET ---------------------------------------- 00001CE2: CALL 3657h 00001CE5: AND 0Fh 00001CE7: ADD 30h 00001CE9: LD (HL),A 00001CEA: INC HL 00001CEB: DJNZ -0Bh 00001CED: RET ------------------------------------ 00001CEE: PUSH BC 00001CEF: LD B,08h 00001CF1: LD A,(622Dh) 00001CF4: BIT 1,A 00001CF6: JR Z,+06h 00001CF8: LD B,03h 00001CFA: BIT 0,A 00001CFC: JR Z,+03h 00001CFE: CALL 1D05h 00001D01: POP BC 00001D02: LD A,(HL) 00001D03: RET ------------------------------------------- 00001D04: DEC HL 00001D05: LD A,(HL) 00001D06: CP 30h 00001D08: RET NZ 00001D09: DJNZ -07h 00001D0B: RET -------------------------------------- 00001D0C: LD B,01h 00001D0E: CALL 1CE2h 00001D11: LD (HL),2Eh 00001D13: INC HL 00001D14: LD B,07h 00001D16: CALL 1CD6h 00001D19: LD (HL),45h 00001D1B: INC HL 00001D1C: LD (HL),00h 00001D1E: LD HL,62FDh 00001D21: CALL 3539h 00001D24: LD HL,62E5h 00001D27: BIT 6,(HL) 00001D29: LD A,2Dh 00001D2B: JR Z,+02h 00001D2D: LD A,2Bh 00001D2F: RST 08h 00001D30: LD A,(HL) 00001D31: JR NZ,+02h 00001D33: NEG 00001D35: AND 3Fh 00001D37: LD L,A 00001D38: LD H,00h 00001D3A: JP 1C9Ah 00001D3D: LD A,30h 00001D3F: RST 08h 00001D40: LD A,(622Dh) 00001D43: BIT 1,A 00001D45: RET Z 00001D46: PUSH AF 00001D47: LD A,2Eh 00001D49: RST 08h 00001D4A: POP AF 00001D4B: LD B,07h 00001D4D: BIT 0,A 00001D4F: JR Z,+02h 00001D51: LD B,05h 00001D53: LD A,30h 00001D55: RST 08h 00001D56: DJNZ -05h 00001D58: RET --------------------------------------- 00001D59: CALL 2E93h 00001D5C: LD A,(62E5h) 00001D5F: LD HL,62FDh 00001D62: BIT 7,A 00001D64: JR NZ,+03h 00001D66: LD (HL),2Dh 00001D68: INC HL 00001D69: AND 7Fh 00001D6B: JR Z,-30h 00001D6D: SUB 3Eh 00001D6F: CP 0Ah 00001D71: JR NC,-67h 00001D73: CP 02h 00001D75: JR C,+2Ah 00001D77: LD A,(62E5h) 00001D7A: AND 0Fh 00001D7C: INC A 00001D7D: LD B,A 00001D7E: PUSH AF 00001D7F: CALL 1CE2h 00001D82: POP AF 00001D83: SUB 08h 00001D85: NEG 00001D87: LD (HL),2Eh 00001D89: JR Z,+06h 00001D8B: LD B,A 00001D8C: INC HL 00001D8D: CALL 1CE2h 00001D90: DEC HL 00001D91: CALL 1CEEh 00001D94: CP 2Eh 00001D96: JR Z,+01h 00001D98: INC HL 00001D99: LD (HL),00h 00001D9B: LD HL,62FDh 00001D9E: JP 3539h 00001DA1: LD (HL),30h 00001DA3: INC HL 00001DA4: LD (HL),2Eh 00001DA6: INC HL 00001DA7: SUB 01h 00001DA9: JR Z,+06h 00001DAB: LD (HL),30h 00001DAD: INC HL 00001DAE: INC A 00001DAF: JR NZ,-06h 00001DB1: LD B,08h 00001DB3: CALL 1CD6h 00001DB6: JR -1Fh 00001DB8: PUSH HL 00001DB9: LD C,(IX+02h) 00001DBC: LD B,(IX+03h) 00001DBF: OR A 00001DC0: LD A,L 00001DC1: OR H 00001DC2: JR Z,+06h 00001DC4: DEC HL 00001DC5: SBC HL,BC 00001DC7: CALL NC,3B26h 00001DCA: POP HL 00001DCB: LD C,L 00001DCC: LD B,H 00001DCD: ADD HL,HL 00001DCE: ADD HL,HL 00001DCF: ADD HL,BC 00001DD0: LD C,(IX+00h) 00001DD3: LD B,(IX+01h) 00001DD6: ADD HL,BC 00001DD7: RET -------------------------------------- 00001DD8: PUSH DE 00001DD9: CALL 2EF0h 00001DDC: DEC IY 00001DDE: LD A,(IY+00h) 00001DE1: CALL 1E23h 00001DE4: LD A,(IX+00h) 00001DE7: OR (IX+01h) 00001DEA: CALL Z,3B11h 00001DED: CALL 3497h 00001DF0: CALL 1DB8h 00001DF3: INC HL 00001DF4: LD A,(HL) 00001DF5: INC A 00001DF6: CALL Z,3B11h 00001DF9: DEC HL 00001DFA: CALL 35B1h 00001DFD: POP DE 00001DFE: RET ------------------------------------------ 00001DFF: POP AF 00001E00: CALL 1E13h 00001E03: LD A,(IX+00h) 00001E06: OR (IX+01h) 00001E09: CALL Z,3B11h 00001E0C: JP 1DB8h 00001E0F: CALL 3504h 00001E12: INC DE 00001E13: PUSH AF 00001E14: INC DE 00001E15: RST 28h 00001E16: LD A,(DE) 00001E17: CP 29h 00001E19: CALL NZ,3B44h 00001E1C: INC DE 00001E1D: PUSH DE 00001E1E: CALL 3497h 00001E21: POP DE 00001E22: POP AF 00001E23: LD IX,(6211h) 00001E27: RLCA 00001E28: RLA 00001E29: LD C,A 00001E2A: LD B,00h 00001E2C: ADD IX,BC 00001E2E: RET 00001E2F: LD IX,(61F6h) 00001E33: LD A,(IX+00h) 00001E36: CP 80h 00001E38: CALL Z,3B4Ah 00001E3B: CALL 255Eh 00001E3E: LD (6209h),IX 00001E42: LD HL,1E4Eh 00001E45: CALL 3539h 00001E48: CALL 1E7Fh 00001E4B: JP 24E2h -------------- 00001E4E: DEC C 00001E4F: LD D,E 00001E50: LD (HL),H 00001E51: LD L,A 00001E52: LD (HL),B 00001E53: LD (HL),B 00001E54: LD H,L 00001E55: LD H,H 00001E56: NOP 00001E57: CALL 1ED0h io routine 00001E5A: LD HL,(61F0h) 00001E5D: CALL 34C4h 00001E60: LD HL,35D8h 00001E63: CALL 35BAh 00001E66: JP 37B0h 00001E69: LD BC,(621Fh) 00001E6D: LD HL,0000h 00001E70: ADD HL,SP 00001E71: SBC HL,BC 00001E73: JP 34C4h ------------- 00001E76: LD HL,3605h 00001E79: LD (61F6h),HL 00001E7C: JP 1F6Ah -------------- 00001E7F: LD HL,(61F6h) 00001E82: LD A,(HL) 00001E83: CP 80h 00001E85: JR Z,+0Fh 00001E87: LD HL,1E9Fh 00001E8A: CALL 3539h 00001E8D: LD HL,(61F6h) 00001E90: CALL 35B1h 00001E93: CALL 1D59h 00001E96: LD A,1Eh print . 00001E98: RST 08h 00001E99: LD A,0Dh print ret 00001E9B: RST 08h 00001E9C: JP 1F0Dh ----------------------- 00001E9F: JR NZ,+69h 00001EA1: LD L,(HL) 00001EA2: JR NZ,+6Ch 00001EA4: LD L,C 00001EA5: LD L,(HL) 00001EA6: LD H,L 00001EA7: JR NZ,+00h 00001EA9: LD IX,(61F6h) 00001EAD: LD A,(IX+00h) 00001EB0: CP 80h 00001EB2: JR Z,+16h 00001EB4: LD A,(IX+06h) 00001EB7: CP 25h 00001EB9: JR NZ,+0Fh 00001EBB: LD A,0Dh 00001EBD: RST 08h 00001EBE: LD BC,24BEh 00001EC1: POP HL 00001EC2: OR A 00001EC3: SBC HL,BC 00001EC5: JR NZ,-06h 00001EC7: JP 249Ch 00001ECA: CALL 1E7Fh 00001ECD: JP 38E8h 00001ED0: LD HL,(61F2h) --------------------------------------------- 00001ED3: RL L 00001ED5: RL H 00001ED7: RL L 00001ED9: RL H 00001EDB: LD C,H 00001EDC: LD A,(61F0h) 00001EDF: RLA 00001EE0: LD B,A 00001EE1: LD DE,(61F1h) 00001EE5: RL E 00001EE7: RL D 00001EE9: RES 7,D 00001EEB: LD HL,(61F0h) 00001EEE: ADD HL,BC 00001EEF: LD (61F0h),HL 00001EF2: LD HL,(61F2h) 00001EF5: ADC HL,DE 00001EF7: RES 7,H 00001EF9: LD (61F2h),HL 00001EFC: RET P 00001EFD: LD HL,61F0h 00001F00: INC (HL) 00001F01: RET NZ 00001F02: INC HL 00001F03: JR -05h 00001F05: LD BC,0080h ---------------------------------------------- 00001F08: IN B,(C) in 80 , check bit 6 - returns flag to call describing b6/80 00001F0A: BIT 6,B 00001F0C: RET -------------------------------------- 00001F0D: LD HL,1F13h 00001F10: JP 3539h -------------- 00001F13: LD D,D 00001F14: LD H,L 00001F15: LD H,C 00001F16: LD H,H 00001F17: LD A,C 00001F18: LD HL,1E0Dh 00001F1B: NOP 00001F1C: LD HL,(620Bh) 00001F1F: LD DE,0100h 00001F22: ADD HL,DE 00001F23: LD DE,(620Dh) 00001F27: CALL 2568h 00001F2A: CALL C,3B05h 00001F2D: EX DE,HL 00001F2E: RET ------------------------- 00001F2F: PUSH DE 00001F30: PUSH HL 00001F31: CALL 1F1Ch 00001F34: POP DE 00001F35: LD (HL),E 00001F36: INC HL 00001F37: LD (HL),D 00001F38: INC HL 00001F39: LD (620Dh),HL 00001F3C: POP DE 00001F3D: RET -------------------------------- 00001F3E: PUSH DE 00001F3F: PUSH AF 00001F40: CALL 1F1Ch 00001F43: POP AF 00001F44: LD (HL),A 00001F45: JR -0Fh 00001F47: PUSH DE 00001F48: LD HL,(620Dh) 00001F4B: DEC HL 00001F4C: LD D,(HL) 00001F4D: DEC HL 00001F4E: LD E,(HL) 00001F4F: LD (620Dh),HL 00001F52: EX DE,HL 00001F53: POP DE 00001F54: RET 00001F55: LD HL,(620Dh) 00001F58: DEC HL 00001F59: LD A,(HL) 00001F5A: LD (620Dh),HL 00001F5D: RET 00001F5E: LD C,02h 00001F60: LD A,(6206h) 00001F63: AND 80h 00001F65: OR C 00001F66: LD (6206h),A 00001F69: RET ---------- 00001F6A: LD C,01h 00001F6C: JR -0Eh ---------------------------------- 00001F6E: CALL 25CAh called from MAIN init list above - SETS up VAR space 00001F71: LD HL,0000h 00001F74: LD (62EFh),HL 00001F77: LD HL,(61FCh) 00001F7A: INC HL 00001F7B: LD (621Fh),HL dont know what these three inits are :( 00001F7E: LD HL,(61FAh) start of program 00001F81: DEC HL 00001F82: LD (61F8h),HL byte bef st of prog 00001F85: LD HL,(620Bh) unlisted 00001F88: LD (HL),00h 00001F8A: INC HL 00001F8B: LD (620Dh),HL unlisted 00001F8E: LD HL,(620Fh) add 5 to hl for 53 loops pokeing (620f)+n, FF 00001F91: LD DE,0005h 00001F94: LD B,35h this is memory layout init stuff - VARIABLES SPACE!!! 5 per var 00001F96: INC HL 00001F97: LD (HL),FFh 00001F99: ADD HL,DE 00001F9A: DJNZ -05h 00001F9C: RET -------------------------------------------------- 00001F9D: CALL 2B18h 00001FA0: CALL 251Bh 00001FA3: EX DE,HL 00001FA4: INC HL 00001FA5: JP 34C4h --------------------------------- 00001FA8: LD A,R 00001FAA: AND 7Fh 00001FAC: INC A 00001FAD: LD (61F0h),A 00001FB0: RET ----------------------------------- 00001FB1: LD HL,6206h 00001FB4: LD A,(HL) 00001FB5: PUSH AF 00001FB6: LD (HL),01h 00001FB8: LD A,04h 00001FBA: RST 08h 00001FBB: POP AF 00001FBC: LD (HL),A 00001FBD: RET --------------------------------- 00001FBE: CALL 1F0Dh 00001FC1: JP 24DCh 00001FC4: CALL 1F55h 00001FC7: CP 36h 00001FC9: CALL NZ,3B0Bh 00001FCC: CALL 1F47h 00001FCF: POP BC 00001FD0: JP 2493h 00001FD3: RST 28h 00001FD4: LD A,(62E5h) 00001FD7: CP 80h 00001FD9: JR Z,+0Ch 00001FDB: LD HL,(61F6h) 00001FDE: CALL 1F2Fh 00001FE1: LD A,36h 00001FE3: CALL 1F3Eh 00001FE6: RET -------------------------- 00001FE7: LD IX,(61F6h) 00001FEB: LD C,37h 00001FED: LD B,36h 00001FEF: CALL 21A1h 00001FF2: CALL C,3B08h 00001FF5: LD (61F6h),IX 00001FF9: RET -------------- 00001FFA: PUSH DE 00001FFB: CALL 1F55h 00001FFE: CP 38h 00002000: CALL NZ,3B0Eh 00002003: CALL 1F47h 00002006: POP DE 00002007: PUSH HL 00002008: RST 28h 00002009: LD A,(62E5h) 0000200C: CP 80h 0000200E: POP HL 0000200F: RET NZ 00002010: LD (61F6h),HL 00002013: LD HL,(61F6h) 00002016: CALL 1F2Fh 00002019: LD A,38h 0000201B: JP 1F3Eh 0000201E: CALL 202Fh 00002021: OR A 00002022: JR Z,-06h 00002024: JR +03h 00002026: CALL 202Fh 00002029: LD L,A 0000202A: LD H,00h 0000202C: JP 34C4h ----------------------------------------------- 0000202F: PUSH HL called from main loop , from above 00002030: LD HL,(6204h) 00002033: PUSH BC 00002034: LD BC,2039h 00002037: PUSH BC 00002038: LD PC,HL jump to routine of jblock 6204 - 0b5b 00002039: POP BC 0000203A: POP HL 0000203B: RET ----------------------------------------------------------- 0000203C: LD C,A main routine called from below properly - print a character 0000203D: LD A,(6206h) 00002040: PUSH BC 00002041: PUSH AF 00002042: AND 81h 00002044: JR Z,+09h 00002046: LD A,C 00002047: LD HL,(6200h) 0000204A: LD BC,204Fh 0000204D: PUSH BC 0000204E: LD PC,HL 0000204F: POP AF 00002050: POP BC 00002051: AND 82h 00002053: RET Z 00002054: LD A,C 00002055: LD HL,(6202h) 00002058: LD PC,HL from save routine above 00002059: LD A,(DE) 0000205A: RST 20h 0000205B: LD A,L 0000205C: JP 62AFh 0000205F: RST 18h 00002060: PUSH HL 00002061: LD A,(DE) 00002062: CP 0Dh 00002064: JR Z,+02h 00002066: INC DE 00002067: RST 18h 00002068: POP IX oh arse, what is all this IX stuff 0000206A: LD BC,2070h 0000206D: PUSH BC 0000206E: LD PC,IX goes off somewhere else here! 00002070: LD (61F4h),HL 00002073: RET ---------------------------------------------- 00002074: CALL 1F55h 00002077: CP 11h 00002079: CALL NZ,3B17h 0000207C: CALL 1F47h 0000207F: LD (61F6h),HL 00002082: RET ------------------------------ 00002083: LD HL,(61FAh) 00002086: LD (61FCh),HL 00002089: LD (HL),80h 0000208B: LD (61F6h),HL 0000208E: CALL 1F6Eh 00002091: JP 24DCh ------------------------------------- 00002094: CP 22h 00002096: JR NZ,+05h 00002098: CALL 2257h 0000209B: INC DE 0000209C: INC DE 0000209D: PUSH DE 0000209E: LD A,3Fh 000020A0: RST 08h 000020A1: LD A,20h 000020A3: RST 08h 000020A4: CALL 0DF3h 000020A7: LD A,0Fh 000020A9: RST 08h 000020AA: LD DE,6000h 000020AD: EXX 000020AE: POP DE 000020AF: CALL 20B5h 000020B2: JR C,-17h 000020B4: RET ------------------------------------ 000020B5: EXX 000020B6: LD A,(DE) 000020B7: CP 0Dh 000020B9: EXX 000020BA: SCF 000020BB: RET Z 000020BC: CALL 2113h 000020BF: PUSH DE 000020C0: PUSH HL 000020C1: JR C,+21h 000020C3: EXX 000020C4: LD HL,(61FEh) 000020C7: CALL 25E2h 000020CA: CP 2Ch 000020CC: JR Z,+03h 000020CE: RST 20h 000020CF: DEC C 000020D0: DEC DE 000020D1: EXX 000020D2: LD DE,(61FEh) 000020D6: RST 28h 000020D7: POP HL 000020D8: EX DE,HL 000020D9: CALL 275Ch 000020DC: POP DE 000020DD: LD A,(DE) 000020DE: CP 0Dh 000020E0: RET Z 000020E1: INC DE 000020E2: JR -2Fh 000020E4: EXX 000020E5: POP HL 000020E6: DEC HL 000020E7: LD B,(HL) 000020E8: INC HL 000020E9: CALL 20F1h 000020EC: EXX 000020ED: JR -13h 000020EF: LD B,10h 000020F1: CALL 2108h 000020F4: JR Z,+0Dh 000020F6: LD (HL),A 000020F7: INC HL 000020F8: INC DE 000020F9: DJNZ -0Ah 000020FB: CALL 2108h 000020FE: JR Z,+03h 00002100: INC DE 00002101: JR -08h 00002103: LD (HL),0Dh 00002105: RET C 00002106: INC DE 00002107: RET ------------------------------------------------ 00002108: LD A,(DE) 00002109: CP 22h 0000210B: RET Z 0000210C: CP 2Ch 0000210E: RET Z 0000210F: CP 0Dh 00002111: SCF 00002112: RET ----------------------- 00002113: CALL 21EAh 00002116: JR Z,+05h 00002118: CALL 2218h 0000211B: OR A 0000211C: RET --------------------- 0000211D: CALL 62BEh 00002120: SCF 00002121: RET ----------------------------- 00002122: RST 18h 00002123: DEC HL 00002124: LD B,1Ah 00002126: DJNZ -02h 00002128: LD A,L 00002129: OR H 0000212A: JR NZ,-09h 0000212C: RET ------------------------------ 0000212D: RST 18h called from below G 0000212E: LD (626Bh),A set paper color to A (3 from below?) 00002131: RET --------------- 00002132: XOR A 00002133: LD (626Bh),A set PAPER color to 0 00002136: LD A,01h 00002138: RST 08h 00002139: LD A,04h paper 4 0000213B: RST 08h 0000213C: LD A,02h 0000213E: RST 08h ink 0 ? the TEXT command ??? 0000213F: XOR A 00002140: RST 08h 00002141: LD A,04h cls 00002143: RST 08h 00002144: LD A,03h well that lot printed somat I believe 01 04 paper 4 02 00 ink 0 04 cls vdu's 00002146: JR -1Ah goes to G ?above A is 03 and it does rst18 bef set paper col 00002148: CALL 21EAh 0000214B: JR Z,+14h 0000214D: CALL 2218h 00002150: INC DE 00002151: PUSH HL 00002152: RST 28h 00002153: POP HL 00002154: EX DE,HL 00002155: PUSH HL 00002156: CALL 275Ch 00002159: POP DE 0000215A: LD A,(DE) 0000215B: CP 0Dh 0000215D: RET Z 0000215E: INC DE 0000215F: JR -19h 00002161: LD IY,6507h 00002165: CALL 62BEh 00002168: INC DE 00002169: PUSH HL 0000216A: PUSH BC 0000216B: CALL 2BDDh 0000216E: POP BC 0000216F: POP IX 00002171: LD HL,6407h 00002174: CALL 2C7Fh 00002177: LD (IX+00h),0Dh 0000217B: JR -23h 0000217D: CP 0Dh 0000217F: LD IX,(61FAh) 00002183: JR Z,+04h 00002185: RST 28h 00002186: CALL 2B18h 00002189: DEC IX 0000218B: LD (61F8h),IX 0000218F: RET 00002190: LD A,(IX+00h) 00002193: CP 80h 00002195: SCF 00002196: RET Z 00002197: LD A,(IX+06h) 0000219A: CP C 0000219B: RET Z 0000219C: CALL 255Eh 0000219F: JR -11h 000021A1: LD A,FFh 000021A3: EX AF,AF' 000021A4: LD A,(IX+00h) 000021A7: CP 80h 000021A9: SCF 000021AA: RET Z 000021AB: LD A,(IX+06h) 000021AE: CP B 000021AF: JR Z,+0Fh 000021B1: CP C 000021B2: JR Z,+05h 000021B4: CALL 255Eh 000021B7: JR -15h 000021B9: EX AF,AF' 000021BA: OR A 000021BB: RET Z 000021BC: DEC A 000021BD: EX AF,AF' 000021BE: JR -0Ch 000021C0: EX AF,AF' 000021C1: INC A 000021C2: EX AF,AF' 000021C3: JR -11h 000021C5: EXX 000021C6: LD DE,(61F8h) 000021CA: EXX 000021CB: CALL 20B5h 000021CE: JR C,+06h 000021D0: EXX 000021D1: LD (61F8h),DE 000021D5: RET 000021D6: EXX 000021D7: INC DE 000021D8: PUSH DE 000021D9: POP IX 000021DB: LD C,19h 000021DD: CALL 2190h 000021E0: CALL C,3B1Ah 000021E3: CALL 251Bh 000021E6: INC DE 000021E7: EXX 000021E8: JR -1Fh 000021EA: LD A,(DE) 000021EB: CP 41h 000021ED: RET C 000021EE: INC DE 000021EF: LD A,(DE) 000021F0: CP 24h 000021F2: DEC DE 000021F3: RET 000021F4: LD A,(DE) 000021F5: CP 41h 000021F7: CALL C,3B3Bh 000021FA: CP 5Bh 000021FC: CALL NC,3B3Bh 000021FF: LD (HL),A 00002200: INC HL 00002201: LD (HL),24h 00002203: INC HL 00002204: INC DE 00002205: INC DE 00002206: RST 10h 00002207: CP 28h 00002209: RET NZ 0000220A: LD (HL),A 0000220B: INC HL 0000220C: INC DE 0000220D: CALL 25E2h 00002210: CP 29h 00002212: CALL NZ,3B44h 00002215: LD (HL),A 00002216: INC HL 00002217: RET --------------------------------- 00002218: CALL 3504h 0000221B: INC DE 0000221C: PUSH AF 0000221D: LD A,(DE) 0000221E: CP 28h 00002220: JP Z,1DFFh io routi 00002223: POP AF 00002224: LD L,A 00002225: LD H,00h 00002227: PUSH DE 00002228: LD E,L 00002229: LD D,H 0000222A: ADD HL,HL 0000222B: ADD HL,HL 0000222C: ADD HL,DE 0000222D: LD DE,(620Fh) 00002231: ADD HL,DE 00002232: POP DE 00002233: RET ------------------------------ 00002234: LD A,H 00002235: CALL 2239h 00002238: LD A,L 00002239: PUSH AF 0000223A: RRCA 0000223B: RRCA 0000223C: RRCA 0000223D: RRCA 0000223E: CALL 2242h 00002241: POP AF 00002242: AND 0Fh 00002244: ADD 30h 00002246: CP 3Ah 00002248: JR C,+02h 0000224A: ADD 07h 0000224C: RST 08h 0000224D: RET 0000224E: CALL 1F5Eh 00002251: CALL 29A9h 00002254: JP 1F6Ah 00002257: INC DE 00002258: LD A,(DE) 00002259: CP 22h 0000225B: RET Z 0000225C: RST 08h 0000225D: JR -08h 0000225F: CALL 2218h more io above 00002262: PUSH HL 00002263: INC DE 00002264: CALL 2218h 00002267: POP DE 00002268: LD B,05h 0000226A: JP 354Ah 0000226D: LD HL,(61F6h) 00002270: LD A,(HL) 00002271: CP 80h 00002273: RET NZ 00002274: POP BC 00002275: LD HL,(6209h) 00002278: LD A,L 00002279: OR H 0000227A: CALL Z,3B1Dh 0000227D: JP 2493h 00002280: PUSH DE 00002281: CALL 1F6Eh 00002284: POP DE 00002285: LD IX,(61FAh) 00002289: LD A,(DE) 0000228A: CP 0Dh 0000228C: JR Z,+04h 0000228E: RST 28h 0000228F: CALL 2B18h 00002292: POP BC 00002293: JP 24C5h 00002296: LD HL,(61F6h) 00002299: CALL 1F2Fh 0000229C: LD A,11h 0000229E: CALL 1F3Eh 000022A1: LD A,(DE) 000022A2: CP D8h 000022A4: JR NZ,-18h 000022A6: LD C,2Fh 000022A8: INC DE 000022A9: LD IX,(61FAh) 000022AD: PUSH DE 000022AE: CALL 2190h 000022B1: CALL C,3B2Ch 000022B4: PUSH IX 000022B6: LD DE,0007h 000022B9: ADD IX,DE 000022BB: PUSH IX 000022BD: POP HL 000022BE: POP IX 000022C0: POP DE 000022C1: PUSH DE 000022C2: CALL 22D3h 000022C5: JR Z,+06h 000022C7: CALL 255Eh 000022CA: POP DE 000022CB: JR NZ,-20h 000022CD: POP BC 000022CE: LD (61F6h),IX 000022D2: RET ----------------------------------------------------- 000022D3: LD A,(DE) ?Called after load header routine (at least) ? validate name 000022D4: CP (HL) compare two strings DE & HL 000022D5: RET NZ break out when no match 000022D6: CP 28h ( - ? 000022D8: RET Z 000022D9: CP 0Dh CR ? 000022DB: RET Z 000022DC: INC HL 000022DD: INC DE 000022DE: JR -0Dh 000022E0: LD IX,(61FAh) -------------------------------------------- 000022E4: LD DE,FFFFh apparentlay all part of LIST ?? 000022E7: JR +21h 000022E9: CP 0Dh 000022EB: LD A,00h 000022ED: LD (62EEh),A 000022F0: JR Z,-12h 000022F2: RST 28h 000022F3: PUSH DE 000022F4: CALL 2B1Fh 000022F7: POP DE 000022F8: LD A,(DE) 000022F9: CP 0Dh 000022FB: PUSH IX 000022FD: JR Z,+05h 000022FF: INC DE 00002300: RST 28h 00002301: CALL 2B1Fh 00002304: PUSH IX 00002306: POP DE 00002307: POP IX 00002309: INC DE 0000230A: LD A,(IX+00h) compare ?(61af) with 80 0000230D: CP 80h 0000230F: JR Z,+21h skip input if not 00002311: PUSH DE 00002312: CALL 62B2h B 00002315: LD (61F6h),IX A 00002319: CALL 1F05h another check 0000231C: JR Z,+14h 0000231E: LD BC,0080h 00002321: IN A,(C) in 80 --------------------- in 80 here 00002323: RLCA 00002324: JR NC,-0Dh skip back to ?A if nc (bit 7 not set after rotate) 00002326: CALL 255Eh 00002329: POP DE 0000232A: PUSH IX 0000232C: POP HL 0000232D: CALL 2568h 00002330: JR C,-28h if post check failed try again, go to B 00002332: LD A,1Eh print a 0 00002334: RST 08h 00002335: JP 24E2h -------------------------------------------------------- 00002338: CALL 1F5Eh 0000233B: LD A,(DE) 0000233C: JP 22E9h 0000233F: RST 28h 00002340: PUSH DE 00002341: CALL 2B18h 00002344: POP DE 00002345: LD A,(DE) 00002346: CP 0Dh 00002348: INC DE 00002349: PUSH IX 0000234B: JR Z,+04h 0000234D: RST 28h 0000234E: CALL 2B18h 00002351: CALL 255Eh 00002354: PUSH IX 00002356: POP BC 00002357: POP HL 00002358: LD E,L 00002359: LD D,H 0000235A: OR A 0000235B: SBC HL,BC 0000235D: CALL 256Eh 00002360: JP 24DCh ----------------------------------------------- 00002363: RST 28h called from above around 950 ? this is RST 18 ------------- 00002364: LD A,(62E5h) 00002367: BIT 7,A 00002369: CALL Z,2371h 0000236C: CALL 3497h 0000236F: LD A,L 00002370: RET ----------------------------------- 00002371: PUSH DE 00002372: LD HL,35D8h 00002375: CALL 35BAh 00002378: CALL 366Dh 0000237B: POP DE 0000237C: RET 0000237D: RST 18h ---------------------- 0000237E: PUSH HL 0000237F: INC DE 00002380: RST 18h 00002381: POP BC 00002382: OUT (C),A 00002384: RET ------------------------------------------- 00002385: RST 18h 00002386: PUSH HL 00002387: INC DE 00002388: RST 18h 00002389: POP HL 0000238A: LD (HL),A 0000238B: RET --------------------- 0000238C: RST 18h 0000238D: PUSH HL 0000238E: INC DE 0000238F: RST 18h 00002390: LD C,L 00002391: LD B,H 00002392: POP HL 00002393: LD (HL),C 00002394: INC HL 00002395: LD (HL),B 00002396: RET 00002397: PUSH AF 00002398: CALL 2218h 0000239B: PUSH HL 0000239C: LD HL,(61F6h) 0000239F: CALL 1F2Fh 000023A2: INC DE 000023A3: RST 28h 000023A4: POP HL 000023A5: PUSH DE 000023A6: INC HL 000023A7: RES 7,(HL) 000023A9: DEC HL 000023AA: EX DE,HL 000023AB: CALL 275Ch 000023AE: POP DE 000023AF: INC DE 000023B0: RST 28h 000023B1: CALL 23CCh 000023B4: LD A,(DE) 000023B5: CP 0Dh 000023B7: JR Z,+0Eh 000023B9: INC DE 000023BA: RST 28h 000023BB: CALL 23CCh 000023BE: POP AF 000023BF: CALL 1F3Eh 000023C2: LD A,0Fh 000023C4: JP 1F3Eh 000023C7: CALL 35BFh 000023CA: JR -11h 000023CC: PUSH DE 000023CD: LD B,05h 000023CF: LD DE,62E5h 000023D2: LD A,(DE) 000023D3: CALL 1F3Eh 000023D6: INC DE 000023D7: DJNZ -07h 000023D9: POP DE 000023DA: RET --------------------------------------------- 000023DB: LD HL,(620Dh) 000023DE: DEC HL 000023DF: LD A,(HL) 000023E0: CP 0Fh 000023E2: CALL NZ,3B14h 000023E5: DEC HL 000023E6: LD A,(DE) 000023E7: CP (HL) 000023E8: CALL NZ,3B14h 000023EB: DEC HL 000023EC: PUSH DE 000023ED: CALL 2423h 000023F0: POP DE 000023F1: LD A,(62E0h) 000023F4: PUSH AF 000023F5: PUSH HL 000023F6: CALL 2218h 000023F9: PUSH HL 000023FA: CALL 35B1h 000023FD: CALL 366Dh 00002400: POP HL 00002401: EX DE,HL 00002402: CALL 275Ch 00002405: POP HL 00002406: CALL 2423h 00002409: POP AF 0000240A: BIT 7,A 0000240C: PUSH HL 0000240D: CALL Z,3542h 00002410: CALL 3561h 00002413: POP HL 00002414: JR C,+08h 00002416: LD A,(HL) 00002417: DEC HL 00002418: LD L,(HL) 00002419: LD H,A 0000241A: LD (61F6h),HL 0000241D: RET ----------------------------------------------------- 0000241E: DEC HL 0000241F: LD (620Dh),HL 00002422: RET 00002423: LD BC,0005h 00002426: LD DE,62E4h 00002429: LDDR 0000242B: RET 0000242C: RST 28h 0000242D: LD A,(62E5h) 00002430: CP 80h 00002432: JR Z,+05h 00002434: INC DE 00002435: POP BC 00002436: JP 24A6h 00002439: LD IX,(61F6h) 0000243D: CALL 255Eh 00002440: LD A,(IX+00h) 00002443: CP 80h 00002445: RET Z 00002446: LD A,(IX+06h) 00002449: CP 3Ch 0000244B: RET NZ 0000244C: LD (61F6h),IX 00002450: CALL 251Bh 00002453: JR -21h 00002455: LD HL,622Dh 00002458: RES 1,(HL) 0000245A: CP DAh 0000245C: RET NZ 0000245D: SET 1,(HL) 0000245F: RET ------------------------------------- 00002460: RST 18h 00002461: LD HL,6261h 00002464: LD (62C1h),A 00002467: SET 1,(HL) 00002469: OR A 0000246A: RET NZ 0000246B: RES 1,(HL) 0000246D: RET 0000246E: LD HL,6261h 00002471: JR +03h 00002473: LD HL,622Dh 00002476: RES 0,(HL) 00002478: CP DAh 0000247A: RET NZ 0000247B: SET 0,(HL) 0000247D: RET 0000247E: LD HL,6206h 00002481: RES 7,(HL) 00002483: CP DAh 00002485: RET NZ 00002486: SET 7,(HL) 00002488: RET 00002489: PUSH HL 0000248A: LD HL,3605h 0000248D: LD (61F6h),HL 00002490: POP HL 00002491: JR +03h 00002493: LD (61F6h),HL 00002496: LD A,0Fh 00002498: RST 08h 00002499: PUSH HL 0000249A: POP IX 0000249C: LD A,(6261h) 0000249F: OR A 000024A0: CALL NZ,62B5h 000024A3: CALL 251Bh 000024A6: LD A,(DE) 000024A7: LD BC,(621Dh) 000024AB: CALL 622Ah 000024AE: RLCA 000024AF: LD L,A 000024B0: LD H,00h 000024B2: ADD HL,BC 000024B3: LD BC,24BEh 000024B6: PUSH BC 000024B7: LD A,(HL) 000024B8: INC HL 000024B9: LD H,(HL) 000024BA: LD L,A 000024BB: INC DE 000024BC: LD A,(DE) 000024BD: LD PC,HL 000024BE: LD IX,(61F6h) 000024C2: CALL 255Eh 000024C5: LD (61F6h),IX 000024C9: LD A,(IX+00h) 000024CC: CP 80h 000024CE: JR Z,+12h 000024D0: LD (6209h),IX 000024D4: CALL 1F05h 000024D7: JP Z,1E42h 000024DA: JR -40h 000024DC: LD HL,0000h 000024DF: LD (6209h),HL 000024E2: JP 38E8h 000024E5: PUSH IX 000024E7: PUSH AF 000024E8: BIT 0,A 000024EA: CALL NZ,24F6h 000024ED: POP AF 000024EE: BIT 1,A 000024F0: CALL NZ,250Ah 000024F3: POP IX 000024F5: RET 000024F6: LD HL,(61F6h) 000024F9: LD A,(HL) 000024FA: CP 80h 000024FC: RET Z 000024FD: LD A,3Ch 000024FF: RST 08h 00002500: CALL 35B1h 00002503: CALL 1D59h 00002506: LD A,3Eh 00002508: RST 08h 00002509: RET 0000250A: LD HL,(61F6h) 0000250D: LD A,(HL) 0000250E: CP 80h 00002510: RET Z 00002511: LD HL,(62C1h) 00002514: LD H,L 00002515: DEC HL 00002516: LD A,H 00002517: OR L 00002518: JR NZ,-05h 0000251A: RET 0000251B: LD DE,0006h 0000251E: ADD IX,DE 00002520: PUSH IX 00002522: POP DE 00002523: RET 00002524: CALL 2779h 00002527: LD HL,(61FEh) 0000252A: LD A,(HL) 0000252B: CP 80h 0000252D: JP Z,2489h 00002530: CALL 35B1h 00002533: PUSH HL 00002534: LD HL,0000h 00002537: LD (6209h),HL 0000253A: CALL 2B1Fh 0000253D: POP HL 0000253E: LD L,(HL) 0000253F: LD H,00h 00002541: PUSH HL 00002542: JR NZ,+08h 00002544: LD D,00h 00002546: LD E,(IX+05h) 00002549: OR A 0000254A: SBC HL,DE 0000254C: PUSH IX 0000254E: POP DE 0000254F: PUSH IX 00002551: CALL 256Eh 00002554: POP DE 00002555: POP BC 00002556: LD HL,(61FEh) 00002559: LDIR 0000255B: JP 1F6Eh 0000255E: PUSH DE 0000255F: LD E,(IX+05h) 00002562: LD D,00h 00002564: ADD IX,DE 00002566: POP DE 00002567: RET 00002568: LD A,H 00002569: SUB D 0000256A: RET NZ 0000256B: LD A,L 0000256C: SUB E 0000256D: RET 0000256E: LD A,H 0000256F: OR L 00002570: RET Z 00002571: PUSH HL 00002572: LD HL,0000h 00002575: LD (62EFh),HL 00002578: POP HL 00002579: BIT 7,H 0000257B: JR NZ,+24h 0000257D: LD BC,(61FCh) 00002581: ADD HL,BC 00002582: PUSH HL 00002583: PUSH DE 00002584: LD DE,(61EEh) 00002588: DEC D 00002589: CALL 2568h 0000258C: POP DE 0000258D: CALL NC,3B4Dh 00002590: CALL 25BBh 00002593: PUSH BC 00002594: LD L,C 00002595: LD H,B 00002596: OR A 00002597: SBC HL,DE 00002599: PUSH HL 0000259A: POP BC 0000259B: POP HL 0000259C: POP DE 0000259D: INC BC 0000259E: LDDR 000025A0: RET 000025A1: PUSH HL 000025A2: PUSH DE 000025A3: EX DE,HL 000025A4: OR A 000025A5: SBC HL,DE 000025A7: PUSH HL 000025A8: EX DE,HL 000025A9: LD HL,(61FCh) 000025AC: OR A 000025AD: SBC HL,DE 000025AF: PUSH HL 000025B0: POP BC 000025B1: POP HL 000025B2: POP DE 000025B3: INC BC 000025B4: LDIR 000025B6: POP DE 000025B7: LD HL,(61FCh) 000025BA: ADD HL,DE 000025BB: LD (61FCh),HL 000025BE: INC HL 000025BF: LD (621Fh),HL 000025C2: PUSH DE 000025C3: PUSH BC 000025C4: CALL 25CAh 000025C7: POP BC 000025C8: POP DE 000025C9: RET ---------------------------------------------------- 000025CA: LD HL,(6213h) called from main init list 000025CD: LD B,68h zero 104 locations point to by (6213) 000025CF: XOR A 000025D0: LD (HL),A 000025D1: INC HL 000025D2: DJNZ -04h 000025D4: LD HL,(6211h) 000025D7: LD E,L 000025D8: LD D,H 000025D9: INC DE 000025DA: LD BC,00D3h zero 211 locations from (6211) 000025DD: LD (HL),00h 000025DF: LDIR 000025E1: RET ----------------------------------------------------- 000025E2: LD (HL),7Dh 000025E4: INC HL 000025E5: CALL 62ACh 000025E8: LD A,(62EDh) 000025EB: CP D7h 000025ED: RET NC 000025EE: LD A,(DE) 000025EF: INC DE 000025F0: RET 000025F1: RST 20h 000025F2: LD (2377h),HL 000025F5: INC DE 000025F6: LD A,(DE) 000025F7: INC DE 000025F8: LD (HL),A 000025F9: INC HL 000025FA: CP 0Dh 000025FC: CALL Z,3B3Bh 000025FF: CP 22h 00002601: JR NZ,-0Dh 00002603: JP 0010h 00002606: CALL 2D08h 00002609: CP DAh 0000260B: JR Z,+02h 0000260D: RST 20h 0000260E: INA (77h) hmm follows a rst 20 00002610: INC HL 00002611: RST 10h 00002612: LD (HL),A 00002613: RST 20h 00002614: DEC C 00002615: RET -------------------------------------------- 00002616: CALL 25F1h 00002619: RST 20h 0000261A: DEC C 0000261B: LD (HL),A 0000261C: RET 0000261D: CALL 25F1h 00002620: CP 0Dh 00002622: JR Z,-09h 00002624: RST 20h 00002625: INC L 00002626: LD (HL),A 00002627: INC HL 00002628: INC DE 00002629: JP 2707h 0000262C: CP 22h 0000262E: JR NZ,+09h 00002630: CALL 25F1h 00002633: RST 20h 00002634: DEC SP 00002635: LD (HL),A 00002636: INC HL 00002637: INC DE 00002638: RST 10h 00002639: PUSH HL 0000263A: LD HL,(61FEh) 0000263D: LD A,(HL) 0000263E: CP 80h 00002640: CALL Z,3B4Ah 00002643: POP HL 00002644: CALL 21EAh 00002647: JR Z,+0Eh 00002649: CALL 2721h 0000264C: LD (HL),A 0000264D: CP 0Dh 0000264F: RET Z 00002650: RST 20h 00002651: INC L 00002652: INC HL 00002653: INC DE 00002654: RST 10h 00002655: JR -1Eh 00002657: CALL 21F4h 0000265A: RST 10h 0000265B: JR -11h 0000265D: CP 0Dh 0000265F: JP NZ,2707h 00002662: LD (HL),A 00002663: RET 00002664: CP 0Dh 00002666: JR Z,-06h 00002668: CALL 25E2h 0000266B: CP 0Dh 0000266D: JR Z,-0Dh 0000266F: RST 20h 00002670: INC L 00002671: LD (HL),A 00002672: INC HL 00002673: JP 2707h 00002676: POP AF 00002677: POP HL 00002678: LD A,00h 0000267A: LD (HL),A 0000267B: INC HL 0000267C: CALL 21EAh 0000267F: JR Z,+15h 00002681: CALL 2721h 00002684: CP 3Dh 00002686: JP NZ,26A6h 00002689: LD (HL),A 0000268A: INC HL 0000268B: INC DE 0000268C: CALL 25E2h 0000268F: CP 2Ch 00002691: JR Z,-19h 00002693: JP 26DBh 00002696: CALL 21F4h 00002699: RST 10h 0000269A: RST 20h 0000269B: DEC A 0000269C: LD (HL),A 0000269D: INC HL 0000269E: INC DE 0000269F: RST 10h 000026A0: CALL 2C9Dh 000026A3: INC DE 000026A4: JR -17h 000026A6: LD DE,6000h 000026A9: LD HL,(61FEh) 000026AC: PUSH HL 000026AD: CALL 2707h 000026B0: POP DE 000026B1: CALL 62AFh 000026B4: CALL 1D59h 000026B7: LD A,0Dh 000026B9: RST 08h 000026BA: JP 38E8h 000026BD: CALL 270Dh 000026C0: JP 2707h 000026C3: PUSH DE 000026C4: CALL 2D08h 000026C7: JR C,+04h 000026C9: CP D8h 000026CB: JR Z,+04h 000026CD: POP DE 000026CE: JP 2707h 000026D1: POP BC 000026D2: LD (HL),A 000026D3: INC HL 000026D4: RST 10h 000026D5: JP 273Ch 000026D8: CALL 2715h 000026DB: LD (HL),A 000026DC: RST 20h 000026DD: DEC C 000026DE: RET 000026DF: CALL 2715h 000026E2: RST 20h 000026E3: DEC A 000026E4: INC DE 000026E5: LD (HL),A 000026E6: INC HL 000026E7: CALL 25E2h 000026EA: RST 20h 000026EB: LD (IX+23h),A 000026EE: CALL 25E2h 000026F1: CP 0Dh 000026F3: JP Z,2662h 000026F6: RST 20h 000026F7: CALL C,2377h 000026FA: JP 2707h 000026FD: CALL 25E2h 00002700: RST 20h 00002701: RST 10h 00002702: LD (HL),A 00002703: INC HL 00002704: JP 27A9h 00002707: CALL 25E2h 0000270A: JP 26DBh 0000270D: CALL 25E2h 00002710: RST 20h 00002711: INC L 00002712: LD (HL),A 00002713: INC HL 00002714: RET 00002715: CALL 34F5h 00002718: CALL C,3B3Bh 0000271B: LD (HL),A 0000271C: INC DE 0000271D: INC HL 0000271E: JP 0010h 00002721: CALL 34F5h 00002724: JP C,26A6h 00002727: LD (HL),A 00002728: INC HL 00002729: INC DE 0000272A: RST 10h 0000272B: CP 28h 0000272D: RET NZ 0000272E: LD (HL),28h 00002730: INC HL 00002731: INC DE 00002732: CALL 25E2h 00002735: RST 20h 00002736: ADD HL,HL 00002737: LD (HL),A 00002738: INC HL 00002739: JP 0010h 0000273C: LD A,(DE) 0000273D: LD (HL),A 0000273E: CP 0Dh 00002740: RET Z 00002741: INC HL 00002742: INC DE 00002743: JR -09h 00002745: CALL 2721h 00002748: LD (HL),A 00002749: CP 2Ch 0000274B: JR NZ,+09h 0000274D: INC HL 0000274E: INC DE 0000274F: CALL 2721h 00002752: LD (HL),A 00002753: CP 0Dh 00002755: RET Z 00002756: CALL 3B38h 00002759: LD DE,62E0h 0000275C: LD HL,62E5h 0000275F: LD BC,0005h 00002762: LDIR 00002764: RET 00002765: LD A,(622Eh) 00002768: OR A 00002769: JP Z,2792h 0000276C: PUSH HL 0000276D: LD HL,62F3h 00002770: PUSH DE 00002771: CALL 35B1h 00002774: POP DE 00002775: POP HL 00002776: JP 2796h 00002779: CALL 2765h 0000277C: INC HL 0000277D: LD (HL),80h 0000277F: LD DE,(61FEh) 00002783: PUSH DE 00002784: POP IX 00002786: OR A 00002787: SBC HL,DE 00002789: XOR A 0000278A: CP H 0000278B: CALL NZ,3B20h 0000278E: LD (IX+05h),L 00002791: RET 00002792: RST 10h 00002793: CALL 1B98h 00002796: LD A,(62E5h) 00002799: BIT 7,A 0000279B: JP Z,26A6h 0000279E: PUSH DE 0000279F: LD DE,(61FEh) 000027A3: CALL 275Ch 000027A6: EX DE,HL 000027A7: INC HL 000027A8: POP DE 000027A9: RST 10h 000027AA: CALL 6227h 000027AD: PUSH HL 000027AE: LD HL,(6219h) 000027B1: LD B,(HL) 000027B2: PUSH BC 000027B3: CALL 1949h 000027B6: JP C,2676h 000027B9: POP AF 000027BA: SUB B 000027BB: POP HL 000027BC: LD (HL),A 000027BD: INC HL 000027BE: LD IX,(621Bh) 000027C2: RLCA 000027C3: LD C,A 000027C4: LD B,00h 000027C6: ADD IX,BC 000027C8: LD C,(IX+00h) 000027CB: LD B,(IX+01h) 000027CE: PUSH BC 000027CF: JP 0010h 000027D2: CALL 352Ah 000027D5: LD HL,(6219h) 000027D8: LD B,A 000027D9: INC B 000027DA: CALL 1893h 000027DD: CALL 1870h 000027E0: CALL 352Ah 000027E3: INC DE 000027E4: RET 000027E5: PUSH IX 000027E7: POP HL 000027E8: PUSH HL 000027E9: CALL 35B1h 000027EC: CALL 1D59h 000027EF: CALL 285Fh 000027F2: CALL 2877h 000027F5: CALL 251Bh 000027F8: LD A,(DE) 000027F9: PUSH AF 000027FA: CALL 27D2h 000027FD: POP AF 000027FE: CP 3Ch 00002800: JR Z,-0Ah 00002802: CP 33h 00002804: JP Z,0F0Ah 00002807: DEC DE 00002808: INC DE 00002809: LD A,(DE) 0000280A: CP 7Bh 0000280C: RET Z 0000280D: CP 0Dh 0000280F: JR Z,+2Fh 00002811: CP 7Dh 00002813: JR Z,+0Fh 00002815: CP 80h 00002817: JR NC,+11h 00002819: RST 08h 0000281A: CP 22h 0000281C: JR NZ,-16h 0000281E: CALL 2257h 00002821: RST 08h 00002822: JR -1Ch 00002824: INC DE 00002825: CALL 62A9h 00002828: JR -22h 0000282A: CP DFh 0000282C: PUSH AF 0000282D: CALL C,352Ah 00002830: CALL 1857h 00002833: POP AF 00002834: PUSH AF 00002835: CALL C,352Ah 00002838: POP AF 00002839: INC DE 0000283A: CP D7h 0000283C: JR Z,-46h 0000283E: JR -37h 00002840: POP IX 00002842: CALL 284Ch 00002845: LD A,1Eh 00002847: RST 08h 00002848: LD A,1Fh 0000284A: RST 08h 0000284B: RET 0000284C: LD A,(IX+06h) 0000284F: CP 36h 00002851: JR Z,+07h 00002853: CP 0Fh 00002855: JR Z,+03h 00002857: CP 38h 00002859: RET NZ 0000285A: LD HL,62EEh 0000285D: INC (HL) 0000285E: RET 0000285F: LD A,(IX+06h) 00002862: CP 37h 00002864: JR Z,+07h 00002866: CP 05h 00002868: JR Z,+03h 0000286A: CP 39h 0000286C: RET NZ 0000286D: LD A,(62EEh) 00002870: OR A 00002871: RET Z 00002872: DEC A 00002873: LD (62EEh),A 00002876: RET 00002877: LD A,(62EEh) 0000287A: OR A 0000287B: RET Z 0000287C: CP 0Ah 0000287E: JR C,+02h 00002880: LD A,0Ah 00002882: RLCA 00002883: LD B,A 00002884: CALL 352Ah 00002887: DJNZ -05h 00002889: RET ------------------------------------ 0000288A: LD HL,28CFh 0000288D: PUSH DE 0000288E: LD DE,62F3h 00002891: LD BC,000Ah 00002894: LDIR 00002896: POP DE 00002897: CP 0Dh 00002899: JR Z,+2Eh 0000289B: RST 28h 0000289C: LD A,(62E5h) 0000289F: PUSH DE 000028A0: CP C0h 000028A2: CALL C,3B29h 000028A5: CP C7h 000028A7: CALL NC,3B29h 000028AA: LD DE,62F3h 000028AD: CALL 275Ch 000028B0: POP DE 000028B1: LD A,(DE) 000028B2: CP 0Dh 000028B4: JR Z,+13h 000028B6: INC DE 000028B7: RST 28h 000028B8: LD A,(62E5h) 000028BB: CP C0h 000028BD: JR C,-1Dh 000028BF: CP F0h 000028C1: JR NC,-1Ch 000028C3: LD DE,62F8h 000028C6: CALL 275Ch 000028C9: LD A,01h 000028CB: LD (622Eh),A 000028CE: RET ------------------------------------------- 000028CF: JP NZ,0010h 000028D2: NOP 000028D3: NOP 000028D4: POP BC 000028D5: DJNZ +00h 000028D7: NOP 000028D8: NOP -------------------------- 000028D9: LD A,(62E5h) 000028DC: CP C0h 000028DE: JP C,35AEh 000028E1: CP C8h 000028E3: CALL NC,3B23h 000028E6: SUB BFh 000028E8: LD B,A 000028E9: LD C,00h 000028EB: PUSH BC 000028EC: CALL 3656h 000028EF: POP BC 000028F0: AND 0Fh 000028F2: CP 02h 000028F4: CALL NC,3B23h 000028F7: CP 01h 000028F9: CCF 000028FA: RL C 000028FC: DJNZ -13h 000028FE: LD L,C 000028FF: LD H,00h 00002901: JP 34C4h 00002904: LD HL,(61F6h) 00002907: CALL 1F2Fh 0000290A: LD A,04h 0000290C: CALL 1F3Eh 0000290F: LD C,02h 00002911: LD HL,(62EFh) 00002914: LD A,L 00002915: OR H 00002916: PUSH HL 00002917: POP IX 00002919: CALL Z,293Fh 0000291C: LD C,02h 0000291E: CALL 22ADh 00002921: CP 0Dh 00002923: RET Z 00002924: LD A,(DE) 00002925: CP 29h 00002927: RET Z 00002928: INC HL 00002929: INC DE 0000292A: PUSH HL 0000292B: RST 28h 0000292C: POP HL 0000292D: PUSH DE 0000292E: EX DE,HL 0000292F: CALL 2218h 00002932: PUSH DE 00002933: INC HL 00002934: RES 7,(HL) 00002936: DEC HL 00002937: EX DE,HL 00002938: CALL 275Ch 0000293B: POP HL 0000293C: POP DE 0000293D: JR -1Bh 0000293F: LD IX,(61FAh) 00002943: CALL 2190h 00002946: CALL C,3B2Ch 00002949: LD (62EFh),IX 0000294D: RET --------------------------------------------- 0000294E: LD A,(DE) 0000294F: INC DE 00002950: LD (HL),A 00002951: CP 0Dh 00002953: JR Z,+06h 00002955: INC HL 00002956: CP 28h 00002958: JR NZ,-0Ch 0000295A: RET 0000295B: POP BC 0000295C: RET -------------------------------------------- 0000295D: CALL 294Eh 00002960: CALL 25E2h 00002963: LD (HL),A 00002964: INC HL 00002965: CP 2Ch 00002967: JR Z,-09h 00002969: RST 20h 0000296A: ADD HL,HL 0000296B: RST 10h 0000296C: JP 26DBh 0000296F: CALL 294Eh 00002972: RST 10h 00002973: CALL 34F5h 00002976: CALL C,3B3Bh 00002979: LD (HL),A 0000297A: INC DE 0000297B: RST 10h 0000297C: INC HL 0000297D: LD A,(DE) 0000297E: LD (HL),A 0000297F: INC HL 00002980: INC DE 00002981: CP 2Ch 00002983: JR Z,-13h 00002985: JP 2969h 00002988: CALL 1F55h 0000298B: CP 04h 0000298D: CALL NZ,3AFCh 00002990: JP 207Ch 00002993: INC DE 00002994: RST 28h 00002995: PUSH DE 00002996: CALL 3497h 00002999: POP DE 0000299A: CALL 2234h io rout abov 0000299D: LD A,48h 0000299F: RST 08h 000029A0: JP 29A9h 000029A3: RST 28h 000029A4: PUSH DE 000029A5: CALL 1D59h 000029A8: POP DE 000029A9: LD C,00h 000029AB: LD A,(DE) 000029AC: CP 0Dh 000029AE: JR Z,+26h 000029B0: CP 2Ch 000029B2: JR Z,+29h 000029B4: CP 3Bh 000029B6: JR Z,+28h 000029B8: CP 23h 000029BA: JR Z,-29h 000029BC: CP 7Dh 000029BE: JR Z,-1Dh 000029C0: CP DEh 000029C2: JP Z,29E5h 000029C5: CP D9h 000029C7: JP Z,29F8h 000029CA: CALL 2BDDh 000029CD: LD HL,6407h 000029D0: CALL 105Eh 000029D3: JP 29A9h 000029D6: LD A,C 000029D7: OR A 000029D8: RET NZ 000029D9: LD A,0Dh 000029DB: RST 08h 000029DC: RET ----------------------------------------------- 000029DD: LD A,09h 000029DF: RST 08h 000029E0: LD C,01h 000029E2: INC DE 000029E3: JR -3Ah 000029E5: INC DE 000029E6: RST 18h 000029E7: RLCA 000029E8: ADD L 000029E9: LD HL,(6254h) 000029EC: CP L 000029ED: JR C,+06h 000029EF: LD (6254h),A 000029F2: LD A,1Eh 000029F4: RST 08h 000029F5: JP 29A9h ------------------------------ 000029F8: INC DE 000029F9: RST 18h 000029FA: LD (6254h),HL 000029FD: INC DE 000029FE: RST 18h 000029FF: LD (6255h),A 00002A02: JR -0Fh 00002A04: LD (HL),A 00002A05: INC DE 00002A06: INC HL 00002A07: JR +3Ah 00002A09: CALL 2C9Dh 00002A0C: JR +02h 00002A0E: INC HL 00002A0F: INC DE 00002A10: RST 10h 00002A11: LD (HL),A 00002A12: CP 0Dh 00002A14: RET Z 00002A15: CP 23h 00002A17: JR Z,-15h 00002A19: CP 2Ch 00002A1B: JR Z,-0Fh 00002A1D: CP 3Bh 00002A1F: JR Z,-13h 00002A21: CALL 2B4Bh 00002A24: JR Z,-1Dh 00002A26: PUSH DE 00002A27: CALL 2D08h 00002A2A: JR C,+16h 00002A2C: CP DEh 00002A2E: JR Z,+0Eh 00002A30: CP D9h 00002A32: JR NZ,+0Eh 00002A34: POP BC 00002A35: LD (HL),A 00002A36: INC HL 00002A37: CALL 25E2h 00002A3A: RST 20h 00002A3B: INC L 00002A3C: JR +01h 00002A3E: POP BC 00002A3F: LD (HL),A 00002A40: INC HL 00002A41: PUSH DE 00002A42: POP DE 00002A43: CALL 25E2h 00002A46: CP 80h 00002A48: CALL NC,3B3Bh 00002A4B: DEC DE 00002A4C: JR -3Dh 00002A4E: RST 18h 00002A4F: EX DE,HL 00002A50: LD HL,(61EEh) 00002A53: INC HL 00002A54: INC HL 00002A55: PUSH HL 00002A56: OR A 00002A57: SBC HL,DE 00002A59: CALL C,3B29h 00002A5C: LD HL,(621Fh) 00002A5F: INC H 00002A60: INC H 00002A61: SBC HL,DE 00002A63: CALL NC,3B29h 00002A66: POP HL 00002A67: DEC H 00002A68: DEC D 00002A69: LD BC,0100h 00002A6C: LDIR 00002A6E: OR A 00002A6F: EX DE,HL 00002A70: SBC HL,DE 00002A72: EX DE,HL 00002A73: LD HL,(61EEh) 00002A76: ADD HL,DE 00002A77: LD (61EEh),HL 00002A7A: EX DE,HL 00002A7B: ADD HL,SP 00002A7C: LD SP,HL 00002A7D: RET ------------------------------------------------- 00002A7E: CALL 288Ah 00002A81: XOR A 00002A82: LD (622Eh),A 00002A85: LD IX,(61FAh) 00002A89: LD A,(IX+00h) 00002A8C: CP 80h 00002A8E: JR Z,+61h 00002A90: PUSH IX 00002A92: CALL 251Bh 00002A95: LD A,(DE) 00002A96: CP 27h 00002A98: JR NZ,+0Ah 00002A9A: CALL 17FCh 00002A9D: LD A,(DE) 00002A9E: CP D7h 00002AA0: JR NZ,-08h 00002AA2: INC DE 00002AA3: LD A,(DE) 00002AA4: CP 3Ch 00002AA6: JR NZ,+02h 00002AA8: INC DE 00002AA9: LD A,(DE) 00002AAA: CP 10h 00002AAC: JR Z,+0Ch 00002AAE: CP 14h 00002AB0: JR Z,+08h 00002AB2: CP 11h 00002AB4: JR Z,+04h 00002AB6: CP 20h 00002AB8: JR NZ,+30h 00002ABA: INC DE 00002ABB: LD A,(DE) 00002ABC: CP 7Dh 00002ABE: JR NZ,+2Ah 00002AC0: INC DE 00002AC1: LD A,(DE) 00002AC2: CP 7Eh 00002AC4: JR NZ,+24h 00002AC6: INC DE 00002AC7: PUSH DE 00002AC8: EX DE,HL 00002AC9: CALL 35B1h 00002ACC: CALL 2B1Fh 00002ACF: LD L,C 00002AD0: LD H,B 00002AD1: CALL 34C4h 00002AD4: LD HL,62F8h 00002AD7: CALL 35BAh 00002ADA: CALL 36C8h 00002ADD: LD HL,62F3h 00002AE0: CALL 35BAh 00002AE3: CALL 366Dh 00002AE6: POP DE 00002AE7: CALL 275Ch 00002AEA: POP IX 00002AEC: CALL 255Eh 00002AEF: JR -68h 00002AF1: LD IX,(61FAh) 00002AF5: LD HL,62F3h 00002AF8: CALL 35B1h 00002AFB: LD A,(IX+00h) 00002AFE: CP 80h 00002B00: RET Z 00002B01: PUSH IX 00002B03: POP DE 00002B04: PUSH DE 00002B05: CALL 275Ch 00002B08: LD HL,62F8h 00002B0B: CALL 35BAh 00002B0E: CALL 366Dh 00002B11: POP IX 00002B13: CALL 255Eh 00002B16: JR -1Dh 00002B18: CALL 2B1Fh 00002B1B: CALL NZ,3B2Ch 00002B1E: RET ----------------------------------------------- 00002B1F: LD IX,(61FAh) 00002B23: LD BC,0000h 00002B26: LD A,(IX+00h) 00002B29: CP 80h 00002B2B: JR Z,+1Ch 00002B2D: PUSH IX 00002B2F: POP DE 00002B30: LD HL,62E5h 00002B33: PUSH BC 00002B34: LD B,05h 00002B36: LD A,(DE) 00002B37: CP (HL) 00002B38: JR C,+08h 00002B3A: JR NZ,+04h 00002B3C: INC HL 00002B3D: INC DE 00002B3E: DJNZ -0Ah 00002B40: POP BC 00002B41: RET ---------------------------------------------- 00002B42: POP BC 00002B43: INC BC 00002B44: CALL 255Eh 00002B47: JR -23h 00002B49: OR A 00002B4A: RET ----------------------------------------- 00002B4B: RST 10h 00002B4C: CP 22h 00002B4E: RET Z 00002B4F: CALL 21EAh 00002B52: RET Z 00002B53: PUSH DE 00002B54: CALL 2D08h 00002B57: POP DE 00002B58: CP DFh 00002B5A: RET C 00002B5B: CP E7h 00002B5D: DEC A 00002B5E: RET NC 00002B5F: CP A 00002B60: RET ------------------------------------------- 00002B61: PUSH IX 00002B63: LD A,(DE) 00002B64: RST 20h 00002B65: LD A,L 00002B66: INC DE 00002B67: CALL 33ADh 00002B6A: CALL 3497h 00002B6D: POP IX 00002B6F: RET 00002B70: LD (IX+00h),A 00002B73: INC IX 00002B75: RET -------------------------------------------- 00002B76: PUSH IX 00002B78: INC DE 00002B79: CALL 33ADh 00002B7C: POP IX 00002B7E: PUSH DE 00002B7F: LD HL,(6200h) 00002B82: PUSH HL 00002B83: LD HL,2B70h 00002B86: LD (6200h),HL 00002B89: CALL 1D59h 00002B8C: POP HL 00002B8D: LD (6200h),HL 00002B90: POP DE 00002B91: JR +2Fh 00002B93: CALL 202Fh 00002B96: OR A 00002B97: JR Z,+2Ah 00002B99: LD (IX+00h),A 00002B9C: INC IX 00002B9E: JR +23h 00002BA0: CALL 202Fh 00002BA3: OR A 00002BA4: JR Z,-06h 00002BA6: JR -0Fh 00002BA8: CALL 62BEh 00002BAB: LD A,(HL) 00002BAC: CP 0Dh 00002BAE: JR Z,+12h 00002BB0: CP 61h 00002BB2: JR C,+06h 00002BB4: CP 7Bh 00002BB6: JR NC,+02h 00002BB8: RES 5,A 00002BBA: LD (IX+00h),A 00002BBD: INC IX 00002BBF: INC HL 00002BC0: JR -17h 00002BC2: INC DE 00002BC3: PUSH IX 00002BC5: POP HL 00002BC6: LD (HL),0Dh 00002BC8: PUSH HL 00002BC9: LD BC,6407h 00002BCC: OR A 00002BCD: SBC HL,BC 00002BCF: INC H 00002BD0: DEC H 00002BD1: CALL NZ,3B47h 00002BD4: POP IX 00002BD6: LD A,(DE) 00002BD7: CP 2Bh 00002BD9: RET NZ 00002BDA: INC DE 00002BDB: JR +08h 00002BDD: LD IY,6507h 00002BE1: LD IX,6407h 00002BE5: LD A,(DE) 00002BE6: CP 22h 00002BE8: JR Z,+2Bh 00002BEA: CALL 21EAh 00002BED: JR Z,+31h 00002BEF: LD A,(DE) 00002BF0: INC DE 00002BF1: CP E3h 00002BF3: JR Z,-4Dh 00002BF5: CP E6h 00002BF7: JP Z,2B76h 00002BFA: CP E5h 00002BFC: JR Z,-5Eh 00002BFE: CP E4h 00002C00: JR Z,-6Fh 00002C02: CP DFh 00002C04: JR Z,+22h 00002C06: CP E0h 00002C08: JR Z,+28h 00002C0A: CP E1h 00002C0C: JR Z,+55h 00002C0E: CP E2h 00002C10: JR Z,+2Fh 00002C12: CALL 3B38h 00002C15: INC DE 00002C16: LD B,00h 00002C18: EX DE,HL 00002C19: CALL 2C7Fh 00002C1C: EX DE,HL 00002C1D: INC DE 00002C1E: JR -5Dh 00002C20: CALL 62BEh 00002C23: CALL 2C7Fh 00002C26: JR -65h 00002C28: CALL 2B61h 00002C2B: LD (IX+00h),L 00002C2E: INC IX 00002C30: JR -70h 00002C32: CALL 62BEh 00002C35: PUSH HL 00002C36: INC DE 00002C37: CALL 2B61h 00002C3A: LD B,L 00002C3B: POP HL 00002C3C: CALL 3FE5h 00002C3F: JR -7Fh 00002C41: CALL 62BEh 00002C44: INC DE 00002C45: PUSH HL 00002C46: CALL 2B61h 00002C49: INC DE 00002C4A: PUSH HL 00002C4B: CALL 2B61h 00002C4E: LD C,L 00002C4F: POP HL 00002C50: LD B,L 00002C51: POP HL 00002C52: LD A,(HL) 00002C53: CP 0Dh 00002C55: JP Z,2BC2h 00002C58: INC HL 00002C59: DJNZ -09h 00002C5B: DEC HL 00002C5C: LD B,C 00002C5D: CALL 3FE5h 00002C60: JP 2BC2h 00002C63: CALL 62BEh 00002C66: INC DE 00002C67: PUSH HL 00002C68: CALL 2B61h 00002C6B: LD C,L 00002C6C: POP HL 00002C6D: PUSH HL 00002C6E: LD B,00h 00002C70: INC B 00002C71: LD A,(HL) 00002C72: INC HL 00002C73: CP 0Dh 00002C75: JR NZ,-07h 00002C77: LD A,B 00002C78: SUB C 00002C79: CALL C,3B47h 00002C7C: LD B,A 00002C7D: JR -2Eh 00002C7F: LD A,(HL) 00002C80: CP 22h 00002C82: RET Z 00002C83: CP 0Dh 00002C85: RET Z 00002C86: LD (IX+00h),A 00002C89: INC IX 00002C8B: INC HL 00002C8C: DJNZ -0Fh 00002C8E: RET ---------------------------------------------------------- 00002C8F: CALL 21F4h 00002C92: RST 10h 00002C93: CP 29h 00002C95: LD (HL),A 00002C96: INC HL 00002C97: INC DE 00002C98: CALL NZ,3B44h 00002C9B: JR +10h 00002C9D: CALL 21EAh 00002CA0: JR Z,+61h 00002CA2: CALL 2D08h 00002CA5: LD (HL),A 00002CA6: INC HL 00002CA7: JR NC,+0Dh 00002CA9: DEC HL 00002CAA: CALL 25F1h 00002CAD: RST 10h 00002CAE: CP 2Bh 00002CB0: RET NZ 00002CB1: INC DE 00002CB2: LD (HL),A 00002CB3: INC HL 00002CB4: JR -19h 00002CB6: CP DFh 00002CB8: JR Z,+2Eh 00002CBA: CP E6h 00002CBC: JR Z,+2Ah 00002CBE: CP E4h 00002CC0: JR Z,-15h 00002CC2: CP E5h 00002CC4: JR Z,-19h 00002CC6: CP E3h 00002CC8: JR Z,-3Bh 00002CCA: CP E2h 00002CCC: JR Z,+20h 00002CCE: CP E0h 00002CD0: JR Z,+05h 00002CD2: CP E1h 00002CD4: CALL NZ,3B38h 00002CD7: CALL 21EAh 00002CDA: CALL NZ,3B3Bh 00002CDD: CALL 21F4h 00002CE0: RST 10h 00002CE1: INC DE 00002CE2: CP 2Ch 00002CE4: JR NZ,-0Ch 00002CE6: LD (HL),A 00002CE7: INC HL 00002CE8: DEC DE 00002CE9: CALL 2731h 00002CEC: JR -40h 00002CEE: CALL 21EAh 00002CF1: JR NZ,-19h 00002CF3: CALL 21F4h 00002CF6: RST 10h 00002CF7: INC DE 00002CF8: CP 2Ch 00002CFA: JR NZ,-22h 00002CFC: LD (HL),A 00002CFD: INC HL 00002CFE: CALL 25E2h 00002D01: JR -21h 00002D03: CALL 21F4h 00002D06: JR -5Bh 00002D08: PUSH HL 00002D09: CALL 1943h 00002D0C: POP HL 00002D0D: RET ------------------------------------------------- 00002D0E: LD DE,6407h 00002D11: JP 1B98h 00002D14: LD HL,6407h 00002D17: LD B,FFh 00002D19: INC B 00002D1A: LD A,(HL) 00002D1B: INC HL 00002D1C: CP 0Dh 00002D1E: JR NZ,-07h 00002D20: LD L,B 00002D21: LD H,00h 00002D23: JP 34C4h 00002D26: LD HL,6407h 00002D29: LD L,(HL) 00002D2A: JR -0Bh 00002D2C: CALL 2D67h 00002D2F: PUSH IX 00002D31: DEC HL 00002D32: PUSH HL 00002D33: INC B 00002D34: PUSH BC 00002D35: INC DE 00002D36: CALL 2B61h 00002D39: INC DE 00002D3A: POP BC 00002D3B: PUSH DE 00002D3C: PUSH HL 00002D3D: LD HL,(62C2h) 00002D40: INC HL 00002D41: LD A,(HL) 00002D42: INC HL 00002D43: LD H,(HL) 00002D44: LD L,A 00002D45: EX DE,HL 00002D46: POP HL 00002D47: EX DE,HL 00002D48: CALL 2568h 00002D4B: EX DE,HL 00002D4C: CALL C,3B26h 00002D4F: LD E,L 00002D50: LD D,H 00002D51: ADD HL,DE 00002D52: DJNZ -03h 00002D54: POP DE 00002D55: POP BC 00002D56: ADD HL,BC 00002D57: LD B,(HL) 00002D58: INC HL 00002D59: POP IX 00002D5B: RET 00002D5C: LD A,(DE) 00002D5D: INC DE 00002D5E: INC DE 00002D5F: LD C,A 00002D60: LD A,(DE) 00002D61: CP 28h 00002D63: LD A,C 00002D64: JP Z,2D2Ch 00002D67: SUB 41h 00002D69: RLCA 00002D6A: RLCA 00002D6B: LD HL,(6213h) 00002D6E: LD C,A 00002D6F: LD B,00h 00002D71: ADD HL,BC 00002D72: EX AF,AF' 00002D73: LD A,(HL) 00002D74: INC HL 00002D75: OR (HL) 00002D76: LD A,10h 00002D78: JR Z,+0Ah 00002D7A: LD (62C2h),HL 00002D7D: LD A,(HL) 00002D7E: DEC HL 00002D7F: LD L,(HL) 00002D80: LD H,A 00002D81: LD B,(HL) 00002D82: INC HL 00002D83: RET 00002D84: LD BC,2D6Bh 00002D87: PUSH BC 00002D88: LD BC,(621Fh) 00002D8C: LD (HL),B 00002D8D: DEC HL 00002D8E: LD (HL),C 00002D8F: LD (BC),A 00002D90: LD L,A 00002D91: LD H,00h 00002D93: INC HL 00002D94: INC BC 00002D95: LD A,0Dh 00002D97: LD (BC),A 00002D98: ADD HL,BC 00002D99: LD (621Fh),HL 00002D9C: INC H 00002D9D: SBC HL,SP 00002D9F: CALL NC,3B4Dh 00002DA2: EX AF,AF' 00002DA3: RET 00002DA4: PUSH BC 00002DA5: PUSH HL 00002DA6: INC DE 00002DA7: RST 18h 00002DA8: INC DE 00002DA9: LD A,L 00002DAA: OR H 00002DAB: POP IX 00002DAD: LD (IX+01h),L 00002DB0: LD (IX+02h),H 00002DB3: POP BC 00002DB4: JR Z,+13h 00002DB6: LD A,B 00002DB7: PUSH AF 00002DB8: PUSH HL 00002DB9: LD BC,(621Fh) 00002DBD: CALL 2D8Fh 00002DC0: POP HL 00002DC1: POP AF 00002DC2: LD C,A 00002DC3: DEC HL 00002DC4: LD A,H 00002DC5: OR L 00002DC6: LD A,C 00002DC7: JR NZ,-12h 00002DC9: LD A,(DE) 00002DCA: RET 00002DCB: CALL 21EAh 00002DCE: JR NZ,+3Ah 00002DD0: LD A,(DE) 00002DD1: INC DE 00002DD2: INC DE 00002DD3: INC DE 00002DD4: PUSH AF 00002DD5: RST 18h 00002DD6: INC DE 00002DD7: INC H 00002DD8: DEC H 00002DD9: CALL NZ,3B29h 00002DDC: BIT 7,L 00002DDE: CALL NZ,3B29h 00002DE1: INC L 00002DE2: DEC L 00002DE3: CALL Z,3B29h 00002DE6: LD B,L 00002DE7: POP AF 00002DE8: PUSH DE 00002DE9: SUB 41h 00002DEB: RLCA 00002DEC: RLCA 00002DED: LD E,A 00002DEE: LD D,00h 00002DF0: LD HL,(6213h) 00002DF3: ADD HL,DE 00002DF4: INC HL 00002DF5: PUSH HL 00002DF6: LD A,B 00002DF7: PUSH BC 00002DF8: CALL 3FDAh 00002DFB: POP BC 00002DFC: POP HL 00002DFD: POP DE 00002DFE: LD A,(DE) 00002DFF: CP 28h 00002E01: CALL Z,2DA4h 00002E04: CP 2Ch 00002E06: INC DE 00002E07: JR Z,-3Eh 00002E09: RET 00002E0A: CALL 1E0Fh 00002E0D: LD A,(IX+00h) 00002E10: OR (IX+01h) 00002E13: CALL NZ,3B2Fh 00002E16: LD A,F0h 00002E18: AND H 00002E19: CALL NZ,3B3Eh 00002E1C: PUSH DE 00002E1D: LD DE,(621Fh) 00002E21: LD (IX+02h),L 00002E24: LD (IX+03h),H 00002E27: INC HL 00002E28: PUSH HL 00002E29: LD C,L 00002E2A: LD B,H 00002E2B: ADD HL,HL 00002E2C: ADD HL,HL 00002E2D: ADD HL,BC 00002E2E: ADD HL,DE 00002E2F: LD A,C0h 00002E31: AND H 00002E32: CALL Z,3B3Eh 00002E35: EX DE,HL 00002E36: LD HL,0000h 00002E39: ADD HL,SP 00002E3A: DEC H 00002E3B: SBC HL,DE 00002E3D: CALL C,3B3Eh 00002E40: LD BC,(621Fh) 00002E44: LD (IX+00h),C 00002E47: LD (IX+01h),B 00002E4A: LD (621Fh),DE 00002E4E: LD L,C 00002E4F: LD H,B 00002E50: POP BC 00002E51: LD DE,0005h 00002E54: INC HL 00002E55: LD (HL),FFh 00002E57: ADD HL,DE 00002E58: DEC BC 00002E59: LD A,B 00002E5A: OR C 00002E5B: JR NZ,-08h 00002E5D: POP DE 00002E5E: LD A,(DE) 00002E5F: CP 2Ch 00002E61: INC DE 00002E62: JP Z,2DCBh 00002E65: RET 00002E66: CALL 21EAh 00002E69: JR NZ,+11h 00002E6B: CALL 21F4h 00002E6E: CALL 2206h 00002E71: RST 10h 00002E72: LD (HL),A 00002E73: CP 0Dh 00002E75: RET Z 00002E76: INC HL 00002E77: RST 20h 00002E78: INC L 00002E79: INC DE 00002E7A: JR -16h 00002E7C: CALL 2721h 00002E7F: DEC HL 00002E80: LD A,29h 00002E82: CP (HL) 00002E83: CALL NZ,3B3Bh 00002E86: INC HL 00002E87: LD A,(DE) 00002E88: LD (HL),A 00002E89: CP 0Dh 00002E8B: RET Z 00002E8C: RST 20h 00002E8D: INC L 00002E8E: INC HL 00002E8F: INC DE 00002E90: RST 10h 00002E91: JR -2Dh 00002E93: LD A,(622Dh) 00002E96: BIT 0,A 00002E98: RET Z 00002E99: LD A,(62E5h) 00002E9C: AND 7Fh 00002E9E: ADD 81h 00002EA0: RET Z 00002EA1: LD HL,62E9h 00002EA4: LD A,(HL) 00002EA5: CP 50h 00002EA7: LD (HL),00h 00002EA9: RET C 00002EAA: SCF 00002EAB: LD B,03h 00002EAD: PUSH DE 00002EAE: DEC HL 00002EAF: LD A,00h 00002EB1: ADC (HL) 00002EB2: DAA 00002EB3: LD (HL),A 00002EB4: DJNZ -08h 00002EB6: CALL 359Ah 00002EB9: POP DE 00002EBA: RET 00002EBB: CALL 2759h 00002EBE: JP 36C8h 00002EC1: PUSH IY 00002EC3: CALL 2EFFh 00002EC6: POP IY 00002EC8: LD B,(IX+00h) 00002ECB: INC IX 00002ECD: LD HL,62E5h 00002ED0: PUSH BC 00002ED1: CALL 2F20h 00002ED4: POP BC 00002ED5: PUSH BC 00002ED6: PUSH IY 00002ED8: CALL 2F0Eh 00002EDB: POP IY 00002EDD: CALL 36C8h 00002EE0: CALL 2F1Dh 00002EE3: CALL 366Dh 00002EE6: POP BC 00002EE7: DJNZ -14h 00002EE9: RET 00002EEA: CALL 2EF0h 00002EED: CALL 3542h 00002EF0: LD HL,62EAh 00002EF3: LD B,05h 00002EF5: DEC IY 00002EF7: DEC HL 00002EF8: LD A,(IY+00h) 00002EFB: LD (HL),A 00002EFC: DJNZ -09h 00002EFE: RET 00002EFF: LD HL,62E5h 00002F02: LD B,05h 00002F04: LD A,(HL) 00002F05: LD (IY+00h),A 00002F08: INC IY 00002F0A: INC HL 00002F0B: DJNZ -09h 00002F0D: RET 00002F0E: LD B,05h 00002F10: LD HL,62E0h 00002F13: LD A,(IY+00h) 00002F16: LD (HL),A 00002F17: INC IY 00002F19: INC HL 00002F1A: DJNZ -09h 00002F1C: RET 00002F1D: LD HL,62E0h 00002F20: LD B,05h 00002F22: LD A,(IX+00h) 00002F25: LD (HL),A 00002F26: INC IX 00002F28: INC HL 00002F29: DJNZ -09h 00002F2B: RET 00002F2C: POP IX 00002F2E: LD A,(62E5h) 00002F31: PUSH AF 00002F32: LD HL,(62E6h) 00002F35: PUSH HL 00002F36: LD HL,(62E8h) 00002F39: PUSH HL 00002F3A: LD PC,IX 00002F3C: POP IX 00002F3E: POP HL 00002F3F: LD (62E3h),HL 00002F42: POP HL 00002F43: LD (62E1h),HL 00002F46: POP AF 00002F47: LD (62E0h),A 00002F4A: LD PC,IX 00002F4C: CALL 30E4h 00002F4F: LD HL,35F1h 00002F52: CALL 35BAh 00002F55: JP 37B0h 00002F58: LD A,(62E5h) 00002F5B: CP 80h 00002F5D: JP Z,35AEh 00002F60: PUSH AF 00002F61: JP 3FEBh 00002F64: CALL 366Ah JUMPBLOCK ============= 00002F67: CALL 2F3Ch 00002F6A: CALL 37B0h 00002F6D: CALL 3052h 00002F70: CALL 2FD9h JUMPBLOCK ============= 00002F73: CALL 2759h 00002F76: CALL 366Dh 00002F79: POP AF 00002F7A: RLA 00002F7B: RET C 00002F7C: CALL 2759h 00002F7F: CALL 360Ch 00002F82: JP 366Ah 00002F85: LD HL,62E5h 00002F88: LD A,(HL) 00002F89: PUSH AF 00002F8A: SET 7,(HL) 00002F8C: CALL 2759h 00002F8F: CALL 2F2Ch 00002F92: CALL 35BFh 00002F95: CALL 366Dh JUMPBLOCK ============= 00002F98: CALL 2F3Ch 00002F9B: CALL 2F2Ch 00002F9E: CALL 35BFh 00002FA1: JR -3Fh 00002FA3: NOP 00002FA4: NOP ----------------------------- 00002FA5: LD A,(62E5h) 00002FA8: PUSH AF 00002FA9: SET 7,A 00002FAB: LD (62E5h),A 00002FAE: CP C0h 00002FB0: JR NC,+0Dh 00002FB2: CALL 2FD9h 00002FB5: POP AF 00002FB6: BIT 7,A 00002FB8: RET NZ 00002FB9: LD HL,62E5h 00002FBC: RES 7,(HL) 00002FBE: RET ---------------------------- 00002FBF: CALL 2759h 00002FC2: CALL 35BFh 00002FC5: CALL 37B0h 00002FC8: CALL 2FD9h JUMPBLOCK ============= 00002FCB: CALL 2759h 00002FCE: LD HL,35E2h 00002FD1: CALL 35B1h 00002FD4: CALL 366Ah JUMPBLOCK ============= 00002FD7: JR -24h 00002FD9: CALL 2F2Ch 00002FDC: CALL 2EBBh 00002FDF: LD IX,2FECh 00002FE3: CALL 2EC1h 00002FE6: CALL 2F3Ch 00002FE9: JP 36C8h 00002FEC: LD B,BDh 00002FEE: LD L,B 00002FEF: LD (DE),A 00002FF0: LD B,C 00002FF1: DJNZ +3Eh 00002FF3: INC SP 00002FF4: LD H,B 00002FF5: LD H,D 00002FF6: LD L,C 00002FF7: CP (HL) 00002FF8: LD A,C 00002FF9: LD H,D 00002FFA: LD H,E 00002FFB: JR +3Fh 00002FFD: INC DE 00002FFE: INC HL 00002FFF: DEC (HL) 00003000: DJNZ -41h 00003002: ADD HL,DE 00003003: ADD B 00003004: LD A,B 00003005: LD L,C 00003006: CCF 00003007: INC SP 00003008: LD SP,7673h 0000300B: CP A 0000300C: SBC C 0000300D: SBC C 0000300E: SUB (HL) 0000300F: LD DE,56CDh 00003012: INC (HL) 00003013: LD A,(62E5h) 00003016: CP 80h 00003018: JP Z,35BFh 0000301B: CP C2h 0000301D: CALL NC,3B3Eh 00003020: BIT 7,A 00003022: CALL Z,3B35h 00003025: CALL 2F2Ch 00003028: LD HL,35C4h 0000302B: CALL 35BAh 0000302E: CALL 366Ah 00003031: LD A,(62E5h) 00003034: CP 80h 00003036: JR Z,+14h 00003038: CALL 2F3Ch 0000303B: CALL 2F2Ch 0000303E: CALL 36C8h 00003041: CALL 2F3Ch 00003044: CALL 2F2Ch 00003047: CALL 3542h 0000304A: JR -24h 0000304C: CALL 2F3Ch 0000304F: JP 3542h 00003052: PUSH IY 00003054: CALL 2EFFh 00003057: POP IY 00003059: LD A,(62E5h) 0000305C: CP 80h 0000305E: RET Z 0000305F: BIT 7,A 00003061: CALL Z,3B35h 00003064: RES 7,A 00003066: RRCA 00003067: ADD 20h 00003069: SET 7,A 0000306B: LD (62E5h),A 0000306E: LD B,05h 00003070: PUSH BC 00003071: CALL 2F2Ch 00003074: PUSH IY 00003076: CALL 2F0Eh 00003079: POP IY 0000307B: CALL 3542h 0000307E: CALL 37B0h 00003081: CALL 2F3Ch 00003084: CALL 366Dh 00003087: LD HL,35FBh 0000308A: CALL 35BAh 0000308D: CALL 36C8h 00003090: POP BC 00003091: DJNZ -23h 00003093: RET 00003094: CALL 2EF0h 00003097: JP 35BFh 0000309A: CALL 2EF0h 0000309D: LD A,(62E5h) 000030A0: CP 80h 000030A2: JR Z,-10h 000030A4: CP C0h 000030A6: JR NZ,+2Ah 000030A8: CALL 3656h 000030AB: EX AF,AF' 000030AC: LD B,04h 000030AE: LD HL,62E6h 000030B1: XOR A 000030B2: CP (HL) 000030B3: JR NZ,+19h 000030B5: INC HL 000030B6: DJNZ -06h 000030B8: CALL 2EF0h 000030BB: EX AF,AF' 000030BC: DEC A 000030BD: RET Z 000030BE: LD B,A 000030BF: PUSH BC 000030C0: PUSH IY 000030C2: CALL 2F0Eh 000030C5: POP IY 000030C7: CALL 36C8h 000030CA: POP BC 000030CB: DJNZ -0Eh 000030CD: RET 000030CE: EX AF,AF' 000030CF: CALL 3643h 000030D2: CALL 2F2Ch 000030D5: CALL 2EF0h 000030D8: CALL 30E4h 000030DB: CALL 2F3Ch 000030DE: CALL 36C8h 000030E1: JP 31ABh 000030E4: LD HL,62E5h 000030E7: LD A,(HL) 000030E8: CP 81h 000030EA: CALL C,3B35h 000030ED: LD (HL),C0h 000030EF: BIT 6,A 000030F1: PUSH AF 000030F2: JR NZ,+02h 000030F4: NEG 000030F6: AND 3Fh 000030F8: LD B,FFh 000030FA: LD C,0Ah 000030FC: INC B 000030FD: SUB C 000030FE: JR NC,-04h 00003100: ADD C 00003101: SLA B 00003103: SLA B 00003105: SLA B 00003107: SLA B 00003109: ADD B 0000310A: PUSH AF 0000310B: CALL 2F2Ch 0000310E: LD HL,35F6h 00003111: CALL 35BAh 00003114: CALL 366Dh 00003117: CALL 2F3Ch 0000311A: CALL 2F2Ch 0000311D: LD HL,35F6h 00003120: CALL 35B1h 00003123: CALL 3542h 00003126: CALL 366Ah 00003129: CALL 2F3Ch 0000312C: CALL 37B0h 0000312F: CALL 2F2Ch 00003132: CALL 2EBBh 00003135: LD IX,316Ah 00003139: CALL 2EC1h 0000313C: CALL 2F3Ch 0000313F: CALL 36C8h 00003142: LD HL,35FBh 00003145: CALL 35BAh 00003148: CALL 366Dh 0000314B: LD HL,62E5h 0000314E: PUSH HL 0000314F: CALL 35BAh 00003152: CALL 35BFh 00003155: POP HL 00003156: SET 0,(HL) 00003158: POP AF 00003159: LD (62E6h),A 0000315C: CALL 359Ah 0000315F: POP AF 00003160: JR NZ,+05h 00003162: LD HL,62E5h 00003165: RES 7,(HL) 00003167: JP 366Dh 0000316A: INC B 0000316B: CP A 0000316C: ADD HL,DE 0000316D: INC DE 0000316E: SCF 0000316F: LD (HL),C 00003170: CP (HL) 00003171: SUB H 00003172: SCF 00003173: LD H,H 00003174: HALT 00003175: CP A 00003176: RLA 00003177: LD (HL),L 00003178: LD (BF07h),HL 0000317B: JR Z,-6Dh 0000317D: DEC (HL) 0000317E: LD D,D 0000317F: CP A 00003180: ADD (HL) 00003181: ADD L 00003182: SUB C 00003183: LD (HL),D 00003184: LD HL,35F1h 00003187: CALL 35BAh 0000318A: CALL 36C8h 0000318D: JP 31ABh 00003190: CALL 2F2Ch 00003193: CALL 321Ah 00003196: CALL 2F3Ch 00003199: CALL 2F2Ch 0000319C: LD HL,62E0h 0000319F: CALL 35B1h 000031A2: CALL 3223h 000031A5: CALL 2F3Ch 000031A8: JP 37B0h 000031AB: LD HL,62E5h 000031AE: BIT 7,(HL) 000031B0: EX AF,AF' 000031B1: SET 7,(HL) 000031B3: LD A,BFh 000031B5: CP (HL) 000031B6: JR C,+04h 000031B8: INC A 000031B9: PUSH AF 000031BA: JR +1Dh 000031BC: LD A,(62E5h) 000031BF: CALL 349Fh 000031C2: EX DE,HL 000031C3: LD HL,003Ch 000031C6: OR A 000031C7: SBC HL,DE 000031C9: CALL C,3B3Eh 000031CC: LD A,C0h 000031CE: ADD E 000031CF: PUSH AF 000031D0: LD A,BFh 000031D2: LD (62E5h),A 000031D5: OR A 000031D6: CALL 359Ah 000031D9: LD IX,31F6h 000031DD: CALL 2EC1h 000031E0: CALL 2EBBh 000031E3: POP AF 000031E4: LD (62E5h),A 000031E7: EX AF,AF' 000031E8: RET NZ 000031E9: LD HL,35C4h 000031EC: CALL 35BAh 000031EF: CALL 3542h 000031F2: CALL 37B0h 000031F5: RET 000031F6: LD B,BDh 000031F8: LD D,(HL) 000031F9: LD D,H 000031FA: SUB B 000031FB: JR NZ,-42h 000031FD: INC DE 000031FE: LD B,D 000031FF: ADD HL,BC 00003200: LD B,B 00003201: CP (HL) 00003202: LD (HL),L 00003203: LD B,(HL) 00003204: LD (HL),L 00003205: LD B,A 00003206: CP A 00003207: DEC H 00003208: LD (HL),03h 0000320A: LD (66BFh),A 0000320D: JR Z,+43h 0000320F: DEC D 00003210: RET NZ 00003211: LD DE,2851h 00003214: HALT 00003215: RET NZ 00003216: DJNZ +00h 00003218: NOP 00003219: NOP 0000321A: LD HL,35E2h 0000321D: CALL 35BAh 00003220: CALL 366Dh 00003223: LD HL,35DDh 00003226: CALL 35BAh 00003229: CALL 37B0h 0000322C: CALL 3475h 0000322F: LD HL,35D3h 00003232: CALL 35BAh 00003235: CALL 36C8h 00003238: LD A,(62E5h) 0000323B: BIT 7,A 0000323D: JR NZ,+09h 0000323F: LD HL,35D3h 00003242: CALL 35BAh 00003245: CALL 366Dh 00003248: LD HL,35C4h 0000324B: CALL 35BAh 0000324E: CALL 3561h 00003251: JR NC,+25h 00003253: CALL 3542h 00003256: LD HL,35CEh 00003259: CALL 35B1h 0000325C: CALL 3561h 0000325F: JR NC,+0Bh 00003261: LD HL,35C9h 00003264: CALL 35B1h 00003267: CALL 366Ah 0000326A: JR +0Ch 0000326C: LD HL,35D3h 0000326F: CALL 35B1h 00003272: CALL 3542h 00003275: CALL 366Ah 00003278: CALL 2F2Ch 0000327B: CALL 2EBBh 0000327E: LD IX,328Bh 00003282: CALL 2EC1h 00003285: CALL 2F3Ch 00003288: JP 36C8h 0000328B: INC B 0000328C: CP H 0000328D: DEC D 0000328E: INC D 0000328F: ADD H 00003290: ADD HL,DE 00003291: DEC A 00003292: LD B,(HL) 00003293: LD (HL),E 00003294: HALT 00003295: LD D,(HL) 00003296: CP (HL) 00003297: LD A,C 00003298: LD L,B 00003299: SUB (HL) 0000329A: LD A,C 0000329B: CCF 0000329C: LD H,H 0000329D: LD E,C 0000329E: LD H,E 0000329F: LD (HL),C 000032A0: RET NZ 000032A1: DEC D 000032A2: LD (HL),B 000032A3: LD A,C 000032A4: LD H,E 000032A5: CALL 2EF0h 000032A8: LD A,(62E5h) 000032AB: CP 80h 000032AD: JR +03h 000032AF: CALL 3561h 000032B2: LD HL,3605h 000032B5: JR NZ,+03h 000032B7: LD HL,35C4h 000032BA: JP 35B1h 000032BD: CALL 32AFh 000032C0: JR -1Ah 000032C2: NOP 000032C3: CALL 3561h 000032C6: LD HL,35C4h 000032C9: JR C,-11h 000032CB: LD HL,3605h 000032CE: JR -16h 000032D0: CALL 32C2h 000032D3: JR -2Dh 000032D5: CALL 3542h 000032D8: JR -17h 000032DA: CALL 32D5h 000032DD: JR -37h 000032DF: LD A,(62E5h) 000032E2: CP 80h 000032E4: JR NZ,+05h 000032E6: LD A,(62E0h) 000032E9: CP 80h 000032EB: LD HL,35C4h 000032EE: JR NZ,+03h 000032F0: LD HL,3605h 000032F3: JP 35B1h 000032F6: LD A,(62E5h) 000032F9: CP 80h 000032FB: JR Z,-12h 000032FD: LD A,(62E0h) 00003300: CP 80h 00003302: JR -19h 00003304: CALL 2EF0h 00003307: POP BC 00003308: POP DE 00003309: DEC IY 0000330B: LD A,(IY+00h) 0000330E: JP 33D6h 00003311: CALL 2EF0h 00003314: JP 3559h 00003317: CP (HL) 00003318: RET Z 00003319: XOR (HL) 0000331A: LD (HL),A 0000331B: RET 0000331C: NOP 0000331D: LD HL,(61EEh) ------------------------------------ 00003320: INC HL 00003321: INC HL 00003322: JR +0Fh 00003324: LD HL,(61F4h) 00003327: JR +0Ah 00003329: CALL 3497h as below :) ------------- *** INP Routine ******* 0000332C: LD C,L 3497 is FP in WRA1 to HL ? 0000332D: LD B,H 0000332E: IN A,(C) in port a, (BC) INPORT A HERE 00003330: LD L,A 00003331: LD H,00h 00003333: JP 34C4h ------------------------------- 00003336: CALL 3497h as above 00003339: LD A,(HL) 0000333A: INC HL 0000333B: LD H,(HL) 0000333C: LD L,A 0000333D: JR -0Ch 0000333F: CALL 3497h as 00003342: LD A,(HL) 00003343: JR -15h 00003345: LD HL,3357h 00003348: CALL 35BAh 0000334B: JP 36C8h 0000334E: LD HL,3357h 00003351: CALL 35BAh 00003354: JP 37B0h 00003357: POP BC 00003358: LD D,A 00003359: ADD HL,HL 0000335A: LD D,A 0000335B: ADD B 0000335C: LD IX,6487h 00003360: CALL 2BE5h 00003363: INC DE 00003364: PUSH DE 00003365: LD DE,6487h 00003368: LD HL,6407h 0000336B: LD A,(DE) 0000336C: CP (HL) 0000336D: JR NZ,+06h 0000336F: INC DE 00003370: INC HL 00003371: CP 0Dh 00003373: JR NZ,-0Ah 00003375: POP DE 00003376: RET ---------------------------------- 00003377: CALL 2BE1h 0000337A: LD A,(DE) 0000337B: INC DE 0000337C: CP 3Dh 0000337E: JR NZ,+11h 00003380: CALL 335Ch 00003383: PUSH DE 00003384: LD DE,35C4h 00003387: JR Z,+03h 00003389: LD DE,3605h 0000338C: CALL 3428h 0000338F: POP DE 00003390: RET ------------------------------ 00003391: CALL 335Ch 00003394: PUSH DE 00003395: LD DE,35C4h 00003398: JR C,-0Eh 0000339A: JR -13h 0000339C: CALL 2BE1h 0000339F: INC DE 000033A0: INC DE 000033A1: JR +0Ah 000033A3: CALL 3377h 000033A6: JP 33ADh 000033A9: LD IY,6507h 000033AD: LD A,(DE) 000033AE: INC DE 000033AF: CP 79h 000033B1: JR Z,-17h 000033B3: CP 7Ch 000033B5: JR Z,-14h 000033B7: CP 7Eh 000033B9: JR Z,+40h 000033BB: CP 7Ah 000033BD: JR Z,+3Ch 000033BF: CP 35h 000033C1: JR C,+3Dh 000033C3: CP 75h 000033C5: JR C,+56h 000033C7: CP 7Fh 000033C9: JR Z,+5Ah 000033CB: CP BFh 000033CD: JR Z,-22h 000033CF: JR C,+4Ch 000033D1: CP D7h 000033D3: CALL NC,3B38h 000033D6: LD IX,(6215h) 000033DA: PUSH DE 000033DB: CP C6h 000033DD: PUSH AF 000033DE: CALL NC,2EEAh 000033E1: POP AF 000033E2: SLA A 000033E4: LD C,A 000033E5: LD B,00h 000033E7: ADD IX,BC 000033E9: LD L,(IX+00h) 000033EC: LD H,(IX+01h) 000033EF: LD BC,33F4h 000033F2: PUSH BC 000033F3: LD PC,HL 000033F4: POP DE 000033F5: CALL 2EFFh 000033F8: JP 33ADh 000033FB: CALL 3428h 000033FE: JR -53h 00003400: PUSH DE 00003401: LD L,A 00003402: LD H,00h 00003404: LD E,L 00003405: LD D,H 00003406: ADD HL,HL 00003407: ADD HL,HL 00003408: ADD HL,DE 00003409: LD DE,(620Fh) 0000340D: ADD HL,DE 0000340E: INC HL 0000340F: LD A,(HL) 00003410: INC A 00003411: DEC HL 00003412: CALL Z,3B11h 00003415: EX DE,HL 00003416: CALL 3428h 00003419: POP DE 0000341A: JP 33ADh 0000341D: LD (IY+00h),A 00003420: INC IY 00003422: JP 33ADh 00003425: JP 2EF0h 00003428: LD B,05h 0000342A: LD A,(DE) 0000342B: LD (IY+00h),A 0000342E: INC DE 0000342F: INC IY 00003431: DJNZ -09h 00003433: RET ---------------------- 00003434: LD HL,62E5h 00003437: SET 7,(HL) 00003439: RET ----------------------------------- 0000343A: LD A,(62E5h) 0000343D: PUSH AF 0000343E: CALL 35AEh 00003441: POP AF 00003442: CP 80h 00003444: RET Z 00003445: LD HL,62E6h 00003448: SET 4,(HL) 0000344A: BIT 7,A 0000344C: LD A,40h 0000344E: JR Z,+02h 00003450: LD A,C0h 00003452: LD (62E5h),A 00003455: RET ------------------------------------- 00003456: LD A,(62E5h) 00003459: RES 7,A 0000345B: CP 47h 0000345D: RET NC 0000345E: CP 40h 00003460: JP C,35AEh 00003463: SUB 47h 00003465: NEG 00003467: LD B,A 00003468: PUSH BC 00003469: CALL 3643h 0000346C: DJNZ -05h 0000346E: POP BC 0000346F: CALL 3656h 00003472: DJNZ -05h 00003474: RET ------------------------------------------- 00003475: LD A,(62E5h) 00003478: RES 7,A 0000347A: CP 47h 0000347C: JP NC,35AEh 0000347F: CP 40h 00003481: RET C 00003482: SUB 3Fh 00003484: LD B,A 00003485: LD A,(62E5h) 00003488: AND C0h 0000348A: DEC A 0000348B: LD (62E5h),A 0000348E: CALL 3656h 00003491: DJNZ -05h 00003493: OR A 00003494: JP 359Ah --------------------------------------------- 00003497: LD A,(62E5h) called from above (around 331d) 62E5 is ? 0000349A: CP C0h 0000349C: JP Z,3889h 0000349F: LD HL,0000h 000034A2: BIT 7,A 000034A4: CALL Z,3B29h 000034A7: CP C0h 000034A9: RET C 000034AA: CP C7h 000034AC: CALL NC,3B29h 000034AF: SUB BFh 000034B1: LD B,A 000034B2: PUSH DE 000034B3: CALL 3656h 000034B6: LD E,L 000034B7: LD D,H 000034B8: ADD HL,HL 000034B9: ADD HL,HL 000034BA: ADD HL,DE 000034BB: ADD HL,HL 000034BC: LD E,A 000034BD: LD D,00h 000034BF: ADD HL,DE 000034C0: DJNZ -0Fh 000034C2: POP DE 000034C3: RET ------------------------------------------- 000034C4: LD A,C7h jump here from routine X called in prev 000034C6: LD (62E5h),A 000034C9: PUSH HL 000034CA: LD HL,0000h 000034CD: LD (62E8h),HL 000034D0: LD (62E6h),HL 000034D3: POP HL 000034D4: LD B,10h 000034D6: ADD HL,HL 000034D7: PUSH BC 000034D8: PUSH HL 000034D9: LD B,04h 000034DB: LD HL,62E9h 000034DE: LD A,(HL) 000034DF: ADC (HL) 000034E0: DAA 000034E1: LD (HL),A 000034E2: DEC HL 000034E3: DJNZ -07h 000034E5: POP HL 000034E6: POP BC 000034E7: DJNZ -13h 000034E9: OR A 000034EA: JP 359Ah 000034ED: LD A,(DE) 000034EE: CP 30h 000034F0: RET C 000034F1: CP 3Ah 000034F3: CCF 000034F4: RET ------------------------------------------ 000034F5: LD A,(DE) 000034F6: CP 41h 000034F8: RET C 000034F9: CP 5Bh 000034FB: CCF 000034FC: RET NC 000034FD: CP 61h 000034FF: RET C 00003500: CP 7Bh 00003502: CCF 00003503: RET ---------------------- 00003504: LD A,(DE) 00003505: SUB 40h 00003507: CP 1Bh 00003509: RET C 0000350A: SUB 06h 0000350C: RET ---------------------- 0000350D: LD HL,62E5h blank 5 bytes at 62e5 00003510: LD B,05h 00003512: LD (HL),00h 00003514: INC HL 00003515: DJNZ -05h 00003517: RET --------------- 00003518: DEC C 00003519: LD E,00h 0000351B: PUSH AF from RST 8 - print a char 0000351C: CP 0Dh 0000351E: JR NZ,+10h return 00003520: PUSH HL 00003521: LD HL,(622Fh) WHAT IS THIS sysvar 00003524: CALL 3539h print a char 00003527: POP HL 00003528: POP AF 00003529: RET ---------------- 0000352A: PUSH AF return 0d 0000352B: LD A,20h print space 0000352D: JR +01h -------------------------------------- 0000352F: PUSH AF **** Print Char **** 00003530: PUSH HL 00003531: PUSH BC 00003532: CALL 203Ch prob print a char 00003535: POP BC 00003536: POP HL 00003537: POP AF 00003538: RET ---------------------------------- 00003539: LD A,(HL) loop here looking thru hl for next 0 **** Print out from HL end 0 **** 0000353A: INC HL 0000353B: OR A 0000353C: RET Z 0000353D: CALL 352Fh print a char 00003540: JR -09h ---------------------------------- 00003542: LD HL,62E5h 00003545: LD DE,62E0h 00003548: LD B,05h loop x 5 - copy from 62e5 to 62e0 - these are lynx 5 char vars 0000354A: LD C,(HL) lopp 0000354B: LD A,(DE) 0000354C: EX DE,HL 0000354D: LD (HL),C 0000354E: LD (DE),A 0000354F: INC DE 00003550: INC HL 00003551: DJNZ -09h to lopp 00003553: RET --------------------------------- 00003554: LD HL,62E0h 00003557: JR +03h 00003559: LD HL,62E5h 0000355C: LD A,80h 0000355E: JP 3317h 00003561: CALL 3579h 00003564: RET Z 00003565: PUSH AF 00003566: LD HL,62E5h 00003569: BIT 7,(HL) 0000356B: JR NZ,+0Ah 0000356D: LD HL,62E0h 00003570: BIT 7,(HL) 00003572: JR NZ,+03h 00003574: POP AF 00003575: CCF 00003576: RET 00003577: POP AF 00003578: RET 00003579: LD HL,62E5h 0000357C: LD DE,62E0h 0000357F: LD B,05h 00003581: LD A,(DE) 00003582: CP (HL) 00003583: RET NZ 00003584: INC HL 00003585: INC DE 00003586: DJNZ -07h 00003588: RET 00003589: LD HL,62E5h 0000358C: LD DE,62E0h 0000358F: LD A,(DE) 00003590: RES 7,A 00003592: LD C,(HL) 00003593: RES 7,C 00003595: CP C 00003596: LD B,05h 00003598: JR -17h ------------------------------------------------------- 0000359A: CALL 361Eh call during startup 0000359D: LD A,(62E5h) 000035A0: RES 7,A 000035A2: ADD C 000035A3: JR Z,+09h 000035A5: BIT 7,A 000035A7: JR Z,+6Dh 000035A9: CP C0h 000035AB: CALL C,3B3Eh 000035AE: LD HL,3605h 000035B1: LD DE,62E5h 000035B4: LD BC,0005h 000035B7: LDIR 000035B9: RET 000035BA: LD DE,62E0h 000035BD: JR -0Bh 000035BF: LD HL,35C4h 000035C2: JR -13h 000035C4: RET NZ 000035C5: DJNZ +00h 000035C7: NOP 000035C8: NOP 000035C9: RET NZ 000035CA: JR NZ,+00h 000035CC: NOP 000035CD: NOP 000035CE: RET NZ 000035CF: JR NC,+00h 000035D1: NOP 000035D2: NOP 000035D3: RET NZ 000035D4: LD B,B 000035D5: NOP 000035D6: NOP 000035D7: NOP 000035D8: CALL NZ,5365h 000035DB: LD H,B 000035DC: NOP 000035DD: RET NZ 000035DE: LD H,D 000035DF: ADD E 000035E0: JR +53h 000035E2: RET NZ 000035E3: DEC D 000035E4: LD (HL),B 000035E5: LD A,C 000035E6: LD H,E 000035E7: CP A 000035E8: LD A,B 000035E9: LD D,E 000035EA: SBC B 000035EB: LD D,C0h 000035ED: DEC H 000035EE: LD B,62h 000035F0: ADD E 000035F1: CP A 000035F2: LD B,E 000035F3: LD B,D 000035F4: SUB H 000035F5: LD C,B 000035F6: RET NZ 000035F7: LD SP,2762h 000035FA: HALT 000035FB: CP A 000035FC: LD D,B 000035FD: NOP 000035FE: NOP 000035FF: NOP 00003600: CCF 00003601: LD D,B 00003602: NOP 00003603: NOP 00003604: NOP 00003605: ADD B 00003606: NOP 00003607: NOP 00003608: NOP 00003609: NOP 0000360A: LD B,80h 0000360C: LD HL,3611h 0000360F: JR -60h 00003611: RET NZ 00003612: LD SP,5941h 00003615: DAA 00003616: LD A,(62E5h) 00003619: ADD C 0000361A: LD (62E5h),A 0000361D: RET 0000361E: LD BC,0900h 00003621: JR NC,+07h 00003623: LD A,01h 00003625: CALL 3643h 00003628: INC C 00003629: RET 0000362A: LD A,(62E6h) 0000362D: CP 10h 0000362F: RET NC 00003630: DEC C 00003631: CALL 3656h 00003634: DJNZ -0Ch 00003636: POP HL 00003637: JP 35AEh 0000363A: XOR A 0000363B: PUSH HL 0000363C: PUSH BC 0000363D: LD HL,62E1h 00003640: JR +06h 00003642: XOR A 00003643: PUSH HL 00003644: PUSH BC 00003645: LD HL,62E6h 00003648: CALL 364Eh 0000364B: POP BC 0000364C: POP HL 0000364D: RET 0000364E: LD B,04h 00003650: RRD 00003652: INC HL 00003653: DJNZ -05h 00003655: RET 00003656: XOR A 00003657: PUSH HL 00003658: PUSH BC 00003659: LD HL,62E9h 0000365C: CALL 3662h 0000365F: POP BC 00003660: POP HL 00003661: RET 00003662: LD B,04h 00003664: RLD 00003666: DEC HL 00003667: DJNZ -05h 00003669: RET 0000366A: CALL 3554h 0000366D: CALL 3589h 00003670: CALL NC,3542h 00003673: LD A,(62E0h) 00003676: AND 7Fh 00003678: RET Z 00003679: LD C,A 0000367A: LD A,(62E5h) 0000367D: RES 7,A 0000367F: SUB C 00003680: JR Z,+09h 00003682: CP 08h 00003684: RET NC 00003685: LD B,A 00003686: CALL 363Ah 00003689: DJNZ -05h 0000368B: LD A,(62E5h) 0000368E: LD C,A 0000368F: LD A,(62E0h) 00003692: XOR C 00003693: BIT 7,A 00003695: JR Z,+07h 00003697: CALL 36A4h 0000369A: OR A 0000369B: JP 359Ah 0000369E: CALL 36B6h 000036A1: JP 359Ah 000036A4: OR A 000036A5: LD DE,62E9h 000036A8: LD HL,62E4h 000036AB: LD B,04h 000036AD: LD A,(DE) 000036AE: SBC (HL) 000036AF: DAA 000036B0: LD (DE),A 000036B1: DEC HL 000036B2: DEC DE 000036B3: DJNZ -08h 000036B5: RET 000036B6: OR A 000036B7: LD DE,62E9h 000036BA: LD HL,62E4h 000036BD: LD B,04h 000036BF: LD A,(DE) 000036C0: ADC (HL) 000036C1: DAA 000036C2: LD (DE),A 000036C3: DEC HL 000036C4: DEC DE 000036C5: DJNZ -08h 000036C7: RET 000036C8: LD A,(62E5h) 000036CB: CP 80h 000036CD: JR Z,+1Bh 000036CF: AND 7Fh 000036D1: LD C,A 000036D2: LD HL,62E0h 000036D5: LD A,(HL) 000036D6: CP 80h 000036D8: JR Z,+10h 000036DA: AND 7Fh 000036DC: ADD C 000036DD: SUB 3Fh 000036DF: JR Z,+09h 000036E1: BIT 7,A 000036E3: JR Z,+08h 000036E5: CP C0h 000036E7: CALL C,3B3Eh 000036EA: JP 35AEh 000036ED: LD C,A 000036EE: LD A,(62E5h) 000036F1: XOR (HL) 000036F2: CPL 000036F3: AND 80h 000036F5: ADD C 000036F6: LD (62D4h),A 000036F9: CALL 3896h 000036FC: JP Z,38ABh 000036FF: LD HL,62D5h 00003702: LD B,0Ch 00003704: CALL 3512h 00003707: LD DE,62E4h 0000370A: LD HL,62DCh 0000370D: LD B,04h 0000370F: PUSH BC 00003710: LD A,(DE) 00003711: PUSH DE 00003712: LD E,A 00003713: PUSH HL 00003714: CALL 376Ah 00003717: POP HL 00003718: CALL C,379Fh 0000371B: DEC HL 0000371C: POP DE 0000371D: DEC DE 0000371E: POP BC 0000371F: DJNZ -12h 00003721: LD A,(62D5h) 00003724: CP 10h 00003726: JR NC,+0Fh 00003728: LD HL,62D9h 0000372B: LD B,05h 0000372D: CALL 3664h 00003730: LD A,(HL) 00003731: DEC A 00003732: LD (HL),A 00003733: AND 7Fh 00003735: JR Z,-4Dh 00003737: LD HL,62D4h 0000373A: JP 35B1h 0000373D: LD A,E 0000373E: AND F0h 00003740: RRCA 00003741: LD B,A 00003742: RRCA 00003743: RRCA 00003744: ADD B 00003745: LD B,A 00003746: LD A,E 00003747: AND 0Fh 00003749: ADD B 0000374A: LD E,A 0000374B: RET 0000374C: LD HL,0000h 0000374F: LD B,H 00003750: LD C,A 00003751: SRL E 00003753: JR NZ,+01h 00003755: RET NC 00003756: JR NC,+08h 00003758: LD A,C 00003759: ADD L 0000375A: DAA 0000375B: LD L,A 0000375C: LD A,B 0000375D: ADC H 0000375E: DAA 0000375F: LD H,A 00003760: LD A,C 00003761: ADD C 00003762: DAA 00003763: LD C,A 00003764: LD A,B 00003765: ADC B 00003766: DAA 00003767: LD B,A 00003768: JR -19h 0000376A: CALL 373Dh 0000376D: RET Z 0000376E: PUSH IX 00003770: LD IX,62D3h 00003774: LD (IX+00h),00h 00003778: LD HL,62E9h 0000377B: LD B,04h 0000377D: PUSH BC 0000377E: PUSH HL 0000377F: LD A,(HL) 00003780: PUSH DE 00003781: CALL 374Ch 00003784: LD A,(IX+00h) 00003787: ADD L 00003788: DAA 00003789: LD (IX+00h),A 0000378C: LD A,00h 0000378E: ADC H 0000378F: DAA 00003790: LD (IX+FFh),A 00003793: DEC IX 00003795: POP DE 00003796: POP HL 00003797: DEC HL 00003798: POP BC 00003799: DJNZ -1Eh 0000379B: POP IX 0000379D: SCF 0000379E: RET 0000379F: PUSH HL 000037A0: LD B,05h 000037A2: LD DE,62D3h 000037A5: OR A 000037A6: LD A,(DE) 000037A7: ADC (HL) 000037A8: DAA 000037A9: LD (HL),A 000037AA: DEC HL 000037AB: DEC DE 000037AC: DJNZ -08h 000037AE: POP HL 000037AF: RET 000037B0: LD HL,62E0h 000037B3: LD A,(HL) 000037B4: CP 80h 000037B6: CALL Z,3B41h 000037B9: AND 7Fh 000037BB: LD C,A 000037BC: LD A,(62E5h) 000037BF: CP 80h 000037C1: RET Z 000037C2: AND 7Fh 000037C4: SUB C 000037C5: ADD 40h 000037C7: JR Z,+09h 000037C9: BIT 7,A 000037CB: JR Z,+08h 000037CD: CP C0h 000037CF: CALL C,3B3Eh 000037D2: JP 35AEh 000037D5: LD C,A 000037D6: LD A,(62E5h) 000037D9: XOR (HL) 000037DA: CPL 000037DB: AND 80h 000037DD: ADD C 000037DE: LD (62E5h),A 000037E1: CALL 3896h 000037E4: JP Z,384Fh 000037E7: LD HL,62D5h 000037EA: LD B,0Ch 000037EC: CALL 3512h 000037EF: LD DE,62E1h 000037F2: LD HL,62DDh 000037F5: LD B,04h 000037F7: CALL 354Ah 000037FA: LD DE,62D5h 000037FD: LD HL,62E6h 00003800: LD BC,0004h 00003803: LDIR 00003805: LD B,08h 00003807: PUSH BC 00003808: LD C,00h 0000380A: CALL 3844h 0000380D: JR C,+0Eh 0000380F: LD HL,62E4h 00003812: LD DE,62DCh 00003815: LD B,08h 00003817: CALL 36ADh 0000381A: INC C 0000381B: JR -13h 0000381D: LD A,C 0000381E: CALL 3657h 00003821: LD HL,62DDh 00003824: LD B,08h 00003826: XOR A 00003827: CALL 3650h 0000382A: POP BC 0000382B: DJNZ -26h 0000382D: LD A,(62E6h) 00003830: CP 10h 00003832: RET NC 00003833: LD A,(62E5h) 00003836: DEC A 00003837: JR Z,-67h 00003839: CP 80h 0000383B: JR Z,-6Bh 0000383D: LD (62E5h),A 00003840: LD B,01h 00003842: JR -3Dh 00003844: LD DE,62D5h 00003847: LD HL,62DDh 0000384A: LD B,08h 0000384C: JP 3581h 0000384F: LD A,(62E1h) 00003852: RRCA 00003853: RRCA 00003854: RRCA 00003855: RRCA 00003856: AND 0Fh 00003858: LD C,A 00003859: XOR A 0000385A: LD E,A 0000385B: LD B,04h 0000385D: LD HL,62E6h 00003860: PUSH BC 00003861: RLD 00003863: CALL 3875h 00003866: RLD 00003868: CALL 3875h 0000386B: RLD 0000386D: POP BC 0000386E: INC HL 0000386F: DJNZ -11h 00003871: OR A 00003872: JP 359Ah 00003875: PUSH BC 00003876: PUSH AF 00003877: LD A,E 00003878: RLCA 00003879: RLCA 0000387A: ADD E 0000387B: RLCA 0000387C: POP BC 0000387D: ADD B 0000387E: POP BC 0000387F: LD B,FFh 00003881: INC B 00003882: SUB C 00003883: JR NC,-04h 00003885: ADD C 00003886: LD E,A 00003887: LD A,B 00003888: RET 00003889: LD A,(62E6h) 0000388C: RRCA 0000388D: RRCA 0000388E: RRCA 0000388F: RRCA 00003890: AND 0Fh 00003892: LD L,A 00003893: LD H,00h 00003895: RET 00003896: LD A,(62E1h) 00003899: AND 0Fh 0000389B: RET NZ 0000389C: LD A,(62E2h) 0000389F: OR A 000038A0: RET NZ 000038A1: LD A,(62E3h) 000038A4: OR A 000038A5: RET NZ 000038A6: LD A,(62E4h) 000038A9: OR A 000038AA: RET 000038AB: LD A,(62D4h) 000038AE: LD (62E5h),A 000038B1: LD A,(62E1h) 000038B4: AND F0h 000038B6: RRCA 000038B7: RRCA 000038B8: RRCA 000038B9: RRCA 000038BA: LD HL,62E9h 000038BD: LD B,04h 000038BF: LD D,00h 000038C1: PUSH BC 000038C2: PUSH AF 000038C3: LD B,A 000038C4: LD E,00h 000038C6: XOR A 000038C7: LD C,(HL) 000038C8: ADD C 000038C9: DAA 000038CA: JR NC,+01h 000038CC: INC E 000038CD: DJNZ -07h 000038CF: ADD D 000038D0: DAA 000038D1: CALL 3FD3h 000038D4: POP AF 000038D5: POP BC 000038D6: DJNZ -17h 000038D8: INC E 000038D9: DEC E 000038DA: LD A,E 000038DB: JP NZ,3643h 000038DE: LD HL,62E5h 000038E1: LD A,(HL) 000038E2: OR A 000038E3: JP Z,35AEh 000038E6: DEC (HL) 000038E7: RET 000038E8: LD SP,(61EEh) 000038EC: JP 1E76h 000038EF: NOP 000038F0: LD C,A 000038F1: LD (HL),L 000038F2: LD (HL),H 000038F3: JR NZ,+6Fh 000038F5: LD H,(HL) 000038F6: JR NZ,+4Dh 000038F8: LD H,L 000038F9: LD L,L 000038FA: LD L,A 000038FB: LD (HL),D 000038FC: LD A,C 000038FD: NOP 000038FE: LD D,A 000038FF: LD (HL),D 00003900: LD L,A 00003901: LD L,(HL) 00003902: LD H,A 00003903: JR NZ,+4Dh 00003905: LD L,A 00003906: LD H,H 00003907: LD H,L 00003908: NOP 00003909: LD D,E 0000390A: LD (HL),H 0000390B: LD (HL),D 0000390C: LD L,C 0000390D: LD L,(HL) 0000390E: LD H,A 0000390F: JR NZ,+65h 00003911: LD (HL),D 00003912: LD (HL),D 00003913: LD L,A 00003914: LD (HL),D 00003915: NOP 00003916: LD C,L 00003917: LD L,C 00003918: LD (HL),E 00003919: LD (HL),E 0000391A: LD L,C 0000391B: LD L,(HL) 0000391C: LD H,A 0000391D: JR NZ,+62h 0000391F: LD (HL),D 00003920: LD H,C 00003921: LD H,E 00003922: LD L,E 00003923: LD H,L 00003924: LD (HL),H 00003925: NOP 00003926: LD B,H 00003927: LD L,C 00003928: HALT 00003929: LD L,C 0000392A: LD H,H 0000392B: LD H,L 0000392C: JR NZ,+62h 0000392E: LD A,C 0000392F: JR NZ,+7Ah 00003931: LD H,L 00003932: LD (HL),D 00003933: LD L,A 00003934: JR NZ,+65h 00003936: LD (HL),D 00003937: LD (HL),D 00003938: LD L,A 00003939: LD (HL),D 0000393A: NOP 0000393B: LD C,A 0000393C: HALT 0000393D: LD H,L 0000393E: LD (HL),D 0000393F: LD H,(HL) 00003940: LD L,H 00003941: LD L,A 00003942: LD (HL),A 00003943: JR NZ,+65h 00003945: LD (HL),D 00003946: LD (HL),D 00003947: LD L,A 00003948: LD (HL),D 00003949: NOP 0000394A: LD D,E 0000394B: LD A,C 0000394C: LD L,(HL) 0000394D: LD (HL),H 0000394E: LD H,C 0000394F: LD A,B 00003950: JR NZ,+65h 00003952: LD (HL),D 00003953: LD (HL),D 00003954: LD L,A 00003955: LD (HL),D 00003956: NOP 00003957: LD D,E 00003958: LD L,A 00003959: LD L,L 0000395A: LD H,L 0000395B: LD (HL),H 0000395C: LD L,B 0000395D: LD L,C 0000395E: LD L,(HL) 0000395F: LD H,A 00003960: JR NZ,+6Dh 00003962: LD L,C 00003963: LD (HL),E 00003964: LD (HL),E 00003965: LD L,C 00003966: LD L,(HL) 00003967: LD H,A 00003968: NOP 00003969: LD B,(HL) 0000396A: LD (HL),L 0000396B: LD L,(HL) 0000396C: LD H,E 0000396D: LD (HL),H 0000396E: LD L,C 0000396F: LD L,A 00003970: LD L,(HL) 00003971: JR NZ,+61h 00003973: LD (HL),D 00003974: LD H,A 00003975: LD (HL),L 00003976: LD L,L 00003977: LD H,L 00003978: LD L,(HL) 00003979: LD (HL),H 0000397A: JR NZ,+65h 0000397C: LD (HL),D 0000397D: LD (HL),D 0000397E: LD L,A 0000397F: LD (HL),D 00003980: NOP 00003981: LD C,(HL) 00003982: LD C,A 00003983: LD D,H 00003984: JR NZ,+59h 00003986: LD B,L 00003987: LD D,H 00003988: JR NZ,+49h 0000398A: LD C,L 0000398B: LD D,B 0000398C: LD C,H 0000398D: LD B,L 0000398E: LD C,L 0000398F: LD B,L 00003990: LD C,(HL) 00003991: LD D,H 00003992: LD B,L 00003993: LD B,H 00003994: NOP 00003995: LD D,D 00003996: LD H,L 00003997: LD H,H 00003998: LD L,C 00003999: LD L,L 0000399A: LD H,L 0000399B: LD L,(HL) 0000399C: LD (HL),E 0000399D: LD L,C 0000399E: LD L,A 0000399F: LD L,(HL) 000039A0: LD H,L 000039A1: LD H,H 000039A2: JR NZ,+61h 000039A4: LD (HL),D 000039A5: LD (HL),D 000039A6: LD H,C 000039A7: LD A,C 000039A8: NOP 000039A9: LD C,H 000039AA: LD L,C 000039AB: LD L,(HL) 000039AC: LD H,L 000039AD: INC L 000039AE: JR NZ,+4Ch 000039B0: LD B,C 000039B1: LD B,D 000039B2: LD B,L 000039B3: LD C,H 000039B4: JR NZ,+6Fh 000039B6: LD (HL),D 000039B7: JR NZ,+50h 000039B9: LD D,D 000039BA: LD C,A 000039BB: LD B,E 000039BC: JR NZ,+6Eh 000039BE: LD L,A 000039BF: LD (HL),H 000039C0: JR NZ,+66h 000039C2: LD L,A 000039C3: LD (HL),L 000039C4: LD L,(HL) 000039C5: LD H,H 000039C6: NOP 000039C7: LD C,(HL) 000039C8: LD (HL),L 000039C9: LD L,L 000039CA: LD H,D 000039CB: LD H,L 000039CC: LD (HL),D 000039CD: JR NZ,+6Fh 000039CF: LD (HL),L 000039D0: LD (HL),H 000039D1: JR NZ,+6Fh 000039D3: LD H,(HL) 000039D4: JR NZ,+72h 000039D6: LD H,C 000039D7: LD L,(HL) 000039D8: LD H,A 000039D9: LD H,L 000039DA: NOP 000039DB: LD D,E 000039DC: LD (HL),L 000039DD: LD H,D 000039DE: LD (HL),E 000039DF: LD H,E 000039E0: LD (HL),D 000039E1: LD L,C 000039E2: LD (HL),B 000039E3: LD (HL),H 000039E4: JR NZ,+6Fh 000039E6: LD (HL),L 000039E7: LD (HL),H 000039E8: JR NZ,+6Fh 000039EA: LD H,(HL) 000039EB: JR NZ,+72h 000039ED: LD H,C 000039EE: LD L,(HL) 000039EF: LD H,A 000039F0: LD H,L 000039F1: NOP 000039F2: LD D,H 000039F3: LD A,C 000039F4: LD (HL),B 000039F5: LD H,L 000039F6: JR NZ,+6Dh 000039F8: LD L,C 000039F9: LD (HL),E 000039FA: LD L,L 000039FB: LD H,C 000039FC: LD (HL),H 000039FD: LD H,E 000039FE: LD L,B 000039FF: NOP 00003A00: LD C,H 00003A01: LD L,C 00003A02: LD L,(HL) 00003A03: LD H,L 00003A04: JR NZ,+74h 00003A06: LD L,A 00003A07: LD L,A 00003A08: JR NZ,+6Ch 00003A0A: LD L,A 00003A0B: LD L,(HL) 00003A0C: LD H,A 00003A0D: NOP 00003A0E: LD B,E 00003A0F: LD H,C 00003A10: LD L,(HL) 00003A11: LD L,(HL) 00003A12: LD L,A 00003A13: LD (HL),H 00003A14: JR NZ,+63h 00003A16: LD L,A 00003A17: LD L,(HL) 00003A18: LD (HL),H 00003A19: LD L,C 00003A1A: LD L,(HL) 00003A1B: LD (HL),L 00003A1C: LD H,L 00003A1D: NOP 00003A1E: LD C,A 00003A1F: LD (HL),L 00003A20: LD (HL),H 00003A21: JR NZ,+6Fh 00003A23: LD H,(HL) 00003A24: JR NZ,+44h 00003A26: LD H,C 00003A27: LD (HL),H 00003A28: LD H,C 00003A29: NOP 00003A2A: LD D,D 00003A2B: LD B,L 00003A2C: LD D,H 00003A2D: LD D,L 00003A2E: LD D,D 00003A2F: LD C,(HL) 00003A30: JR NZ,+77h 00003A32: LD L,C 00003A33: LD (HL),H 00003A34: LD L,B 00003A35: LD L,A 00003A36: LD (HL),L 00003A37: LD (HL),H 00003A38: JR NZ,+47h 00003A3A: LD C,A 00003A3B: LD D,E 00003A3C: LD D,L 00003A3D: LD B,D 00003A3E: NOP 00003A3F: LD C,(HL) 00003A40: LD B,L 00003A41: LD E,B 00003A42: LD D,H 00003A43: JR NZ,+77h 00003A45: LD L,C 00003A46: LD (HL),H 00003A47: LD L,B 00003A48: LD L,A 00003A49: LD (HL),L 00003A4A: LD (HL),H 00003A4B: JR NZ,+46h 00003A4D: LD C,A 00003A4E: LD D,D 00003A4F: NOP 00003A50: LD D,L 00003A51: LD L,(HL) 00003A52: LD H,H 00003A53: LD H,L 00003A54: LD H,(HL) 00003A55: LD L,C 00003A56: LD L,(HL) 00003A57: LD H,L 00003A58: LD H,H 00003A59: JR NZ,+76h 00003A5B: LD H,C 00003A5C: LD (HL),D 00003A5D: LD L,C 00003A5E: LD H,C 00003A5F: LD H,D 00003A60: LD L,H 00003A61: LD H,L 00003A62: NOP 00003A63: LD D,L 00003A64: LD C,(HL) 00003A65: LD D,H 00003A66: LD C,C 00003A67: LD C,H 00003A68: JR NZ,+77h 00003A6A: LD L,C 00003A6B: LD (HL),H 00003A6C: LD L,B 00003A6D: LD L,A 00003A6E: LD (HL),L 00003A6F: LD (HL),H 00003A70: JR NZ,+52h 00003A72: LD B,L 00003A73: LD D,B 00003A74: LD B,L 00003A75: LD B,C 00003A76: LD D,H 00003A77: NOP 00003A78: LD D,A 00003A79: LD B,L 00003A7A: LD C,(HL) 00003A7B: LD B,H 00003A7C: JR NZ,+77h 00003A7E: LD L,C 00003A7F: LD (HL),H 00003A80: LD L,B 00003A81: LD L,A 00003A82: LD (HL),L 00003A83: LD (HL),H 00003A84: JR NZ,+57h 00003A86: LD C,B 00003A87: LD C,C 00003A88: LD C,H 00003A89: LD B,L 00003A8A: NOP 00003A8B: LD D,A 00003A8C: LD C,B 00003A8D: LD C,C 00003A8E: LD C,H 00003A8F: LD B,L 00003A90: JR NZ,+77h 00003A92: LD L,C 00003A93: LD (HL),H 00003A94: LD L,B 00003A95: LD L,A 00003A96: LD (HL),L 00003A97: LD (HL),H 00003A98: JR NZ,+57h 00003A9A: LD B,L 00003A9B: LD C,(HL) 00003A9C: LD B,H 00003A9D: NOP 00003A9E: LD D,D 00003A9F: LD H,L 00003AA0: LD (HL),H 00003AA1: LD (HL),L 00003AA2: LD (HL),D 00003AA3: LD L,(HL) 00003AA4: JR NZ,+73h 00003AA6: LD (HL),H 00003AA7: LD H,C 00003AA8: LD H,E 00003AA9: LD L,E 00003AAA: JR NZ,+66h 00003AAC: LD (HL),L 00003AAD: LD L,H 00003AAE: LD L,H 00003AAF: NOP 00003AB0: LD D,D 00003AB1: LD B,L 00003AB2: LD D,B 00003AB3: LD B,L 00003AB4: LD B,C 00003AB5: LD D,H 00003AB6: JR NZ,+77h 00003AB8: LD L,C 00003AB9: LD (HL),H 00003ABA: LD L,B 00003ABB: LD L,A 00003ABC: LD (HL),L 00003ABD: LD (HL),H 00003ABE: JR NZ,+55h 00003AC0: LD C,(HL) 00003AC1: LD D,H 00003AC2: LD C,C 00003AC3: LD C,H 00003AC4: NOP 00003AC5: LD B,A 00003AC6: LD C,A 00003AC7: LD D,E 00003AC8: LD D,L 00003AC9: LD B,D 00003ACA: JR NZ,+77h 00003ACC: LD L,C 00003ACD: LD (HL),H 00003ACE: LD L,B 00003ACF: LD L,A 00003AD0: LD (HL),L 00003AD1: LD (HL),H 00003AD2: JR NZ,+52h 00003AD4: LD B,L 00003AD5: LD D,H 00003AD6: LD D,L 00003AD7: LD D,D 00003AD8: LD C,(HL) 00003AD9: NOP 00003ADA: LD B,L 00003ADB: LD C,(HL) 00003ADC: LD B,H 00003ADD: LD D,B 00003ADE: LD D,D 00003ADF: LD C,A 00003AE0: LD B,E 00003AE1: JR NZ,+77h 00003AE3: LD L,C 00003AE4: LD (HL),H 00003AE5: LD L,B 00003AE6: LD L,A 00003AE7: LD (HL),L 00003AE8: LD (HL),H 00003AE9: JR NZ,+50h 00003AEB: LD D,D 00003AEC: LD C,A 00003AED: LD B,E 00003AEE: NOP 00003AEF: DEC C 00003AF0: LD B,D 00003AF1: LD H,C 00003AF2: LD H,H 00003AF3: JR NZ,+54h 00003AF5: LD H,C 00003AF6: LD (HL),B 00003AF7: LD H,L 00003AF8: NOP 00003AF9: XOR A 00003AFA: INC A 00003AFB: LD B,AFh //these are 1 out of step disas ! 00003AFD: INC A 00003AFE: LD B,AFh 00003B00: INC A 00003B01: LD B,AFh 00003B03: INC A 00003B04: LD B,AFh 00003B06: INC A 00003B07: LD B,AFh 00003B09: INC A 00003B0A: LD B,AFh 00003B0C: INC A 00003B0D: LD B,AFh 00003B0F: INC A 00003B10: LD B,AFh 00003B12: INC A 00003B13: LD B,AFh 00003B15: INC A 00003B16: LD B,AFh 00003B18: INC A 00003B19: LD B,AFh 00003B1B: INC A 00003B1C: LD B,AFh 00003B1E: INC A 00003B1F: LD B,AFh 00003B21: INC A 00003B22: LD B,AFh 00003B24: INC A 00003B25: LD B,AFh 00003B27: INC A 00003B28: LD B,AFh 00003B2A: INC A 00003B2B: LD B,AFh 00003B2D: INC A 00003B2E: LD B,AFh 00003B30: INC A 00003B31: LD B,AFh 00003B33: INC A 00003B34: LD B,AFh 00003B36: INC A 00003B37: LD B,AFh 00003B39: INC A 00003B3A: LD B,AFh 00003B3C: INC A 00003B3D: LD B,AFh 00003B3F: INC A 00003B40: LD B,AFh 00003B42: INC A 00003B43: LD B,AFh 00003B45: INC A 00003B46: LD B,AFh 00003B48: INC A 00003B49: LD B,AFh 00003B4B: INC A 00003B4C: LD B,AFh 00003B4E: INC A 00003B4F: CALL 6288h ? 00003B52: LD HL,(629Ah) start of err messages 00003B55: LD C,A 00003B56: LD A,(HL) 00003B57: INC HL 00003B58: OR A 00003B59: JR NZ,-05h 00003B5B: DEC C 00003B5C: JR NZ,-08h 00003B5E: CALL 3539h print string 00003B61: JP 1EA9h ------------------------------------------------------ 00003B64: EX HL,(SP) **** The MONITOR **** 00003B65: DEC HL 00003B66: LD (61B0h),HL 00003B69: EX HL,(SP) 00003B6A: INC SP 00003B6B: INC SP 00003B6C: LD (61AEh),SP 00003B70: LD SP,61AEh 00003B73: PUSH IY 00003B75: PUSH IX 00003B77: EXX 00003B78: EX AF,AF' 00003B79: PUSH BC 00003B7A: PUSH DE 00003B7B: PUSH HL 00003B7C: PUSH AF 00003B7D: EXX 00003B7E: EX AF,AF' 00003B7F: PUSH BC 00003B80: PUSH DE 00003B81: PUSH HL 00003B82: PUSH AF 00003B83: LD (61BAh),SP 00003B87: LD A,C3h 00003B89: LD (61B2h),A 00003B8C: CALL 3E8Eh 00003B8F: LD A,0Eh 00003B91: RST 08h 00003B92: JR +0Ah 00003B94: LD SP,(61BAh) 00003B98: LD HL,3BC8h 00003B9B: CALL 3539h 00003B9E: LD A,2Ah 00003BA0: RST 08h 00003BA1: CALL 62BBh 00003BA4: LD DE,6000h 00003BA7: LD A,(DE) 00003BA8: CALL 3DFAh 00003BAB: SUB 41h 00003BAD: JR C,-1Bh 00003BAF: CP 1Ah 00003BB1: JR NC,-1Fh 00003BB3: RLCA 00003BB4: INC DE 00003BB5: LD BC,3BCFh 00003BB8: LD L,A 00003BB9: LD H,00h 00003BBB: ADD HL,BC 00003BBC: LD A,(HL) 00003BBD: INC HL 00003BBE: LD H,(HL) 00003BBF: LD L,A 00003BC0: LD BC,3B9Eh 00003BC3: PUSH BC 00003BC4: RST 10h 00003BC5: CP 0Dh 00003BC7: LD PC,HL 00003BC8: CCF 00003BC9: CCF 00003BCA: CCF 00003BCB: CCF 00003BCC: DEC C 00003BCD: LD E,00h 00003BCF: ADC E 00003BD0: DEC A 00003BD1: EX AF,AF' 00003BD2: INC A 00003BD3: LD (HL),B 00003BD4: DEC A 00003BD5: CALL M,D43Eh 00003BD8: LD A,CCh 00003BDA: DEC A 00003BDB: OR 3Dh 00003BDD: LD (HL),H 00003BDE: INC A 00003BDF: LD A,B 00003BE0: DEC A 00003BE1: RET PE 00003BE2: JR C,-6Ch 00003BE4: DEC SP 00003BE5: LD HL,(663Eh) 00003BE8: INC A 00003BE9: SUB H 00003BEA: DEC SP 00003BEB: EX DE,HL 00003BEC: DEC A 00003BED: RRA 00003BEE: INC A 00003BEF: SBC 3Dh 00003BF1: LD L,D 00003BF2: CCF 00003BF3: INC BC 00003BF4: INC A 00003BF5: LD H,B 00003BF6: DEC A 00003BF7: LD L,(HL) 00003BF8: LD A,44h 00003BFA: LD A,00h 00003BFC: LD A,8Eh 00003BFE: LD A,94h 00003C00: DEC SP 00003C01: CP E 00003C02: INC A 00003C03: LD A,04h 00003C05: JP 351Bh 00003C08: JR Z,+0Dh 00003C0A: CALL 3D17h 00003C0D: LD (61B6h),HL 00003C10: LD A,(HL) 00003C11: LD (61B5h),A 00003C14: LD (HL),F7h 00003C16: RET 00003C17: LD HL,(61B6h) 00003C1A: LD A,(61B5h) 00003C1D: LD (HL),A 00003C1E: RET 00003C1F: CALL 3D17h 00003C22: LD DE,(61B0h) 00003C26: ADD HL,DE 00003C27: LD (61B0h),HL 00003C2A: JP 3E8Eh 00003C2D: DEC BC 00003C2E: DEC BC 00003C2F: INC BC 00003C30: LD L,C 00003C31: LD H,B 00003C32: LD (61B8h),HL 00003C35: PUSH BC 00003C36: CALL 3D0Ch 00003C39: LD A,3Ch 00003C3B: RST 08h 00003C3C: LD A,(HL) 00003C3D: CALL 2239h 00003C40: LD A,3Eh 00003C42: RST 08h 00003C43: CALL 352Ah 00003C46: CALL 62BBh 00003C49: POP BC 00003C4A: LD DE,6000h 00003C4D: LD A,(DE) 00003C4E: CP 0Dh 00003C50: JR Z,-23h 00003C52: CP 2Fh 00003C54: JR Z,-29h 00003C56: CP 2Eh 00003C58: RET Z 00003C59: RST 10h 00003C5A: CP 0Dh 00003C5C: JR Z,-2Eh 00003C5E: CALL 3D17h 00003C61: LD A,L 00003C62: LD (BC),A 00003C63: INC BC 00003C64: JR -0Dh 00003C66: JR NZ,+05h 00003C68: LD HL,(61B8h) 00003C6B: JR +03h 00003C6D: CALL 3D17h 00003C70: LD C,L 00003C71: LD B,H 00003C72: JR -1Bh 00003C74: JR NZ,+05h 00003C76: LD HL,(61B8h) 00003C79: JR +03h 00003C7B: CALL 3D17h 00003C7E: LD B,10h 00003C80: PUSH BC 00003C81: CALL 3CA5h 00003C84: CALL 352Ah 00003C87: LD B,08h 00003C89: LD A,(HL) 00003C8A: INC HL 00003C8B: CALL 3D55h 00003C8E: DJNZ -07h 00003C90: LD A,1Eh 00003C92: RST 08h 00003C93: LD A,1Fh 00003C95: RST 08h 00003C96: CALL 1F05h 00003C99: POP BC 00003C9A: JR Z,+05h 00003C9C: DJNZ -1Eh 00003C9E: LD (61B8h),HL 00003CA1: LD A,1Eh 00003CA3: RST 08h 00003CA4: RET 00003CA5: CALL 3D0Ch 00003CA8: CALL 352Ah 00003CAB: LD B,08h 00003CAD: PUSH HL 00003CAE: LD A,(HL) 00003CAF: INC HL 00003CB0: CALL 3D12h 00003CB3: DJNZ -07h 00003CB5: POP HL 00003CB6: RET 00003CB7: LD A,0Dh 00003CB9: RST 08h 00003CBA: RET 00003CBB: LD IX,3CE8h 00003CBF: LD DE,619Ah 00003CC2: LD B,0Ch 00003CC4: PUSH BC 00003CC5: LD B,03h 00003CC7: LD A,(IX+00h) 00003CCA: RST 08h 00003CCB: INC IX 00003CCD: DJNZ -08h 00003CCF: CALL 352Ah 00003CD2: LD A,(DE) 00003CD3: LD L,A 00003CD4: INC DE 00003CD5: LD A,(DE) 00003CD6: LD H,A 00003CD7: INC DE 00003CD8: CALL 3CA5h 00003CDB: LD A,1Eh 00003CDD: RST 08h 00003CDE: LD A,1Fh 00003CE0: RST 08h 00003CE1: POP BC 00003CE2: DJNZ -20h 00003CE4: LD A,1Eh 00003CE6: RST 08h 00003CE7: RET 00003CE8: LD B,C 00003CE9: LD B,(HL) 00003CEA: JR NZ,+48h 00003CEC: LD C,H 00003CED: JR NZ,+44h 00003CEF: LD B,L 00003CF0: JR NZ,+42h 00003CF2: LD B,E 00003CF3: JR NZ,+41h 00003CF5: LD B,(HL) 00003CF6: DAA 00003CF7: LD C,B 00003CF8: LD C,H 00003CF9: DAA 00003CFA: LD B,H 00003CFB: LD B,L 00003CFC: DAA 00003CFD: LD B,D 00003CFE: LD B,E 00003CFF: DAA 00003D00: LD C,C 00003D01: LD E,B 00003D02: JR NZ,+49h 00003D04: LD E,C 00003D05: JR NZ,+53h 00003D07: LD D,B 00003D08: JR NZ,+50h 00003D0A: LD B,E 00003D0B: JR NZ,-33h 00003D0D: INC (HL) 00003D0E: LD (2AC3h),HL 00003D11: DEC (HL) 00003D12: CALL 2239h 00003D15: JR -08h --------------------------------------------------- 00003D17: CALL 3D24h main honcho little routine for a lot of what follows 00003D1A: LD A,(DE) 00003D1B: CP 0Dh 00003D1D: RET Z 00003D1E: CP 20h 00003D20: RET Z 00003D21: JP 3B94h --------------------------------------- 00003D24: LD HL,0000h called from above 00003D27: RST 10h 00003D28: LD A,(DE) 00003D29: CALL 3DFAh 00003D2C: SUB 30h 00003D2E: RET C 00003D2F: CP 0Ah 00003D31: JR C,+08h 00003D33: SUB 07h 00003D35: CP 0Ah 00003D37: RET C 00003D38: CP 10h 00003D3A: RET NC 00003D3B: ADD HL,HL 00003D3C: ADD HL,HL 00003D3D: ADD HL,HL 00003D3E: ADD HL,HL 00003D3F: ADD L 00003D40: LD L,A 00003D41: INC DE 00003D42: JR -1Ch 00003D44: POP IX 00003D46: CALL 3D17h 00003D49: PUSH HL 00003D4A: CALL 3D17h 00003D4D: PUSH HL 00003D4E: CALL 3D17h 00003D51: LD C,L 00003D52: LD B,H 00003D53: LD PC,IX 00003D55: AND 7Fh 00003D57: CP 20h 00003D59: JR NC,+02h 00003D5B: LD A,2Eh 00003D5D: JP 351Bh 00003D60: CALL 3D17h 00003D63: LD A,(DE) 00003D64: CP 0Dh 00003D66: RET Z 00003D67: INC DE 00003D68: LD A,(DE) 00003D69: CP 0Dh 00003D6B: RET Z 00003D6C: LD (HL),A 00003D6D: INC HL 00003D6E: JR -09h 00003D70: CALL 3D44h 00003D73: POP DE 00003D74: POP HL 00003D75: LDIR 00003D77: RET ----------------------------------------------- 00003D78: CALL 3D44h 00003D7B: POP DE 00003D7C: POP HL 00003D7D: CALL 2568h 00003D80: JR NC,-0Dh 00003D82: ADD HL,BC 00003D83: EX DE,HL 00003D84: ADD HL,BC 00003D85: EX DE,HL 00003D86: DEC DE 00003D87: DEC HL 00003D88: LDDR 00003D8A: RET ---------------------------------------- 00003D8B: CALL 3D17h 00003D8E: PUSH HL 00003D8F: CALL 3D17h 00003D92: LD E,L 00003D93: LD D,H 00003D94: POP HL 00003D95: PUSH HL 00003D96: ADD HL,DE 00003D97: CALL 3D0Ch 00003D9A: POP HL 00003D9B: PUSH HL 00003D9C: OR A 00003D9D: SBC HL,DE 00003D9F: CALL 3D0Ch 00003DA2: POP HL 00003DA3: EX DE,HL 00003DA4: DEC HL 00003DA5: SCF 00003DA6: SBC HL,DE 00003DA8: LD A,H 00003DA9: OR A 00003DAA: JR Z,+0Ch 00003DAC: INC A 00003DAD: JR Z,+13h 00003DAF: LD HL,3DC9h 00003DB2: CALL 3539h 00003DB5: JP 3CB7h 00003DB8: LD A,L 00003DB9: CP 80h 00003DBB: JR NC,-0Eh 00003DBD: CALL 3D12h 00003DC0: JR -0Dh 00003DC2: LD A,L 00003DC3: CP 80h 00003DC5: JR C,-18h 00003DC7: JR -0Ch 00003DC9: CCF 00003DCA: CCF 00003DCB: NOP 00003DCC: CALL 3D44h 00003DCF: LD A,L 00003DD0: POP HL 00003DD1: POP DE 00003DD2: OR A 00003DD3: SBC HL,DE 00003DD5: LD C,L 00003DD6: LD B,H 00003DD7: LD H,D 00003DD8: LD L,E 00003DD9: INC DE 00003DDA: LD (HL),A 00003DDB: LDIR 00003DDD: RET --------------------------------------------------- 00003DDE: CALL 3D17h Monitor Q command 00003DE1: LD C,L 00003DE2: LD B,H 00003DE3: IN A,(C) in (arg) ret from 3d17 (picks up arg into HL) IN HERE ========= 00003DE5: CALL 3D12h 00003DE8: JP 3CB7h 00003DEB: CALL 3D17h 3d17 Monitor O command 00003DEE: LD C,L 00003DEF: LD B,H 00003DF0: CALL 3D17h 00003DF3: OUT (C),L out arg,L OUT HERE ============== 00003DF5: RET ------------------------------------------- 00003DF6: CALL 3D17h 00003DF9: LD PC,HL 00003DFA: CP 40h 00003DFC: RET C 00003DFD: RES 5,A 00003DFF: RET ----------------- 00003E00: CALL 3D17h 00003E03: PUSH HL 00003E04: CALL 3D17h 00003E07: LD E,L 00003E08: LD D,H 00003E09: POP HL 00003E0A: LD A,(HL) 00003E0B: CP E 00003E0C: JR NZ,+09h 00003E0E: INC HL 00003E0F: LD A,(HL) 00003E10: DEC HL 00003E11: CP D 00003E12: JR NZ,+03h 00003E14: CALL 3E21h 00003E17: CALL 1F05h 00003E1A: RET Z 00003E1B: INC HL 00003E1C: LD A,L 00003E1D: OR H 00003E1E: JR NZ,-16h 00003E20: RET ----------------------------- 00003E21: CALL 3D0Ch 00003E24: LD (61B8h),HL 00003E27: JP 3CB7h 00003E2A: CALL 3D17h 00003E2D: PUSH HL 00003E2E: CALL 3D17h 00003E31: LD E,L 00003E32: POP HL 00003E33: LD A,(HL) 00003E34: CP E 00003E35: JR NZ,+03h 00003E37: CALL 3E21h 00003E3A: CALL 1F05h 00003E3D: RET Z 00003E3E: INC HL 00003E3F: LD A,L 00003E40: OR H 00003E41: JR NZ,-10h 00003E43: RET ----------------------------------- 00003E44: CALL 3D44h 00003E47: POP DE 00003E48: POP HL 00003E49: LD A,(DE) 00003E4A: CP (HL) 00003E4B: CALL NZ,3D0Ch 00003E4E: INC DE 00003E4F: INC HL 00003E50: PUSH BC 00003E51: CALL 1F05h 00003E54: POP BC 00003E55: JR Z,+05h 00003E57: DEC BC 00003E58: LD A,B 00003E59: OR C 00003E5A: JR NZ,-13h 00003E5C: JP 3CB7h 00003E5F: POP DE 00003E60: POP HL 00003E61: INC HL 00003E62: INC HL 00003E63: INC HL 00003E64: INC IX 00003E66: INC IX 00003E68: POP BC 00003E69: DJNZ +0Ah 00003E6B: JP 3B94h ------------------------ 00003E6E: LD HL,3CE8h 00003E71: LD IX,619Ah 00003E75: PUSH BC 00003E76: PUSH HL 00003E77: PUSH DE 00003E78: LD B,03h 00003E7A: LD A,(DE) 00003E7B: CP (HL) 00003E7C: INC DE 00003E7D: INC HL 00003E7E: JR NZ,-21h 00003E80: DJNZ -08h 00003E82: POP BC 00003E83: POP BC 00003E84: POP BC 00003E85: CALL 3D17h 00003E88: LD (IX+00h),L 00003E8B: LD (IX+01h),H 00003E8E: LD DE,619Ah 00003E91: LD B,04h 00003E93: CALL 3EAAh 00003E96: LD A,1Eh 00003E98: RST 08h 00003E99: LD A,1Fh 00003E9B: RST 08h 00003E9C: LD B,08h 00003E9E: CALL 3EAAh 00003EA1: CALL 3EB6h 00003EA4: LD A,1Eh 00003EA6: RST 08h 00003EA7: JP 3CB7h 00003EAA: LD A,(DE) 00003EAB: LD L,A 00003EAC: INC DE 00003EAD: LD A,(DE) 00003EAE: LD H,A 00003EAF: INC DE 00003EB0: CALL 3D0Ch 00003EB3: DJNZ -0Bh 00003EB5: RET ------------------------------------ 00003EB6: LD A,(619Ah) 00003EB9: LD HL,3ECBh 00003EBC: LD C,A 00003EBD: SCF 00003EBE: RL C 00003EC0: RET Z 00003EC1: LD A,(HL) 00003EC2: JR C,+02h 00003EC4: LD A,2Eh 00003EC6: RST 08h 00003EC7: INC HL 00003EC8: OR A 00003EC9: JR -0Dh 00003ECB: LD D,E 00003ECC: LD E,D 00003ECD: LD SP,3148h 00003ED0: LD D,B 00003ED1: LD C,(HL) 00003ED2: LD B,E 00003ED3: NOP -------------------------------------------------------- 00003ED4: JR Z,+05h Monitor E command - execute 00003ED6: CALL 3D17h pick up arg into HL 00003ED9: JR +03h 00003EDB: LD HL,(61B0h) not listed - another entry point here 00003EDE: LD (61B3h),HL not listed 00003EE1: LD SP,(61BAh) not listed, place where SP is saved by MLOAD routine before prog load 00003EE5: POP AF 00003EE6: POP HL 00003EE7: POP DE 00003EE8: POP BC pop all registers from saved stack position 00003EE9: EXX 00003EEA: EX AF,AF' 00003EEB: POP AF 00003EEC: POP HL 00003EED: POP DE 00003EEE: POP BC 00003EEF: EXX 00003EF0: EX AF,AF' 00003EF1: POP IX and I mean, all 00003EF3: POP IY 00003EF5: LD SP,(61AEh) again, unlisted - hmmm ? 00003EF9: JP 61B2h who knows - monitor re-entry ? --------------------------------- 00003EFC: CALL 3D44h 00003EFF: PUSH HL 00003F00: CALL 3F4Eh 00003F03: CALL 0BB4h io routine 00003F06: POP DE 00003F07: POP HL 00003F08: POP BC 00003F09: PUSH BC 00003F0A: OR A 00003F0B: SBC HL,BC 00003F0D: INC HL 00003F0E: LD C,L 00003F0F: LD B,H 00003F10: POP HL 00003F11: PUSH DE 00003F12: CALL 0B93h 00003F15: LD A,4Dh 00003F17: CALL 62A6h 00003F1A: LD A,C 00003F1B: CALL 62A6h 00003F1E: LD A,B 00003F1F: CALL 62A6h 00003F22: CALL 3F46h 00003F25: LD E,00h 00003F27: LD A,(HL) 00003F28: CALL 62A6h 00003F2B: INC HL 00003F2C: ADD E 00003F2D: LD E,A 00003F2E: DEC BC 00003F2F: LD A,B 00003F30: OR C 00003F31: JR NZ,-0Ch 00003F33: LD A,E 00003F34: CALL 62A6h 00003F37: LD A,45h 00003F39: CALL 62A6h 00003F3C: POP HL 00003F3D: CALL 3F46h 00003F40: CALL 62A6h 00003F43: JP 0CFBh 00003F46: LD A,L 00003F47: CALL 62A6h 00003F4A: LD A,H 00003F4B: JP 62A6h 00003F4E: RST 10h 00003F4F: CP 22h 00003F51: JP NZ,3B94h 00003F54: PUSH DE 00003F55: INC DE 00003F56: LD A,(DE) 00003F57: CP 0Dh 00003F59: JP Z,3B94h 00003F5C: CP 22h 00003F5E: JR NZ,-0Bh 00003F60: POP DE 00003F61: RET ---------------------------------------------- 00003F62: LD HL,(61EEh) stack pointer used by himem ********* MLOAD *********** 00003F65: LD (61BAh),HL hmmm, not listed anywhere prob just saving the SP - just a couple of bytes ~100 bytes before SYSVARS 00003F68: JR +0Eh to W ------------- 00003F6A: CALL 3F4Eh check for valid filename //another entry point here - R command of MONitor 00003F6D: LD HL,(61FEh) not listed just after prog end pointer 00003F70: PUSH HL 00003F71: EX DE,HL 00003F72: LD BC,00FFh 00003F75: LDIR 00003F77: POP DE ----------------- 00003F78: CALL 0C26h W 00003F7B: CALL 0B65h Read Sync - U 00003F7E: CALL 0B85h Read byte 00003F81: CP 4Dh compare it with 4D 00003F83: JR NZ,+3Fh if not mc then skip and jump to K below 00003F85: CALL 0B85h read byte 00003F88: LD C,A 00003F89: CALL 0B85h read byte - BC = length 00003F8C: LD B,A 00003F8D: CALL 0B85h r 00003F90: LD L,A 00003F91: CALL 0B85h rb - HL = Load address 00003F94: LD H,A 00003F95: LD E,00h 00003F97: CALL 0B85h rb 00003F9A: LD (HL),A poke byte into memory 00003F9B: INC HL 00003F9C: ADD E 00003F9D: LD E,A E becomes a running checksum 00003F9E: DEC BC 00003F9F: LD A,B 00003FA0: OR C 00003FA1: JR NZ,-0Ch read BC bytes of binary prog 00003FA3: CALL 0B85h rb 00003FA6: CP E compare with running checksum - mod 255 on E 00003FA7: JR NZ,+1Bh if csum wrong then jmp to the ret below ie - just exit, noooothing more! 00003FA9: CALL 0B85h read another byte - whew ((8<$) 00003FAC: CP 4Eh compare this lovely one with the beautiful character 4E - mmmm mmm mm its an N !! 00003FAE: JR Z,-35h if it IS an N then go back to Read Sync again - U (dont have clu ) 00003FB0: CALL 0B85h get byte 00003FB3: LD L,A 00003FB4: CALL 0B85h get byte - HL = exec address 00003FB7: LD H,A 00003FB8: CALL 0CFBh stop motor 00003FBB: LD A,L 00003FBC: OR H 00003FBD: JR NZ,+04h if exec address is NOT zero then jump to ld PC,HL below 00003FBF: LD A,0Dh otherwise, print a return chr 00003FC1: RST 08h 00003FC2: RET and exit ... snooze ----------------------------------------- ---------------------- 00003FC3: LD PC,HL run the program :)) yaaarrrt die alien invaders !!! ------------------------ 00003FC4: CALL 0CFBh stop motor - K jmp from above 00003FC7: LD HL,3AEFh 00003FCA: CALL 3539h print error message - Not a binary file error probably 00003FCD: LD A,0Dh 00003FCF: RST 08h 00003FD0: JP 3B94h somewhere - oh go on, i'll look it up ... its, urgh som sort of error handl crud ---------------------------------------------------------------------------------------------- 00003FD3: JR NC,+01h *** multiply *** 00003FD5: INC E 00003FD6: LD (HL),A 00003FD7: LD D,E 00003FD8: DEC HL 00003FD9: RET ----------------------------------- 00003FDA: PUSH HL *** part of dim routine **** 00003FDB: INC HL 00003FDC: LD (HL),00h 00003FDE: INC HL 00003FDF: LD (HL),00h 00003FE1: POP HL 00003FE2: JP 2D88h 00003FE5: LD A,B 00003FE6: OR A 00003FE7: RET Z 00003FE8: JP 2C7Fh 00003FEB: CALL 2F85h 00003FEE: JP 2FCBh 00003FF1: RLA 00003FF2: CALL NC,366Dh 00003FF5: LD HL,35FBh 00003FF8: CALL 35BAh 00003FFB: JP 366Dh 00003FFE: RST 38h ?SYS VARS 30 15 1b 19 02 10 11 25 2f 3e 28 12 05 04 03 17 38 624c ? 0e 44 39 09 36 37 14 20 06 5f 03 7b 05 f5 00 07 625c: 00 00 02 20 6260: 00 c3 be 0f 00 00 00 00 00 00 626b: 00 looked from cls routine - PAPER COLOR 0 - 7 Jump block at 626c 626c: JP 085e 626f: 94 00 d4 01 20 00 00 6276: JP 3b32 6279: JP 3b32 627c: JP 3b32 627f: JP 3b32 6282: JP 3b32 6285: JP 3b32 6288: RET 6289: 00 628a: 00 628b: RET 628c: 00 628d: 00 628e: 00 looked from cls routine 628f: 80 6290: 00 looked from cls routine 6291: c0 6292: 00 6293: c0 6294: JP 3b32 629c: JP 3b32 629a: ef 38 50 01 04 03 09 0d 62a3: JP 0cd4 62a6: JP 0d67 62a9: JP 18d7 62ac: JP 19be 62af: JP 33a9 62b0: JP 27e5 62b3: JP 24e5 62b6: JP 009a 62b9: JP 10e2 62bc: JP 2d5c ff ff ff 00 00 00 00 00 00 00 00 00 00 00 ----- 11 0's ff x 22 c0 10 00 00 00 ff x 4 00 00