; CCCP v0.94 ; COMMENTED DISASSEMBLY (C) COPYRIGHT 1998 J.G.HARSTON ; CAMBRIDGE CONCOLE COMMAND PROCESSOR ; ENTERED AT &3000 ; ------------- While CCP is running, RSTs are: 00 -> Reset 08 -> Copy from Rom to Ram 10 -> PrText 18 -> GetByte 20 -> PutByte 28 -> UserImm 30 -> BDOS call 38 -> Debug ; If no net system present, the following code in the TPA is called: 0100 C3 00 30 Ă.0 JP &3000 ; Jump to &3000 ; If net system is present, the following code in the TPA is called: 0100 3E 00 >. LD A,&00 ; Modify a jump to remove 0102 32 44 30 2D0 LD (&3044),A ; skipping past a net test 0105 3E 4E >N LD A,&4E ; ???... 0107 32 19 3A 2.: LD (&3A19),A 010A 3E 41 >A LD A,&41 ; Extend command table by 010C 32 FA 32 2ú2 LD (&32FA),A ; inserting 'A' of 'Attach' 010F C3 00 30 Ă.0 JP &3000 ; Jump to &3000 ; ----------------- ; Actual CCP code: 3000 31 FE 2D 1ţ- LD SP,&2DFE ; Set up a stack 3003 F7 ÷ RST &30 ; BDOS Function &18 3004 18 . DEFB &18 ; Get Login vector 3005 F7 ÷ RST &30 ; BDOS Function &0D 3006 0D . DEFB &0D ; Reset drives 3007 3E 4F >O LD A,&4F 3009 32 37 00 27. LD (&0037),A ; Set COUNT to 79 300C 18 03 .. JR &3011 ; Loop back to here with null line 300E CD EB 43 ÍëC CALL &43EB ; 3011 31 FE 2D 1ţ- LD SP,&2DFE ; Clear the stack 3014 3E C3 >Ă LD A,&C3 3016 32 10 00 2.. LD (&0010),A 3019 21 36 45 !6E LD HL,&4536 301C 22 11 00 ".. LD (&0011),HL ; Put JP &4536 - PrText at RST &10 301F 32 18 00 2.. LD (&0018),A 3022 21 C6 FF !Ć. LD HL,&FFC6 3025 22 19 00 ".. LD (&0019),HL ; Put JP &FFC6 - GetByte at RST &18 3028 32 20 00 2 . LD (&0020),A 302B 21 C9 FF !É. LD HL,&FFC9 302E 22 21 00 "!. LD (&0021),HL ; Put JP &FFC9 - PutByte at RST &20 3031 32 28 00 2(. LD (&0028),A 3034 21 C0 FF !Ŕ. LD HL,&FFC0 3037 22 29 00 "). LD (&0029),HL ; Put JP &FFC0 - UsrImm at RST &28 303A 3A 37 00 :7. LD A,(&0037) ; Get COUNT 303D A7 § AND A 303E 28 03 (. JR Z,&3043 ; If COUNT<>0, print LF 3040 D7 × RST &10 3041 0A . DEFM CHR$10 ; Print LF 3042 00 . DEFB &00 3043 18 08 .. JR &304D ; Modified: If no net, jump past ; 3045 F7 ÷ RST &30 ; BDOS Function &7F 3046 7F . DEFB &7F ; TorchNet &7F 3047 CD A3 42 ÍŁB CALL &42A3 304A D7 × RST &10 304B 3A : DEFM ":" ; Print ":"; 304C 00 . DEFB &00 ; Net prompt is ????:nd> ; 304D 1E FF .. LD E,&FF ; &FF=Read 304F F7 ÷ RST &30 ; BDOS Function &20 3050 20 DEFB &20 ; Get User Code 3051 32 CC 02 2. LD (&02CC),A ; Store user code 3054 6F o LD L,A 3055 26 00 &. LD H,&00 ; Put user number into HL 3057 CD B5 42 ÍľB CALL &42B5 ; Print in decimal? 305A F7 ÷ RST &30 ; BDOS Function &19 305B 19 . DEFB &19 ; Return Current Disk 305C C6 41 ĆA ADD A,&41 ; Adjust to be A, B, etc. 305E 5F _ LD E,A ; Put char into E 305F F7 ÷ RST &30 ; BDOS Function &02 3060 02 . DEFB &02 ; CONOUT - Screen Output 3061 D7 × RST &10 3062 3E 00 >. DEFM ">":DEFB 0 ; Print ">"; 3064 EF ď RST &28 ; UsrImm &17 3065 17 . DEFB &17 ; Reset handle table 3066 11 00 2F ../ LD DE,&2F00 3069 F7 ÷ RST &30 ; BDOS Function &7B 306A 78 x DEFB &78 ; TorchNet 306B 38 25 8% JR C,&3092 ; jump to get input 306D 20 1E . JR NZ,&308D ; jump to test CCCPCS 306F 32 42 2F 2B/ LD (&2F42),A 3072 D7 × RST &10 3073 0D 2A 2A 2A C6 DEFB &0D:DEFM "***"+CHR$&C6+"rom"+CHR$&80 3078 72 6F 6D 80 ; CR,"*** From " 307C 2A 00 2F *./ LD HL,(&2F00) 307F CD A3 42 ÍŁB CALL &42A3 3082 D7 × RST &10 3083 AD 80 DEFM CHR$&AD+CHR$&80 ; " - " 3085 21 02 2F !./ LD HL,&2F02 ; Pointer to string 3088 CD 3E 45 Í>E CALL &453E ; Print text at &2F02... 308B 18 AD . JR &303A ; 308D CD B4 FF Í´. CALL &FFB4 ; CCCPCS - Check ConStat & Get Char 3090 28 D4 (Ô JR Z,&3066 ; Jump back if no char waiting (?) ; 3092 11 FE 2E .ţ. LD DE,&2EFE ; Point to input header 3095 3E 64 >d LD A,&64 ; 64 characters long 3097 12 . LD (DE),A 3098 F7 ÷ RST &30 ; BDOS Funcion &0A 3099 0A . LD A,(BC) ; Input from console 309A D7 × RST &10 309B 0A 00 .. DEFM CHR$10:DEFB 0 ; LF 309D D5 Ő PUSH DE 309E E1 á POP HL ; Copy pointer to input to HL 309F D5 Ő PUSH DE 30A0 15 . DEC D 30A1 01 00 01 ... LD BC,&0100 30A4 ED B0 í° LDIR ; Copy input at &2Fxx to &2Exx 30A6 D1 Ń POP DE ; Restore DE=>input 30A7 13 . INC DE 30A8 1A . LD A,(DE) ; Get input count 30A9 A7 § AND A 30AA CA 0E 30 Ę.0 JP Z,&300E ; Nothing, got back for more 30AD 47 G LD B,A 30AE 13 . INC DE ; Point to first character 30AF 1A . LD A,(DE) ; Convert input line to upper case 30B0 FE 61 ţa CP &61 30B2 38 06 8. JR C,&30BA ; Is is 'a' to 'z'? 30B4 FE 7B ţ{ CP &7B 30B6 30 02 0. JR NC,&30BA 30B8 C6 E0 Ćŕ ADD A,&E0 ; Make upper case 30BA 12 . LD (DE),A ; Put back into buffer 30BB 10 F1 .ń DJNZ &30AE ; Loop for each character 30BD 13 . INC DE 30BE 3E 0D >. LD A,&0D 30C0 12 . LD (DE),A ; Put CR at end of input line 30C1 15 . DEC D 30C2 12 . LD (DE),A ; And at end of input line copy 30C3 21 00 2F !./ LD HL,&2F00 ; Point to upper case line 30C6 CD 00 45 Í.E CALL &4500 30C9 CA 0E 30 Ę.0 JP Z,&300E ; Loop back for another line 30CC FE 3B ţ; CP &3B ; Comment? 30CE CA 0E 30 Ę.0 JP Z,&300E ; Loop back for another line 30D1 FE 2A ţ* CP &2A ; *Command? 30D3 CA C4 33 ĘÄ3 JP Z,&33C4 ; Jump to deal with it 30D6 11 BC 31 .ź1 LD DE,&31BC ; Point to command table 30D9 21 00 2F !./ LD HL,&2F00 ; Point to upper case line 30DC 1A . LD A,(DE) ; Get byte from table 30DD A7 § AND A ; End of entry? 30DE 28 3F (? JR Z,&311F 30E0 CD 00 45 Í.E CALL &4500 30E3 EB ë EX DE,HL 30E4 BE ž CP (HL) 30E5 EB ë EX DE,HL 30E6 20 24 $ JR NZ,&310C 30E8 13 . INC DE 30E9 CD 09 45 Í.E CALL &4509 30EC 30 F5 0ő JR NC,&30E3 30EE 1A . LD A,(DE) 30EF A7 § AND A 30F0 20 1A . JR NZ,&310C 30F2 13 . INC DE 30F3 22 81 2F "./ LD (&2F81),HL 30F6 22 81 2E ".. LD (&2E81),HL 30F9 EB ë EX DE,HL 30FA 5E ^ LD E,(HL) 30FB 23 # INC HL 30FC 56 V LD D,(HL) 30FD EB ë EX DE,HL ; HL=routine address 30FE CD 84 31 Í.1 CALL &3184 3101 11 00 02 ... LD DE,&0200 ; Set DMA to &0200 3104 F7 ÷ RST &30 ; BDOS Function &1A 3105 1A . DEFB &1A ; Set DMA Address 3106 CD 17 31 Í.1 CALL &3117 ; ... and call address in HL 3109 C3 0E 30 Ă.0 JP &300E ; Loop back for another line 310C 1A . LD A,(DE) 310D 13 . INC DE 310E A7 § AND A 310F 20 FB ű JR NZ,&310C 3111 13 . INC DE 3112 13 . INC DE 3113 13 . INC DE 3114 13 . INC DE 3115 18 C2 .Â JR &30D9 ; Jump to routine in HL 3117 E5 ĺ PUSH HL ; Push address onto stack 3118 11 5C 00 .\. LD DE,&005C ; DE=>FCB1 311B 2A 81 2F *./ LD HL,(&2F81) ; HL=>next char in line 311E C9 É RET ; Jump to routine 311F 21 00 2F !./ LD HL,&2F00 3122 11 5C 00 .\. LD DE,&005C 3125 01 B9 40 .š@ LD BC,&40B9 3128 CD 36 44 Í6D CALL &4436 312B 30 06 0. JR NC,&3133 312D CD 16 44 Í.D CALL &4416 3130 C3 0E 30 Ă.0 JP &300E 3133 1A . LD A,(DE) 3134 A7 § AND A 3135 28 0E (. JR Z,&3145 3137 13 . INC DE 3138 4F O LD C,A 3139 1A . LD A,(DE) 313A FE 20 ţ CP &20 313C 20 07 . JR NZ,&3145 313E 59 Y LD E,C 313F 1D . DEC E 3140 F7 ÷ RST &30 3141 0E C3 .Ă LD C,&C3 3143 0E 30 .0 LD C,&30 3145 21 5C 00 !\. LD HL,&005C 3148 11 80 02 ... LD DE,&0280 314B CD E3 44 ÍăD CALL &44E3 314E CD 84 31 Í.1 CALL &3184 3151 42 B LD B,D 3152 4B K LD C,E 3153 CD BD FF Í˝. CALL &FFBD 3156 28 1A (. JR Z,&3172 3158 21 00 2F !./ LD HL,&2F00 315B 11 5C 00 .\. LD DE,&005C 315E 01 A9 40 .Š@ LD BC,&40A9 3161 CD 36 44 Í6D CALL &4436 3164 3A 65 00 :e. LD A,(&0065) 3167 FE 20 ţ CP &20 3169 CA F5 33 Ęő3 JP Z,&33F5 316C CD 0B 44 Í.D CALL &440B 316F C3 0E 30 Ă.0 JP &300E 3172 D7 × RST &10 ; Print... 3173 45 6D 70 74 79 D0 72 6F 67 72 61 6D 2E 00 ; "Empty Program." 3181 C3 0E 30 Ă.0 JP &300E ; Jump back to get another line ; Copy line to &0800, create FCB1 and FCB2 3184 C5 Ĺ PUSH BC 3185 D5 Ő PUSH DE 3186 E5 ĺ PUSH HL 3187 2A 81 2F *./ LD HL,(&2F81) 318A 4D M LD C,L 318B 3A FF 2E :.. LD A,(&2EFF) 318E 91 . SUB A,C 318F 32 80 00 2.. LD (&0080),A 3192 11 81 00 ... LD DE,&0081 3195 D5 Ő PUSH DE 3196 4F O LD C,A 3197 06 00 .. LD B,&00 3199 03 . INC BC 319A ED B0 í° LDIR 319C 11 5C 00 .\. LD DE,&005C 319F CD FD 43 ÍýC CALL &43FD 31A2 3A 8C 00 :.. LD A,(&008C) 31A5 F5 ő PUSH AF 31A6 11 6C 00 .l. LD DE,&006C 31A9 CD FD 43 ÍýC CALL &43FD 31AC F1 ń POP AF 31AD 32 8C 00 2.. LD (&008C),A 31B0 97 . SUB A,A 31B1 32 7C 00 2|. LD (&007C),A 31B4 D1 Ń POP DE 31B5 ED 53 81 2F íS./ LD (&2F81),DE 31B9 C3 F8 45 ĂřE JP &45F8 ; Command Table 31BC 5B 44 45 42 55 47 DEFM "[DEBUG" 31C2 00 DEFB &00 31C3 38 00 8. DEFW &0038 31C5 00 .. DEFW &0000 31C7 5B 53 59 53 54 45 DEFM "[SYSTEM" 31CE 00 DEFB &00 31CF C2 3E Â> DEFW &3EC2 31D1 00 00 .. DEFW &0000 31D3 48 DEFM "H" 31D4 00 . DEFB &00 31D5 EF 39 ď9 DEFW &39EF 31D7 00 . DEFW &0000 31D9 48 45 4C 50 DEFM "HELP" 31DD 00 . DEFB &00 31DE EF ď DEFW &39EF 31E0 00 . DEFW &0000 31E2 42 DEFM "B" 31E3 00 . DEFB &00 31E4 06 40 .@ DEFW &4006 31E6 00 00 .. DEFW &0000 31E8 42 41 43 4B 47 52 DEFM "BACKGROUND" 31EE 4F 55 4E 44 31F2 00 . DEFB &00 31F3 06 40 .@ DEFW &4006 31F5 8A 3A .: DEFW &3A8A 31F8 41 53 49 43 DEFM "BASIC" 31FC 00 . DEFB &00 31FD C4 33 Ä3 DEFW &33C4 31FF 7C 3A |: DEFW &3A7C 3201 43 DEFM "C" 3202 00 . DEFB &00 3203 FE 33 ţ3 DEFW &33FE 3205 00 00 .. DEFW &0000 3207 43 C LD B,E 3208 4F O LD C,A 3209 4D M LD C,L 320A 4D M LD C,L 320B 41 A LD B,C 320C 4E N LD C,(HL) 320D 44 D LD B,H 320E 00 . NOP 320F FE 33 ţ3 CP &33 3211 92 . SUB A,D 3212 3A 43 4F :CO LD A,(&4F43) 3215 50 P LD D,B 3216 59 Y LD E,C 3217 00 . NOP 3218 56 V LD D,(HL) 3219 34 4 INC (HL) 321A 9D . SBC A,L 321B 3A 44 45 :DE LD A,(&4544) 321E 4C L LD C,H 321F 00 . NOP 3220 88 . ADC A,B 3221 35 5 DEC (HL) 3222 00 . NOP 3223 00 . NOP 3224 44 D LD B,H 3225 45 E LD B,L 3226 4C L LD C,H 3227 45 E LD B,L 3228 54 T LD D,H 3229 45 E LD B,L 322A 00 . NOP 322B 88 . ADC A,B 322C 35 5 DEC (HL) 322D C8 Č RET Z 322E 3A 44 49 :DI LD A,(&4944) 3231 52 R LD D,D 3232 00 . NOP 3233 1F . RRA 3234 36 00 6. LD (HL),&00 3236 00 . NOP 3237 44 D LD B,H 3238 49 I LD C,C 3239 52 R LD D,D 323A 45 E LD B,L 323B 43 C LD B,E 323C 54 T LD D,H 323D 4F O LD C,A 323E 52 R LD D,D 323F 59 Y LD E,C 3240 00 . NOP 3241 1F . RRA 3242 36 B0 6° LD (HL),&B0 3244 3A 44 55 :DU LD A,(&5544) 3247 50 P LD D,B 3248 00 . NOP 3249 E0 ŕ RET PO 324A 37 7 SCF 324B 00 . NOP 324C 00 . NOP 324D 44 D LD B,H 324E 55 U LD D,L 324F 50 P LD D,B 3250 4C L LD C,H 3251 49 I LD C,C 3252 43 C LD B,E 3253 41 A LD B,C 3254 54 T LD D,H 3255 45 E LD B,L 3256 00 . NOP 3257 E0 ŕ RET PO 3258 37 7 SCF 3259 D4 3A 46 Ô:F CALL NC,&463A 325C 00 . NOP 325D 02 . LD (BC),A 325E 40 @ LD B,B 325F 00 . NOP 3260 00 . NOP 3261 46 F LD B,(HL) 3262 4F O LD C,A 3263 52 R LD D,D 3264 45 E LD B,L 3265 47 G LD B,A 3266 52 R LD D,D 3267 4F O LD C,A 3268 55 U LD D,L 3269 4E N LD C,(HL) 326A 44 D LD B,H 326B 00 . NOP 326C 02 . LD (BC),A 326D 40 @ LD B,B 326E 8A . ADC A,D 326F 3A 46 4F :FO LD A,(&4F46) 3272 52 R LD D,D 3273 4D M LD C,L 3274 41 A LD B,C 3275 54 T LD D,H 3276 00 . NOP 3277 A9 Š XOR C 3278 39 9 ADD HL,SP 3279 D7 × RST &10 327A 3A 49 4E :IN LD A,(&4E49) 327D 50 P LD D,B 327E 55 U LD D,L 327F 54 T LD D,H 3280 00 . NOP 3281 E3 ă EX (SP),HL 3282 3B ; DEC SP 3283 FB ű EI 3284 3A 4B 45 :KE LD A,(&454B) 3287 59 Y LD E,C 3288 00 . NOP 3289 C4 33 09 Ä3. CALL NZ,&0933 328C 3B ; DEC SP 328D 4D M LD C,L 328E 4F O LD C,A 328F 44 D LD B,H 3290 45 E LD B,L 3291 00 . NOP 3292 F8 ř RET M 3293 3F ? CCF 3294 0F . RRCA 3295 3B ; DEC SP 3296 50 P LD D,B 3297 52 R LD D,D 3298 49 I LD C,C 3299 4E N LD C,(HL) 329A 54 T LD D,H 329B 00 . NOP 329C 0F . RRCA 329D 3D = DEC A 329E 1A . LD A,(DE) 329F 3B ; DEC SP 32A0 50 P LD D,B 32A1 52 R LD D,D 32A2 4F O LD C,A 32A3 54 T LD D,H 32A4 45 E LD B,L 32A5 43 C LD B,E 32A6 54 T LD D,H 32A7 00 . NOP 32A8 3C < INC A 32A9 3D = DEC A 32AA 1C . INC E 32AB 3B ; DEC SP 32AC 52 R LD D,D 32AD 45 E LD B,L 32AE 4E N LD C,(HL) 32AF 00 . NOP 32B0 1A . LD A,(DE) 32B1 3E 00 >. LD A,&00 32B3 00 . NOP 32B4 52 R LD D,D 32B5 45 E LD B,L 32B6 4E N LD C,(HL) 32B7 41 A LD B,C 32B8 4D M LD C,L 32B9 45 E LD B,L 32BA 00 . NOP 32BB 1A . LD A,(DE) 32BC 3E 25 >% LD A,&25 32BE 3B ; DEC SP 32BF 53 S LD D,E 32C0 41 A LD B,C 32C1 56 V LD D,(HL) 32C2 45 E LD B,L 32C3 00 . NOP 32C4 70 p LD (HL),B 32C5 3E 2A >* LD A,&2A 32C7 3B ; DEC SP 32C8 54 T LD D,H 32C9 49 I LD C,C 32CA 4D M LD C,L 32CB 45 E LD B,L 32CC 00 . NOP 32CD D2 3E 35 Ň>5 JP NC,&353E 32D0 3B ; DEC SP 32D1 54 T LD D,H 32D2 59 Y LD E,C 32D3 50 P LD D,B 32D4 45 E LD B,L 32D5 00 . NOP 32D6 B9 š CP C 32D7 3F ? CCF 32D8 3D = DEC A 32D9 3B ; DEC SP 32DA 55 U LD D,L 32DB 00 . NOP 32DC EC 3F 00 ě?. CALL PE,&003F 32DF 00 . NOP 32E0 55 U LD D,L 32E1 53 S LD D,E 32E2 45 E LD B,L 32E3 52 R LD D,D 32E4 00 . NOP 32E5 EC 3F 48 ě?H CALL PE,&483F 32E8 3B ; DEC SP 32E9 56 V LD D,(HL) 32EA 44 D LD B,H 32EB 55 U LD D,L 32EC 00 . NOP 32ED 20 40 @ JR NZ,&332F 32EF 57 W LD D,A 32F0 3B ; DEC SP 32F1 56 V LD D,(HL) 32F2 49 I LD C,C 32F3 45 E LD B,L 32F4 57 W LD D,A 32F5 00 . NOP 32F6 77 w LD (HL),A 32F7 40 @ LD B,B 32F8 7A z LD A,D 32F9 3B ; DEC SP 32FA 00 . NOP ; If net, ->'A', extends table 32FB 54 T LD D,H 32FC 54 T LD D,H 32FD 41 A LD B,C 32FE 43 C LD B,E 32FF 48 H LD C,B 3300 00 . NOP 3301 43 C LD B,E 3302 33 3 INC SP 3303 8C . ADC A,H 3304 3B ; DEC SP 3305 44 D LD B,H 3306 45 E LD B,L 3307 54 T LD D,H 3308 41 A LD B,C 3309 43 C LD B,E 330A 48 H LD C,B 330B 00 . NOP 330C A1 Ą AND C 330D 33 3 INC SP 330E A5 Ľ AND L 330F 3B ; DEC SP 3310 46 F LD B,(HL) 3311 4F O LD C,A 3312 52 R LD D,D 3313 42 B LD B,D 3314 49 I LD C,C 3315 44 D LD B,H 3316 00 . NOP 3317 D5 Ő PUSH DE 3318 3C < INC A 3319 CD 3B 4E Í;N CALL &4E3B 331C 00 . NOP 331D 55 U LD D,L 331E 3C < INC A 331F 00 . NOP 3320 00 . NOP 3321 4E N LD C,(HL) 3322 4F O LD C,A 3323 54 T LD D,H 3324 49 I LD C,C 3325 46 F LD B,(HL) 3326 59 Y LD E,C 3327 00 . NOP 3328 55 U LD D,L 3329 3C < INC A 332A AF Ż XOR A 332B 3B ; DEC SP 332C 4E N LD C,(HL) 332D 45 E LD B,L 332E 54 T LD D,H 332F 4F O LD C,A 3330 50 P LD D,B 3331 54 T LD D,H 3332 00 . DEFB &00 3333 C7 3C Ç< DEFW &3CC7 3335 C3 3B Ă; DEFW &3BC3 3337 50 45 52 4D 49 54 DEFM "PERMIT" 333D 00 . DEFB &00 333E D1 3C Ń< DEFW &3CD1 3340 CD 3B Í; DEFW &3BCD 3342 00 . DEFB &00 ; End of command table 3343 E5 ĺ PUSH HL 3344 CD B2 33 Í˛3 CALL &33B2 3347 57 W LD D,A 3348 CD 00 45 Í.E CALL &4500 334B 01 54 4F .TO LD BC,&4F54 334E CD 78 41 ÍxA CALL &4178 3351 DA 00 00 Ú.. JP C,&0000 3354 CD 76 42 ÍvB CALL &4276 3357 30 02 0. JR NC,&335B 3359 F7 ÷ RST &30 335A 7F . LD A,A 335B 42 B LD B,D 335C EB ë EX DE,HL 335D E1 á POP HL 335E 73 s LD (HL),E 335F 23 # INC HL 3360 72 r LD (HL),D 3361 23 # INC HL 3362 E5 ĺ PUSH HL 3363 23 # INC HL 3364 70 p LD (HL),B 3365 EB ë EX DE,HL 3366 2A 81 2F *./ LD HL,(&2F81) 3369 CD B2 33 Í˛3 CALL &33B2 336C 4F O LD C,A 336D 06 00 .. LD B,&00 336F CD F6 44 ÍöD CALL &44F6 3372 28 21 (! JR Z,&3395 3374 FE 5B ţ[ CP &5B 3376 20 44 D JR NZ,&33BC 3378 CD F6 44 ÍöD CALL &44F6 337B 28 18 (. JR Z,&3395 337D FE 5D ţ] CP &5D 337F 28 14 (. JR Z,&3395 3381 FE 44 ţD CP &44 3383 20 02 . JR NZ,&3387 3385 CB F8 Ëř SET 7,B 3387 FE 42 ţB CP &42 3389 20 02 . JR NZ,&338D 338B CB F0 Ëđ SET 6,B 338D FE 57 ţW CP &57 338F 20 02 . JR NZ,&3393 3391 CB F9 Ëů SET 7,C 3393 18 E3 .ă JR &3378 3395 E1 á POP HL 3396 71 q LD (HL),C 3397 EB ë EX DE,HL 3398 23 # INC HL 3399 36 00 6. LD (HL),&00 339B 23 # INC HL 339C 70 p LD (HL),B 339D 1B . DEC DE 339E 1B . DEC DE 339F 18 0B .. JR &33AC 33A1 CD B2 33 Í˛3 CALL &33B2 33A4 77 w LD (HL),A 33A5 2B + DEC HL 33A6 2B + DEC HL 33A7 AF Ż XOR A 33A8 77 w LD (HL),A 33A9 2B + DEC HL 33AA 77 w LD (HL),A 33AB EB ë EX DE,HL 33AC F7 ÷ RST &30 33AD 7E ~ LD A,(HL) 33AE C8 Č RET Z 33AF C3 B3 3C Ăł< JP &3CB3 33B2 CD 00 45 Í.E CALL &4500 33B5 D6 41 ÖA SUB A,&41 33B7 38 03 8. JR C,&33BC 33B9 FE 10 ţ. CP &10 33BB D8 Ř RET C 33BC D7 × RST &10 ; Print... 33BD 13 92 AD 98 1F 00 ; "Illegal drive - abandoned" 33C3 C7 Ç RST &00 ; Jump to Reset to quit ; 33C4 21 00 2E !.. LD HL,&2E00 33C7 06 00 .. LD B,&00 33C9 5E ^ LD E,(HL) 33CA 23 # INC HL 33CB CD D9 33 ÍŮ3 CALL &33D9 33CE 20 F9 ů JR NZ,&33C9 33D0 EF ď RST &28 ; UserImm &0C 33D1 0C . DEFB &0C ; Do an OsWord 33D2 CD C3 FF ÍĂ. CALL &FFC3 ; PutImm - Send &00 to Tube 33D5 00 . DEFB &00 33D6 C3 0E 30 Ă.0 JP &300E ; Jump back to get another line 33D9 EF ď RST &28 ; UserImm &0E 33DA 0E . DEFB &0E ; Write Scratchpad Byte 33DB 48 H LD C,B 33DC E7 ç RST &20 ; PutByte - Send C to Tube 33DD 4B K LD C,E 33DE E7 ç RST &20 ; PutByte - Send C to Tube 33DF 04 . INC B 33E0 7B { LD A,E 33E1 FE 0D ţ. CP &0D 33E3 C8 Č RET Z 33E4 78 x LD A,B 33E5 FE 40 ţ@ CP &40 33E7 C0 Ŕ RET NZ 33E8 D7 × RST &10 33E9 15 . DEC D 33EA 9B . SBC A,E 33EB 6F o LD L,A 33EC EC 6F 6E ěon CALL PE,&6E6F 33EF 67 g LD H,A 33F0 2E 00 .. LD L,&00 33F2 C3 0E 30 Ă.0 JP &300E 33F5 22 81 2F "./ LD (&2F81),HL 33F8 CD 84 31 Í.1 CALL &3184 33FB 2A 81 2F *./ LD HL,(&2F81) 33FE 01 D9 40 .Ů@ LD BC,&40D9 3401 CD 36 44 Í6D CALL &4436 3404 DA 16 44 Ú.D JP C,&4416 3407 CD 6F 43 ÍoC CALL &436F 340A F7 ÷ RST &30 340B 0F . RRCA 340C C2 6C 31 Âl1 JP NZ,&316C 340F CD 00 20 Í. CALL &2000 3412 EB ë EX DE,HL 3413 21 81 00 !.. LD HL,&0081 3416 06 0A .. LD B,&0A 3418 CD 00 45 Í.E CALL &4500 341B 28 25 (% JR Z,&3442 341D FE 20 ţ CP &20 341F 28 20 ( JR Z,&3441 3421 FE 5C ţ\ CP &5C 3423 20 15 . JR NZ,&343A 3425 CD 09 45 Í.E CALL &4509 3428 FE 4E ţN CP &4E 342A 20 04 . JR NZ,&3430 342C 3E 0D >. LD A,&0D 342E 18 0A .. JR &343A 3430 FE 30 ţ0 CP &30 3432 28 0E (. JR Z,&3442 3434 FE 53 ţS CP &53 3436 20 02 . JR NZ,&343A 3438 3E 20 > LD A,&20 343A 1B . DEC DE 343B 12 . LD (DE),A 343C CD 09 45 Í.E CALL &4509 343F 18 DA .Ú JR &341B 3441 2B + DEC HL 3442 AF Ż XOR A 3443 1B . DEC DE 3444 12 . LD (DE),A 3445 10 D1 .Ń DJNZ &3418 3447 2A 06 00 *.. LD HL,(&0006) 344A EB ë EX DE,HL 344B 2B + DEC HL 344C 72 r LD (HL),D 344D 2B + DEC HL 344E 73 s LD (HL),E 344F 2B + DEC HL 3450 36 C3 6Ă LD (HL),&C3 3452 22 06 00 ".. LD (&0006),HL 3455 C7 Ç RST &00 3456 37 7 SCF 3457 CD E9 40 Íé@ CALL &40E9 345A 54 T LD D,H 345B 4F O LD C,A 345C D8 Ř RET C 345D CD E0 41 ÍŕA CALL &41E0 3460 DA 00 00 Ú.. JP C,&0000 3463 D7 × RST &10 3464 D3 6F Óo OUT (&6F),A 3466 75 u LD (HL),L 3467 72 r LD (HL),D 3468 63 c LD H,E 3469 65 e LD H,L 346A 9A . SBC A,D 346B A0 AND B 346C C4 1E 9A Ä.. CALL NZ,&9A1E 346F 00 . NOP 3470 E5 ĺ PUSH HL 3471 2A 06 00 *.. LD HL,(&0006) 3474 AF Ż XOR A 3475 01 80 00 ... LD BC,&0080 3478 ED 42 íB SBC HL,BC 347A 22 FC 45 "üE LD (&45FC),HL 347D 21 00 03 !.. LD HL,&0300 3480 EF ď RST &28 3481 17 . RLA 3482 CD 99 41 Í.A CALL &4199 3485 E5 ĺ PUSH HL 3486 AF Ż XOR A 3487 32 68 00 2h. LD (&0068),A 348A 32 7C 00 2|. LD (&007C),A 348D 32 78 00 2x. LD (&0078),A 3490 32 8C 00 2.. LD (&008C),A 3493 ED 5B 6C 00 í[l. LD DE,(&006C) 3497 D5 Ő PUSH DE 3498 3A 26 00 :&. LD A,(&0026) 349B 5F _ LD E,A 349C F7 ÷ RST &30 349D 20 11 . JR NZ,&34B0 349F 5C \ LD E,H 34A0 00 . NOP 34A1 F7 ÷ RST &30 34A2 0F . RRCA 34A3 D1 Ń POP DE 34A4 ED 53 6C 00 íSl. LD (&006C),DE 34A8 28 0E (. JR Z,&34B8 34AA D7 × RST &10 34AB C3 61 6E Ăan JP &6E61 34AE 0F . RRCA 34AF CF Ď RST &08 34B0 70 p LD (HL),B 34B1 65 e LD H,L 34B2 6E n LD L,(HL) 34B3 9A . SBC A,D 34B4 00 . NOP 34B5 C3 81 35 Ă.5 JP &3581 34B8 11 5C 00 .\. LD DE,&005C ; Point to FCB1 34BB F7 ÷ RST &30 ; BDOS Function &23 34BC 23 # DEFB &23 ; Compute File Size 34BD DD 2A 7D 00 Ý*}. LD IX,(&007D) 34C1 3A 27 00 :'. LD A,(&0027) 34C4 5F _ LD E,A 34C5 F7 ÷ RST &30 ; BDOS Function &20 34C6 20 DEFB &20 ; Get/Set User Code 34C7 11 6C 00 .l. LD DE,&006C ; Point to FCB2 34CA F7 ÷ RST &30 ; BDOS Function &16 34CB 16 . DEFB &16 ; Make file 34CC F5 ő ... D,&F5 34CD 3A 26 00 :&. LD A,(&0026) 34D0 5F _ LD E,A 34D1 F7 ÷ RST &30 ; BDOS Function &20 34D2 20 DEFB &20 ; Get/Set User Code 34D3 F1 ń ... 34D4 28 10 (. JR Z,&34E6 34D6 D7 × RST &10 34D7 C3 61 6E Ăan JP &6E61 34DA 0F . RRCA 34DB C3 72 65 Ăre JP &6572 34DE 61 a LD H,C 34DF 74 t LD (HL),H 34E0 65 e LD H,L 34E1 9A . SBC A,D 34E2 00 . NOP 34E3 C3 81 35 Ă.5 JP &3581 34E6 21 00 00 !.. LD HL,&0000 34E9 22 7D 00 "}. LD (&007D),HL 34EC 2A 7D 00 *}. LD HL,(&007D) 34EF 22 8D 00 ".. LD (&008D),HL 34F2 DD E5 Ýĺ PUSH IX 34F4 D1 Ń POP DE 34F5 A7 § AND A 34F6 ED 52 íR SBC HL,DE 34F8 30 53 0S JR NC,&354D 34FA 21 8D 46 !.F LD HL,&468D 34FD 11 5C 00 .\. LD DE,&005C 3500 01 00 00 ... LD BC,&0000 3503 EB ë EX DE,HL 3504 F7 ÷ RST &30 3505 1A . LD A,(DE) 3506 EB ë EX DE,HL 3507 F7 ÷ RST &30 3508 21 FD 2A !ý* LD HL,&2AFD 350B 7D } LD A,L 350C 00 . NOP 350D FD 23 ý# INC IY 350F FD 22 7D 00 ý"}. LD (&007D),IY 3513 A7 § AND A 3514 20 12 . JR NZ,&3528 3516 03 . INC BC 3517 C5 Ĺ PUSH BC 3518 01 80 00 ... LD BC,&0080 351B 09 . ADD HL,BC 351C E5 ĺ PUSH HL 351D ED 4B FC 45 íKüE LD BC,(&45FC) 3521 A7 § AND A 3522 ED 42 íB SBC HL,BC 3524 E1 á POP HL 3525 C1 Á POP BC 3526 38 DB 8Ű JR C,&3503 3528 21 8D 46 !.F LD HL,&468D 352B 11 6C 00 .l. LD DE,&006C 352E 78 x LD A,B 352F B1 ą OR C 3530 28 BA (ş JR Z,&34EC 3532 EB ë EX DE,HL 3533 F7 ÷ RST &30 3534 1A . LD A,(DE) 3535 EB ë EX DE,HL 3536 F7 ÷ RST &30 3537 22 20 3B " ; LD (&3B20),HL 353A FD 2A 8D 00 ý*.. LD IY,(&008D) 353E FD 23 ý# INC IY 3540 FD 22 8D 00 ý".. LD (&008D),IY 3544 C5 Ĺ PUSH BC 3545 01 80 00 ... LD BC,&0080 3548 09 . ADD HL,BC 3549 C1 Á POP BC 354A 0B . DEC BC 354B 18 E1 .á JR &352E 354D 3A 27 00 :'. LD A,(&0027) 3550 5F _ LD E,A 3551 F7 ÷ RST &30 3552 20 11 . JR NZ,&3565 3554 6C l LD L,H 3555 00 . NOP 3556 F7 ÷ RST &30 3557 10 3A .: DJNZ &3593 3559 26 00 &. LD H,&00 355B 5F _ LD E,A 355C F7 ÷ RST &30 355D 20 11 . JR NZ,&3570 355F 5C \ LD E,H 3560 00 . NOP 3561 F7 ÷ RST &30 3562 10 3A .: DJNZ &359E 3564 CC 02 5F Ě._ CALL Z,&5F02 3567 F7 ÷ RST &30 3568 20 E1 á JR NZ,&354B 356A C1 Á POP BC 356B 0B . DEC BC 356C 78 x LD A,B 356D B1 ą OR C 356E CA 00 00 Ę.. JP Z,&0000 3571 C5 Ĺ PUSH BC 3572 C3 80 34 Ă.4 JP &3480 3575 D7 × RST &10 3576 D7 × RST &10 3577 72 r LD (HL),D 3578 69 i LD L,C 3579 74 t LD (HL),H 357A 65 e LD H,L 357B C5 Ĺ PUSH BC 357C 72 r LD (HL),D 357D 72 r LD (HL),D 357E 6F o LD L,A 357F 72 r LD (HL),D 3580 00 . NOP 3581 D7 × RST &10 3582 AD XOR L 3583 99 . SBC A,C 3584 2E 00 .. LD L,&00 3586 18 C5 .Ĺ JR &354D 3588 CD F2 43 ÍňC CALL &43F2 358B D8 Ř RET C 358C E5 ĺ PUSH HL 358D 2A 81 2F *./ LD HL,(&2F81) 3590 0E 00 .. LD C,&00 3592 CD F6 44 ÍöD CALL &44F6 3595 FE 5B ţ[ CP &5B 3597 20 09 . JR NZ,&35A2 3599 CD F6 44 ÍöD CALL &44F6 359C FE 55 ţU CP &55 359E 20 02 . JR NZ,&35A2 35A0 0E FF .. LD C,&FF 35A2 E1 á POP HL 35A3 E5 ĺ PUSH HL 35A4 CD CB 41 ÍËA CALL &41CB 35A7 CD 2F 43 Í/C CALL &432F 35AA CA 84 37 Ę.7 JP Z,&3784 35AD F1 ń POP AF 35AE 11 00 03 ... LD DE,&0300 35B1 79 y LD A,C 35B2 A7 § AND A 35B3 28 0D (. JR Z,&35C2 35B5 CD 9C 43 Í.C CALL &439C 35B8 D7 × RST &10 35B9 44 D LD B,H 35BA 65 e LD H,L 35BB 6C l LD L,H 35BC 65 e LD H,L 35BD 74 t LD (HL),H 35BE 0E 80 .. LD C,&80 35C0 18 16 .. JR &35D8 35C2 CD DE 43 ÍŢC CALL &43DE 35C5 D7 × RST &10 35C6 0A . LD A,(BC) 35C7 44 D LD B,H 35C8 6F o LD L,A 35C9 F9 ů LD SP,HL 35CA 6F o LD L,A 35CB 75 u LD (HL),L 35CC F7 ÷ RST &30 35CD 61 a LD H,C 35CE 6E n LD L,(HL) 35CF 74 t LD (HL),H 35D0 9B . SBC A,E 35D1 E4 65 6C äel CALL PO,&6C65 35D4 65 e LD H,L 35D5 74 t LD (HL),H 35D6 65 e LD H,L 35D7 80 . ADD A,B 35D8 CD 77 43 ÍwC CALL &4377 35DB 79 y LD A,C 35DC A7 § AND A 35DD 20 18 . JR NZ,&35F7 35DF D7 × RST &10 35E0 3F ? CCF 35E1 80 . ADD A,B 35E2 F7 ÷ RST &30 35E3 03 . INC BC 35E4 F6 20 ö OR &20 35E6 FE 6E ţn CP &6E 35E8 28 17 (. JR Z,&3601 35EA FE 71 ţq CP &71 35EC 28 25 (% JR Z,&3613 35EE FE 79 ţy CP &79 35F0 20 F0 đ JR NZ,&35E2 35F2 D7 × RST &10 35F3 79 y LD A,C 35F4 65 e LD H,L 35F5 73 s LD (HL),E 35F6 00 . NOP 35F7 F7 ÷ RST &30 35F8 13 . INC DE 35F9 28 0A (. JR Z,&3605 35FB D7 × RST &10 35FC AD XOR L 35FD 99 . SBC A,C 35FE 00 . NOP 35FF 18 04 .. JR &3605 3601 D7 × RST &10 3602 6E n LD L,(HL) 3603 6F o LD L,A 3604 00 . NOP 3605 E5 ĺ PUSH HL 3606 21 10 00 !.. LD HL,&0010 3609 19 . ADD HL,DE 360A EB ë EX DE,HL 360B E1 á POP HL 360C 2B + DEC HL 360D 7C | LD A,H 360E B5 ľ OR L 360F 20 A0 JR NZ,&35B1 3611 18 06 .. JR &3619 3613 D7 × RST &10 3614 71 q LD (HL),C 3615 75 u LD (HL),L 3616 69 i LD L,C 3617 74 t LD (HL),H 3618 00 . NOP 3619 79 y LD A,C 361A A7 § AND A 361B CC DE 43 ĚŢC CALL Z,&43DE 361E C7 Ç RST &00 361F 3A 04 00 :.. LD A,(&0004) 3622 32 8C 46 2.F LD (&468C),A 3625 0E 00 .. LD C,&00 3627 E5 ĺ PUSH HL 3628 CD F6 44 ÍöD CALL &44F6 362B 28 12 (. JR Z,&363F 362D FE 5B ţ[ CP &5B 362F 20 F7 ÷ JR NZ,&3628 3631 CD F6 44 ÍöD CALL &44F6 3634 28 09 (. JR Z,&363F 3636 FE 5D ţ] CP &5D 3638 28 05 (. JR Z,&363F 363A CD A1 37 ÍĄ7 CALL &37A1 363D 18 F2 .ň JR &3631 363F E3 ă EX (SP),HL 3640 CD 4F 36 ÍO6 CALL &364F 3643 CD EB 43 ÍëC CALL &43EB 3646 E1 á POP HL 3647 7E ~ LD A,(HL) 3648 FE 0D ţ. CP &0D 364A CA 00 00 Ę.. JP Z,&0000 364D 18 D6 .Ö JR &3625 364F 11 5C 00 .\. LD DE,&005C 3652 CD F6 44 ÍöD CALL &44F6 3655 28 05 (. JR Z,&365C 3657 FE 5B ţ[ CP &5B 3659 20 0D . JR NZ,&3668 365B 2B + DEC HL 365C 22 81 2F "./ LD (&2F81),HL 365F AF Ż XOR A 3660 12 . LD (DE),A 3661 13 . INC DE 3662 3E 20 > LD A,&20 3664 12 . LD (DE),A 3665 1B . DEC DE 3666 18 0A .. JR &3672 3668 2B + DEC HL 3669 11 5C 00 .\. LD DE,&005C 366C CD F2 43 ÍňC CALL &43F2 366F DA 0E 30 Ú.0 JP C,&300E 3672 CD 87 36 Í.6 CALL &3687 3675 CD 9C 43 Í.C CALL &439C 3678 2A 81 2F *./ LD HL,(&2F81) 367B CD F6 44 ÍöD CALL &44F6 367E 28 04 (. JR Z,&3684 3680 FE 5B ţ[ CP &5B 3682 20 E4 ä JR NZ,&3668 3684 C3 D8 37 ĂŘ7 JP &37D8 3687 E5 ĺ PUSH HL 3688 CD CB 41 ÍËA CALL &41CB 368B CD 2F 43 Í/C CALL &432F 368E CA 84 37 Ę.7 JP Z,&3784 3691 E5 ĺ PUSH HL 3692 21 00 03 !.. LD HL,&0300 3695 7E ~ LD A,(HL) 3696 32 8C 46 2.F LD (&468C),A 3699 11 5C 00 .\. LD DE,&005C 369C D5 Ő PUSH DE 369D DD E1 Ýá POP IX 369F D5 Ő PUSH DE 36A0 CD EE 44 ÍîD CALL &44EE 36A3 D1 Ń POP DE 36A4 DD 7E 0A Ý~. LD A,(IX+&0A) 36A7 A7 § AND A 36A8 FA 29 37 ú)7 JP M,&3729 36AB 3A 37 00 :7. LD A,(&0037) 36AE A7 § AND A 36AF 28 08 (. JR Z,&36B9 36B1 D7 × RST &10 36B2 A0 AND B 36B3 00 . NOP 36B4 CD 82 43 Í.C CALL &4382 36B7 18 03 .. JR &36BC 36B9 CD 77 43 ÍwC CALL &4377 36BC 06 42 .B LD B,&42 36BE CB 49 ËI BIT 1,C 36C0 28 15 (. JR Z,&36D7 36C2 D7 × RST &10 36C3 F2 2F 00 ň/. JP P,&002F 36C6 DD 7E 09 Ý~. LD A,(IX+&09) 36C9 A7 § AND A 36CA 1E 6F .o LD E,&6F 36CC FA D1 36 úŃ6 JP M,&36D1 36CF 1E 77 .w LD E,&77 36D1 F7 ÷ RST &30 36D2 02 . LD (BC),A 36D3 05 . DEC B 36D4 05 . DEC B 36D5 05 . DEC B 36D6 05 . DEC B 36D7 CB 41 ËA BIT 0,C 36D9 28 45 (E JR Z,&3720 36DB E5 ĺ PUSH HL 36DC C5 Ĺ PUSH BC 36DD 3A 37 00 :7. LD A,(&0037) 36E0 F5 ő PUSH AF 36E1 D7 × RST &10 36E2 80 . ADD A,B 36E3 11 5C 00 .\. LD DE,&005C 36E6 F7 ÷ RST &30 36E7 23 # INC HL 36E8 DD 6E 21 Ýn! LD L,(IX+&21) 36EB DD 66 22 Ýf" LD H,(IX+&22) 36EE 01 07 00 ... LD BC,&0007 36F1 09 . ADD HL,BC 36F2 7D } LD A,L 36F3 DD CB 23 3E ÝË#> SRL (IX+&23) 36F7 CB 1C Ë. RR H 36F9 CB 1F Ë. RR A 36FB CB 3C Ë< SRL H 36FD CB 1F Ë. RR A 36FF CB 3C Ë< SRL H 3701 CB 1F Ë. RR A 3703 6F o LD L,A 3704 CD B5 42 ÍľB CALL &42B5 3707 D7 × RST &10 3708 6B k LD L,E 3709 00 . NOP 370A F1 ń POP AF 370B 5F _ LD E,A 370C 3A 37 00 :7. LD A,(&0037) 370F 93 . SUB A,E 3710 D6 06 Ö. SUB A,&06 3712 47 G LD B,A 3713 28 05 (. JR Z,&371A 3715 D7 × RST &10 3716 80 . ADD A,B 3717 04 . INC B 3718 18 F9 .ů JR &3713 371A C1 Á POP BC 371B E1 á POP HL 371C 3E FA >ú LD A,&FA 371E 80 . ADD A,B 371F 47 G LD B,A 3720 3A 37 00 :7. LD A,(&0037) 3723 B8 ¸ CP B 3724 38 03 8. JR C,&3729 3726 CD 9C 43 Í.C CALL &439C 3729 E3 ă EX (SP),HL 372A 2B + DEC HL 372B 7C | LD A,H 372C B5 ľ OR L 372D E3 ă EX (SP),HL 372E C2 95 36 Â.6 JP NZ,&3695 3731 CB 51 ËQ BIT 2,C 3733 28 4C (L JR Z,&3781 3735 C5 Ĺ PUSH BC 3736 3A 04 00 :.. LD A,(&0004) 3739 F5 ő PUSH AF 373A D7 × RST &10 373B 0A . LD A,(BC) 373C 46 F LD B,(HL) 373D 72 r LD (HL),D 373E 65 e LD H,L 373F 65 e LD H,L 3740 F3 ó DI 3741 70 p LD (HL),B 3742 61 a LD H,C 3743 63 c LD H,E 3744 65 e LD H,L 3745 EF ď RST &28 3746 6E n LD L,(HL) 3747 92 . SUB A,D 3748 80 . ADD A,B 3749 3A 8C 46 :.F LD A,(&468C) 374C 3D = DEC A 374D F5 ő PUSH AF 374E 1E 41 .A LD E,&41 3750 83 . ADD A,E 3751 5F _ LD E,A 3752 F7 ÷ RST &30 3753 02 . LD (BC),A 3754 D7 × RST &10 3755 3A 80 F1 :.ń LD A,(&F180) 3758 32 04 00 2.. LD (&0004),A 375B F7 ÷ RST &30 375C 1B . DEC DE 375D F1 ń POP AF 375E 32 04 00 2.. LD (&0004),A 3761 11 00 00 ... LD DE,&0000 3764 0E 20 . LD C,&20 3766 06 08 .. LD B,&08 3768 CB 0E Ë. RRC (HL) 376A 38 07 8. JR C,&3773 376C 13 . INC DE 376D 10 F9 .ů DJNZ &3768 376F 23 # INC HL 3770 0D . DEC C 3771 20 F3 ó JR NZ,&3766 3773 EB ë EX DE,HL 3774 29 ) ADD HL,HL 3775 29 ) ADD HL,HL 3776 29 ) ADD HL,HL 3777 29 ) ADD HL,HL 3778 CD B5 42 ÍľB CALL &42B5 377B D7 × RST &10 377C 6B k LD L,E 377D 2E 0A .. LD L,&0A 377F 00 . NOP 3780 C1 Á POP BC 3781 E1 á POP HL 3782 E1 á POP HL 3783 C9 É RET 3784 E1 á POP HL 3785 C3 0B 44 Ă.D JP &440B 3788 5F _ LD E,A 3789 D7 × RST &10 378A 13 . INC DE 378B F5 ő PUSH AF 378C 73 s LD (HL),E 378D 65 e LD H,L 378E EF ď RST &28 378F 66 f LD H,(HL) 3790 A7 § AND A 3791 00 . NOP 3792 F7 ÷ RST &30 3793 02 . LD (BC),A 3794 D7 × RST &10 3795 27 ' DAA 3796 3A C4 49 :ÄI LD A,(&49C4) 3799 52 R LD D,D 379A 98 . SBC A,B 379B 1F . RRA 379C 2E 00 .. LD L,&00 379E C3 0E 30 Ă.0 JP &300E 37A1 FE 4C ţL CP &4C 37A3 20 03 . JR NZ,&37A8 37A5 CB C1 ËÁ SET 0,C 37A7 C9 É RET 37A8 FE 50 ţP CP &50 37AA 20 03 . JR NZ,&37AF 37AC CB C9 ËÉ SET 1,C 37AE C9 É RET 37AF FE 53 ţS CP &53 37B1 20 03 . JR NZ,&37B6 37B3 CB D1 ËŃ SET 2,C 37B5 C9 É RET 37B6 CD 28 43 Í(C CALL &4328 37B9 38 08 8. JR C,&37C3 37BB 2B + DEC HL 37BC CD 50 42 ÍPB CALL &4250 37BF 2A 81 2F *./ LD HL,(&2F81) 37C2 C9 É RET 37C3 D5 Ő PUSH DE 37C4 5F _ LD E,A 37C5 D7 × RST &10 37C6 13 . INC DE 37C7 EF ď RST &28 37C8 70 p LD (HL),B 37C9 74 t LD (HL),H 37CA 1C . INC E 37CB A7 § AND A 37CC 00 . NOP 37CD F7 ÷ RST &30 37CE 02 . LD (BC),A 37CF D7 × RST &10 37D0 27 ' DAA 37D1 9D . SBC A,L 37D2 00 . NOP 37D3 CD 9C 43 Í.C CALL &439C 37D6 D1 Ń POP DE 37D7 C9 É RET 37D8 3A 37 00 :7. LD A,(&0037) 37DB A7 § AND A 37DC C8 Č RET Z 37DD C3 9C 43 Ă.C JP &439C 37E0 CD 00 45 Í.E CALL &4500 37E3 FE 46 ţF CP &46 37E5 28 01 (. JR Z,&37E8 37E7 AF Ż XOR A 37E8 32 8B 46 2.F LD (&468B),A 37EB AF Ż XOR A 37EC 32 8A 46 2.F LD (&468A),A 37EF 67 g LD H,A 37F0 6F o LD L,A 37F1 22 88 46 ".F LD (&4688),HL 37F4 D7 × RST &10 37F5 0A . LD A,(BC) 37F6 50 P LD D,B 37F7 6C l LD L,H 37F8 61 a LD H,C 37F9 63 c LD H,E 37FA 65 e LD H,L 37FB F3 ó DI 37FC 6F o LD L,A 37FD 75 u LD (HL),L 37FE 72 r LD (HL),D 37FF 63 c LD H,E 3800 65 e LD H,L 3801 91 . SUB A,C 3802 E9 é JP (HL) 3803 6E n LD L,(HL) 3804 92 . SUB A,D 3805 C2 0A 61 Â.a JP NZ,&610A 3808 6E n LD L,(HL) 3809 64 d LD H,H 380A E4 1E 91 ä.. CALL PO,&911E 380D E9 é JP (HL) 380E 6E n LD L,(HL) 380F 92 . SUB A,D 3810 C1 Á POP BC 3811 0A . LD A,(BC) 3812 0A . LD A,(BC) 3813 57 W LD D,A 3814 61 a LD H,C 3815 72 r LD (HL),D 3816 6E n LD L,(HL) 3817 0E AD . LD C,&AD 3819 C4 61 74 Äat CALL NZ,&7461 381C 61 a LD H,C 381D F7 ÷ RST &30 381E 69 i LD L,C 381F 6C l LD L,H 3820 6C l LD L,H 3821 E2 65 E4 âeä JP PO,&E465 3824 65 e LD H,L 3825 73 s LD (HL),E 3826 74 t LD (HL),H 3827 72 r LD (HL),D 3828 6F o LD L,A 3829 79 y LD A,C 382A 1F . RRA 382B EF ď RST &28 382C 6E n LD L,(HL) 382D F4 68 65 ôhe CALL P,&6568 3830 D4 4F 50 ÔOP CALL NC,&504F 3833 92 . SUB A,D 3834 0A . LD A,(BC) 3835 0A . LD A,(BC) 3836 50 P LD D,B 3837 72 r LD (HL),D 3838 65 e LD H,L 3839 73 s LD (HL),E 383A 73 s LD (HL),E 383B F2 65 74 ňet JP P,&7465 383E 75 u LD (HL),L 383F 72 r LD (HL),D 3840 6E n LD L,(HL) 3841 9B . SBC A,E 3842 E3 ă EX (SP),HL 3843 6F o LD L,A 3844 6E n LD L,(HL) 3845 74 t LD (HL),H 3846 69 i LD L,C 3847 6E n LD L,(HL) 3848 75 u LD (HL),L 3849 65 e LD H,L 384A 2C , INC L 384B E1 á POP HL 384C 6E n LD L,(HL) 384D 79 y LD A,C 384E EF ď RST &28 384F 74 t LD (HL),H 3850 68 h LD L,B 3851 65 e LD H,L 3852 72 r LD (HL),D 3853 EB ë EX DE,HL 3854 65 e LD H,L 3855 79 y LD A,C 3856 9B . SBC A,E 3857 98 . SBC A,B 3858 2E 00 .. LD L,&00 385A F7 ÷ RST &30 385B 01 FE 0D .ţ. LD BC,&0DFE 385E 20 30 0 JR NZ,&3890 3860 EF ď RST &28 3861 09 . ADD HL,BC 3862 EF ď RST &28 3863 03 . INC BC 3864 0E 00 .. LD C,&00 3866 E7 ç RST &20 3867 D7 × RST &10 3868 0A . LD A,(BC) 3869 0A . LD A,(BC) 386A 14 . INC D 386B 74 t LD (HL),H 386C 0E E4 .ä LD C,&E4 386E 1E 91 .. LD E,&91 3870 2E 00 .. LD L,&00 3872 EF ď RST &28 3873 08 . EX AF,AF' 3874 DF ß RST &18 3875 28 1A (. JR Z,&3891 3877 D7 × RST &10 3878 0A . LD A,(BC) 3879 94 . SUB A,H 387A 99 . SBC A,C 387B AD XOR L 387C F5 ő PUSH AF 387D 73 s LD (HL),E 387E 65 e LD H,L 387F E1 á POP HL 3880 E6 72 ćr AND &72 3882 65 e LD H,L 3883 73 s LD (HL),E 3884 68 h LD L,B 3885 91 . SUB A,C 3886 E6 6F ćo AND &6F 3888 72 r LD (HL),D 3889 E3 ă EX (SP),HL 388A 6F o LD L,A 388B 70 p LD (HL),B 388C 79 y LD A,C 388D 0E 2E .. LD C,&2E 388F 00 . NOP 3890 C7 Ç RST &00 3891 EF ď RST &28 3892 09 . ADD HL,BC 3893 D7 × RST &10 3894 0A . LD A,(BC) 3895 0A . LD A,(BC) 3896 52 R LD D,D 3897 65 e LD H,L 3898 61 a LD H,C 3899 64 d LD H,H 389A 0E E6 .ć LD C,&E6 389C 72 r LD (HL),D 389D 6F o LD L,A 389E 6D m LD L,L 389F F4 72 61 ôra CALL P,&6172 38A2 63 c LD H,E 38A3 6B k LD L,E 38A4 3A 8A 57 :.W LD A,(&578A) 38A7 72 r LD (HL),D 38A8 69 i LD L,C 38A9 74 t LD (HL),H 38AA 0E A0 . LD C,&A0 38AC 1B . DEC DE 38AD A0 AND B 38AE 74 t LD (HL),H 38AF 72 r LD (HL),D 38B0 61 a LD H,C 38B1 63 c LD H,E 38B2 6B k LD L,E 38B3 3A 80 EF :.ď LD A,(&EF80) 38B6 03 . INC BC 38B7 0E 01 .. LD C,&01 38B9 E7 ç RST &20 38BA 21 8D 46 !.F LD HL,&468D 38BD E5 ĺ PUSH HL 38BE 01 16 00 ... LD BC,&0016 38C1 CD 5D 39 Í]9 CALL &395D 38C4 01 17 00 ... LD BC,&0017 38C7 CD 5D 39 Í]9 CALL &395D 38CA E1 á POP HL 38CB 06 04 .. LD B,&04 38CD 36 FF 6. LD (HL),&FF 38CF 23 # INC HL 38D0 10 FB .ű DJNZ &38CD 38D2 06 10 .. LD B,&10 38D4 C5 Ĺ PUSH BC 38D5 EF ď RST &28 38D6 03 . INC BC 38D7 0E 01 .. LD C,&01 38D9 E7 ç RST &20 38DA 1E 0B .. LD E,&0B 38DC F7 ÷ RST &30 38DD 04 . INC B 38DE 2A 88 46 *.F LD HL,(&4688) 38E1 3A 8A 46 :.F LD A,(&468A) 38E4 E5 ĺ PUSH HL 38E5 F5 ő PUSH AF 38E6 DD 21 5D 39 Ý!]9 LD IX,&395D 38EA CD 14 39 Í.9 CALL &3914 38ED F1 ń POP AF 38EE E1 á POP HL 38EF 32 8A 46 2.F LD (&468A),A 38F2 22 88 46 ".F LD (&4688),HL 38F5 EF ď RST &28 38F6 03 . INC BC 38F7 0E 00 .. LD C,&00 38F9 E7 ç RST &20 38FA 1E 0A .. LD E,&0A 38FC F7 ÷ RST &30 38FD 04 . INC B 38FE CD 10 39 Í.9 CALL &3910 3901 C1 Á POP BC 3902 10 D0 .Đ DJNZ &38D4 3904 D7 × RST &10 3905 0A . LD A,(BC) 3906 46 F LD B,(HL) 3907 69 i LD L,C 3908 6E n LD L,(HL) 3909 69 i LD L,C 390A 73 s LD (HL),E 390B 68 h LD L,B 390C 1F . RRA 390D 0A . LD A,(BC) 390E 00 . NOP 390F C7 Ç RST &00 3910 DD 21 6A 39 Ý!j9 LD IX,&396A 3914 21 8D 48 !.H LD HL,&488D 3917 16 64 .d LD D,&64 3919 ED 4B 88 46 íK.F LD BC,(&4688) 391D CD 77 39 Íw9 CALL &3977 3920 C4 2A 39 Ä*9 CALL NZ,&392A 3923 CD 2C 39 Í,9 CALL &392C 3926 15 . DEC D 3927 20 F0 đ JR NZ,&3919 3929 C9 É RET 392A DD E9 Ýé JP (IX) 392C D9 Ů EXX 392D 08 . EX AF,AF' 392E 21 88 46 !.F LD HL,&4688 3931 AF Ż XOR A 3932 ED 67 íg RRD 3934 3C < INC A 3935 27 ' DAA 3936 ED 6F ío RLD 3938 28 20 ( JR Z,&395A 393A 46 F LD B,(HL) 393B 80 . ADD A,B 393C 77 w LD (HL),A 393D 23 # INC HL 393E 7E ~ LD A,(HL) 393F CE 00 Î. ADC A,&00 3941 77 w LD (HL),A 3942 CB 60 Ë` BIT 4,B 3944 20 14 . JR NZ,&395A 3946 23 # INC HL 3947 34 4 INC (HL) 3948 7E ~ LD A,(HL) 3949 26 00 &. LD H,&00 394B 6F o LD L,A 394C CD B5 42 ÍľB CALL &42B5 394F 7D } LD A,L 3950 FE 0A ţ. CP &0A 3952 1E 08 .. LD E,&08 3954 38 02 8. JR C,&3958 3956 F7 ÷ RST &30 3957 02 . LD (BC),A 3958 F7 ÷ RST &30 3959 02 . LD (BC),A 395A 08 . EX AF,AF' 395B D9 Ů EXX 395C C9 É RET 395D EF ď RST &28 395E 00 . NOP 395F E7 ç RST &20 3960 48 H LD C,B 3961 E7 ç RST &20 3962 06 00 .. LD B,&00 3964 DF ß RST &18 3965 77 w LD (HL),A 3966 23 # INC HL 3967 10 FB .ű DJNZ &3964 3969 C9 É RET 396A EF ď RST &28 396B 01 E7 48 .çH LD BC,&48E7 396E E7 ç RST &20 396F 06 00 .. LD B,&00 3971 4E N LD C,(HL) 3972 E7 ç RST &20 3973 23 # INC HL 3974 10 FB .ű DJNZ &3971 3976 C9 É RET 3977 3A 8B 46 :.F LD A,(&468B) 397A A7 § AND A 397B C0 Ŕ RET NZ 397C D9 Ů EXX 397D ED 5B 88 46 í[.F LD DE,(&4688) 3981 7B { LD A,E 3982 E6 07 ć. AND &07 3984 21 A1 39 !Ą9 LD HL,&39A1 3987 85 . ADD A,L 3988 6F o LD L,A 3989 7C | LD A,H 398A CE 00 Î. ADC A,&00 398C 67 g LD H,A 398D 7E ~ LD A,(HL) 398E CB 3A Ë: SRL D 3990 CB 1B Ë. RR E 3992 CB 3A Ë: SRL D 3994 CB 1B Ë. RR E 3996 CB 3A Ë: SRL D 3998 CB 1B Ë. RR E 399A 21 8D 46 !.F LD HL,&468D 399D 19 . ADD HL,DE 399E A6 Ś AND (HL) 399F D9 Ů EXX 39A0 C9 É RET 39A1 01 02 04 ... LD BC,&0402 39A4 08 . EX AF,AF' 39A5 10 20 . DJNZ &39C7 39A7 40 @ LD B,B 39A8 80 . ADD A,B 39A9 D7 × RST &10 39AA 45 E LD B,L 39AB 6E n LD L,(HL) 39AC 74 t LD (HL),H 39AD 65 e LD H,L 39AE 72 r LD (HL),D 39AF 92 . SUB A,D 39B0 9B . SBC A,E 39B1 94 . SUB A,H 39B2 A8 ¨ XOR B 39B3 74 t LD (HL),H 39B4 79 y LD A,C 39B5 70 p LD (HL),B 39B6 65 e LD H,L 39B7 F3 ó DI 39B8 70 p LD (HL),B 39B9 61 a LD H,C 39BA 63 c LD H,E 39BB 65 e LD H,L 39BC 9B . SBC A,E 39BD 98 . SBC A,B 39BE 29 ) ADD HL,HL 39BF 80 . ADD A,B 39C0 F7 ÷ RST &30 39C1 01 D7 0A .×. LD BC,&0AD7 39C4 00 . NOP 39C5 E6 5F ć_ AND &5F 39C7 D6 41 ÖA SUB A,&41 39C9 4F O LD C,A 39CA 5F _ LD E,A 39CB CD C3 FF ÍĂ. CALL &FFC3 39CE 1C . INC E 39CF E7 ç RST &20 39D0 DF ß RST &18 39D1 20 05 . JR NZ,&39D8 39D3 DF ß RST &18 39D4 DF ß RST &18 39D5 F2 E0 39 ňŕ9 JP P,&39E0 39D8 D7 × RST &10 39D9 14 . INC D 39DA 98 . SBC A,B 39DB 1F . RRA 39DC 2E 00 .. LD L,&00 39DE 18 0E .. JR &39EE 39E0 4B K LD C,E 39E1 EF ď RST &28 39E2 03 . INC BC 39E3 E7 ç RST &20 39E4 EF ď RST &28 39E5 08 . EX AF,AF' 39E6 DF ß RST &18 39E7 28 05 (. JR Z,&39EE 39E9 D7 × RST &10 39EA 14 . INC D 39EB 99 . SBC A,C 39EC 2E 00 .. LD L,&00 39EE C7 Ç RST &00 ; HELP command 39EF D7 × RST &10 ; Print... 39F0 0A 54 68 65 E6 6F 6C 6C 6F 77 0E E2 75 69 ; LF,"The following bui" 39FE 6C 74 2D 69 6E 95 73 E1 72 65 E1 76 61 69 ; "t-in commands are avai" 3A0C 6C 61 62 6C 65 E9 6E D4 6F 72 63 68 C3 43 ; "able in Torch CC" 3A1A 43 50 A8 56 30 2E 39 34 29 2E 0A 00 ; "CP (V0.94).",LF 3A26 21 E2 31 !â1 LD HL,&31E2 3A29 D7 × RST &10 3A2A 0A 00 .. DEFB 10:DEFB 0 ; Print LF 3A2C 7E ~ LD A,(HL) 3A2D A7 § AND A 3A2E 28 2E (. JR Z,&3A5E ; 3A30 7E ~ LD A,(HL) 3A31 23 # INC HL 3A32 A7 § AND A 3A33 28 06 (. JR Z,&3A3B 3A35 5F _ LD E,A 3A36 F7 ÷ RST &30 ; BDOS Function &02 3A37 02 . LD (BC),A ; Console output 3A38 C3 30 3A Ă0: JP &3A30 3A3B 23 # INC HL 3A3C 23 # INC HL 3A3D 5E ^ LD E,(HL) 3A3E 23 # INC HL 3A3F 56 V LD D,(HL) 3A40 23 # INC HL 3A41 7A z LD A,D 3A42 B3 ł OR E 3A43 20 05 . JR NZ,&3A4A 3A45 D7 × RST &10 3A46 2C , INC L 3A47 80 . ADD A,B 3A48 18 E2 .â JR &3A2C 3A4A D7 × RST &10 3A4B 09 00 .. DEFB 9:DEFB 0 ; Print TAB 3A4D 3A 37 00 :7. LD A,(&0037) 3A50 FE 10 ţ. CP &10 3A52 38 F6 8ö JR C,&3A4A 3A54 EB ë EX DE,HL 3A55 CD 3E 45 Í>E CALL &453E 3A58 D7 × RST &10 3A59 2E 00 .. LD L,&00 3A5B EB ë EX DE,HL 3A5C 18 CB .Ë JR &3A29 3A5E D7 × RST &10 ; Print... 3A5F 0A 54 79 70 65 A7 44 49 52 AA 2E 43 4F 4D ; LF,"Type 'DIR *.COM" 3A6D 27 9B EC 69 73 74 EF 74 68 65 72 95 73 00 ; "' to list other commands" 3A7B C9 É RET ; Help string table 3A7C 45 6E 74 65 72 C2 42 43 C2 61 73 69 63 00 ; "Enter BBC Basic" ; 3A8A 43 6F 6C 6F 75 72 97 00 ; "Colour number" ; 3A92 16 E1 72 67 75 6d 65 6e 74 73 00 ; "Filename arguments" ; 3A9D 16 DB 6F 70 74 1C 73 5D D4 4F ; "Filename [options] TO" 3AA7 96 DB 6F 70 74 1C 73 5D 00 ; " Filename [options]" ; 3AB0 4C 69 73 74 EF 66 E6 69 6C 65 73 70 65 63 ; "List of filespec" 3ABE 73 2C DB 6F 70 74 1C 73 5D 00 ; "s, [options]" ; 3AC8 16 AD C2 65 C3 61 72 65 66 75 6C 00 ; "Filename - Be Careful" ; 3AD4 61 91 00 ; "a disc" ; 3AD7 46 6C 6F 70 70 79 91 AD D7 61 72 6E 69 6E ; "Floppy disc - Warnin" 3AE5 67 3A C4 65 73 74 72 6F 79 73 EF 6C 64 E3 ; "g: Destroys old c" 3AF3 6F 6E 74 65 6E 74 73 00 ; "ontents" ; 3AFB 16 E6 72 6F 6D EB 65 79 62 6F 61 72 64 00 ; "Filename from keyboard" ; 3B09 17 F4 65 78 74 00 ; "number text" ; 3B0F 17 E6 6F 72 F3 63 72 65 65 6E 00 ; "number for Screen" ; 3B1A 16 00 ; "Filename" ; 3B1C 16 DB 6F 70 74 1C 73 5D 00 ; "Filename [options]" ; 3B25 16 C1 53 96 00 ; "Filename AS Filename" ; 3B2A 17 EF 66 F0 61 67 65 73 2C 96 00 ; "number of pages- Filename" ; 3B35 44 D LD B,H 3B36 69 i LD L,C 3B37 73 s LD (HL),E 3B38 70 p LD (HL),B 3B39 6C l LD L,H 3B3A 61 a LD H,C 3B3B 79 y LD A,C 3B3C 00 . NOP 3B3D 16 EF .ď LD D,&EF 3B3F 6E n LD L,(HL) 3B40 1B . DEC DE 3B41 F3 ó DI 3B42 63 c LD H,E 3B43 72 r LD (HL),D 3B44 65 e LD H,L 3B45 65 e LD H,L 3B46 6E n LD L,(HL) 3B47 00 . NOP 3B48 4E N LD C,(HL) 3B49 65 e LD H,L 3B4A 77 w LD (HL),A 3B4B F5 ő PUSH AF 3B4C 73 s LD (HL),E 3B4D 65 e LD H,L 3B4E 72 r LD (HL),D 3B4F 97 . SUB A,A 3B50 A8 ¨ XOR B 3B51 30 2D 0- JR NC,&3B80 3B53 33 3 INC SP 3B54 31 29 00 1). LD SP,&0029 3B57 4C L LD C,H 3B58 69 i LD L,C 3B59 73 s LD (HL),E 3B5A 74 t LD (HL),H 3B5B EF ď RST &28 3B5C 66 f LD H,(HL) 3B5D E3 ă EX (SP),HL 3B5E 68 h LD L,B 3B5F 61 a LD H,C 3B60 72 r LD (HL),D 3B61 61 a LD H,C 3B62 63 c LD H,E 3B63 74 t LD (HL),H 3B64 65 e LD H,L 3B65 72 r LD (HL),D 3B66 97 . SUB A,A 3B67 73 s LD (HL),E 3B68 2C , INC L 3B69 F3 ó DI 3B6A 65 e LD H,L 3B6B 70 p LD (HL),B 3B6C 61 a LD H,C 3B6D 72 r LD (HL),D 3B6E 61 a LD H,C 3B6F 74 t LD (HL),H 3B70 1F . RRA 3B71 E2 79 E3 âyă JP PO,&E379 3B74 6F o LD L,A 3B75 6D m LD L,L 3B76 6D m LD L,L 3B77 61 a LD H,C 3B78 73 s LD (HL),E 3B79 00 . NOP 3B7A 16 E3 .ă LD D,&E3 3B7C 6F o LD L,A 3B7D 6E n LD L,(HL) 3B7E 74 t LD (HL),H 3B7F 61 a LD H,C 3B80 69 i LD L,C 3B81 6E n LD L,(HL) 3B82 0E E7 .ç LD C,&E7 3B84 72 r LD (HL),D 3B85 61 a LD H,C 3B86 70 p LD (HL),B 3B87 68 h LD L,B 3B88 69 i LD L,C 3B89 63 c LD H,E 3B8A 73 s LD (HL),E 3B8B 00 . NOP 3B8C 12 . LD (DE),A 3B8D D4 4F F3 ÔOó CALL NC,&F34F 3B90 74 t LD (HL),H 3B91 61 a LD H,C 3B92 74 t LD (HL),H 3B93 69 i LD L,C 3B94 6F o LD L,A 3B95 6E n LD L,(HL) 3B96 92 . SUB A,D 3B97 DB 6F Űo IN A,(&6F) 3B99 70 p LD (HL),B 3B9A 74 t LD (HL),H 3B9B 69 i LD L,C 3B9C 6F o LD L,A 3B9D 6E n LD L,(HL) 3B9E 73 s LD (HL),E 3B9F 5D ] LD E,L 3BA0 09 . ADD HL,BC 3BA1 28 0C (. JR Z,&3BAF 3BA3 29 ) ADD HL,HL 3BA4 00 . NOP 3BA5 12 . LD (DE),A 3BA6 09 . ADD HL,BC 3BA7 09 . ADD HL,BC 3BA8 09 . ADD HL,BC 3BA9 09 . ADD HL,BC 3BAA 09 . ADD HL,BC 3BAB 28 0C (. JR Z,&3BB9 3BAD 29 ) ADD HL,HL 3BAE 00 . NOP 3BAF 73 s LD (HL),E 3BB0 74 t LD (HL),H 3BB1 61 a LD H,C 3BB2 74 t LD (HL),H 3BB3 1C . INC E 3BB4 ED í DEFB &ED 3BB5 65 e LD H,L 3BB6 73 s LD (HL),E 3BB7 73 s LD (HL),E 3BB8 61 a LD H,C 3BB9 67 g LD H,A 3BBA 65 e LD H,L 3BBB 09 . ADD HL,BC 3BBC 09 . ADD HL,BC 3BBD 09 . ADD HL,BC 3BBE 09 . ADD HL,BC 3BBF 28 0C (. JR Z,&3BCD 3BC1 29 ) ADD HL,HL 3BC2 00 . NOP 3BC3 17 . RLA 3BC4 09 . ADD HL,BC 3BC5 09 . ADD HL,BC 3BC6 09 . ADD HL,BC 3BC7 09 . ADD HL,BC 3BC8 09 . ADD HL,BC 3BC9 28 0C (. JR Z,&3BD7 3BCB 29 ) ADD HL,HL 3BCC 00 . NOP 3BCD 73 s LD (HL),E 3BCE 74 t LD (HL),H 3BCF 61 a LD H,C 3BD0 74 t LD (HL),H 3BD1 1C . INC E 3BD2 92 . SUB A,D 3BD3 DB 6F Űo IN A,(&6F) 3BD5 70 p LD (HL),B 3BD6 74 t LD (HL),H 3BD7 69 i LD L,C 3BD8 6F o LD L,A 3BD9 6E n LD L,(HL) 3BDA 73 s LD (HL),E 3BDB 5D ] LD E,L 3BDC 09 . ADD HL,BC 3BDD 09 . ADD HL,BC 3BDE 09 . ADD HL,BC 3BDF 28 0C (. JR Z,&3BED 3BE1 29 ) ADD HL,HL 3BE2 00 . NOP 3BE3 CD F2 43 ÍňC CALL &43F2 3BE6 D8 Ř RET C 3BE7 F7 ÷ RST &30 3BE8 16 28 .( LD D,&28 3BEA 12 . LD (DE),A 3BEB D7 × RST &10 3BEC 43 C LD B,E 3BED 61 a LD H,C 3BEE 6E n LD L,(HL) 3BEF 0F . RRCA 3BF0 C3 72 65 Ăre JP &6572 3BF3 61 a LD H,C 3BF4 74 t LD (HL),H 3BF5 65 e LD H,L 3BF6 9A . SBC A,D 3BF7 AD XOR L 3BF8 99 . SBC A,C 3BF9 2E 0A .. LD L,&0A 3BFB 00 . NOP 3BFC C7 Ç RST &00 3BFD 21 00 02 !.. LD HL,&0200 3C00 06 81 .. LD B,&81 3C02 D9 Ů EXX 3C03 11 FE 2E .ţ. LD DE,&2EFE 3C06 3E FF >. LD A,&FF 3C08 12 . LD (DE),A 3C09 F7 ÷ RST &30 3C0A 0A . LD A,(BC) 3C0B D7 × RST &10 3C0C 0A . LD A,(BC) 3C0D 00 . NOP 3C0E 13 . INC DE 3C0F 1A . LD A,(DE) 3C10 47 G LD B,A 3C11 A7 § AND A 3C12 28 0B (. JR Z,&3C1F 3C14 13 . INC DE 3C15 1A . LD A,(DE) 3C16 FE 1A ţ. CP &1A 3C18 28 11 (. JR Z,&3C2B 3C1A CD 45 3C ÍE< CALL &3C45 3C1D 10 F5 .ő DJNZ &3C14 3C1F 3E 0D >. LD A,&0D 3C21 CD 45 3C ÍE< CALL &3C45 3C24 3E 0A >. LD A,&0A 3C26 CD 45 3C ÍE< CALL &3C45 3C29 18 D8 .Ř JR &3C03 3C2B D9 Ů EXX 3C2C C5 Ĺ PUSH BC 3C2D D9 Ů EXX 3C2E C1 Á POP BC 3C2F 78 x LD A,B 3C30 FE 81 ţ. CP &81 3C32 28 0D (. JR Z,&3C41 3C34 3E 1A >. LD A,&1A 3C36 18 03 .. JR &3C3B 3C38 CD 45 3C ÍE< CALL &3C45 3C3B 10 FB .ű DJNZ &3C38 3C3D D9 Ů EXX 3C3E F7 ÷ RST &30 3C3F 15 . DEC D 3C40 D9 Ů EXX 3C41 D9 Ů EXX 3C42 F7 ÷ RST &30 3C43 10 C7 .Ç DJNZ &3C0C 3C45 D9 Ů EXX 3C46 10 09 .. DJNZ &3C51 3C48 F5 ő PUSH AF 3C49 F7 ÷ RST &30 3C4A 15 . DEC D 3C4B F1 ń POP AF 3C4C 21 00 02 !.. LD HL,&0200 3C4F 06 80 .. LD B,&80 3C51 77 w LD (HL),A 3C52 23 # INC HL 3C53 D9 Ů EXX 3C54 C9 É RET 3C55 2A 81 2E *.. LD HL,(&2E81) 3C58 25 % DEC H 3C59 CD 76 42 ÍvB CALL &4276 3C5C 30 0F 0. JR NC,&3C6D 3C5E D7 × RST &10 3C5F 42 B LD B,D 3C60 61 a LD H,C 3C61 64 d LD H,H 3C62 20 73 s JR NZ,&3CD7 3C64 74 t LD (HL),H 3C65 61 a LD H,C 3C66 74 t LD (HL),H 3C67 69 i LD L,C 3C68 6F o LD L,A 3C69 6E n LD L,(HL) 3C6A 00 . NOP 3C6B 18 54 .T JR &3CC1 3C6D EB ë EX DE,HL 3C6E 2A 81 2F *./ LD HL,(&2F81) 3C71 E5 ĺ PUSH HL 3C72 2B + DEC HL 3C73 72 r LD (HL),D 3C74 2B + DEC HL 3C75 73 s LD (HL),E 3C76 EB ë EX DE,HL 3C77 E1 á POP HL 3C78 06 41 .A LD B,&41 3C7A 3E 0D >. LD A,&0D 3C7C BE ž CP (HL) 3C7D 28 17 (. JR Z,&3C96 3C7F 23 # INC HL 3C80 10 FA .ú DJNZ &3C7C 3C82 D7 × RST &10 3C83 4D M LD C,L 3C84 65 e LD H,L 3C85 73 s LD (HL),E 3C86 73 s LD (HL),E 3C87 61 a LD H,C 3C88 67 g LD H,A 3C89 65 e LD H,L 3C8A F4 72 75 ôru CALL P,&7572 3C8D 6E n LD L,(HL) 3C8E 63 c LD H,E 3C8F 61 a LD H,C 3C90 74 t LD (HL),H 3C91 1F . RRA 3C92 0A . LD A,(BC) 3C93 00 . NOP 3C94 18 05 .. JR &3C9B 3C96 36 00 6. LD (HL),&00 3C98 23 # INC HL 3C99 10 FB .ű DJNZ &3C96 3C9B F7 ÷ RST &30 3C9C 79 y LD A,C 3C9D C8 Č RET Z 3C9E F2 B3 3C ňł< JP P,&3CB3 3CA1 D7 × RST &10 3CA2 4D M LD C,L 3CA3 65 e LD H,L 3CA4 73 s LD (HL),E 3CA5 73 s LD (HL),E 3CA6 61 a LD H,C 3CA7 67 g LD H,A 3CA8 65 e LD H,L 3CA9 8F . ADC A,A 3CAA E1 á POP HL 3CAB 63 c LD H,E 3CAC 63 c LD H,E 3CAD 65 e LD H,L 3CAE 70 p LD (HL),B 3CAF 74 t LD (HL),H 3CB0 1F . RRA 3CB1 00 . NOP 3CB2 C7 Ç RST &00 3CB3 D7 × RST &10 3CB4 8C . ADC A,H 3CB5 C5 Ĺ PUSH BC 3CB6 72 r LD (HL),D 3CB7 72 r LD (HL),D 3CB8 6F o LD L,A 3CB9 72 r LD (HL),D 3CBA 80 . ADD A,B 3CBB 6F o LD L,A 3CBC 26 00 &. LD H,&00 3CBE CD B5 42 ÍľB CALL &42B5 3CC1 D7 × RST &10 3CC2 AD XOR L 3CC3 98 . SBC A,B 3CC4 1F . RRA 3CC5 00 . NOP 3CC6 C7 Ç RST &00 3CC7 CD E3 42 ÍăB CALL &42E3 3CCA DA 69 40 Úi@ JP C,&4069 3CCD EB ë EX DE,HL 3CCE F7 ÷ RST &30 3CCF 70 p LD (HL),B 3CD0 C9 É RET 3CD1 06 80 .. LD B,&80 3CD3 18 02 .. JR &3CD7 3CD5 06 00 .. LD B,&00 3CD7 CD 76 42 ÍvB CALL &4276 3CDA E5 ĺ PUSH HL 3CDB CB 18 Ë. RR B 3CDD 2A 81 2F *./ LD HL,(&2F81) 3CE0 CD B2 33 Í˛3 CALL &33B2 3CE3 5F _ LD E,A 3CE4 CD F6 44 ÍöD CALL &44F6 3CE7 28 16 (. JR Z,&3CFF 3CE9 FE 5B ţ[ CP &5B 3CEB C2 BC 33 Âź3 JP NZ,&33BC 3CEE CD F6 44 ÍöD CALL &44F6 3CF1 28 0C (. JR Z,&3CFF 3CF3 FE 5D ţ] CP &5D 3CF5 28 08 (. JR Z,&3CFF 3CF7 FE 57 ţW CP &57 3CF9 20 02 . JR NZ,&3CFD 3CFB CB FB Ëű SET 7,E 3CFD 18 EF .ď JR &3CEE 3CFF 0E 00 .. LD C,&00 3D01 E1 á POP HL 3D02 C5 Ĺ PUSH BC 3D03 D5 Ő PUSH DE 3D04 E5 ĺ PUSH HL 3D05 21 00 00 !.. LD HL,&0000 3D08 39 9 ADD HL,SP 3D09 EB ë EX DE,HL 3D0A F7 ÷ RST &30 3D0B 7D } LD A,L 3D0C 20 A5 Ľ JR NZ,&3CB3 3D0E C7 Ç RST &00 3D0F CD F2 43 ÍňC CALL &43F2 3D12 D8 Ř RET C 3D13 F7 ÷ RST &30 3D14 0F . RRCA 3D15 3C < INC A 3D16 CA 6C 31 Ęl1 JP Z,&316C 3D19 CD 9F 43 Í.C CALL &439F 3D1C F7 ÷ RST &30 3D1D 14 . INC D 3D1E 20 16 . JR NZ,&3D36 3D20 21 00 02 !.. LD HL,&0200 3D23 06 80 .. LD B,&80 3D25 7E ~ LD A,(HL) 3D26 E6 7F ć. AND &7F 3D28 FE 1A ţ. CP &1A 3D2A 28 0A (. JR Z,&3D36 3D2C D5 Ő PUSH DE 3D2D 5F _ LD E,A 3D2E F7 ÷ RST &30 3D2F 05 . DEC B 3D30 D1 Ń POP DE 3D31 23 # INC HL 3D32 10 F1 .ń DJNZ &3D25 3D34 18 E3 .ă JR &3D19 3D36 11 5C 00 .\. LD DE,&005C 3D39 F7 ÷ RST &30 3D3A 10 C7 .Ç DJNZ &3D03 3D3C E5 ĺ PUSH HL 3D3D CD F6 44 ÍöD CALL &44F6 3D40 28 04 (. JR Z,&3D46 3D42 FE 5B ţ[ CP &5B 3D44 20 0A . JR NZ,&3D50 3D46 AF Ż XOR A 3D47 12 . LD (DE),A 3D48 3E 20 > LD A,&20 3D4A 13 . INC DE 3D4B 12 . LD (DE),A 3D4C 1B . DEC DE 3D4D E1 á POP HL 3D4E 18 05 .. JR &3D55 3D50 E1 á POP HL 3D51 CD F2 43 ÍňC CALL &43F2 3D54 D8 Ř RET C 3D55 E5 ĺ PUSH HL 3D56 2A 81 2F *./ LD HL,(&2F81) 3D59 0E 00 .. LD C,&00 3D5B CD F6 44 ÍöD CALL &44F6 3D5E FE 5B ţ[ CP &5B 3D60 20 29 ) JR NZ,&3D8B 3D62 CD F6 44 ÍöD CALL &44F6 3D65 28 24 ($ JR Z,&3D8B 3D67 FE 5D ţ] CP &5D 3D69 28 20 ( JR Z,&3D8B 3D6B FE 52 ţR CP &52 3D6D 20 02 . JR NZ,&3D71 3D6F CB C1 ËÁ SET 0,C 3D71 FE 57 ţW CP &57 3D73 20 02 . JR NZ,&3D77 3D75 CB C9 ËÉ SET 1,C 3D77 FE 53 ţS CP &53 3D79 20 02 . JR NZ,&3D7D 3D7B CB D1 ËŃ SET 2,C 3D7D FE 55 ţU CP &55 3D7F 20 02 . JR NZ,&3D83 3D81 CB D9 ËŮ SET 3,C 3D83 FE 45 ţE CP &45 3D85 20 02 . JR NZ,&3D89 3D87 CB E1 Ëá SET 4,C 3D89 18 D7 .× JR &3D62 3D8B E1 á POP HL 3D8C E5 ĺ PUSH HL 3D8D CD CB 41 ÍËA CALL &41CB 3D90 CD 2F 43 Í/C CALL &432F 3D93 CA 84 37 Ę.7 JP Z,&3784 3D96 F1 ń POP AF 3D97 11 00 03 ... LD DE,&0300 3D9A E5 ĺ PUSH HL 3D9B CD 77 43 ÍwC CALL &4377 3D9E D7 × RST &10 3D9F 80 . ADD A,B 3DA0 21 09 00 !.. LD HL,&0009 3DA3 19 . ADD HL,DE 3DA4 79 y LD A,C 3DA5 06 03 .. LD B,&03 3DA7 CB 2F Ë/ SRA A 3DA9 30 02 0. JR NC,&3DAD 3DAB CB FE Ëţ SET 7,(HL) 3DAD CB 2F Ë/ SRA A 3DAF 30 02 0. JR NC,&3DB3 3DB1 CB BE Ëž RES 7,(HL) 3DB3 23 # INC HL 3DB4 10 F1 .ń DJNZ &3DA7 3DB6 2B + DEC HL 3DB7 2B + DEC HL 3DB8 2B + DEC HL 3DB9 CB 7E Ë~ BIT 7,(HL) 3DBB 28 0D (. JR Z,&3DCA 3DBD D7 × RST &10 3DBE 52 R LD D,D 3DBF 65 e LD H,L 3DC0 61 a LD H,C 3DC1 64 d LD H,H 3DC2 CF Ď RST &08 3DC3 6E n LD L,(HL) 3DC4 6C l LD L,H 3DC5 79 y LD A,C 3DC6 2C , INC L 3DC7 00 . NOP 3DC8 18 0C .. JR &3DD6 3DCA D7 × RST &10 3DCB 57 W LD D,A 3DCC 72 r LD (HL),D 3DCD 69 i LD L,C 3DCE 74 t LD (HL),H 3DCF 65 e LD H,L 3DD0 61 a LD H,C 3DD1 62 b LD H,D 3DD2 6C l LD L,H 3DD3 65 e LD H,L 3DD4 2C , INC L 3DD5 00 . NOP 3DD6 23 # INC HL 3DD7 CB 7E Ë~ BIT 7,(HL) 3DD9 28 0A (. JR Z,&3DE5 3DDB D7 × RST &10 3DDC D3 79 Óy OUT (&79),A 3DDE 73 s LD (HL),E 3DDF 74 t LD (HL),H 3DE0 65 e LD H,L 3DE1 6D m LD L,L 3DE2 00 . NOP 3DE3 18 06 .. JR &3DEB 3DE5 D7 × RST &10 3DE6 D5 Ő PUSH DE 3DE7 73 s LD (HL),E 3DE8 65 e LD H,L 3DE9 72 r LD (HL),D 3DEA 00 . NOP 3DEB 23 # INC HL 3DEC CB 7E Ë~ BIT 7,(HL) 3DEE 28 0E (. JR Z,&3DFE 3DF0 D7 × RST &10 3DF1 2C , INC L 3DF2 C5 Ĺ PUSH BC 3DF3 78 x LD A,B 3DF4 65 e LD H,L 3DF5 63 c LD H,E 3DF6 75 u LD (HL),L 3DF7 74 t LD (HL),H 3DF8 65 e LD H,L 3DF9 CF Ď RST &08 3DFA 6E n LD L,(HL) 3DFB 6C l LD L,H 3DFC 79 y LD A,C 3DFD 00 . NOP 3DFE 79 y LD A,C 3DFF A7 § AND A 3E00 28 08 (. JR Z,&3E0A 3E02 F7 ÷ RST &30 3E03 1E 28 .( LD E,&28 3E05 04 . INC B 3E06 D7 × RST &10 3E07 AD XOR L 3E08 99 . SBC A,C 3E09 00 . NOP 3E0A CD 9C 43 Í.C CALL &439C 3E0D 21 10 00 !.. LD HL,&0010 3E10 19 . ADD HL,DE 3E11 EB ë EX DE,HL 3E12 E1 á POP HL 3E13 2B + DEC HL 3E14 E5 ĺ PUSH HL 3E15 7C | LD A,H 3E16 B5 ľ OR L 3E17 20 82 . JR NZ,&3D9B 3E19 C7 Ç RST &00 3E1A A7 § AND A 3E1B CD E9 40 Íé@ CALL &40E9 3E1E 41 A LD B,C 3E1F 53 S LD D,E 3E20 D8 Ř RET C 3E21 7E ~ LD A,(HL) 3E22 A7 § AND A 3E23 28 1E (. JR Z,&3E43 3E25 1A . LD A,(DE) 3E26 BE ž CP (HL) 3E27 28 1A (. JR Z,&3E43 3E29 D7 × RST &10 3E2A 43 C LD B,E 3E2B 61 a LD H,C 3E2C 6E n LD L,(HL) 3E2D 0F . RRCA 3E2E D2 65 6E Ňen JP NC,&6E65 3E31 61 a LD H,C 3E32 6D m LD L,L 3E33 65 e LD H,L 3E34 C1 Á POP BC 3E35 63 c LD H,E 3E36 72 r LD (HL),D 3E37 6F o LD L,A 3E38 73 s LD (HL),E 3E39 73 s LD (HL),E 3E3A C4 72 69 Äri CALL NZ,&6972 3E3D 76 v HALT 3E3E 65 e LD H,L 3E3F 73 s LD (HL),E 3E40 2E 00 .. LD L,&00 3E42 C7 Ç RST &00 3E43 1A . LD A,(DE) 3E44 77 w LD (HL),A 3E45 CD E0 41 ÍŕA CALL &41E0 3E48 DA 00 00 Ú.. JP C,&0000 3E4B D7 × RST &10 3E4C CF Ď RST &08 3E4D 6C l LD L,H 3E4E 64 d LD H,H 3E4F 96 . SUB A,(HL) 3E50 A0 AND B 3E51 CE 65 Îe ADC A,&65 3E53 77 w LD (HL),A 3E54 96 . SUB A,(HL) 3E55 00 . NOP 3E56 E5 ĺ PUSH HL 3E57 21 00 03 !.. LD HL,&0300 3E5A CD 99 41 Í.A CALL &4199 3E5D F7 ÷ RST &30 3E5E 17 . RLA 3E5F 28 05 (. JR Z,&3E66 3E61 D7 × RST &10 3E62 AD XOR L 3E63 99 . SBC A,C 3E64 2E 00 .. LD L,&00 3E66 C1 Á POP BC 3E67 0B . DEC BC 3E68 78 x LD A,B 3E69 B1 ą OR C 3E6A CA 00 00 Ę.. JP Z,&0000 3E6D C5 Ĺ PUSH BC 3E6E 18 EA .ę JR &3E5A 3E70 CD E0 42 ÍŕB CALL &42E0 3E73 DA 69 40 Úi@ JP C,&4069 3E76 7C | LD A,H 3E77 A7 § AND A 3E78 C2 69 40 Âi@ JP NZ,&4069 3E7B 29 ) ADD HL,HL 3E7C E5 ĺ PUSH HL 3E7D 2A 81 2F *./ LD HL,(&2F81) 3E80 11 5C 00 .\. LD DE,&005C 3E83 01 B9 40 .š@ LD BC,&40B9 3E86 CD 36 44 Í6D CALL &4436 3E89 DA 16 44 Ú.D JP C,&4416 3E8C AF Ż XOR A 3E8D 32 68 00 2h. LD (&0068),A 3E90 32 7C 00 2|. LD (&007C),A 3E93 F7 ÷ RST &30 3E94 16 20 . LD D,&20 3E96 1A . LD A,(DE) 3E97 21 00 48 !.H LD HL,&4800 3E9A EB ë EX DE,HL 3E9B C1 Á POP BC 3E9C 78 x LD A,B 3E9D B1 ą OR C 3E9E 28 0D (. JR Z,&3EAD 3EA0 0B . DEC BC 3EA1 C5 Ĺ PUSH BC 3EA2 F7 ÷ RST &30 3EA3 1A . LD A,(DE) 3EA4 EB ë EX DE,HL 3EA5 F7 ÷ RST &30 3EA6 15 . DEC D 3EA7 01 80 00 ... LD BC,&0080 3EAA 09 . ADD HL,BC 3EAB 18 ED .í JR &3E9A 3EAD EB ë EX DE,HL 3EAE F7 ÷ RST &30 3EAF 10 C7 .Ç DJNZ &3E78 3EB1 D7 × RST &10 3EB2 C3 61 6E Ăan JP &6E61 3EB5 0F . RRCA 3EB6 C3 72 65 Ăre JP &6572 3EB9 61 a LD H,C 3EBA 74 t LD (HL),H 3EBB 65 e LD H,L 3EBC 9A . SBC A,D 3EBD AD XOR L 3EBE 99 . SBC A,C 3EBF 2E 00 .. LD L,&00 3EC1 C7 Ç RST &00 3EC2 CD E0 42 ÍŕB CALL &42E0 3EC5 DA 69 40 Úi@ JP C,&4069 3EC8 7C | LD A,H 3EC9 A7 § AND A 3ECA C2 69 40 Âi@ JP NZ,&4069 3ECD EF ď RST &28 3ECE 0A . LD A,(BC) 3ECF 4D M LD C,L 3ED0 E7 ç RST &20 3ED1 C9 É RET 3ED2 26 01 &. LD H,&01 3ED4 CD 22 3F Í"? CALL &3F22 3ED7 26 04 &. LD H,&04 3ED9 25 % DEC H 3EDA CD 1C 3F Í.? CALL &3F1C 3EDD 57 W LD D,A 3EDE 25 % DEC H 3EDF CD 1C 3F Í.? CALL &3F1C 3EE2 5F _ LD E,A 3EE3 D5 Ő PUSH DE 3EE4 7C | LD A,H 3EE5 A7 § AND A 3EE6 20 F1 ń JR NZ,&3ED9 3EE8 FD E1 ýá POP IY 3EEA DD E1 Ýá POP IX 3EEC 01 64 00 .d. LD BC,&0064 3EEF CD 37 3F Í7? CALL &3F37 3EF2 0E 3C .< LD C,&3C 3EF4 CD 37 3F Í7? CALL &3F37 3EF7 D5 Ő PUSH DE 3EF8 CD 37 3F Í7? CALL &3F37 3EFB D5 Ő PUSH DE 3EFC 0E 18 .. LD C,&18 3EFE CD 37 3F Í7? CALL &3F37 3F01 EB ë EX DE,HL 3F02 D7 × RST &10 3F03 54 T LD D,H 3F04 68 h LD L,B 3F05 65 e LD H,L 3F06 F4 69 6D ôim CALL P,&6D69 3F09 65 e LD H,L 3F0A E9 é JP (HL) 3F0B 73 s LD (HL),E 3F0C 80 . ADD A,B 3F0D CD 27 3F Í'? CALL &3F27 3F10 06 02 .. LD B,&02 3F12 D7 × RST &10 3F13 3A 00 E1 :.á LD A,(&E100) 3F16 CD 27 3F Í'? CALL &3F27 3F19 10 F7 .÷ DJNZ &3F12 3F1B C7 Ç RST &00 3F1C EF ď RST &28 3F1D 0D . DEC C 3F1E 4C L LD C,H 3F1F E7 ç RST &20 3F20 DF ß RST &18 3F21 C9 É RET 3F22 EF ď RST &28 3F23 0C . INC C 3F24 4C L LD C,H 3F25 E7 ç RST &20 3F26 C9 É RET 3F27 3E 09 >. LD A,&09 3F29 BD ˝ CP L 3F2A 38 03 8. JR C,&3F2F 3F2C D7 × RST &10 3F2D 30 00 0. JR NC,&3F2F 3F2F C5 Ĺ PUSH BC 3F30 26 00 &. LD H,&00 3F32 CD B5 42 ÍľB CALL &42B5 3F35 C1 Á POP BC 3F36 C9 É RET 3F37 C5 Ĺ PUSH BC 3F38 78 x LD A,B 3F39 B1 ą OR C 3F3A 28 2E (. JR Z,&3F6A 3F3C 11 00 00 ... LD DE,&0000 3F3F 62 b LD H,D 3F40 6B k LD L,E 3F41 E5 ĺ PUSH HL 3F42 3E 20 > LD A,&20 3F44 FD 29 ý) ADD IY,IY 3F46 DD E3 Ýă EX (SP),IX 3F48 E3 ă EX (SP),HL 3F49 ED 6A íj ADC HL,HL 3F4B E3 ă EX (SP),HL 3F4C DD E3 Ýă EX (SP),IX 3F4E ED 6A íj ADC HL,HL 3F50 E3 ă EX (SP),HL 3F51 ED 6A íj ADC HL,HL 3F53 E3 ă EX (SP),HL 3F54 ED 42 íB SBC HL,BC 3F56 E3 ă EX (SP),HL 3F57 ED 52 íR SBC HL,DE 3F59 E3 ă EX (SP),HL 3F5A FD 23 ý# INC IY 3F5C 30 07 0. JR NC,&3F65 3F5E 09 . ADD HL,BC 3F5F E3 ă EX (SP),HL 3F60 ED 5A íZ ADC HL,DE 3F62 E3 ă EX (SP),HL 3F63 FD 2B ý+ DEC IY 3F65 3D = DEC A 3F66 20 DC Ü JR NZ,&3F44 3F68 C1 Á POP BC 3F69 EB ë EX DE,HL 3F6A C1 Á POP BC 3F6B C9 É RET 3F6C 2A 04 46 *.F LD HL,(&4604) 3F6F 46 F LD B,(HL) 3F70 3A 80 00 :.. LD A,(&0080) 3F73 3D = DEC A 3F74 C8 Č RET Z 3F75 32 80 00 2.. LD (&0080),A 3F78 23 # INC HL 3F79 22 04 46 ".F LD (&4604),HL 3F7C C9 É RET 3F7D CD 6C 3F Íl? CALL &3F6C 3F80 20 02 . JR NZ,&3F84 3F82 36 00 6. LD (HL),&00 3F84 78 x LD A,B 3F85 D6 30 Ö0 SUB A,&30 3F87 D8 Ř RET C 3F88 FE 0A ţ. CP &0A 3F8A 3F ? CCF 3F8B C9 É RET 3F8C CD 7D 3F Í}? CALL &3F7D 3F8F 21 00 00 !.. LD HL,&0000 3F92 D8 Ř RET C 3F93 18 07 .. JR &3F9C 3F95 E5 ĺ PUSH HL 3F96 CD 7D 3F Í}? CALL &3F7D 3F99 E1 á POP HL 3F9A 3F ? CCF 3F9B D0 Đ RET NC 3F9C 54 T LD D,H 3F9D 5D ] LD E,L 3F9E 29 ) ADD HL,HL 3F9F 29 ) ADD HL,HL 3FA0 19 . ADD HL,DE 3FA1 29 ) ADD HL,HL 3FA2 16 00 .. LD D,&00 3FA4 5F _ LD E,A 3FA5 19 . ADD HL,DE 3FA6 18 ED .í JR &3F95 3FA8 EF ď RST &28 3FA9 0E 48 .H LD C,&48 3FAB E7 ç RST &20 3FAC 4C L LD C,H 3FAD 05 . DEC B 3FAE E7 ç RST &20 3FAF C9 É RET 3FB0 3A 80 00 :.. LD A,(&0080) 3FB3 3D = DEC A 3FB4 2A 04 46 *.F LD HL,(&4604) 3FB7 B6 ś OR (HL) 3FB8 C9 É RET 3FB9 CD F2 43 ÍňC CALL &43F2 3FBC D8 Ř RET C 3FBD F7 ÷ RST &30 3FBE 0F . RRCA 3FBF C2 6C 31 Âl1 JP NZ,&316C 3FC2 F7 ÷ RST &30 3FC3 14 . INC D 3FC4 C2 00 00 Â.. JP NZ,&0000 3FC7 21 00 02 !.. LD HL,&0200 3FCA 06 80 .. LD B,&80 3FCC 7E ~ LD A,(HL) 3FCD E6 7F ć. AND &7F 3FCF 4F O LD C,A 3FD0 FE 1A ţ. CP &1A 3FD2 CA 00 00 Ę.. JP Z,&0000 3FD5 FE 0A ţ. CP &0A 3FD7 20 05 . JR NZ,&3FDE 3FD9 CD 9C 43 Í.C CALL &439C 3FDC 18 09 .. JR &3FE7 3FDE FE 1B ţ. CP &1B 3FE0 28 05 (. JR Z,&3FE7 3FE2 D5 Ő PUSH DE 3FE3 59 Y LD E,C 3FE4 F7 ÷ RST &30 3FE5 02 . LD (BC),A 3FE6 D1 Ń POP DE 3FE7 23 # INC HL 3FE8 10 E2 .â DJNZ &3FCC 3FEA 18 D6 .Ö JR &3FC2 3FEC 2A 81 2F *./ LD HL,(&2F81) 3FEF CD 50 42 ÍPB CALL &4250 3FF2 D7 × RST &10 3FF3 0A . LD A,(BC) 3FF4 00 . NOP 3FF5 C3 11 30 Ă.0 JP &3011 3FF8 11 00 02 ... LD DE,&0200 3FFB 3E 16 >. LD A,&16 3FFD 12 . LD (DE),A 3FFE 06 02 .. LD B,&02 4000 18 10 .. JR &4012 4002 3E 07 >. LD A,&07 4004 18 01 .. JR &4007 4006 AF Ż XOR A 4007 11 01 02 ... LD DE,&0201 400A 12 . LD (DE),A 400B 3E 13 >. LD A,&13 400D 1B . DEC DE 400E 12 . LD (DE),A 400F 06 03 .. LD B,&03 4011 13 . INC DE 4012 CD E0 42 ÍŕB CALL &42E0 4015 38 52 8R JR C,&4069 4017 7C | LD A,H 4018 A7 § AND A 4019 20 4E N JR NZ,&4069 401B 13 . INC DE 401C 7D } LD A,L 401D 12 . LD (DE),A 401E 18 36 .6 JR &4056 4020 11 00 02 ... LD DE,&0200 4023 06 00 .. LD B,&00 4025 CD E0 42 ÍŕB CALL &42E0 4028 38 3F 8? JR C,&4069 402A 7C | LD A,H 402B A7 § AND A 402C 20 3B ; JR NZ,&4069 402E 04 . INC B 402F 7D } LD A,L 4030 12 . LD (DE),A 4031 13 . INC DE 4032 2A 81 2F *./ LD HL,(&2F81) 4035 CD 09 45 Í.E CALL &4509 4038 22 81 2F "./ LD (&2F81),HL 403B FE 2C ţ, CP &2C 403D 28 E6 (ć JR Z,&4025 403F FE 3B ţ; CP &3B 4041 20 0E . JR NZ,&4051 4043 CD E0 42 ÍŕB CALL &42E0 4046 38 21 8! JR C,&4069 4048 04 . INC B 4049 7D } LD A,L 404A 12 . LD (DE),A 404B 13 . INC DE 404C 04 . INC B 404D 7C | LD A,H 404E 12 . LD (DE),A 404F 18 E1 .á JR &4032 4051 CD 00 45 Í.E CALL &4500 4054 20 13 . JR NZ,&4069 4056 21 00 02 !.. LD HL,&0200 4059 7E ~ LD A,(HL) 405A 23 # INC HL 405B 5F _ LD E,A 405C F7 ÷ RST &30 405D 04 . INC B 405E 10 F9 .ů DJNZ &4059 4060 06 08 .. LD B,&08 4062 1E 00 .. LD E,&00 4064 F7 ÷ RST &30 4065 04 . INC B 4066 10 FC .ü DJNZ &4064 4068 C9 É RET 4069 D7 × RST &10 406A 13 . INC DE 406B EF ď RST &28 406C 72 r LD (HL),D 406D ED 69 íi OUT (C),L 406F 73 s LD (HL),E 4070 73 s LD (HL),E 4071 0E 97 .. LD C,&97 4073 2E 0A .. LD L,&0A 4075 00 . NOP 4076 C7 Ç RST &00 4077 01 C9 40 .É@ LD BC,&40C9 407A CD 36 44 Í6D CALL &4436 407D DA 16 44 Ú.D JP C,&4416 4080 F7 ÷ RST &30 4081 0F . RRCA 4082 C2 6C 31 Âl1 JP NZ,&316C 4085 F7 ÷ RST &30 4086 14 . INC D 4087 C2 00 00 Â.. JP NZ,&0000 408A 21 00 02 !.. LD HL,&0200 408D 06 80 .. LD B,&80 408F D5 Ő PUSH DE 4090 5E ^ LD E,(HL) 4091 F7 ÷ RST &30 4092 04 . INC B 4093 D1 Ń POP DE 4094 23 # INC HL 4095 10 F8 .ř DJNZ &408F 4097 D5 Ő PUSH DE 4098 EF ď RST &28 4099 05 . DEC B 409A DF ß RST &18 409B D1 Ń POP DE 409C F2 85 40 ň.@ JP P,&4085 409F F7 ÷ RST &30 40A0 10 CD .Í DJNZ &406F 40A2 DE 43 ŢC SBC A,&43 40A4 1E 06 .. LD E,&06 40A6 F7 ÷ RST &30 40A7 04 . INC B 40A8 C7 Ç RST &00 40A9 00 . NOP 40AA 20 20 JR NZ,&40CC 40AC 20 20 JR NZ,&40CE 40AE 20 20 JR NZ,&40D0 40B0 20 20 JR NZ,&40D2 40B2 20 20 JR NZ,&40D4 40B4 20 00 . JR NZ,&40B6 40B6 00 . NOP 40B7 00 . NOP 40B8 00 . NOP 40B9 00 . NOP 40BA 20 20 JR NZ,&40DC 40BC 20 20 JR NZ,&40DE 40BE 20 20 JR NZ,&40E0 40C0 20 20 JR NZ,&40E2 40C2 43 C LD B,E 40C3 4F O LD C,A 40C4 4D M LD C,L 40C5 00 . NOP 40C6 00 . NOP 40C7 00 . NOP 40C8 00 . NOP 40C9 00 . NOP 40CA 20 20 JR NZ,&40EC 40CC 20 20 JR NZ,&40EE 40CE 20 20 JR NZ,&40F0 40D0 20 20 JR NZ,&40F2 40D2 50 P LD D,B 40D3 49 I LD C,C 40D4 43 C LD B,E 40D5 00 . NOP 40D6 00 . NOP 40D7 00 . NOP 40D8 00 . NOP 40D9 00 . NOP 40DA 20 20 JR NZ,&40FC 40DC 20 20 JR NZ,&40FE 40DE 20 20 JR NZ,&4100 40E0 20 20 JR NZ,&4102 40E2 53 S LD D,E 40E3 55 U LD D,L 40E4 42 B LD B,D 40E5 00 . NOP 40E6 00 . NOP 40E7 00 . NOP 40E8 00 . NOP 40E9 08 . EX AF,AF' 40EA 3A CC 02 :Ě. LD A,(&02CC) 40ED 32 26 00 2&. LD (&0026),A 40F0 32 27 00 2'. LD (&0027),A 40F3 E3 ă EX (SP),HL 40F4 4E N LD C,(HL) 40F5 23 # INC HL 40F6 46 F LD B,(HL) 40F7 23 # INC HL 40F8 E3 ă EX (SP),HL 40F9 11 A4 02 .¤. LD DE,&02A4 40FC CD 4F 41 ÍOA CALL &414F 40FF D8 Ř RET C 4100 CD CB 41 ÍËA CALL &41CB 4103 2A 81 2F *./ LD HL,(&2F81) 4106 CD 00 45 Í.E CALL &4500 4109 08 . EX AF,AF' 410A 30 12 0. JR NC,&411E 410C 08 . EX AF,AF' 410D FE 5B ţ[ CP &5B 410F 20 0B . JR NZ,&411C 4111 D5 Ő PUSH DE 4112 11 26 00 .&. LD DE,&0026 4115 CD 6E 41 ÍnA CALL &416E 4118 D1 Ń POP DE 4119 CD 00 45 Í.E CALL &4500 411C 08 . EX AF,AF' 411D 37 7 SCF 411E 08 . EX AF,AF' 411F CD 78 41 ÍxA CALL &4178 4122 D8 Ř RET C 4123 7E ~ LD A,(HL) 4124 FE 0D ţ. CP &0D 4126 28 04 (. JR Z,&412C 4128 FE 20 ţ CP &20 412A 20 54 T JR NZ,&4180 412C 11 80 02 ... LD DE,&0280 412F CD 4F 41 ÍOA CALL &414F 4132 D8 Ř RET C 4133 CD CB 41 ÍËA CALL &41CB 4136 08 . EX AF,AF' 4137 30 11 0. JR NC,&414A 4139 2A 81 2F *./ LD HL,(&2F81) 413C CD 00 45 Í.E CALL &4500 413F FE 5B ţ[ CP &5B 4141 D5 Ő PUSH DE 4142 11 27 00 .'. LD DE,&0027 4145 CC 6E 41 ĚnA CALL Z,&416E 4148 D1 Ń POP DE 4149 A7 § AND A 414A EB ë EX DE,HL 414B 11 A4 02 .¤. LD DE,&02A4 414E C9 É RET 414F 08 . EX AF,AF' 4150 30 0A 0. JR NC,&415C 4152 E5 ĺ PUSH HL 4153 CD 00 45 Í.E CALL &4500 4156 FE 5B ţ[ CP &5B 4158 28 06 (. JR Z,&4160 415A E1 á POP HL 415B 37 7 SCF 415C 08 . EX AF,AF' 415D C3 F2 43 ĂňC JP &43F2 4160 21 A9 40 !Š@ LD HL,&40A9 4163 CD E3 44 ÍăD CALL &44E3 4166 E1 á POP HL 4167 22 81 2F "./ LD (&2F81),HL 416A 37 7 SCF 416B 08 . EX AF,AF' 416C A7 § AND A 416D C9 É RET 416E CD E3 42 ÍăB CALL &42E3 4171 7D } LD A,L 4172 12 . LD (DE),A 4173 2A 81 2F *./ LD HL,(&2F81) 4176 23 # INC HL 4177 C9 É RET 4178 B9 š CP C 4179 20 05 . JR NZ,&4180 417B CD 09 45 Í.E CALL &4509 417E B8 ¸ CP B 417F C8 Č RET Z 4180 D7 × RST &10 4181 53 S LD D,E 4182 65 e LD H,L 4183 70 p LD (HL),B 4184 61 a LD H,C 4185 72 r LD (HL),D 4186 61 a LD H,C 4187 74 t LD (HL),H 4188 6F o LD L,A 4189 72 r LD (HL),D 418A 8F . ADC A,A 418B A7 § AND A 418C 00 . NOP 418D 59 Y LD E,C 418E F7 ÷ RST &30 418F 02 . LD (BC),A 4190 58 X LD E,B 4191 F7 ÷ RST &30 4192 02 . LD (BC),A 4193 D7 × RST &10 4194 27 ' DAA 4195 2E 00 .. LD L,&00 4197 37 7 SCF 4198 C9 É RET 4199 11 5C 00 .\. LD DE,&005C 419C D5 Ő PUSH DE 419D CD EE 44 ÍîD CALL &44EE 41A0 E3 ă EX (SP),HL 41A1 E5 ĺ PUSH HL 41A2 21 80 02 !.. LD HL,&0280 41A5 CD E3 44 ÍăD CALL &44E3 41A8 E1 á POP HL 41A9 E5 ĺ PUSH HL 41AA 06 0C .. LD B,&0C 41AC 1A . LD A,(DE) 41AD FE 3F ţ? CP &3F 41AF 20 02 . JR NZ,&41B3 41B1 7E ~ LD A,(HL) 41B2 12 . LD (DE),A 41B3 13 . INC DE 41B4 23 # INC HL 41B5 10 F5 .ő DJNZ &41AC 41B7 D1 Ń POP DE 41B8 D7 × RST &10 41B9 0A . LD A,(BC) 41BA 00 . NOP 41BB D5 Ő PUSH DE 41BC CD 77 43 ÍwC CALL &4377 41BF D7 × RST &10 41C0 A0 AND B 41C1 00 . NOP 41C2 11 6C 00 .l. LD DE,&006C 41C5 CD 77 43 ÍwC CALL &4377 41C8 D1 Ń POP DE 41C9 E1 á POP HL 41CA C9 É RET 41CB D5 Ő PUSH DE 41CC 13 . INC DE 41CD 1A . LD A,(DE) 41CE FE 20 ţ CP &20 41D0 20 0C . JR NZ,&41DE 41D2 D5 Ő PUSH DE 41D3 E1 á POP HL 41D4 C5 Ĺ PUSH BC 41D5 13 . INC DE 41D6 36 3F 6? LD (HL),&3F 41D8 01 0A 00 ... LD BC,&000A 41DB ED B0 í° LDIR 41DD C1 Á POP BC 41DE D1 Ń POP DE 41DF C9 É RET 41E0 CD 6F 43 ÍoC CALL &436F 41E3 EB ë EX DE,HL 41E4 CD 6F 43 ÍoC CALL &436F 41E7 EB ë EX DE,HL 41E8 01 00 0C ... LD BC,&0C00 41EB 1A . LD A,(DE) 41EC FE 3F ţ? CP &3F 41EE 20 03 . JR NZ,&41F3 41F0 BE ž CP (HL) 41F1 20 39 9 JR NZ,&422C 41F3 BE ž CP (HL) 41F4 28 07 (. JR Z,&41FD 41F6 7E ~ LD A,(HL) 41F7 FE 3F ţ? CP &3F 41F9 28 02 (. JR Z,&41FD 41FB 0E FF .. LD C,&FF 41FD 13 . INC DE 41FE 23 # INC HL 41FF 10 EA .ę DJNZ &41EB 4201 3A 26 00 :&. LD A,(&0026) 4204 47 G LD B,A 4205 3A 27 00 :'. LD A,(&0027) 4208 B8 ¸ CP B 4209 28 02 (. JR Z,&420D 420B 0E FF .. LD C,&FF 420D 79 y LD A,C 420E A7 § AND A 420F 28 2E (. JR Z,&423F 4211 3A 26 00 :&. LD A,(&0026) 4214 5F _ LD E,A 4215 F7 ÷ RST &30 4216 20 11 . JR NZ,&4229 4218 A4 ¤ AND H 4219 02 . LD (BC),A 421A CD 2F 43 Í/C CALL &432F 421D F5 ő PUSH AF 421E 3A CC 02 :Ě. LD A,(&02CC) 4221 5F _ LD E,A 4222 F7 ÷ RST &30 4223 20 F1 ń JR NZ,&4216 4225 C0 Ŕ RET NZ 4226 21 81 00 !.. LD HL,&0081 4229 C3 0B 44 Ă.D JP &440B 422C D7 × RST &10 422D 4F O LD C,A 422E 6C l LD L,H 422F 64 d LD H,H 4230 96 . SUB A,(HL) 4231 9B . SBC A,E 4232 6F o LD L,A 4233 E1 á POP HL 4234 6D m LD L,L 4235 62 b LD H,D 4236 69 i LD L,C 4237 67 g LD H,A 4238 75 u LD (HL),L 4239 6F o LD L,A 423A 75 u LD (HL),L 423B 73 s LD (HL),E 423C 00 . NOP 423D 37 7 SCF 423E C9 É RET 423F D7 × RST &10 4240 16 73 .s LD D,&73 4242 E5 ĺ PUSH HL 4243 71 q LD (HL),C 4244 75 u LD (HL),L 4245 69 i LD L,C 4246 76 v HALT 4247 61 a LD H,C 4248 6C l LD L,H 4249 65 e LD H,L 424A 6E n LD L,(HL) 424B 74 t LD (HL),H 424C 9D . SBC A,L 424D 00 . NOP 424E 37 7 SCF 424F C9 É RET 4250 E5 ĺ PUSH HL 4251 D5 Ő PUSH DE 4252 CD E3 42 ÍăB CALL &42E3 4255 30 05 0. JR NC,&425C 4257 CD 69 40 Íi@ CALL &4069 425A 18 17 .. JR &4273 425C 7D } LD A,L 425D E6 E0 ćŕ AND &E0 425F B4 ´ OR H 4260 28 0E (. JR Z,&4270 4262 D7 × RST &10 4263 55 U LD D,L 4264 73 s LD (HL),E 4265 65 e LD H,L 4266 72 r LD (HL),D 4267 97 . SUB A,A 4268 BE ž CP (HL) 4269 B3 ł OR E 426A 31 9D 0A 1.. LD SP,&0A9D 426D 00 . NOP 426E 18 03 .. JR &4273 4270 5D ] LD E,L 4271 F7 ÷ RST &30 4272 20 D1 Ń JR NZ,&4245 4274 E1 á POP HL 4275 C9 É RET 4276 CD E3 42 ÍăB CALL &42E3 4279 D0 Đ RET NC 427A 2A 81 2F *./ LD HL,(&2F81) 427D C5 Ĺ PUSH BC 427E D5 Ő PUSH DE 427F E5 ĺ PUSH HL 4280 CD 09 45 Í.E CALL &4509 4283 28 05 (. JR Z,&428A 4285 FE 21 ţ! CP &21 4287 30 F7 0÷ JR NC,&4280 4289 2B + DEC HL 428A 46 F LD B,(HL) 428B 36 00 6. LD (HL),&00 428D D1 Ń POP DE 428E E5 ĺ PUSH HL 428F F7 ÷ RST &30 4290 72 r LD (HL),D 4291 E3 ă EX (SP),HL 4292 70 p LD (HL),B 4293 22 81 2F "./ LD (&2F81),HL 4296 E1 á POP HL 4297 3E 01 >. LD A,&01 4299 84 . ADD A,H 429A 30 04 0. JR NC,&42A0 429C EB ë EX DE,HL 429D 22 81 2F "./ LD (&2F81),HL 42A0 D1 Ń POP DE 42A1 C1 Á POP BC 42A2 C9 É RET 42A3 E5 ĺ PUSH HL 42A4 EB ë EX DE,HL 42A5 F7 ÷ RST &30 42A6 71 q LD (HL),C 42A7 7C | LD A,H 42A8 B5 ľ OR L 42A9 28 05 (. JR Z,&42B0 42AB CD 3E 45 Í>E CALL &453E 42AE E1 á POP HL 42AF C9 É RET 42B0 E1 á POP HL 42B1 CD B5 42 ÍľB CALL &42B5 42B4 C9 É RET 42B5 E5 ĺ PUSH HL 42B6 4C L LD C,H 42B7 7D } LD A,L 42B8 11 0A 00 ... LD DE,&000A 42BB 21 00 00 !.. LD HL,&0000 42BE 06 11 .. LD B,&11 42C0 A7 § AND A 42C1 18 02 .. JR &42C5 42C3 ED 6A íj ADC HL,HL 42C5 ED 52 íR SBC HL,DE 42C7 30 01 0. JR NC,&42CA 42C9 19 . ADD HL,DE 42CA 3F ? CCF 42CB 17 . RLA 42CC CB 11 Ë. RL C 42CE 10 F3 .ó DJNZ &42C3 42D0 E5 ĺ PUSH HL 42D1 61 a LD H,C 42D2 6F o LD L,A 42D3 B4 ´ OR H 42D4 C4 B5 42 ÄľB CALL NZ,&42B5 42D7 E1 á POP HL 42D8 7D } LD A,L 42D9 C6 30 Ć0 ADD A,&30 42DB 5F _ LD E,A 42DC F7 ÷ RST &30 42DD 02 . LD (BC),A 42DE E1 á POP HL 42DF C9 É RET 42E0 2A 81 2F *./ LD HL,(&2F81) 42E3 C5 Ĺ PUSH BC 42E4 D5 Ő PUSH DE 42E5 CD 00 45 Í.E CALL &4500 42E8 22 81 2F "./ LD (&2F81),HL 42EB CD 28 43 Í(C CALL &4328 42EE 38 29 8) JR C,&4319 42F0 21 00 00 !.. LD HL,&0000 42F3 CD 28 43 Í(C CALL &4328 42F6 3F ? CCF 42F7 30 20 0 JR NC,&4319 42F9 D6 30 Ö0 SUB A,&30 42FB 4F O LD C,A 42FC AF Ż XOR A 42FD 47 G LD B,A 42FE 29 ) ADD HL,HL 42FF 5D ] LD E,L 4300 54 T LD D,H 4301 29 ) ADD HL,HL 4302 17 . RLA 4303 29 ) ADD HL,HL 4304 17 . RLA 4305 19 . ADD HL,DE 4306 17 . RLA 4307 09 . ADD HL,BC 4308 17 . RLA 4309 A7 § AND A 430A 20 14 . JR NZ,&4320 430C E5 ĺ PUSH HL 430D 2A 81 2F *./ LD HL,(&2F81) 4310 CD 09 45 Í.E CALL &4509 4313 22 81 2F "./ LD (&2F81),HL 4316 E1 á POP HL 4317 18 DA .Ú JR &42F3 4319 E5 ĺ PUSH HL 431A 2A 81 2F *./ LD HL,(&2F81) 431D C3 7A 44 ĂzD JP &447A 4320 D7 × RST &10 4321 13 . INC DE 4322 97 . SUB A,A 4323 AD XOR L 4324 98 . SBC A,B 4325 1F . RRA 4326 00 . NOP 4327 C7 Ç RST &00 4328 FE 30 ţ0 CP &30 432A D8 Ř RET C 432B FE 3A ţ: CP &3A 432D 3F ? CCF 432E C9 É RET 432F CD 6F 43 ÍoC CALL &436F 4332 21 00 00 !.. LD HL,&0000 4335 22 CA 02 "Ę. LD (&02CA),HL 4338 26 03 &. LD H,&03 433A 22 C8 02 "Č. LD (&02C8),HL 433D C5 Ĺ PUSH BC 433E F7 ÷ RST &30 433F 11 20 26 . & LD DE,&2620 4342 21 00 02 !.. LD HL,&0200 4345 D5 Ő PUSH DE 4346 1E FF .. LD E,&FF 4348 F7 ÷ RST &30 4349 20 D1 Ń JR NZ,&431C 434B BE ž CP (HL) 434C 20 16 . JR NZ,&4364 434E 1A . LD A,(DE) 434F 77 w LD (HL),A 4350 D5 Ő PUSH DE 4351 ED 5B C8 02 í[Č. LD DE,(&02C8) 4355 CD EE 44 ÍîD CALL &44EE 4358 ED 53 C8 02 íSČ. LD (&02C8),DE 435C D1 Ń POP DE 435D 2A CA 02 *Ę. LD HL,(&02CA) 4360 23 # INC HL 4361 22 CA 02 "Ę. LD (&02CA),HL 4364 F7 ÷ RST &30 4365 12 . LD (DE),A 4366 18 D8 .Ř JR &4340 4368 2A CA 02 *Ę. LD HL,(&02CA) 436B C1 Á POP BC 436C 7C | LD A,H 436D B5 ľ OR L 436E C9 É RET 436F 1A . LD A,(DE) 4370 A7 § AND A 4371 C0 Ŕ RET NZ 4372 F7 ÷ RST &30 4373 19 . ADD HL,DE 4374 3C < INC A 4375 12 . LD (DE),A 4376 C9 É RET 4377 D5 Ő PUSH DE 4378 1A . LD A,(DE) 4379 C6 40 Ć@ ADD A,&40 437B 5F _ LD E,A 437C F7 ÷ RST &30 437D 02 . LD (BC),A 437E D7 × RST &10 437F 3A 00 D1 :.Ń LD A,(&D100) 4382 C5 Ĺ PUSH BC 4383 D5 Ő PUSH DE 4384 E5 ĺ PUSH HL 4385 EB ë EX DE,HL 4386 06 08 .. LD B,&08 4388 23 # INC HL 4389 5E ^ LD E,(HL) 438A F7 ÷ RST &30 438B 02 . LD (BC),A 438C 10 FA .ú DJNZ &4388 438E D7 × RST &10 438F 2E 00 .. LD L,&00 4391 06 03 .. LD B,&03 4393 23 # INC HL 4394 5E ^ LD E,(HL) 4395 F7 ÷ RST &30 4396 02 . LD (BC),A 4397 10 FA .ú DJNZ &4393 4399 C3 F8 45 ĂřE JP &45F8 439C D7 × RST &10 439D 0A . LD A,(BC) 439E 00 . NOP 439F C5 Ĺ PUSH BC 43A0 D5 Ő PUSH DE 43A1 E5 ĺ PUSH HL 43A2 EF ď RST &28 43A3 05 . DEC B 43A4 DF ß RST &18 43A5 F2 F8 45 ňřE JP P,&45F8 43A8 CD DE 43 ÍŢC CALL &43DE 43AB D7 × RST &10 43AC 44 D LD B,H 43AD 6F o LD L,A 43AE F9 ů LD SP,HL 43AF 6F o LD L,A 43B0 75 u LD (HL),L 43B1 F7 ÷ RST &30 43B2 61 a LD H,C 43B3 6E n LD L,(HL) 43B4 74 t LD (HL),H 43B5 9B . SBC A,E 43B6 F3 ó DI 43B7 1B . DEC DE 43B8 70 p LD (HL),B 43B9 A8 ¨ XOR B 43BA 59 Y LD E,C 43BB 2F / CPL 43BC 4E N LD C,(HL) 43BD 29 ) ADD HL,HL 43BE BF ż CP A 43BF 80 . ADD A,B 43C0 F7 ÷ RST &30 43C1 03 . INC BC 43C2 CD DE 43 ÍŢC CALL &43DE 43C5 E6 DF ćß AND &DF 43C7 FE 59 ţY CP &59 43C9 28 0F (. JR Z,&43DA 43CB D7 × RST &10 43CC 0D . DEC C 43CD 00 . NOP 43CE 06 1D .. LD B,&1D 43D0 D7 × RST &10 43D1 80 . ADD A,B 43D2 10 FC .ü DJNZ &43D0 43D4 D7 × RST &10 43D5 0D . DEC C 43D6 00 . NOP 43D7 C3 F8 45 ĂřE JP &45F8 43DA CD EB 43 ÍëC CALL &43EB 43DD C7 Ç RST &00 43DE F5 ő PUSH AF 43DF CD C3 FF ÍĂ. CALL &FFC3 43E2 11 DF 28 .ß( LD DE,&28DF 43E5 03 . INC BC 43E6 DF ß RST &18 43E7 18 F6 .ö JR &43DF 43E9 F1 ń POP AF 43EA C9 É RET 43EB 3A CC 02 :Ě. LD A,(&02CC) 43EE 5F _ LD E,A 43EF F7 ÷ RST &30 43F0 20 C9 É JR NZ,&43BB 43F2 C5 Ĺ PUSH BC 43F3 01 A9 40 .Š@ LD BC,&40A9 43F6 CD 36 44 Í6D CALL &4436 43F9 C1 Á POP BC 43FA D0 Đ RET NC 43FB 18 19 .. JR &4416 43FD E5 ĺ PUSH HL 43FE C5 Ĺ PUSH BC 43FF 2A 81 2F *./ LD HL,(&2F81) 4402 01 A9 40 .Š@ LD BC,&40A9 4405 CD 36 44 Í6D CALL &4436 4408 C1 Á POP BC 4409 E1 á POP HL 440A C9 É RET 440B D7 × RST &10 440C 1A . LD A,(DE) 440D 8F . ADC A,A 440E E6 6F ćo AND &6F 4410 75 u LD (HL),L 4411 6E n LD L,(HL) 4412 64 d LD H,H 4413 00 . NOP 4414 18 04 .. JR &441A 4416 D7 × RST &10 4417 13 . INC DE 4418 96 . SUB A,(HL) 4419 00 . NOP 441A D5 Ő PUSH DE 441B E5 ĺ PUSH HL 441C CD 00 45 Í.E CALL &4500 441F 38 0F 8. JR C,&4430 4421 D7 × RST &10 4422 AD XOR L 4423 A7 § AND A 4424 00 . NOP 4425 5F _ LD E,A 4426 F7 ÷ RST &30 4427 02 . LD (BC),A 4428 CD 09 45 Í.E CALL &4509 442B 30 F8 0ř JR NC,&4425 442D D7 × RST &10 442E 27 ' DAA 442F 00 . NOP 4430 F7 ÷ RST &30 4431 0D . DEC C 4432 E1 á POP HL 4433 D1 Ń POP DE 4434 37 7 SCF 4435 C9 É RET 4436 C5 Ĺ PUSH BC 4437 D5 Ő PUSH DE 4438 E5 ĺ PUSH HL 4439 C5 Ĺ PUSH BC 443A E1 á POP HL 443B CD E3 44 ÍăD CALL &44E3 443E 21 20 00 ! . LD HL,&0020 4441 19 . ADD HL,DE 4442 36 00 6. LD (HL),&00 4444 E1 á POP HL 4445 E5 ĺ PUSH HL 4446 CD 00 45 Í.E CALL &4500 4449 CD D8 44 ÍŘD CALL &44D8 444C 38 2C 8, JR C,&447A 444E 4F O LD C,A 444F 7E ~ LD A,(HL) 4450 FE 3A ţ: CP &3A 4452 79 y LD A,C 4453 20 0E . JR NZ,&4463 4455 FE 41 ţA CP &41 4457 38 21 8! JR C,&447A 4459 FE 51 ţQ CP &51 445B 3F ? CCF 445C 38 1C 8. JR C,&447A 445E D6 40 Ö@ SUB A,&40 4460 12 . LD (DE),A 4461 23 # INC HL 4462 23 # INC HL 4463 2B + DEC HL 4464 01 00 08 ... LD BC,&0800 4467 13 . INC DE 4468 CD 87 44 Í.D CALL &4487 446B CB 11 Ë. RL C 446D 06 03 .. LD B,&03 446F FE 2E ţ. CP &2E 4471 20 05 . JR NZ,&4478 4473 CD 87 44 Í.D CALL &4487 4476 38 02 8. JR C,&447A 4478 CB 19 Ë. RR C 447A F5 ő PUSH AF 447B FE 0D ţ. CP &0D 447D 28 01 (. JR Z,&4480 447F 2B + DEC HL 4480 F1 ń POP AF 4481 22 81 2F "./ LD (&2F81),HL 4484 C3 F8 45 ĂřE JP &45F8 4487 C5 Ĺ PUSH BC 4488 CD D5 44 ÍŐD CALL &44D5 448B 38 35 85 JR C,&44C2 448D FE 2A ţ* CP &2A 448F 28 04 (. JR Z,&4495 4491 12 . LD (DE),A 4492 13 . INC DE 4493 18 19 .. JR &44AE 4495 E5 ĺ PUSH HL 4496 48 H LD C,B 4497 CD D5 44 ÍŐD CALL &44D5 449A 38 03 8. JR C,&449F 449C 0D . DEC C 449D 20 F8 ř JR NZ,&4497 449F 78 x LD A,B 44A0 91 . SUB A,C 44A1 47 G LD B,A 44A2 3E 3F >? LD A,&3F 44A4 0D . DEC C 44A5 FA AC 44 úŹD JP M,&44AC 44A8 12 . LD (DE),A 44A9 13 . INC DE 44AA 18 F8 .ř JR &44A4 44AC E1 á POP HL 44AD 04 . INC B 44AE 10 D8 .Ř DJNZ &4488 44B0 CD D5 44 ÍŐD CALL &44D5 44B3 38 06 8. JR C,&44BB 44B5 CD CD 44 ÍÍD CALL &44CD 44B8 C1 Á POP BC 44B9 37 7 SCF 44BA C9 É RET 44BB FE 3A ţ: CP &3A 44BD C1 Á POP BC 44BE 28 21 (! JR Z,&44E1 44C0 A7 § AND A 44C1 C9 É RET 44C2 F5 ő PUSH AF 44C3 3E 20 > LD A,&20 44C5 12 . LD (DE),A 44C6 13 . INC DE 44C7 10 FC .ü DJNZ &44C5 44C9 F1 ń POP AF 44CA C1 Á POP BC 44CB BF ż CP A 44CC C9 É RET 44CD F5 ő PUSH AF 44CE CD D5 44 ÍŐD CALL &44D5 44D1 30 FB 0ű JR NC,&44CE 44D3 F1 ń POP AF 44D4 C9 É RET 44D5 CD 09 45 Í.E CALL &4509 44D8 D8 Ř RET C 44D9 FE 2E ţ. CP &2E 44DB 28 04 (. JR Z,&44E1 44DD FE 3A ţ: CP &3A 44DF 20 DF ß JR NZ,&44C0 44E1 37 7 SCF 44E2 C9 É RET 44E3 C5 Ĺ PUSH BC 44E4 D5 Ő PUSH DE 44E5 E5 ĺ PUSH HL 44E6 01 10 00 ... LD BC,&0010 44E9 ED B0 í° LDIR 44EB C3 F8 45 ĂřE JP &45F8 44EE C5 Ĺ PUSH BC 44EF 01 10 00 ... LD BC,&0010 44F2 ED B0 í° LDIR 44F4 C1 Á POP BC 44F5 C9 É RET 44F6 CD 00 45 Í.E CALL &4500 44F9 FE 2C ţ, CP &2C 44FB 28 F9 (ů JR Z,&44F6 44FD 18 11 .. JR &4510 44FF 23 # INC HL 4500 7E ~ LD A,(HL) 4501 FE 20 ţ CP &20 4503 28 FA (ú JR Z,&44FF 4505 FE 09 ţ. CP &09 4507 28 F6 (ö JR Z,&44FF 4509 7E ~ LD A,(HL) 450A CD 10 45 Í.E CALL &4510 450D C8 Č RET Z 450E 23 # INC HL 450F C9 É RET 4510 FE 0D ţ. CP &0D 4512 28 20 ( JR Z,&4534 4514 FE 21 ţ! CP &21 4516 D8 Ř RET C 4517 FE 2C ţ, CP &2C 4519 28 18 (. JR Z,&4533 451B FE 28 ţ( CP &28 451D 28 14 (. JR Z,&4533 451F FE 29 ţ) CP &29 4521 28 10 (. JR Z,&4533 4523 FE 3B ţ; CP &3B 4525 38 0A 8. JR C,&4531 4527 FE 3F ţ? CP &3F 4529 D8 Ř RET C 452A FE 5B ţ[ CP &5B 452C 38 03 8. JR C,&4531 452E FE 60 ţ` CP &60 4530 D8 Ř RET C 4531 A7 § AND A 4532 C9 É RET 4533 A7 § AND A 4534 37 7 SCF 4535 C9 É RET ; RST &10 - PrintString entry from RST &10: ; If b7 set, preprints a space, then b7 ignored ; 00/80 -> end of string ; 01..0B, 0D, 20... printed ; 0C, 0E..1F expanded 4536 E3 ă EX (SP),HL ; Swap HL and return address 4537 F5 ő PUSH AF ; Save AF 4538 CD 3E 45 Í>E CALL &453E ; Print in-line string 453B F1 ń POP AF ; Restore AF 453C E3 ă EX (SP),HL ; Get HL back 453D C9 É RET ; Return to updated address ; Print string at HL 453E 7E ~ LD A,(HL) 453F 23 # INC HL 4540 A7 § AND A ; End if &00 4541 F2 49 45 ňIE JP P,&4549 ; If b7 set, prefix with space 4544 D7 × RST &10 4545 20 00 . DEFM " ":DEFB 0 ; Single space 4547 E6 7F ć. AND &7F ; Loose bit 7 4549 C8 Č RET Z ; End if was &00/&80 454A CD 4F 45 ÍOE CALL &454F ; Interpret char 454D 18 EF .ď JR &453E ; Loop back for next ; Print a character with interpretation 454F FE 0A ţ. CP &0A 4551 20 03 . JR NZ,&4556 ; Jump if not LF 4553 D7 × RST &10 ; Prefix LF with a CR 4554 0D 00 .. DEFM CHR$13:DEFB 0 ; 4556 FE 0D ţ. CP &0D 4558 28 21 (! JR Z,&457B ; Jump if CR 455A FE 20 ţ CP &20 455C 30 1D 0. JR NC,&457B ; Jump if SPC... 455E FE 0C ţ. CP &0C 4560 38 19 8. JR C,&457B ; Jump if <&0C 4562 C5 Ĺ PUSH BC ; Save registers 4563 D5 Ő PUSH DE 4564 E5 ĺ PUSH HL 4565 D6 0C Ö. SUB A,&0C ; A now offset from &00 4567 5F _ LD E,A 4568 AF Ż XOR A 4569 21 81 45 !.E LD HL,&4581 456C 01 75 00 .u. LD BC,&0075 456F ED B1 íą CPIR ; Scan through to find message 4571 1D . DEC E 4572 F2 6F 45 ňoE JP P,&456F 4575 CD 3E 45 Í>E CALL &453E ; Call myself to print it 4578 C3 F8 45 ĂřE JP &45F8 ; Print &01..&0B, &0D, &20... 457B D5 Ő PUSH DE ; Save DE 457C 5F _ LD E,A ; Put char to print in E 457D F7 ÷ RST &30 ; BDOS Function &02 457E 02 . DEFB &02 ; Console Output 457F D1 Ń POP DE ; Restore DE 4580 C9 É RET ; Compressed token table: 4581 00 . NOP ; Byte &0C 4582 4E 65 74 77 6F 72 6B DEFM "Network" 4589 00 . NOP ; 13 => CR 458A 00 . NOP ; 14 "ing" 458B 69 i LD L,C 458C 6E n LD L,(HL) 458D 67 g LD H,A 458E 00 . NOP 458F 6E n LD L,(HL) 4590 6F o LD L,A 4591 74 t LD (HL),H 4592 00 . NOP 4593 4E N LD C,(HL) 4594 61 a LD H,C 4595 6D m LD L,L 4596 65 e LD H,L 4597 00 . NOP 4598 64 d LD H,H 4599 69 i LD L,C 459A 73 s LD (HL),E 459B 63 c LD H,E 459C 00 . NOP 459D 64 d LD H,H 459E 72 r LD (HL),D 459F 69 i LD L,C 45A0 76 v HALT 45A1 65 e LD H,L 45A2 00 . NOP 45A3 49 I LD C,C 45A4 6C l LD L,H 45A5 6C l LD L,H 45A6 65 e LD H,L 45A7 67 g LD H,A 45A8 61 a LD H,C 45A9 6C l LD L,H 45AA 00 . NOP 45AB 46 F LD B,(HL) 45AC 6F o LD L,A 45AD 72 r LD (HL),D 45AE 6D m LD L,L 45AF 61 a LD H,C 45B0 74 t LD (HL),H 45B1 00 . NOP 45B2 63 c LD H,E 45B3 6F o LD L,A 45B4 6D m LD L,L 45B5 6D m LD L,L 45B6 61 a LD H,C 45B7 6E n LD L,(HL) 45B8 64 d LD H,H 45B9 00 . NOP 45BA 1A . LD A,(DE) 45BB 6E n LD L,(HL) 45BC 61 a LD H,C 45BD 6D m LD L,L 45BE 65 e LD H,L 45BF 00 . NOP 45C0 6E n LD L,(HL) 45C1 75 u LD (HL),L 45C2 6D m LD L,L 45C3 62 b LD H,D 45C4 65 e LD H,L 45C5 72 r LD (HL),D 45C6 00 . NOP 45C7 61 a LD H,C 45C8 62 b LD H,D 45C9 61 a LD H,C 45CA 6E n LD L,(HL) 45CB 64 d LD H,H 45CC 6F o LD L,A 45CD 6E n LD L,(HL) 45CE 00 . NOP 45CF 66 f LD H,(HL) 45D0 61 a LD H,C 45D1 69 i LD L,C 45D2 6C l LD L,H 45D3 1F . RRA 45D4 00 . NOP 45D5 46 F LD B,(HL) 45D6 69 i LD L,C 45D7 6C l LD L,H 45D8 65 e LD H,L 45D9 00 . NOP 45DA 74 t LD (HL),H 45DB 6F o LD L,A 45DC 00 . NOP 45DD 69 i LD L,C 45DE 6F o LD L,A 45DF 6E n LD L,(HL) 45E0 00 . NOP 45E1 2D - DEC L 45E2 E9 é JP (HL) 45E3 67 g LD H,A 45E4 6E n LD L,(HL) 45E5 6F o LD L,A 45E6 72 r LD (HL),D 45E7 1F . RRA 45E8 2E 00 .. LD L,&00 45EA 65 e LD H,L 45EB 73 s LD (HL),E 45EC 74 t LD (HL),H 45ED 69 i LD L,C 45EE 6E n LD L,(HL) 45EF 61 a LD H,C 45F0 74 t LD (HL),H 45F1 1C . INC E 45F2 00 . NOP 45F3 65 e LD H,L 45F4 64 d LD H,H 45F5 00 . NOP 45F6 3F ? CCF 45F7 00 . NOP 45F8 E1 á POP HL 45F9 D1 Ń POP DE 45FA C1 Á POP BC 45FB C9 É RET 45FC FE 11 ţ. CP &11 45FE 00 . NOP 45FF 88 . ADC A,B 4600 88 . ADC A,B