Désassemblage (+commentaires) de la ROM du TO8 Moniteur Page 0 E000-FFFF Sur les TO7-70 cette partie de ROM (+-2ko) est contenue dans l'extension Ctrl Disk E000 4D TSTA // Table Cookie E001 54 LSRB E002 44 LSRA E003 3A ABX // PT d'entrée DISK E004 16 LBRA E076 E007 16 LBRA E025 E00A 16 LBRA DFB3 E00D 17 LBSR DFB8 E010 17 LBSR DFB8 E013 17 LBSR DFB8 E016 17 LBSR DFB8 E019 17 LBSR DFB8 E01C 17 LBSR DFB8 E01F 17 LBSR DFB8 E022 17 LBSR DFB8 E025 8D BSR E09D E027 0F CLR 49 E029 8D BSR E0A7 E02B 17 LBSR DFFE E02E 86 LDA #02 E030 34 PSHS A, E032 0F CLR 58 E034 CC LDD #0001 E037 DD STD 4B E039 CE LDU #6200 E03C DF STU 4F E03E 17 LBSR E0A7 E041 8D BSR E0B9 E043 DE LDU 4F E045 24 BCC E04F E047 96 LDA 58 E049 26 BNE E06B E04B 03 COM 58 E04D 20 BRA E034 E04F 10 8E LDY #627F E053 34 PSHS Y, E055 86 LDA #55 E057 6A DEC ,U E059 63 COM ,U E05B AB ADDA ,U+ E05D 11 A3 CMPU ,S E060 26 BNE E057 E062 35 PULS Y, E064 A1 CMPA ,U E066 26 BNE E070 E068 7E JMP 6200 E06B 35 PULS A, E06D 4A DECA E06E 26 BNE E030 E070 0F CLR 80 E072 6E JMP [001E] // Pt d'entrée disk E076 34 PSHS U/S,Y,X,DP,B,A,CC E078 8D BSR E09D --> init des registres E07A 96 LDA 48 E07C 81 CMPA #01 E07E 27 BEQ E086 --> init ctrl disk E080 96 LDA 49 E082 81 CMPA #04 --> Detection RAMDISK E084 27 BEQ E093 E086 8D BSR E0A7 --> selection unité E088 8D BSR E0C2 --> traite la commande E08A 8D BSR E0B9 --> termine les commandes E08C 35 PULS A, E08E 1E EXG A,CC E090 44 LSRA E091 35 PULS PC,U/S,Y,X,DP,B,A, // Gestion du RAMDISK E093 CE LDU #E004 E096 DF STU 55 E098 BD JSR FFA0 E09B 20 BRA E08C // init des routines disk // X pointe sur le debut des registres disk E09D 86 LDA #60 E09F 1F TFR A,DP E0A1 8E LDX #E7D0 E0A4 0F CLR 4E -- raz de DSK.STA E0A6 39 RTS // selection unité disk E0A7 DC LDD 48 --> B=DSK.DRV E0A9 81 CMPA #01 --> si DSK.OP!=1 (init) E0AB 26 BNE E0AF E0AD C6 LDB #01 alors B=1 E0AF CE LDU #E0BE E0B2 A6 LDA B,U --> A=DSKREG[B] E0B4 A7 STA 2,X E0B6 97 STA 57 E0B8 39 RTS // disk : fin des operations ... E0B9 86 LDA #40 E0BB A7 STA 2,X E0BD 39 RTS // Table selection disk // DSKREG[4]={0x41,0x01,0x42,0x02} E0BE 41 ILL E0BF 01 ILL E0C0 42 ILL E0C1 02 ILL // disk : traitement de la commande E0C2 86 LDA #02 E0C4 34 PSHS A, E0C6 4F CLRA A=0 E0C7 D6 LDB 48 B=DSK.OP<<1 E0C9 54 LSRB LA: B=B>>1 E0CA 4C INCA A++ E0CB 24 BCC E0C9 if (B&0x01==0) GOTO LA E0CD 4A DECA A-- E0CE 48 ASLA A*=2 E0CF 10 8E LDY #E0F0 E0D3 AD JSR [A,Y] appel de la commande E0D5 24 BCC E0EE E0D7 96 LDA 4E gestion des codes de retour E0D9 85 BITA #51 E0DB 26 BNE E0EE E0DD 6A DEC ,S E0DF 27 BEQ E0ED E0E1 0F CLR 4E E0E3 81 CMPA #08 E0E5 27 BEQ E0C6 E0E7 8D BSR E134 E0E9 25 BCS E0DD E0EB 20 BRA E0C6 E0ED 53 COMB E0EE 35 PULS PC,A, // Table d'adressage (JMP [A,Y]) des fonctions disk E0F0 E0FE 0x01 initialisation du controleur E0F2 E3A7 0x02 lecture d'un secteur E0F4 E16E 0x04 rien E0F6 E177 0x08 ecriture d'un secteur E0F8 E174 0x10 rien E0FA E134 0x20 positionne tete piste 0 E0FC E452 0x40 positionne tete piste n // fonction disk 0x01 initialisation du controleur E0FE 8D BSR E134 // posit tete piste 0 E100 25 BCS E133 E102 86 LDA #01 E104 97 STA 4B E106 17 LBSR E17A E109 C6 LDB #44 E10B A6 LDA 1,X E10D 85 BITA #08 E10F 27 BEQ E113 E111 C6 LDB #43 E113 D7 STB 4E E115 8D BSR E134 // posit tete piste 0 E117 0F CLR 52 E119 0F CLR 54 E11B 6F CLR ,X E11D 0F CLR 58 E11F DC LDD E9 E121 93 SUBD ED E123 2C BGE E12A E125 43 COMA E126 53 COMB E127 C3 ADDD #0001 E12A 4D TSTA E12B 26 BNE E132 E12D 5D TSTB E12E 2A BPL E132 E130 03 COM 58 E132 4F CLRA E133 39 RTS // fonction disk 0x20 : positionne tete piste 0 E134 C6 LDB #64 E136 A6 LDA 1,X E138 85 BITA #08 E13A 26 BNE E14F E13C 96 LDA 57 E13E 8A ORA #10 E140 A7 STA 2,X E142 84 ANDA #EF E144 A7 STA 2,X E146 8D BSR E165 Wait 6ms E148 5A DECB E149 10 27 LBEQ E174 E14D 20 BRA E136 E14F 8D BSR E15F Wait 15ms E151 17 LBSR E1A8 ??? semble etre un bug E154 6F CLR ,Y E156 6F CLR 6,X E158 39 RTS // bcle de tempo 864µs E159 10 8E LDY #006C E15D 20 BRA E169 // bcle de tempo 14976µs E15F 10 8E LDY #0750 E163 20 BRA E169 // bcle de tempo 5984µs E165 10 8E LDY #02EC E169 31 LEAY -1,Y E16B 26 BNE E169 E16D 39 RTS // fonction disk 0x04 : rien E16E 86 LDA #FF E170 97 STA 58 E172 4F CLRA E173 39 RTS // fonction disk 4 : E174 0F CLR 58 E176 39 RTS // fonction disk 0x08 écriture d'un secteur E177 17 LBSR E152 E17A 25 BCS E176 E17C A6 LDA 1,X E17E 85 BITA #04 E180 27 BEQ E187 E182 86 LDA #01 E184 16 LBRA E176 E187 96 LDA 58 E189 10 26 LBNE E120 E18D 17 LBSR E141 E190 C6 LDB #19 E192 34 PSHS CC E194 17 LBSR E194 E197 10 8E LDY #7500 E19B 31 LEAY ff,Y E19D 10 27 LBEQ E140 E1A1 E6 LDB ,X E1A3 C5 BITB #02 E1A5 27 BEQ E19B E1A7 A7 STA 3,X | E1A8 03 COM E6 E1A9 E6 LDB ,X | E1AA 84 ANDA #2A E1AB 2A BPL E1A9 | E1AD A7 STA 3,X E1AF E6 LDB ,X E1B1 2A BPL E1AF E1B3 C6 LDB #FB E1B5 E7 STB 3,X E1B7 4F CLRA E1B8 E6 LDB ,X E1BA 2A BPL E1B8 E1BC E6 LDB ,U+ E1BE E7 STB 3,X E1C0 4A DECA E1C1 26 BNE E1B8 E1C3 E6 LDB ,X E1C5 C5 BITB #08 E1C7 27 BEQ E1C3 E1C9 8D BSR E159 E1CB 0D TST 48 E1CD 2A BPL E217 E1CF 17 LBSR E15A E1D2 C6 LDB #1B E1D4 17 LBSR E194 E1D7 86 LDA #04 E1D9 10 8E LDY #7500 E1DD 31 LEAY ff,Y E1DF 10 27 LBEQ E1DC E1E3 E6 LDB ,X E1E5 C5 BITB #02 E1E7 27 BEQ E1DD E1E9 E6 LDB 3,X E1EB 4A DECA E1EC 10 27 LBEQ E248 E1F0 E6 LDB ,X E1F2 2A BPL E1F0 E1F4 E6 LDB 3,X E1F6 C1 CMPB #FB E1F8 26 BNE E1EB E1FA 4F CLRA E1FB E6 LDB ,X E1FD 2A BPL E1FB E1FF E6 LDB 3,X E201 E1 CMPB ,U+ E203 26 BNE E208 E205 4A DECA E206 26 BNE E1FB E208 E6 LDB ,X E20A C5 BITB #08 E20C 27 BEQ E208 E20E 4D TSTA E20F 26 BNE E213 E211 C5 BITB #04 E213 10 26 LBNE E1DC E217 35 PULS CC E219 6F CLR ,X E21B 39 RTS E21C 34 PSHS CC E21E 20 BRA E1CF E220 17 LBSR E254 E223 17 LBSR E25B E226 34 PSHS CC E228 34 PSHS B,A, E22A 17 LBSR E1EA E22D 24 BCC E234 E22F 35 PULS B,A, E231 16 LBRA E240 E234 C6 LDB #FF E236 E7 STB 4,X E238 CC LDD #0624 E23B E7 STB ,X E23D E6 LDB ,X E23F 2A BPL E23D E241 6F CLR 3,X E243 4A DECA E244 26 BNE E23D E246 E6 LDB ,X E248 2A BPL E246 E24A CC LDD #FBC7 E24D ED STD 3,X E24F C6 LDB #FF E251 A6 LDA ,X E253 2A BPL E251 E255 A6 LDA ,U+ E257 ED STD 3,X E259 86 LDA #7F E25B E6 LDB ,X E25D 2A BPL E25B E25F E6 LDB ,U+ E261 E7 STB 3,X E263 4A DECA E264 26 BNE E25B E266 E6 LDB ,X E268 2A BPL E266 E26A 35 PULS B, E26C E7 STB 3,X E26E 43 COMA E26F 26 BNE E266 E271 E6 LDB ,X E273 2A BPL E271 E275 6F CLR 3,X E277 E6 LDB ,X E279 2A BPL E277 E27B C6 LDB #20 E27D E7 STB ,X E27F E6 LDB ,X E281 2A BPL E27F E283 E6 LDB 3,X E285 43 COMA E286 26 BNE E27F E288 32 LEAS fe,S E28A 17 LBSR E259 E28D 0D TST 48 E28F 2A BPL E2D3 E291 17 LBSR E25A E294 8D BSR E2EA E296 25 BCS E2DA E298 C6 LDB #FB E29A E7 STB 3,X E29C CC LDD #8038 E29F E7 STB ,X E2A1 10 8E LDY #0100 E2A5 31 LEAY ff,Y E2A7 27 BEQ E2DA E2A9 E6 LDB ,X E2AB C5 BITB #01 E2AD 27 BEQ E2A5 E2AF E6 LDB 3,X E2B1 C6 LDB #28 E2B3 E7 STB ,X E2B5 E6 LDB ,X E2B7 2A BPL E2B5 E2B9 E6 LDB 3,X E2BB E1 CMPB ,U+ E2BD 26 BNE E2DA E2BF 4A DECA E2C0 26 BNE E2B5 E2C2 A6 LDA ,X E2C4 2A BPL E2C2 E2C6 A6 LDA 3,X E2C8 E6 LDB ,X E2CA 2A BPL E2C8 E2CC E6 LDB 3,X E2CE 10 A3 CMPD ,S E2D1 26 BNE E2DA E2D3 35 PULS B,A, E2D5 35 PULS CC E2D7 6F CLR ,X E2D9 39 RTS E2DA 35 PULS B,A, E2DC 86 LDA #20 E2DE 16 LBRA E34A E2E1 34 PSHS CC E2E3 CC LDD #5D30 E2E6 34 PSHS B,A, E2E8 20 BRA E291 E2EA 86 LDA #C7 E2EC A7 STA 4,X E2EE 86 LDA #FE E2F0 A7 STA 3,X E2F2 86 LDA #30 E2F4 DE LDU 4F E2F6 1A ORCC #50 E2F8 C6 LDB #38 E2FA E7 STB ,X E2FC 10 8E LDY #1700 E300 31 LEAY ff,Y E302 27 BEQ E33E E304 E6 LDB ,X E306 C5 BITB #01 E308 27 BEQ E300 E30A E6 LDB 3,X E30C C6 LDB #28 E30E E7 STB ,X E310 E6 LDB ,X E312 2A BPL E310 E314 E6 LDB 3,X E316 D1 CMPB 4B E318 26 BNE E33B E31A E6 LDB ,X E31C 2A BPL E31A E31E E6 LDB 3,X E320 26 BNE E33B E322 E6 LDB ,X E324 2A BPL E322 E326 E6 LDB 3,X E328 D1 CMPB 4C E32A 26 BNE E33B E32C E6 LDB ,X E32E 2A BPL E32C E330 E6 LDB 3,X E332 26 BNE E33B E334 17 LBSR E359 E337 4F CLRA E338 A6 LDA ,X E33A 39 RTS E33B 4A DECA E33C 26 BNE E2F8 E33E 53 COMB E33F 20 BRA E338 E341 D6 LDB 4B E343 C1 CMPB #39 E345 2A BPL E34C E347 CC LDD #9F20 E34A 20 BRA E34F E34C CC LDD #1F22 E34F A7 STA 7,X E351 E7 STB 1,X E353 39 RTS E354 86 LDA #BF E356 A7 STA 7,X E358 6F CLR 1,X E35A 39 RTS E35B DE LDU 4F E35D 10 8E LDY #0080 E361 CC LDD #BF84 E364 34 PSHS B,A, E366 A6 LDA ,S E368 A8 EORA ,U+ E36A 34 PSHS A, E36C 44 LSRA E36D 44 LSRA E36E 44 LSRA E36F 44 LSRA E370 A8 EORA ,S E372 A7 STA ,S E374 1F TFR A,B E376 54 LSRB E377 54 LSRB E378 54 LSRB E379 48 ASLA E37A 48 ASLA E37B 48 ASLA E37C 48 ASLA E37D E8 EORB 2,S E37F E7 STB 2,S E381 1F TFR A,B E383 A8 EORA 2,S E385 A7 STA 1,S E387 58 ASLB E388 E8 EORB ,S E38A E7 STB 2,S E38C 32 LEAS 1,S E38E 31 LEAY ff,Y E390 26 BNE E366 E392 35 PULS PC,B,A, E394 96 LDA 4C E396 A7 STA 5,X E398 86 LDA #0A E39A A7 STA 4,X E39C 86 LDA #A1 E39E A7 STA 3,X E3A0 1A ORCC #50 E3A2 DE LDU 4F E3A4 E7 STB ,X E3A6 39 RTS // fonction disk 0x02 : lecture d'un secteur E3A7 17 LBSR E352 E3AA 10 25 LBCS E33F E3AE 34 PSHS CC E3B0 96 LDA 58 E3B2 26 BNE E3F1 E3B4 8D BSR E341 E3B6 C6 LDB #1B E3B8 8D BSR E394 E3BA 86 LDA #04 E3BC 10 8E LDY #7500 E3C0 31 LEAY ff,Y E3C2 27 BEQ E440 E3C4 E6 LDB ,X E3C6 C5 BITB #02 E3C8 27 BEQ E3C0 E3CA E6 LDB 3,X E3CC 4A DECA E3CD 27 BEQ E448 E3CF E6 LDB ,X E3D1 2A BPL E3CF E3D3 E6 LDB 3,X E3D5 C1 CMPB #FB E3D7 26 BNE E3CC E3D9 4F CLRA E3DA E6 LDB ,X E3DC 2A BPL E3DA E3DE E6 LDB 3,X E3E0 E7 STB ,U+ E3E2 4A DECA E3E3 26 BNE E3DA E3E5 E6 LDB ,X E3E7 C5 BITB #08 E3E9 27 BEQ E3E5 E3EB C5 BITB #04 E3ED 26 BNE E444 E3EF 20 BRA E43B E3F1 17 LBSR E454 E3F4 17 LBSR E3EA E3F7 25 BCS E440 E3F9 31 LEAY 3,Y E3FB 17 LBSR E469 E3FE C6 LDB #FB E400 E7 STB 3,X E402 CC LDD #8038 E405 E7 STB ,X E407 10 8E LDY #0100 E40B 31 LEAY ff,Y E40D 27 BEQ E448 E40F E6 LDB ,X E411 C5 BITB #01 E413 27 BEQ E40B E415 E6 LDB 3,X E417 C6 LDB #28 E419 E7 STB ,X E41B E6 LDB ,X E41D 2A BPL E41B E41F E6 LDB 3,X E421 E7 STB ,U+ E423 4A DECA E424 26 BNE E41B E426 E6 LDB ,X E428 2A BPL E426 E42A E6 LDB 3,X E42C 34 PSHS B, E42E 43 COMA E42F 26 BNE E426 E431 17 LBSR E45B E434 1E EXG A,B E436 10 A3 CMPD ,S++ E439 26 BNE E444 E43B 35 PULS CC E43D 6F CLR ,X E43F 39 RTS E440 86 LDA #04 E442 20 BRA E44A E444 86 LDA #08 E446 20 BRA E44A E448 86 LDA #02 E44A 97 STA 4E E44C 6F CLR ,X E44E 35 PULS CC E450 43 COMA E451 39 RTS // disk commande 0x80 : verif de la sauvegarde E452 8D BSR E45A E454 25 BCS E459 E456 8D BSR E47A E458 4F CLRA E459 39 RTS E45A 10 8E LDY #8000 E45E D6 LDB 57 E460 CA ORB #04 E462 E7 STB 2,X E464 C4 ANDB #FB E466 E7 STB 2,X E468 31 LEAY ff,Y E46A 27 BEQ E474 E46C E6 LDB 1,X E46E C4 ANDB #02 E470 27 BEQ E45E E472 4F CLRA E473 39 RTS E474 86 LDA #10 E476 34 PSHS CC E478 20 BRA E44A E47A 17 LBSR E465 E47D 8D BSR E4A8 E47F E6 LDB ,Y E481 96 LDA 57 E483 D0 SUBB 4B E485 27 BEQ E49F E487 2A BPL E48C E489 8A ORA #20 E48B 50 NEGB E48C A7 STA 2,X E48E 8A ORA #14 E490 A7 STA 2,X E492 84 ANDA #EB E494 A7 STA 2,X E496 17 LBSR E465 E499 5A DECB E49A 26 BNE E48E E49C 17 LBSR E45F E49F 8D BSR E4A8 E4A1 D6 LDB 4B E4A3 E7 STB 6,X E4A5 E7 STB ,Y E4A7 39 RTS E4A8 10 8E LDY #6052 E4AC 96 LDA 49 E4AE 84 ANDA #02 E4B0 31 LEAY A,Y E4B2 39 RTS E4B3 34 PSHS U/S,Y,X,DP,B,A,CC E4B5 17 LBSR E49D E4B8 96 LDA 49 E4BA 81 CMPA #04 E4BC 26 BNE E4C8 E4BE CE LDU #E00A E4C1 DF STU 55 E4C3 BD JSR FFA0 E4C6 20 BRA E51E E4C8 8D BSR E533 E4CA 96 LDA 48 E4CC 84 ANDA #80 E4CE 97 STA 48 E4D0 17 LBSR E4A7 E4D3 17 LBSR E45A E4D6 25 BCS E51E E4D8 17 LBSR E534 E4DB 25 BCS E51E E4DD 0F CLR 4B E4DF 8D BSR E521 E4E1 25 BCS E51E E4E3 34 PSHS CC E4E5 1A ORCC #50 E4E7 17 LBSR E478 E4EA 86 LDA #02 E4EC 34 PSHS A, E4EE 17 LBSR E4A8 E4F1 8E LDX #E7D0 E4F4 17 LBSR E55A E4F7 17 LBSR E4E5 E4FA 24 BCC E507 E4FC 6A DEC ,S E4FE 26 BNE E4EE E500 35 PULS A, E502 35 PULS CC E504 43 COMA E505 20 BRA E51E E507 35 PULS A, E509 35 PULS CC E50B 96 LDA 4B E50D 81 CMPA #4F E50F 27 BEQ E515 E511 8D BSR E52E E513 20 BRA E4E3 E515 17 LBSR E590 E518 25 BCS E51E E51A 86 LDA #50 E51C 97 STA 4B E51E 16 LBRA E58A E521 A6 LDA 1,X E523 85 BITA #04 E525 26 BNE E529 E527 4F CLRA E528 39 RTS E529 86 LDA #01 E52B 16 LBRA E576 E52E 0C INC 4B E530 16 LBRA E57A E533 34 PSHS X, E535 CE LDU #E55E E538 8E LDX #0003 E53B C6 LDB #04 E53D A6 LDA ,X E53F A1 CMPA ,U E541 27 BEQ E54C E543 5C INCB E544 33 LEAU B,U E546 A6 LDA ,U E548 26 BNE E538 E54A 20 BRA E55C E54C 30 LEAX ff,X E54E 26 BNE E553 E550 8E LDX #001A E553 33 LEAU 1,U E555 5A DECB E556 26 BNE E53D E558 A6 LDA ,U E55A 97 STA 58 E55C 35 PULS PC,X, E55E 52 ILL E55F 45 ILL E560 47 ASRA E561 6E JMP [4349] E565 50 NEGB E566 4A DECA E567 FF STU 4C45 E56A 4D TSTA E56B 74 LSR FF4C E56E 4F CLRA E56F 50 NEGB E570 B5 BITA 0053 E573 45 ILL E574 47 ASRA E575 B6 LDA 0000 E578 8E LDX #60D3 E57B C6 LDB #10 E57D 6F CLR B,X E57F 5A DECB E580 26 BNE E57D E582 30 LEAX 10,X E585 34 PSHS X, E587 8E LDX #60D3 E58A 86 LDA #01 E58C D6 LDB 4D E58E A7 STA ,X E590 30 LEAX B,X E592 4C INCA E593 81 CMPA #10 E595 22 BHI E5A5 E597 AC CMPX ,S E599 25 BCS E59D E59B 30 LEAX f0,X E59D 6D TST ,X E59F 27 BEQ E58E E5A1 30 LEAX 1,X E5A3 20 BRA E597 E5A5 32 LEAS 2,S E5A7 39 RTS E5A8 8E LDX #60D3 E5AB DE LDU 4F E5AD E6 LDB ,X+ E5AF 27 BEQ E5CE E5B1 96 LDA 4B E5B3 A7 STA ,U E5B5 6F CLR 1,U E5B7 E7 STB 2,U E5B9 10 8E LDY #0004 E5BD 96 LDA 58 E5BF 4C INCA E5C0 A7 STA 3,U E5C2 27 BEQ E5CF E5C4 CC LDD #B230 E5C7 17 LBSR E564 E5CA ED STD ,U++ E5CC 20 BRA E5AD E5CE 39 RTS E5CF CC LDD #EF21 E5D2 20 BRA E5C7 E5D4 E6 LDB 1,X E5D6 C5 BITB #40 E5D8 27 BEQ E5D4 E5DA E6 LDB 3,X E5DC E6 LDB ,X E5DE 2A BPL E5DA E5E0 E6 LDB ,X E5E2 2A BPL E5E0 E5E4 39 RTS E5E5 86 LDA #10 E5E7 34 PSHS A, E5E9 DE LDU 4F E5EB 96 LDA 58 E5ED 10 26 LBNE E5AA E5F1 17 LBSR E641 E5F4 8D BSR E5D4 E5F6 CC LDD #4EFF E5F9 ED STD 3,X E5FB C6 LDB #04 E5FD E7 STB ,X E5FF 86 LDA #1E E601 E6 LDB ,X E603 2A BPL E601 E605 C6 LDB #4E E607 E7 STB 3,X E609 4A DECA E60A 26 BNE E601 E60C 86 LDA #0C E60E E6 LDB ,X E610 2A BPL E60E E612 6F CLR 3,X E614 4A DECA E615 26 BNE E60E E617 E6 LDB ,X E619 2A BPL E617 E61B CC LDD #A10A E61E ED STD 3,X E620 E6 LDB ,X E622 2A BPL E620 E624 A7 STA 3,X E626 E6 LDB ,X E628 2A BPL E626 E62A A7 STA 3,X E62C E6 LDB ,X E62E 2A BPL E62C E630 CC LDD #FEFF E633 ED STD 3,X E635 86 LDA #06 E637 E6 LDB ,X E639 2A BPL E637 E63B E6 LDB ,U+ E63D E7 STB 3,X E63F 4A DECA E640 26 BNE E637 E642 86 LDA #16 E644 E6 LDB ,X E646 2A BPL E644 E648 C6 LDB #4E E64A E7 STB 3,X E64C 4A DECA E64D 26 BNE E644 E64F 86 LDA #0C E651 E6 LDB ,X E653 2A BPL E651 E655 6F CLR 3,X E657 4A DECA E658 26 BNE E651 E65A E6 LDB ,X E65C 2A BPL E65A E65E CC LDD #A10A E661 ED STD 3,X E663 E6 LDB ,X E665 2A BPL E663 E667 A7 STA 3,X E669 E6 LDB ,X E66B 2A BPL E669 E66D A7 STA 3,X E66F E6 LDB ,X E671 2A BPL E66F E673 CC LDD #FBFF E676 ED STD 3,X E678 4F CLRA E679 E6 LDB ,X E67B 2A BPL E679 E67D C6 LDB #E5 E67F E7 STB 3,X E681 4A DECA E682 26 BNE E679 E684 E6 LDB ,X E686 2A BPL E684 E688 C6 LDB #78 E68A E7 STB 3,X E68C E6 LDB ,X E68E 2A BPL E68C E690 C6 LDB #27 E692 E7 STB 3,X E694 86 LDA #2C E696 E6 LDB ,X E698 2A BPL E696 E69A C6 LDB #4E E69C E7 STB 3,X E69E 4A DECA E69F 26 BNE E696 E6A1 6A DEC ,S E6A3 10 26 LBNE E70C E6A7 16 LBRA E64B E6AA 17 LBSR E654 E6AD 17 LBSR E6D4 E6B0 CC LDD #FFFF E6B3 ED STD 3,X E6B5 C6 LDB #24 E6B7 E7 STB ,X E6B9 86 LDA #10 E6BB E6 LDB ,X E6BD 2A BPL E6BB E6BF C6 LDB #FF E6C1 E7 STB 3,X E6C3 4A DECA E6C4 26 BNE E6BB E6C6 86 LDA #06 E6C8 E6 LDB ,X E6CA 2A BPL E6C8 E6CC 6F CLR 3,X E6CE 4A DECA E6CF 26 BNE E6C8 E6D1 E6 LDB ,X E6D3 2A BPL E6D1 E6D5 CC LDD #FEC7 E6D8 ED STD 3,X E6DA E6 LDB ,X E6DC 2A BPL E6DA E6DE C6 LDB #FF E6E0 A6 LDA ,U+ E6E2 ED STD 3,X E6E4 86 LDA #05 E6E6 E6 LDB ,X E6E8 2A BPL E6E6 E6EA E6 LDB ,U+ E6EC E7 STB 3,X E6EE 4A DECA E6EF 26 BNE E6E6 E6F1 86 LDA #0C E6F3 E6 LDB ,X E6F5 2A BPL E6F3 E6F7 C6 LDB #FF E6F9 E7 STB 3,X E6FB 4A DECA E6FC 26 BNE E6F3 E6FE 86 LDA #06 E700 E6 LDB ,X E702 2A BPL E700 E704 6F CLR 3,X E706 4A DECA E707 26 BNE E700 E709 E6 LDB ,X E70B 2A BPL E709 E70D CC LDD #FBC7 E710 ED STD 3,X E712 E6 LDB ,X E714 2A BPL E712 E716 CC LDD #E5FF E719 ED STD 3,X E71B 86 LDA #7F E71D E6 LDB ,X E71F 2A BPL E71D E721 C6 LDB #E5 E723 E7 STB 3,X E725 4A DECA E726 26 BNE E71D E728 E6 LDB ,X E72A 2A BPL E728 E72C C6 LDB #5D E72E E7 STB 3,X E730 E6 LDB ,X E732 2A BPL E730 E734 C6 LDB #30 E736 E7 STB 3,X E738 86 LDA #16 E73A E6 LDB ,X E73C 2A BPL E73A E73E C6 LDB #FF E740 E7 STB 3,X E742 4A DECA E743 26 BNE E73A E745 6A DEC ,S E747 10 26 LBNE E7C6 E74B A6 LDA 1,X E74D 85 BITA #40 E74F 26 BNE E759 E751 A6 LDA ,X E753 2A BPL E751 E755 E7 STB 3,X E757 20 BRA E74B E759 35 PULS A, E75B 6F CLR ,X E75D 0D TST 48 E75F 2A BPL E783 E761 86 LDA #E5 E763 8D BSR E784 E765 CE LDU #60D3 E768 17 LBSR E75A E76B A6 LDA ,U+ E76D 27 BEQ E783 E76F 97 STA 4C E771 34 PSHS U/S, E773 96 LDA 58 E775 27 BEQ E77C E777 17 LBSR E7E1 E77A 20 BRA E77F E77C 17 LBSR E71C E77F 35 PULS U/S, E781 24 BCC E76B E783 39 RTS E784 DE LDU 4F E786 D6 LDB 58 E788 C4 ANDB #80 E78A A7 STA ,U+ E78C 5A DECB E78D 26 BNE E78A E78F 39 RTS E790 86 LDA #14 E792 97 STA 4B E794 17 LBSR E77A E797 86 LDA #FF E799 8D BSR E784 E79B 86 LDA #10 E79D 97 STA 4C E79F 17 LBSR E75A E7A2 17 LBSR E787 E7A5 25 BCS E7BF E7A7 0A DEC 4C E7A9 26 BNE E79F E7AB DE LDU 4F E7AD 6F CLR ,U E7AF CC LDD #FEFE E7B2 ED STD 29,U E7B5 86 LDA #02 E7B7 97 STA 4C E7B9 17 LBSR E787 E7BC 25 BCS E7BF E7BE 4F CLRA E7BF 39 RTS // Périph‚riques // 6846 E7C0 ??? E7C1 CRC E7C2 E7C3 E7C4 00 NEG 46 E7C6 21 BRN E7E5 // PIA système E7C8 PORTA / DDRA E7C9 PORTB / DDRB E7CA CRA E7CB CRB // PIA ctrl de manettes E7CC PORTA / DDRA E7CD PORTB / DDRB E7CE CRA E7CF CRB // E7D0 E7D1 30 LEAX 0,X E7D3 00 NEG 00 E7D5 00 NEG 00 E7D7 00 NEG 84 E7D9 30 LEAX 0,X // Gate Array Video E7DA Registre de palette E7DB Registre d'index de palette E7DC Registre mode graphique E7DD Registre couleur contour // libre E7DE CC LDD #CCCC E7E1 CC LDD #CCCC // Gate array ancienne génération (compteurs trame+ sync) E7E4 00 E7E5 0F E7E6 00 E7E7 02 // Libre E7E8 CC LDD #CCCC E7EB CC LDD #CCCC E7EE CC LDD #CCCC E7F1 CC LDD #CCCC E7F4 CC LDD #CCCC E7F7 CC LDD #CCCC E7FA CC LDD #CCCC E7FD CC LDD #CCCC // pt d'entr‚e Moniteur // repositionnement de fenetre plein ecran E800 7E JMP F66B // pt d'entrée PUTCH$ E803 7E JMP FF4D // pt d'entrée GETCH$ E806 7E JMP FF51 // pt d'entrée KTSTH$ E809 7E JMP EC12 // pt d'entrée DRAW$ E80C 7E JMP FF55 // pt d'entrée PLOT$ E80F 7E JMP FF59 // pt d'entrée RSCOH$ E812 7E JMP FF5D // pt d'entrée IO K7 E815 7E JMP FA59 // coordonn‚es light pen E818 7E JMP FF3D // teste contact lightpen E81B 7E JMP FF41 // pt d'entree NOTE$ E81E BD JSR ECB8 // GETP$ lecture d'un point E821 7E JMP FF61 // GETS$ lecture de l'ecran (char) E824 7E JMP FF65 // pt d'entrée JOYS$ E827 BD JSR ECB8 // pt d'entrée disk E82A 7E JMP E004 // MENU$ E82D 7E JMP FDC8 // KBIN$ E830 7E JMP FAF7 // CHPL$ E833 7E JMP F6FA E836 04 LSR 6A E838 01 ILL E839 9B ADDA 00 E83B CA ORB #00 E83D 62 ILL E83E 00 NEG 2E E840 00 NEG 15 E842 00 NEG 07 // vecteur VIRQ par defaut (MENU) E844 3B RTI E845 00 NEG 00 E847 00 NEG 00 E849 00 NEG 00 E84B 00 NEG 00 E84D 00 NEG 10 E84F 00 NEG 10 E851 10 10 ILL E853 10 00 ILL E855 00 NEG 00 E857 00 NEG 00 E859 50 NEGB E85A 28 BVC E870 E85C 00 NEG 28 E85E 28 BVC E85E E860 28 BVC E860 E862 28 BVC E88C E864 00 NEG 10 E866 FC LDD 127C E869 90 SUBA 7C E86B 10 00 ILL E86D 00 NEG 46 E86F 26 BNE E881 E871 08 ASL 64 E873 62 ILL E874 00 NEG 00 E876 3A ABX E877 4C INCA E878 4A DECA E879 30 LEAX 8,U E87B 30 LEAX 0,X E87D 00 NEG 00 E87F 00 NEG 00 E881 18 ILL E882 0C INC 0C E884 00 NEG 00 E886 08 ASL 10 E888 10 10 ILL E88A 10 08 ILL E88C 00 NEG 00 E88E 10 08 ILL E890 08 ASL 08 E892 08 ASL 10 E894 00 NEG 00 E896 54 LSRB E897 38 ILL E898 6C INC f8,Y E89A 54 LSRB E89B 00 NEG 00 E89D 00 NEG 10 E89F 10 7C ILL E8A1 10 10 ILL E8A3 00 NEG 00 E8A5 00 NEG 10 E8A7 0C INC 0C E8A9 00 NEG 00 E8AB 00 NEG 00 E8AD 00 NEG 00 E8AF 00 NEG 7C E8B1 00 NEG 00 E8B3 00 NEG 00 E8B5 00 NEG 18 E8B7 18 ILL E8B8 00 NEG 00 E8BA 00 NEG 00 E8BC 00 NEG 80 E8BE 40 NEGA E8BF 20 BRA E8D1 E8C1 08 ASL 04 E8C3 02 ILL E8C4 01 ILL E8C5 00 NEG 3C E8C7 62 ILL E8C8 52 ILL E8C9 4A DECA E8CA 46 RORA E8CB 3C ILL E8CC 00 NEG 00 E8CE 3C ILL E8CF 08 ASL 08 E8D1 28 BVC E8EB E8D3 08 ASL 00 E8D5 00 NEG 7E E8D7 40 NEGA E8D8 3C ILL E8D9 02 ILL E8DA 42 ILL E8DB 3C ILL E8DC 00 NEG 00 E8DE 3C ILL E8DF 42 ILL E8E0 02 ILL E8E1 1C & CC #42 E8E3 3C ILL E8E4 00 NEG 00 E8E6 04 LSR 7E E8E8 24 BCC E8FE E8EA 0C INC 04 E8EC 00 NEG 00 E8EE 3C ILL E8EF 42 ILL E8F0 02 ILL E8F1 7C INC 407E E8F4 00 NEG 00 E8F6 3C ILL E8F7 42 ILL E8F8 42 ILL E8F9 7C INC 201C E8FC 00 NEG 00 E8FE 40 NEGA E8FF 20 BRA E911 E901 08 ASL 04 E903 7E JMP 0000 E906 3C ILL E907 42 ILL E908 42 ILL E909 3C ILL E90A 42 ILL E90B 3C ILL E90C 00 NEG 00 E90E 38 ILL E90F 04 LSR 3E E911 42 ILL E912 42 ILL E913 3C ILL E914 00 NEG 00 E916 18 ILL E917 18 ILL E918 00 NEG 18 E91A 18 ILL E91B 00 NEG 00 E91D 10 0C ILL E91F 00 NEG 0C E921 0C INC 00 E923 00 NEG 00 E925 00 NEG 08 E927 10 20 ILL E929 20 BRA E93B E92B 08 ASL 00 E92D 00 NEG 00 E92F 7E JMP 007E E932 00 NEG 00 E934 00 NEG 00 E936 10 08 ILL E938 04 LSR 04 E93A 08 ASL 10 E93C 00 NEG 00 E93E 08 ASL 00 E940 08 ASL 04 E942 22 BHI E960 E944 00 NEG 00 E946 3E ILL E947 5C INCB E948 52 ILL E949 5E ILL E94A 42 ILL E94B 3C ILL E94C 00 NEG 00 E94E 42 ILL E94F 42 ILL E950 7E JMP 4224 E953 18 ILL E954 00 NEG 00 E956 7E JMP 2222 E959 3C ILL E95A 22 BHI E9D8 E95C 00 NEG 00 E95E 3C ILL E95F 42 ILL E960 40 NEGA E961 40 NEGA E962 42 ILL E963 3C ILL E964 00 NEG 00 E966 7C INC 2222 E969 22 BHI E98D E96B 7C INC 0000 E96E 7E JMP 4040 E971 78 ASL 407E E974 00 NEG 00 E976 40 NEGA E977 40 NEGA E978 40 NEGA E979 78 ASL 407E E97C 00 NEG 00 E97E 3C ILL E97F 42 ILL E980 4E ILL E981 40 NEGA E982 42 ILL E983 3C ILL E984 00 NEG 00 E986 42 ILL E987 42 ILL E988 42 ILL E989 7E JMP 4242 E98C 00 NEG 00 E98E 38 ILL E98F 10 10 ILL E991 10 10 ILL E993 38 ILL E994 00 NEG 00 E996 3C ILL E997 42 ILL E998 02 ILL E999 02 ILL E99A 02 ILL E99B 02 ILL E99C 00 NEG 00 E99E 44 LSRA E99F 48 ASLA E9A0 50 NEGB E9A1 70 NEG 4844 E9A4 00 NEG 00 E9A6 7E JMP 4040 E9A9 40 NEGA E9AA 40 NEGA E9AB 40 NEGA E9AC 00 NEG 00 E9AE 42 ILL E9AF 42 ILL E9B0 42 ILL E9B1 5A DECB E9B2 66 ROR 2,U E9B4 00 NEG 00 E9B6 42 ILL E9B7 46 RORA E9B8 4A DECA E9B9 52 ILL E9BA 62 ILL E9BB 42 ILL E9BC 00 NEG 00 E9BE 3C ILL E9BF 42 ILL E9C0 42 ILL E9C1 42 ILL E9C2 42 ILL E9C3 3C ILL E9C4 00 NEG 00 E9C6 40 NEGA E9C7 40 NEGA E9C8 7C INC 4242 E9CB 7C INC 0000 E9CE 3A ABX E9CF 44 LSRA E9D0 4A DECA E9D1 42 ILL E9D2 42 ILL E9D3 3C ILL E9D4 00 NEG 00 E9D6 42 ILL E9D7 44 LSRA E9D8 7C INC 4242 E9DB 7C INC 0000 E9DE 3C ILL E9DF 42 ILL E9E0 02 ILL E9E1 3C ILL E9E2 40 NEGA E9E3 3C ILL E9E4 00 NEG 00 E9E6 10 10 ILL E9E8 10 10 ILL E9EA 10 7C ILL E9EC 00 NEG 00 E9EE 3C ILL E9EF 42 ILL E9F0 42 ILL E9F1 42 ILL E9F2 42 ILL E9F3 42 ILL E9F4 00 NEG 00 E9F6 18 ILL E9F7 24 BCC EA1D E9F9 42 ILL E9FA 42 ILL E9FB 42 ILL E9FC 00 NEG 00 E9FE 42 ILL E9FF 66 ROR fa,U EA01 42 ILL EA02 42 ILL EA03 42 ILL EA04 00 NEG 00 EA06 42 ILL EA07 24 BCC EA21 EA09 18 ILL EA0A 24 BCC EA4E EA0C 00 NEG 00 EA0E 10 10 ILL EA10 10 10 ILL EA12 28 BVC EA58 EA14 00 NEG 00 EA16 7E JMP 2010 EA19 08 ASL 04 EA1B 7E JMP 0000 EA1E 38 ILL EA1F 20 BRA EA41 EA21 20 BRA EA43 EA23 38 ILL EA24 00 NEG 01 EA26 02 ILL EA27 04 LSR 08 EA29 10 20 ILL EA2B 40 NEGA EA2C 80 SUBA #00 EA2E 1C & CC #04 EA30 04 LSR 04 EA32 04 LSR 1C EA34 00 NEG 00 EA36 10 10 ILL EA38 10 7C ILL EA3A 38 ILL EA3B 10 00 ILL EA3D FF STU 0000 EA40 00 NEG 00 EA42 00 NEG 00 EA44 00 NEG 00 EA46 00 NEG 00 EA48 00 NEG FF EA4A 00 NEG 00 EA4C 00 NEG 00 EA4E 3A ABX EA4F 44 LSRA EA50 38 ILL EA51 04 LSR 38 EA53 00 NEG 00 EA55 00 NEG 5C EA57 62 ILL EA58 42 ILL EA59 62 ILL EA5A 5C INCB EA5B 40 NEGA EA5C 00 NEG 00 EA5E 3C ILL EA5F 42 ILL EA60 40 NEGA EA61 42 ILL EA62 3C ILL EA63 00 NEG 00 EA65 00 NEG 3A EA67 46 RORA EA68 42 ILL EA69 46 RORA EA6A 3A ABX EA6B 02 ILL EA6C 00 NEG 00 EA6E 3C ILL EA6F 40 NEGA EA70 7E JMP 423C EA73 00 NEG 00 EA75 00 NEG 10 EA77 10 7C ILL EA79 10 12 ILL EA7B 0C INC 00 EA7D 3C ILL EA7E 02 ILL EA7F 3A ABX EA80 46 RORA EA81 46 RORA EA82 3C ILL EA83 00 NEG 00 EA85 00 NEG 42 EA87 42 ILL EA88 42 ILL EA89 62 ILL EA8A 5C INCB EA8B 40 NEGA EA8C 00 NEG 00 EA8E 1C & CC #08 EA90 08 ASL 08 EA92 18 ILL EA93 00 NEG 08 EA95 38 ILL EA96 44 LSRA EA97 04 LSR 04 EA99 04 LSR 04 EA9B 00 NEG 04 EA9D 00 NEG 22 EA9F 34 PSHS Y,DP, EAA1 24 BCC EAC5 EAA3 20 BRA EAA5 EAA5 00 NEG 1C EAA7 08 ASL 08 EAA9 08 ASL 08 EAAB 18 ILL EAAC 00 NEG 00 EAAE 92 SBCA 92 EAB0 92 SBCA DA EAB2 A4 ANDA 0,X EAB4 00 NEG 00 EAB6 22 BHI EADA EAB8 22 BHI EAEC EABA 4C INCA EABB 00 NEG 00 EABD 00 NEG 3C EABF 42 ILL EAC0 42 ILL EAC1 42 ILL EAC2 3C ILL EAC3 00 NEG 00 EAC5 40 NEGA EAC6 5C INCB EAC7 62 ILL EAC8 42 ILL EAC9 62 ILL EACA 5C INCB EACB 00 NEG 00 EACD 02 ILL EACE 3A ABX EACF 46 RORA EAD0 46 RORA EAD1 46 RORA EAD2 3A ABX EAD3 00 NEG 00 EAD5 00 NEG 40 EAD7 40 NEGA EAD8 40 NEGA EAD9 62 ILL EADA 5C INCB EADB 00 NEG 00 EADD 00 NEG 7C EADF 02 ILL EAE0 3C ILL EAE1 40 NEGA EAE2 3C ILL EAE3 00 NEG 00 EAE5 00 NEG 0C EAE7 12 NOP EAE8 10 10 ILL EAEA 38 ILL EAEB 10 00 ILL EAED 00 NEG 3A EAEF 46 RORA EAF0 42 ILL EAF1 42 ILL EAF2 42 ILL EAF3 00 NEG 00 EAF5 00 NEG 18 EAF7 24 BCC EB3B EAF9 42 ILL EAFA 42 ILL EAFB 00 NEG 00 EAFD 00 NEG 24 EAFF 5A DECB EB00 42 ILL EB01 42 ILL EB02 42 ILL EB03 00 NEG 00 EB05 00 NEG 42 EB07 24 BCC EB21 EB09 24 BCC EB4D EB0B 00 NEG 00 EB0D 3C ILL EB0E 42 ILL EB0F 1A ORCC #66 EB11 42 ILL EB12 42 ILL EB13 00 NEG 00 EB15 00 NEG 7E EB17 20 BRA EB31 EB19 04 LSR 7E EB1B 00 NEG 00 EB1D 0C INC 08 EB1F 08 ASL 10 EB21 08 ASL 08 EB23 0C INC 00 EB25 10 10 ILL EB27 10 10 ILL EB29 10 10 ILL EB2B 10 10 ILL EB2D 30 LEAX f0,X EB2F 10 08 ILL EB31 10 10 ILL EB33 30 LEAX 0,X EB35 00 NEG 00 EB37 00 NEG 00 EB39 00 NEG 00 EB3B 00 NEG FF EB3D FF STU FFFF EB40 FF STU FFFF EB43 FF STU FF18 EB46 3C ILL EB47 42 ILL EB48 40 NEGA EB49 42 ILL EB4A 3C ILL EB4B 00 NEG 00 EB4D 00 NEG 7E EB4F 21 BRN EB61 EB51 7C INC 1012 EB54 0C INC 10 EB56 FC LDD 127C EB59 90 SUBA 7C EB5B 10 00 ILL EB5D 28 BVC EB87 EB5F FE LDU 28FE EB62 28 BVC EB8C EB64 00 NEG 00 EB66 00 NEG 10 EB68 20 BRA EBE9 EB6A 20 BRA EB7C EB6C 00 NEG 10 EB6E 10 10 ILL EB70 10 54 ILL EB72 38 ILL EB73 10 00 ILL EB75 00 NEG 00 EB77 08 ASL 04 EB79 FE LDU 0408 EB7C 00 NEG 00 EB7E 10 38 ILL EB80 54 LSRB EB81 10 10 ILL EB83 10 10 ILL EB85 00 NEG 00 EB87 00 NEG 00 EB89 20 BRA EBDB EB8B 20 BRA EB8D EB8D 00 NEG 7C EB8F 10 10 ILL EB91 7C INC 1010 EB94 00 NEG 00 EB96 00 NEG 10 EB98 00 NEG 7C EB9A 00 NEG 10 EB9C 00 NEG 04 EB9E BE LDX 54EC EBA1 54 LSRB EBA2 48 ASLA EBA3 C4 ANDB #42 EBA5 1E EXG A,A EBA7 44 LSRA EBA8 E2 SBCB fc,U EBAA 48 ASLA EBAB C4 ANDB #42 EBAD 04 LSR BE EBAF 54 LSRB EBB0 EC LDD f4,Y EBB2 68 ASL 4,Y EBB4 E2 SBCB 0,X EBB6 00 NEG 00 EBB8 00 NEG 00 EBBA 00 NEG 18 EBBC 30 LEAX 0,X EBBE 00 NEG 00 EBC0 00 NEG 00 EBC2 00 NEG 18 EBC4 0C INC 00 EBC6 00 NEG 00 EBC8 00 NEG 00 EBCA 00 NEG 24 EBCC 18 ILL EBCD 00 NEG 00 EBCF 00 NEG 00 EBD1 00 NEG 00 EBD3 00 NEG 66 EBD5 00 NEG 7F EBD7 90 SUBA 90 EBD9 9C CMPX 90 EBDB 7E JMP 0000 EBDE 6C INC Illegal ! EBE0 9E LDX 92 EBE2 6C INC 0,X EBE4 00 NEG 00 EBE6 2C BGE EC0A EBE8 22 BHI EC16 EBEA 24 BCC EC04 EBEC 00 NEG 3C EBEE 02 ILL EBEF 1C & CC #22 EBF1 1C & CC #20 EBF3 1E EXG D,D EBF5 00 NEG 42 EBF7 42 ILL EBF8 7E JMP 2418 EBFB 00 DCB 00,00,00,00,00 // SETP$ - Set palette EC00 7E JMP FCB1 // IO K7 EC03 7E JMP FD79 EC06 7E JMP FF45 EC09 7E JMP FF49 EC0C 7E JMP FD29 EC0F 7E JMP FF02 // KTSTH$ teste l'appui sur une touche EC12 34 PSHS A, EC14 B6 LDA E7C8 // bit0 de E7C8 Keytest EC17 44 LSRA EC18 25 BCS EC2E // retour touche pressée EC1A B6 LDA 605E // READCL EC1D B1 CMPA 6067 EC20 27 BEQ EC2E // les 2 index sont égaux, pas de touche EC22 B6 LDA 608B // si le buffer est plein EC25 88 EORA #10 // une fois sur deux repondre OK EC27 B7 STA 608B EC2A 48 ASLA EC2B 48 ASLA EC2C 48 ASLA EC2D 48 ASLA EC2E 35 PULS PC,A, EC30 34 PSHS U/S,DP,B,A, EC32 B6 LDA 6074 EC35 48 ASLA EC36 2A BPL EC40 EC38 86 LDA #1F EC3A B7 STA E7CE EC3D 7D TST 344E EC40 86 LDA #60 EC42 1F TFR A,DP EC44 CE LDU #027F EC47 96 LDA 5F EC49 2B BMI EC55 EC4B CE LDU #013F EC4E 85 BITA #60 EC50 27 BEQ EC55 EC52 CE LDU #009F EC55 9E LDX D8 EC57 2A BPL EC5B EC59 9E LDX 76 EC5B 11 93 CMPU D8 EC5E 2A BPL EC62 EC60 1F TFR U,X EC62 9F STX D8 EC64 DC LDD D6 EC66 2A BPL EC6A EC68 5F CLRB EC69 4F CLRA EC6A 10 83 CMPD #00C7 EC6E 23 BLS EC73 EC70 4F CLRA EC71 C6 LDB #C7 EC73 DD STD D6 EC75 1F TFR D,Y EC77 4F CLRA EC78 35 PULS PC,U/S,DP,B,A, EC7A 34 PSHS B,A, EC7C 1C & CC #FA EC7E 34 PSHS CC EC80 B6 LDA 6074 EC83 48 ASLA EC84 2A BPL EC9F EC86 B6 LDA E7CC EC89 C6 LDB #C8 EC8B 5A DECB EC8C 26 BNE EC8B EC8E B4 ANDA E7CC EC91 43 COMA EC92 84 ANDA #03 EC94 8B ADDA #02 EC96 84 ANDA #05 EC98 B7 STA 60D3 EC9B AA ORA ,S EC9D A7 STA ,S EC9F 35 PULS PC,B,A,CC ECA1 00 NEG 01 ECA3 05 ILL ECA4 00 NEG 07 ECA6 08 ASL 06 ECA8 00 NEG 03 ECAA 02 ILL ECAB 04 LSR 86 ECAD 08 ASL 95 ECAF E9 ADCB 7,Y ECB1 05 ILL ECB2 43 COMA ECB3 94 ANDA EA ECB5 97 STA EA ECB7 3B RTI ECB8 34 PSHS U/S, ECBA EE LDU 2,S // U=adr de retour ECBC 33 LEAU -3,U ECBE FF STU 6055 ECC1 35 PULS U/S, ECC3 32 LEAS 2,S ECC5 7E JMP FFA0 // swap la rom1 et retourne avant le JSR // vecteur VPUTCH par défaut ECC8 34 PSHS U/S,Y,X,DP,B,A,CC ECCA 1A ORCC #50 ECCC 86 LDA #60 ECCE 1F TFR A,DP ECD0 BD JSR F1FD ECD3 BD JSR EEA2 ECD6 0D TST 5F ECD8 2A BPL ECDD ECDA BD JSR F2B1 ECDD 8E LDX #F6CE ECE0 96 LDA 59 ECE2 AD JSR [A,X] ECE4 0F CLR 42 ECE6 0F CLR 43 ECE8 35 PULS PC,U/S,Y,X,DP,B,A,CC ECEA C1 CMPB #20 ECEC 24 BCC ECF9 ECEE C1 CMPB #07 ECF0 25 BCS ED1B ECF2 4F CLRA ECF3 58 ASLB ECF4 8E LDX #F68E ECF7 6E JMP [B,X] ECF9 BD JSR EEA2 ECFC 0D TST 5F ECFE 2A BPL ED03 ED00 BD JSR F2B1 ED03 0F CLR 75 ED05 D7 STB 5D ED07 0F CLR 43 ED09 0D TST 19 ED0B 10 2B LBMI ED07 ED0F 0D TST 70 ED11 2B BMI ED1C ED13 27 BEQ ED27 ED15 C1 CMPB #41 ED17 24 BCC ED27 ED19 0F CLR 70 ED1B 39 RTS ED1C 0F CLR 70 ED1E C1 CMPB #63 ED20 26 BNE ED1B ED22 CE LDU #EB45 ED25 20 BRA ED39 ED27 5D TSTB ED28 2B BMI ED30 ED2A DE LDU CF ED2C C0 SUBB #20 ED2E 20 BRA ED34 ED30 DE LDU 2D ED32 C0 SUBB #80 ED34 86 LDA #08 ED36 3D MUL ED37 33 LEAU D,U ED39 10 9E LDY 5A ED3C 96 LDA 5F ED3E 44 LSRA ED3F 25 BCS ED49 ED41 8E LDX #ED77 ED44 CC LDD #ED93 ED47 20 BRA ED4F ED49 8E LDX #EDC7 ED4C CC LDD #ED99 ED4F 34 PSHS X,B,A, ED51 D6 LDB 39 ED53 C4 ANDB #07 ED55 54 LSRB ED56 54 LSRB ED57 10 26 LBNE ED24 ED5B BD JSR EE59 ED5E 37 PULU A, ED60 AD JSR [,S] ED62 24 BCC ED66 ED64 AD JSR [,S] ED66 5A DECB ED67 26 BNE ED5E ED69 32 LEAS 4,S ED6B BD JSR EE73 ED6E 8D BSR ED93 ED70 30 LEAX ff,X ED72 26 BNE ED6E ED74 7E JMP EE54 ED77 0D TST 5F ED79 2A BPL ED91 ED7B A7 STA ,Y ED7D 34 PSHS A,CC ED7F BD JSR EE1B ED82 44 LSRA ED83 25 BCS ED88 ED85 E7 STB ,Y ED87 7D TST E721 ED8A BD JSR EE1B ED8D 35 PULS A,CC ED8F 20 BRA ED95 ED91 E7 STB 1,Y ED93 A7 STA ,Y ED95 31 LEAY FFD8,Y ED98 39 RTS ED99 8E LDX #EDD5 ED9C 34 PSHS B,A,CC ED9E 96 LDA 5C EDA0 D6 LDB 5C EDA2 84 ANDA #03 EDA4 48 ASLA EDA5 48 ASLA EDA6 C4 ANDB #18 EDA8 58 ASLB EDA9 3A ABX EDAA 30 LEAX A,X EDAC A6 LDA 1,S EDAE A4 ANDA 2,X EDB0 A8 EORA 3,X EDB2 A7 STA ,Y EDB4 7A DEC E7C3 EDB7 A6 LDA 1,S EDB9 A4 ANDA ,X EDBB A8 EORA 1,X EDBD A7 STA ,Y EDBF 7C INC E7C3 EDC2 31 LEAY FFD8,Y EDC5 35 PULS PC,B,A,CC EDC7 8D BSR ED99 EDC9 31 LEAY 29,Y EDCC 1E EXG B,A EDCE 8D BSR ED99 EDD0 31 LEAY ff,Y EDD2 1E EXG A,B EDD4 39 RTS // Table EDD5 00 NEG 00 EDD7 00 NEG 00 EDD9 00 NEG 00 EDDB FF STU FFFF EDDE FF STU 0000 EDE1 FF STU FFFF EDE4 FF STU 0000 EDE7 FF STU 0000 EDEA 00 NEG 00 EDEC FF STU FFFF EDEF FF STU 00FF EDF2 FF STU 00FF EDF5 FF STU 0000 EDF8 00 NEG FF EDFA 00 NEG FF EDFC FF STU 00FF EDFF 00 NEG 00 EE01 00 NEG FF EE03 FF STU FFFF EE06 00 NEG FF EE08 00 NEG FF EE0A 00 NEG 00 EE0C FF STU 00FF EE0F FF STU 0000 EE12 FF STU 00FF EE15 34 PSHS A, EE17 8D BSR EE1B EE19 35 PULS PC,A, EE1B B6 LDA E7C3 EE1E 88 EORA #01 EE20 B7 STA E7C3 EE23 39 RTS EE24 8D BSR EE59 EE26 37 PULU A, EE28 34 PSHS B,CC EE2A 97 STA 6C EE2C CC LDD #8000 EE2F 04 LSR 6C EE31 46 RORA EE32 56 RORB EE33 47 ASRA EE34 56 RORB EE35 24 BCC EE2F EE37 35 PULS CC EE39 AD JSR [03,S] EE3C 24 BCC EE41 EE3E AD JSR [03,S] EE41 35 PULS B, EE43 5A DECB EE44 26 BNE EE26 EE46 32 LEAS 4,S EE48 8D BSR EE73 EE4A BD JSR ED77 EE4D 30 LEAX ff,X EE4F 26 BNE EE4A EE51 7D TST 3262 EE54 0D TST 70 EE56 27 BEQ EE8B EE58 39 RTS EE59 34 PSHS CC EE5B C6 LDB #08 EE5D 0D TST 70 EE5F 27 BEQ EE71 EE61 0A DEC 70 EE63 26 BNE EE71 EE65 5A DECB EE66 96 LDA 5D EE68 81 CMPA #60 EE6A 2A BPL EE70 EE6C 81 CMPA #55 EE6E 26 BNE EE71 EE70 5A DECB EE71 35 PULS PC,CC EE73 8E LDX #0008 EE76 24 BCC EE7A EE78 30 LEAX 8,X EE7A 86 LDA #40 EE7C 94 ANDA 19 EE7E 26 BNE EE52 EE80 D6 LDB 3B EE82 BD JSR F49D EE85 10 9E LDY 5A EE88 1F TFR B,A EE8A 39 RTS EE8B 96 LDA 39 EE8D 85 BITA #04 EE8F 27 BEQ EE93 EE91 8D BSR EE9C EE93 7E JMP EF7C EE96 96 LDA 70 EE98 81 CMPA #01 EE9A 27 BEQ EEA1 EE9C 0C INC 20 EE9E BD JSR F2B1 EEA1 39 RTS EEA2 B6 LDA 605F EEA5 2B BMI EEBA EEA7 27 BEQ EEB2 EEA9 B6 LDA 605F EEAC 84 ANDA #04 EEAE 10 26 LBNE EEA6 EEB2 B6 LDA E7C3 EEB5 8A ORA #01 EEB7 B7 STA E7C3 EEBA 39 RTS EEBB 10 DF STS 6E EEBE 10 DE LDS 6C EEC1 EC LDD 5,S EEC3 DE LDU 60 EEC5 32 LEAS 28,U EEC8 33 LEAU 7,U EECA 0D TST 78 EECC 26 BNE EED0 EECE 32 LEAS D,S EED0 35 PULS Y,X,DP,B,A, EED2 36 PSHU Y,X,DP,B,A, EED4 33 LEAU e,U EED6 11 BC CMPS 6062 EEDA 25 BCS EED0 EEDC 7E JMP F130 EEDF 10 DF STS 6E EEE2 1F TFR D,X EEE4 1F TFR D,Y EEE6 10 DE LDS 6C EEE9 EC LDD 3,S EEEB DE LDU 62 EEED 33 LEAU FFE0,U EEF0 0D TST 78 EEF2 26 BNE EEF6 EEF4 33 LEAU D,U EEF6 1F TFR X,D EEF8 1F TFR D,S EEFA 36 PSHU U/S,Y,X,B,A, EEFC 33 LEAU 10,U EEFF 11 93 CMPU 62 EF02 23 BLS EEFA EF04 7E JMP F134 EF07 10 9E LDY 5A EF0A 31 LEAY FFE8,Y EF0E 86 LDA #94 EF10 97 STA 6D EF12 8E LDX #F6D8 EF15 8D BSR EF26 EF17 8D BSR EF26 EF19 C4 ANDB #05 EF1B 5C INCB EF1C 54 LSRB EF1D 8D BSR EF26 EF1F 1C & CC #FE EF21 BD JSR ED6B EF24 20 BRA EF7E EF26 D7 STB 6C EF28 C4 ANDB #03 EF2A A6 LDA B,X EF2C A7 STA ,Y EF2E 31 LEAY 28,Y EF31 04 LSR 6D EF33 24 BCC EF2C EF35 D6 LDB 6C EF37 54 LSRB EF38 54 LSRB EF39 39 RTS EF3A D6 LDB 39 EF3C D4 ANDB 3A EF3E D7 STB 39 EF40 D6 LDB 3B EF42 0D TST 3A EF44 2B BMI EF4E EF46 0D TST 5F EF48 2B BMI EF4E EF4A C4 ANDB #F8 EF4C D7 STB 3B EF4E 39 RTS EF4F 0D TST 3C EF51 2A BPL EF69 EF53 96 LDA 19 EF55 84 ANDA #7F EF57 97 STA 19 EF59 8D BSR EF3A EF5B 96 LDA 3A EF5D 84 ANDA #40 EF5F 26 BNE EF69 EF61 CA ORB #78 EF63 0D TST 5F EF65 2B BMI EF69 EF67 D7 STB 3B EF69 39 RTS EF6A BD JSR F1FD EF6D 0F CLR 20 EF6F 0C INC 20 EF71 0D TST 3C EF73 2A BPL EF77 EF75 8D BSR EF4F EF77 96 LDA 1D EF79 7E JMP F00C EF7C 0C INC 20 EF7E 0D TST 5F EF80 2B BMI EF8E EF82 96 LDA 20 EF84 81 CMPA #29 EF86 27 BEQ EFA4 EF88 81 CMPA #2A EF8A 27 BEQ EFA2 EF8C 20 BRA EF98 EF8E 96 LDA 20 EF90 81 CMPA #51 EF92 27 BEQ EFA4 EF94 81 CMPA #52 EF96 27 BEQ EFA2 EF98 0D TST 43 EF9A 27 BEQ EF9F EF9C BD JSR F19D EF9F 8D BSR F00E EFA1 39 RTS EFA2 8D BSR F00E EFA4 0D TST 43 EFA6 27 BEQ EFAF EFA8 31 LEAY 0119,X EFAC BD JSR F1AC EFAF CC LDD #0102 EFB2 97 STA 20 EFB4 0D TST 42 EFB6 2B BMI EFC2 EFB8 9E LDX 1A EFBA D5 BITB 39 EFBC 27 BEQ EFC0 EFBE 6F CLR ff,X EFC0 6F CLR ,X EFC2 D4 ANDB 39 EFC4 58 ASLB EFC5 58 ASLB EFC6 8E LDX #F68C EFC9 3A ABX EFCA 96 LDA 1B EFCC AB ADDA ,X EFCE 97 STA 1B EFD0 0D TST 3C EFD2 2A BPL EFD7 EFD4 BD JSR EF3A EFD7 91 CMPA 1F EFD9 2E BGT EFDD EFDB 20 BRA F00E EFDD 0D TST 3C EFDF 10 2B LBMI EF75 EFE3 9F STX 6C EFE5 E6 LDB ,X EFE7 10 9E LDY 1C EFEA 10 9C CMPY 1E EFED 24 BCC EFF5 EFEF A6 LDA 1,Y EFF1 A7 STA ,Y+ EFF3 20 BRA EFEA EFF5 86 LDA #FF EFF7 A7 STA ,Y EFF9 5A DECB EFFA 26 BNE EFE7 EFFC A6 LDA ,X EFFE 48 ASLA EFFF 48 ASLA F000 48 ASLA F001 8E LDX #EEBB F004 CE LDU #EEDF F007 BD JSR F0DD F00A 96 LDA 1F F00C 97 STA 1B F00E 7E JMP F2B1 F011 BD JSR F09E F014 86 LDA #FF F016 97 STA 42 F018 7E JMP EF7C F01B DE LDU 3B F01D D6 LDB 20 F01F 96 LDA 1B F021 9E LDX 39 F023 34 PSHS U/S,X,B,A, F025 96 LDA 3C F027 8A ORA #80 F029 97 STA 3C F02B C6 LDB #20 F02D BD JSR ECF9 F030 D6 LDB 20 F032 C1 CMPB #01 F034 26 BNE F02B F036 35 PULS U/S,X,B,A, F038 DF STU 3B F03A D7 STB 20 F03C 97 STA 1B F03E 9F STX 39 F040 BD JSR F2B1 F043 86 LDA #FF F045 A7 STA [601A] F049 39 RTS F04A 0F CLR 20 F04C 0C INC 20 F04E BD JSR F2B1 F051 20 BRA F043 F053 BD JSR EF4F F056 BD JSR EEB2 F059 96 LDA 5F F05B 81 CMPA #04 F05D 26 BNE F062 F05F 7A DEC E7C3 F062 0F CLR 75 F064 DC LDD 76 F066 1F TFR D,X F068 1F TFR D,Y F06A DE LDU 62 F06C 36 PSHU Y,X,B,A, F06E 36 PSHU Y,X, F070 11 93 CMPU 60 F073 2E BGT F06C F075 C6 LDB #0 F077 96 LDA 5F F079 85 BITA #E1 F07B 26 BNE F083 F07D 86 LDA #40 F07F 94 ANDA 19 F081 26 BNE F091 F083 F4 ANDB E7C3 F086 27 BEQ F091 F088 96 LDA 3B F08A D6 LDB 3B F08C 7A DEC E7C3 F08F 20 BRA F066 F091 9E LDX 1C F093 86 LDA #FF F095 A7 STA ,X+ F097 9C CMPX 1E F099 23 BLS F095 F09B 7E JMP EF6D F09E 9E LDX 5A F0A0 C6 LDB #08 F0A2 39 RTS F0A3 96 LDA 1B F0A5 91 CMPA 1D F0A7 2F BLE F0B0 F0A9 4A DECA F0AA 7D TST 961F F0AD 7E JMP F00C F0B0 0D TST 3C F0B2 2B BMI F0AB F0B4 CC LDD #0802 F0B7 D4 ANDB 39 F0B9 27 BEQ F0BC F0BB 48 ASLA F0BC 34 PSHS A, F0BE 10 9E LDY 1E F0C1 10 9C CMPY 1C F0C4 23 BLS F0CC F0C6 E6 LDB ,-Y F0C8 E7 STB 1,Y F0CA 20 BRA F0C1 F0CC C6 LDB #FF F0CE E7 STB ,Y F0D0 44 LSRA F0D1 85 BITA #08 F0D3 26 BNE F0BE F0D5 35 PULS A, F0D7 8E LDX #F10D F0DA CE LDU #F138 F0DD 34 PSHS U/S,X,A, F0DF 6A DEC ,S F0E1 2B BMI F10B F0E3 BD JSR EEA9 F0E6 AD JSR [01,S] F0E9 DC LDD 76 F0EB AD JSR [03,S] F0EE 96 LDA 5F F0F0 85 BITA #81 F0F2 26 BNE F0FA F0F4 86 LDA #40 F0F6 94 ANDA 19 F0F8 26 BNE F107 F0FA 7A DEC E7C3 F0FD AD JSR [01,S] F100 96 LDA 3B F102 D6 LDB 3B F104 AD JSR [03,S] F107 0D TST 78 F109 26 BNE F0DF F10B 35 PULS PC,U/S,X,A, F10D 10 DF STS 6E F110 DC LDD 60 F112 C3 ADDD #0028 F115 DD STD 6C F117 DE LDU 62 F119 32 LEAS FFD1,U F11C 0D TST 78 F11E 26 BNE F124 F120 32 LEAS FFE8,S F124 35 PULS Y,X,DP,B,A, F126 36 PSHU Y,X,DP,B,A, F128 32 LEAS f2,S F12A 11 B3 CMPU 606C F12E 22 BHI F124 F130 86 LDA #60 F132 1F TFR A,DP F134 10 DE LDS 6E F137 39 RTS F138 1F TFR D,X F13A 1F TFR D,Y F13C DE LDU 60 F13E 33 LEAU 28,U F141 0D TST 78 F143 26 BNE F149 F145 33 LEAU 0118,U F149 36 PSHU Y,X,B, F14B 11 93 CMPU 60 F14E 22 BHI F149 F150 39 RTS F151 0C INC 1B F153 96 LDA 1B F155 91 CMPA 1F F157 10 23 LBLS F1B1 F15B 5F CLRB F15C 7E JMP EFC2 F15F BD JSR F09E F162 96 LDA 20 F164 81 CMPA #01 F166 2E BGT F183 F168 0D TST 43 F16A 27 BEQ F172 F16C 31 LEAY FFE7,X F170 8D BSR F1AC F172 0D TST 5F F174 2A BPL F179 F176 C6 LDB #50 F178 7D TST C628 F17B D7 STB 20 F17D BD JSR F2B1 F180 7E JMP F0A3 F183 0D TST 43 F185 27 BEQ F189 F187 8D BSR F18F F189 0A DEC 20 F18B BD JSR F2B1 F18E 39 RTS F18F 0D TST 5F F191 2A BPL F199 F193 B6 LDA E7C3 F196 44 LSRA F197 24 BCC F1AA F199 31 LEAY ff,X F19B 20 BRA F1AC F19D 0D TST 5F F19F 2A BPL F1A7 F1A1 B6 LDA E7C3 F1A4 44 LSRA F1A5 25 BCS F1AA F1A7 31 LEAY 1,X F1A9 7D TST 3184 F1AC A6 LDA ,X F1AE 0D TST 5F F1B0 2A BPL F1B5 F1B2 BD JSR EE15 F1B5 A7 STA ,Y F1B7 30 LEAX FFD8,X F1BA 31 LEAY FFD8,Y F1BD 0D TST 5F F1BF 2A BPL F1C4 F1C1 BD JSR EE15 F1C4 5A DECB F1C5 26 BNE F1AC F1C7 39 RTS F1C8 96 LDA 39 F1CA 84 ANDA #F9 F1CC 97 STA 39 F1CE 86 LDA #80 F1D0 9A ORA 19 F1D2 97 STA 19 F1D4 39 RTS F1D5 86 LDA #7F F1D7 7D TST 86FB F1DA 94 ANDA 19 F1DC 97 STA 19 F1DE 39 RTS F1DF 96 LDA 19 F1E1 8A ORA #04 F1E3 97 STA 19 F1E5 CC LDD #30D3 F1E8 FD STD E7C6 F1EB 86 LDA #46 F1ED B7 STA E7C5 F1F0 A6 LDA 2,S F1F2 84 ANDA #EF F1F4 A7 STA 2,S F1F6 63 COM [605A] F1FA 03 COM 75 F1FC 39 RTS F1FD 96 LDA 19 F1FF 85 BITA #04 F201 27 BEQ F213 F203 0D TST 75 F205 27 BEQ F213 F207 BD JSR EEA9 F20A BD JSR FB15 F20D 63 COM [605A] F211 03 COM 75 F213 39 RTS // routine qui fait du bruit (enfin il me semble) F214 FC LDD E7CE F217 34 PSHS B,A, F219 C4 ANDB #FA F21B FD STD E7CE F21E B6 LDA E7CD F221 34 PSHS A, F223 8A ORA #3F F225 B7 STA E7CD F228 B6 LDA E7CF F22B 8A ORA #04 F22D B7 STA E7CF F230 B6 LDA E7C1 F233 34 PSHS A, F235 84 ANDA #F7 F237 B7 STA E7C1 F23A C6 LDB #12 F23C 0D TST 73 F23E 26 BNE F248 F240 B6 LDA E7CD F243 88 EORA #3F F245 B7 STA E7CD F248 8E LDX #0080 F24B 30 LEAX -1,X F24D 26 BNE F24B F24F 5A DECB F250 26 BNE F23C F252 35 PULS A, F254 B7 STA E7C1 F257 B6 LDA E7CF F25A 84 ANDA #FB F25C B7 STA E7CF F25F 35 PULS A, F261 B7 STA E7CD F264 FC LDD E7CE F267 35 PULS B,A, F269 FD STD E7CE F26C FC LDD E7CC F26F 39 RTS F270 4C INCA F271 4C INCA F272 4C INCA F273 4C INCA F274 48 ASLA F275 97 STA 59 F277 39 RTS F278 C4 ANDB #3F F27A 27 BEQ F287 F27C D7 STB 6B F27E D6 LDB 5D F280 BD JSR ECF9 F283 0A DEC 6B F285 26 BNE F27E F287 0F CLR 59 F289 39 RTS F28A 0D TST 6A F28C 26 BNE F291 F28E D7 STB 6A F290 39 RTS F291 C1 CMPB #40 F293 25 BCS F2DE F295 0D TST 5F F297 2A BPL F29E F299 C8 EORB #C0 F29B C4 ANDB #7F F29D 7D TST C43F F2A0 D7 STB 20 F2A2 D6 LDB 6A F2A4 C4 ANDB #3F F2A6 D7 STB 1B F2A8 8D BSR F2B1 F2AA 0F CLR 6A F2AC 0F CLR 59 F2AE 7E JMP EF4F F2B1 34 PSHS B, F2B3 96 LDA 1B F2B5 C6 LDB #A0 F2B7 48 ASLA F2B8 3D MUL F2B9 C3 ADDD #4117 F2BC 0D TST 5F F2BE 2A BPL F2DA F2C0 DD STD 5A F2C2 BD JSR F49D F2C5 0F CLR 86 F2C7 D6 LDB 20 F2C9 57 ASRB F2CA 24 BCC F2D2 F2CC 7C INC E7C3 F2CF 5C INCB F2D0 03 COM 86 F2D2 4F CLRA F2D3 D3 ADDD 5A F2D5 DD STD 5A F2D7 35 PULS B, F2D9 39 RTS F2DA DB ADDB 20 F2DC 20 BRA F2D5 F2DE C1 CMPB #30 F2E0 2D BLT F2E8 F2E2 8D BSR F31D F2E4 8D BSR F2B1 F2E6 20 BRA F2AA F2E8 96 LDA 1B F2EA DE LDU 20 F2EC 9E LDX 5A F2EE 34 PSHS U/S,X,A, F2F0 C1 CMPB #20 F2F2 2D BLT F303 F2F4 8D BSR F31D F2F6 D7 STB 1D F2F8 8D BSR F2B1 F2FA DC LDD 5A F2FC 83 SUBD #0118 F2FF DD STD 60 F301 20 BRA F310 F303 8D BSR F31D F305 D7 STB 1F F307 8D BSR F2B1 F309 DC LDD 5A F30B C3 ADDD #0028 F30E DD STD 62 F310 35 PULS U/S,X,A, F312 97 STA 1B F314 DF STU 20 F316 9F STX 5A F318 0F CLR 6A F31A 0F CLR 59 F31C 39 RTS F31D 0F CLR 20 F31F 0C INC 20 F321 C4 ANDB #0F F323 D7 STB 1B F325 96 LDA 6A F327 84 ANDA #0F F329 C6 LDB #0A F32B 3D MUL F32C DB ADDB 1B F32E D7 STB 1B F330 39 RTS F331 C1 CMPB #40 F333 24 BCC F350 F335 C1 CMPB #23 F337 27 BEQ F34F F339 C1 CMPB #20 F33B 27 BEQ F349 F33D C1 CMPB #21 F33F 27 BEQ F34F F341 0F CLR 59 F343 86 LDA #7F F345 94 ANDA 39 F347 20 BRA F34D F349 86 LDA #80 F34B 9A ORA 39 F34D 97 STA 39 F34F 39 RTS F350 0D TST 39 F352 2A BPL F359 F354 CE LDU #F3F5 F357 20 BRA F35C F359 CE LDU #F3AD F35C E1 CMPB ,U F35E 33 LEAU 3,U F360 25 BCS F35C F362 AD JSR [,--U] F364 20 BRA F341 F366 1F TFR B,A F368 0F CLR 59 F36A 81 CMPA #4B F36C 27 BEQ F392 F36E 84 ANDA #F0 F370 81 CMPA #40 F372 26 BNE F378 F374 86 LDA #02 F376 97 STA 70 F378 CE LDU #EB45 F37B 86 LDA #15 F37D 10 8E LDY #F3AD F381 E1 CMPB ,-Y F383 27 BEQ F38B F385 4A DECA F386 2A BPL F381 F388 0F CLR 70 F38A 39 RTS F38B 1F TFR A,B F38D 0F CLR 75 F38F 7E JMP ED34 F392 86 LDA #80 F394 97 STA 70 F396 39 RTS F397 4B ILL F398 23 BLS F3BE F39A 26 BNE F3C8 F39C 2D BLT F3CC F39E 2F BLE F3D0 F3A0 31 LEAY f8,Y F3A2 3C ILL F3A3 3D MUL F3A4 3E ILL F3A5 41 ILL F3A6 42 ILL F3A7 43 COMA F3A8 48 ASLA F3A9 6A DEC fa,S F3AB 7B ILL F3AC 27 BEQ F33A F3AE F3 ADDD 4188 F3B1 F6 LDB 4D80 F3B4 F5 BITB 8F78 F3B7 F5 BITB 0770 F3BA F5 BITB 646E F3BD F5 BITB AF6D F3C0 F4 ANDB 196C F3C3 F4 ANDB 206B F3C6 F5 BITB A56A F3C9 F5 BITB AA69 F3CC F5 BITB 9768 F3CF F5 BITB A060 F3D2 F5 BITB 8D5F F3D5 F4 ANDB 435E F3D8 F6 LDB 455C F3DB F4 ANDB 685B F3DE F5 BITB DA5A F3E1 F5 BITB B459 F3E4 F6 LDB 3C58 F3E7 F4 ANDB C650 F3EA F5 BITB 0A4C F3ED F5 BITB 2748 F3F0 F5 BITB E940 F3F3 F5 BITB 6780 F3F6 F3 ADDD 4178 F3F9 F4 ANDB DD70 F3FC F5 BITB 3560 F3FF F3 ADDD 415F F402 F4 ANDB 2B5E F405 F3 ADDD 415C F408 F4 ANDB 5659 F40B F3 ADDD 4158 F40E F4 ANDB AF50 F411 F4 ANDB E048 F414 F3 ADDD 4140 F417 F5 BITB 38B6 F41A E7 STB FFC3,U F41E 20 BRA F427 F420 B6 LDA E7C9 F423 8A ORA #04 F425 84 ANDA #C7 F427 B7 STA E7C9 F42A 39 RTS F42B 0D TST 5F F42D 26 BNE F455 F42F 8D BSR F49D F431 9E LDX 60 F433 D6 LDB 5C F435 27 BEQ F455 F437 A6 LDA ,X+ F439 81 CMPA #C0 F43B 26 BNE F43F F43D E7 STB ff,X F43F 9C CMPX 62 F441 26 BNE F437 F443 0D TST 5F F445 26 BNE F455 F447 96 LDA 5C F449 27 BEQ F455 F44B D6 LDB 3B F44D C1 CMPB #C0 F44F 26 BNE F455 F451 97 STA 3B F453 0F CLR 5C F455 39 RTS F456 0D TST 5F F458 26 BNE F472 F45A 9E LDX 60 F45C 8D BSR F49D F45E A6 LDA ,X F460 8D BSR F47D F462 A7 STA ,X+ F464 9C CMPX 62 F466 26 BNE F45E F468 96 LDA 5F F46A 26 BNE F473 F46C 96 LDA 3B F46E 8D BSR F47D F470 97 STA 3B F472 39 RTS F473 44 LSRA F474 24 BCC F472 F476 96 LDA 5C F478 8D BSR F47D F47A 97 STA 5C F47C 39 RTS F47D 1F TFR A,B F47F 34 PSHS B, F481 84 ANDA #07 F483 48 ASLA F484 48 ASLA F485 48 ASLA F486 C4 ANDB #38 F488 54 LSRB F489 54 LSRB F48A 54 LSRB F48B 34 PSHS B, F48D AB ADDA ,S+ F48F 35 PULS B, F491 C4 ANDB #C0 F493 58 ASLB F494 24 BCC F498 F496 CA ORB #40 F498 34 PSHS B, F49A AB ADDA ,S+ F49C 39 RTS F49D 96 LDA 5F F49F 84 ANDA #04 F4A1 27 BEQ F4A6 F4A3 7E JMP EEB2 F4A6 B6 LDA E7C3 F4A9 84 ANDA #FE F4AB B7 STA E7C3 F4AE 39 RTS F4AF 0D TST 5F F4B1 26 BNE F4DC F4B3 8D BSR F49D F4B5 9E LDX 60 F4B7 EC LDD ,X F4B9 84 ANDA #80 F4BB C4 ANDB #80 F4BD C3 ADDD #4040 F4C0 ED STD ,X++ F4C2 9C CMPX 62 F4C4 25 BCS F4B7 F4C6 0D TST 5F F4C8 26 BNE F4DC F4CA 96 LDA 3B F4CC 84 ANDA #7F F4CE 81 CMPA #40 F4D0 27 BEQ F4DC F4D2 96 LDA 3B F4D4 97 STA 5C F4D6 84 ANDA #C0 F4D8 8A ORA #40 F4DA 97 STA 3B F4DC 39 RTS F4DD C4 ANDB #7F F4DF 7D TST CA80 F4E2 0D TST 5F F4E4 26 BNE F4DC F4E6 8D BSR F49D F4E8 C4 ANDB #87 F4EA D7 STB 6C F4EC D7 STB 6D F4EE 9E LDX 60 F4F0 EC LDD ,X F4F2 84 ANDA #78 F4F4 C4 ANDB #78 F4F6 D3 ADDD 6C F4F8 ED STD ,X++ F4FA 9C CMPX 62 F4FC 26 BNE F4F0 F4FE 86 LDA #80 F500 9A ORA 3A F502 97 STA 3A F504 D6 LDB 6C F506 7D TST C47F F509 7D TST CA80 F50C 96 LDA 5F F50E 26 BNE F51A F510 85 BITA #FE F512 C4 ANDB #87 F514 96 LDA 3B F516 84 ANDA #78 F518 20 BRA F57F F51A 44 LSRA F51B 10 24 LBCC F585 F51F C4 ANDB #87 F521 96 LDA 5C F523 84 ANDA #78 F525 20 BRA F586 F527 C4 ANDB #03 F529 58 ASLB F52A 96 LDA 39 F52C 84 ANDA #F9 F52E 34 PSHS B, F530 AB ADDA ,S+ F532 97 STA 39 F534 39 RTS F535 C4 ANDB #F7 F537 7D TST CA08 F53A 0D TST 5F F53C 26 BNE F585 F53E BD JSR F49D F541 58 ASLB F542 58 ASLB F543 58 ASLB F544 C4 ANDB #78 F546 D7 STB 6C F548 D7 STB 6D F54A 9E LDX 60 F54C EC LDD ,X F54E 84 ANDA #87 F550 C4 ANDB #87 F552 D3 ADDD 6C F554 ED STD ,X++ F556 9C CMPX 62 F558 26 BNE F54C F55A 96 LDA 3A F55C 8A ORA #40 F55E 97 STA 3A F560 D6 LDB 6C F562 20 BRA F57B F564 C4 ANDB #F7 F566 7D TST CA08 F569 58 ASLB F56A 58 ASLB F56B 58 ASLB F56C C4 ANDB #78 F56E 96 LDA 5F F570 27 BEQ F57B F572 44 LSRA F573 24 BCC F585 F575 96 LDA 5C F577 84 ANDA #87 F579 20 BRA F586 F57B 96 LDA 3B F57D 84 ANDA #87 F57F 34 PSHS B, F581 AB ADDA ,S+ F583 97 STA 3B F585 39 RTS F586 34 PSHS B, F588 AB ADDA ,S+ F58A 97 STA 5C F58C 39 RTS F58D CA ORB #08 F58F C4 ANDB #0F F591 C8 EORB #08 F593 F7 STB E7DD F596 39 RTS F597 0D TST 5F F599 26 BNE F596 F59B 86 LDA #BF F59D 7E JMP F1DA F5A0 86 LDA #40 F5A2 7E JMP F1D0 F5A5 86 LDA #80 F5A7 97 STA 3C F5A9 39 RTS F5AA 0F CLR 3C F5AC 0F CLR 78 F5AE 39 RTS F5AF 8D BSR F5AA F5B1 03 COM 78 F5B3 39 RTS F5B4 96 LDA 5F F5B6 10 27 LBEQ F56A F5BA 2A BPL F5BC F5BC 0F CLR 16 F5BE 0F CLR 5F F5C0 96 LDA 19 F5C2 84 ANDA #AF F5C4 97 STA 19 F5C6 D6 LDB 5C F5C8 D7 STB 3B F5CA BD JSR FCD6 F5CD 7F CLR E7DC F5D0 BD JSR F62C F5D3 96 LDA 19 F5D5 84 ANDA #AF F5D7 97 STA 19 F5D9 39 RTS F5DA 0D TST 5F F5DC 10 2B LBMI F56A F5E0 BD JSR F660 F5E3 CC LDD #2A80 F5E6 16 LBRA F622 F5E9 BD JSR F660 F5EC 96 LDA 19 F5EE 84 ANDA #AF F5F0 97 STA 19 F5F2 0F CLR 16 F5F4 96 LDA 5F F5F6 34 PSHS A, F5F8 1F TFR B,A F5FA 44 LSRA F5FB 25 BCS F602 F5FD 86 LDA #04 F5FF 0C INC 16 F601 7D TST 8602 F604 97 STA 5F F606 C0 SUBB #04 F608 1F TFR B,A F60A 84 ANDA #02 F60C 27 BEQ F610 F60E C4 ANDB #FE F610 C4 ANDB #07 F612 CA ORB #20 F614 BD JSR FCD6 F617 F7 STB E7DC F61A 35 PULS A, F61C 84 ANDA #0E F61E 26 BNE F635 F620 20 BRA F62A F622 BD JSR FCD6 F625 B7 STA E7DC F628 D7 STB 5F F62A 0F CLR 3B F62C BD JSR EEB2 F62F BD JSR F67B F632 BD JSR F053 F635 96 LDA 19 F637 8A ORA #50 F639 97 STA 19 F63B 39 RTS F63C BD JSR F660 F63F CC LDD #2101 F642 7E JMP F622 F645 8D BSR F660 F647 CC LDD #7B40 F64A 7E JMP F622 F64D C4 ANDB #03 F64F D7 STB 16 F651 96 LDA 5F F653 85 BITA #20 F655 26 BNE F66A F657 BD JSR F660 F65A CC LDD #3F20 F65D 7E JMP F622 F660 0D TST 5F F662 2B BMI F66A F664 26 BNE F66A F666 96 LDA 3B F668 97 STA 5C F66A 39 RTS // Repos fenetre plein ecran F66B 34 PSHS DP,B,A, F66D 86 LDA #60 F66F 1F TFR A,DP F671 BD JSR F1D8 F674 8D BSR F67B F676 BD JSR F5AA F679 35 PULS PC,DP,B,A, F67B CC LDD #4000 F67E DD STD 60 F680 CC LDD #5F40 F683 DD STD 62 F685 0F CLR 1D F687 86 LDA #18 F689 97 STA 1F F68B 39 RTS F68C 01 ILL F68D 01 ILL F68E 19 ILL F68F FE LDU E801 F692 18 ILL F693 00 NEG 02 F695 02 ILL F696 59 ROLB F697 FD STD A802 F69A 58 ASLB F69B 01 ILL F69C F2 SBCB 14F1 F69F 5F CLRB F6A0 F0 SUBB 11F1 F6A3 51 ILL F6A4 F0 SUBB A3F0 F6A7 53 COMB F6A8 F0 SUBB 4AF1 F6AB C8 EORB #F1 F6AD D5 BITB F0 F6AF 49 ROLA F6B0 F1 CMPB DFF2 F6B3 71 ILL F6B4 F0 SUBB 49F1 F6B7 D8 EORB F0 F6B9 49 ROLA F6BA F2 SBCB 70F0 F6BD 49 ROLA F6BE F0 SUBB 1BF0 F6C1 49 ROLA F6C2 F0 SUBB 49F2 F6C5 73 COM F049 F6C8 F0 SUBB 49EF F6CB 6A DEC Illegal ! F6CD 72 ILL F6CE EC LDD Illegal ! F6D0 F3 ADDD 31F2 F6D3 8A ORA #F2 F6D5 78 ASL F366 F6D8 00 NEG F0 F6DA 0F CLR FF // vecteur VPLOT$ par défaut F6DC 7D TST 6041 F6DF 26 BNE F6FA F6E1 34 PSHS U/S,Y,X,DP,B,A, F6E3 8D BSR F6F0 F6E5 BD JSR F7CC F6E8 BD JSR F796 F6EB BD JSR F864 F6EE 35 PULS PC,U/S,Y,X,DP,B,A, F6F0 86 LDA #60 F6F2 1F TFR A,DP F6F4 9F STX 3D F6F6 10 9F STY 3F F6F9 39 RTS F6FA 34 PSHS DP,B,A, F6FC 8D BSR F6F0 F6FE 96 LDA 3C F700 34 PSHS A, F702 8A ORA #80 F704 97 STA 3C F706 C6 LDB #1F F708 BD JSR ECC8 F70B 1F TFR Y,D F70D CB ADDB #40 F70F BD JSR ECC8 F712 1F TFR X,D F714 CB ADDB #40 F716 BD JSR ECC8 F719 D6 LDB 41 F71B BD JSR ECC8 F71E 35 PULS A, F720 97 STA 3C F722 35 PULS PC,DP,B,A, F724 34 PSHS U/S,Y,X,DP,A, F726 86 LDA #60 F728 1F TFR A,DP F72A BD JSR F7CC F72D 96 LDA 5F F72F 27 BEQ F740 F731 E6 LDB 3,S F733 85 BITA #41 F735 26 BNE F769 F737 8D BSR F79E F739 E4 ANDB ,X F73B 27 BEQ F75D F73D 5F CLRB F73E 20 BRA F767 F740 BD JSR FA49 F743 E6 LDB 3,S F745 8D BSR F7A2 F747 1F TFR B,A F749 E6 LDB ,X F74B 7C INC E7C3 F74E A4 ANDA ,X F750 26 BNE F760 F752 C4 ANDB #07 F754 7A DEC E7C3 F757 6D TST ,X F759 2B BMI F75D F75B CB ADDB #08 F75D 53 COMB F75E 20 BRA F767 F760 54 LSRB F761 54 LSRB F762 54 LSRB F763 C4 ANDB #0F F765 C8 EORB #08 F767 35 PULS PC,U/S,Y,X,DP,A, F769 44 LSRA F76A 25 BCS F779 F76C 54 LSRB F76D E6 LDB ,X F76F 25 BCS F775 F771 54 LSRB F772 54 LSRB F773 54 LSRB F774 54 LSRB F775 C4 ANDB #0F F777 20 BRA F767 F779 BD JSR F4A6 F77C BD JSR F7A2 F77F 34 PSHS B, F781 4F CLRA F782 E4 ANDB ,X F784 27 BEQ F788 F786 4C INCA F787 48 ASLA F788 35 PULS B, F78A 7C INC E7C3 F78D E4 ANDB ,X F78F 27 BEQ F792 F791 4C INCA F792 1F TFR A,B F794 20 BRA F767 F796 96 LDA 5F F798 85 BITA #40 F79A 26 BNE F7BC F79C D6 LDB 3E F79E 85 BITA #20 F7A0 26 BNE F7AA F7A2 CE LDU #F8BE F7A5 C4 ANDB #07 F7A7 E6 LDB B,U F7A9 39 RTS F7AA CE LDU #F8BE F7AD C4 ANDB #03 F7AF E6 LDB B,U F7B1 96 LDA 16 F7B3 85 BITA #01 F7B5 27 BEQ F7BB F7B7 54 LSRB F7B8 54 LSRB F7B9 54 LSRB F7BA 54 LSRB F7BB 39 RTS F7BC EC LDD 5,S F7BE 54 LSRB F7BF D6 LDB 38 F7C1 25 BCS F7C9 F7C3 58 ASLB F7C4 58 ASLB F7C5 58 ASLB F7C6 58 ASLB F7C7 4F CLRA F7C8 39 RTS F7C9 C4 ANDB #0F F7CB 39 RTS F7CC 96 LDA 5F F7CE 85 BITA #60 F7D0 26 BNE F7F9 F7D2 1F TFR Y,D F7D4 86 LDA #28 F7D6 3D MUL F7D7 1E EXG D,X F7D9 44 LSRA F7DA 56 RORB F7DB 44 LSRA F7DC 56 RORB F7DD 54 LSRB F7DE 0D TST 5F F7E0 2A BPL F7F5 F7E2 54 LSRB F7E3 30 LEAX D,X F7E5 BD JSR EEB2 F7E8 24 BCC F7ED F7EA 7A DEC E7C3 F7ED 1F TFR X,D F7EF C3 ADDD #4000 F7F2 1F TFR D,X F7F4 39 RTS F7F5 30 LEAX D,X F7F7 20 BRA F7ED F7F9 1F TFR Y,D F7FB 86 LDA #28 F7FD 3D MUL F7FE 1E EXG D,X F800 34 PSHS B, F802 54 LSRB F803 54 LSRB F804 30 LEAX D,X F806 BD JSR EEB2 F809 96 LDA 5F F80B 85 BITA #20 F80D 27 BEQ F81D F80F 96 LDA 16 F811 85 BITA #02 F813 27 BEQ F818 F815 7A DEC E7C3 F818 35 PULS B, F81A 7E JMP F7ED F81D 86 LDA #04 F81F 3D MUL F820 E0 SUBB ,S+ F822 53 COMB F823 5C INCB F824 54 LSRB F825 54 LSRB F826 20 BRA F7E8 F828 BD JSR FA39 F82B 96 LDA 38 F82D 2B BMI F842 F82F EA ORB ,X F831 E7 STB ,X F833 D6 LDB 19 F835 C5 BITB #10 F837 26 BNE F863 F839 48 ASLA F83A 48 ASLA F83B 48 ASLA F83C 88 EORA #40 F83E C6 LDB #87 F840 20 BRA F858 F842 53 COMB F843 E4 ANDB ,X F845 E7 STB ,X F847 D6 LDB 19 F849 C5 BITB #10 F84B 26 BNE F863 F84D 43 COMA F84E 81 CMPA #08 F850 24 BCC F854 F852 8B ADDA #80 F854 84 ANDA #87 F856 C6 LDB #78 F858 7A DEC E7C3 F85B E4 ANDB ,X F85D E7 STB ,X F85F AB ADDA ,X F861 A7 STA ,X F863 39 RTS F864 96 LDA 5F F866 85 BITA #40 F868 10 26 LBNE F8AE F86C 85 BITA #20 F86E 10 26 LBNE F82B F872 44 LSRA F873 24 BCC F828 F875 BD JSR EEB2 F878 96 LDA 38 F87A 84 ANDA #03 F87C 44 LSRA F87D 1F TFR B,A F87F 26 BNE F891 F881 25 BCS F891 F883 53 COMB F884 E4 ANDB ,X F886 E7 STB ,X F888 43 COMA F889 7A DEC E7C3 F88C A4 ANDA ,X F88E A7 STA ,X F890 39 RTS F891 25 BCS F89A F893 53 COMB F894 E4 ANDB ,X F896 E7 STB ,X F898 20 BRA F8A6 F89A 26 BNE F8A2 F89C EA ORB ,X F89E E7 STB ,X F8A0 20 BRA F888 F8A2 EA ORB ,X F8A4 E7 STB ,X F8A6 7A DEC E7C3 F8A9 AA ORA ,X F8AB A7 STA ,X F8AD 39 RTS F8AE 24 BCC F8B3 F8B0 86 LDA #F0 F8B2 7D TST 860F F8B5 A4 ANDA ,X F8B7 A7 STA ,X F8B9 EA ORB ,X F8BB E7 STB ,X F8BD 39 RTS F8BE 80 SUBA #40 F8C0 20 BRA F8D2 F8C2 08 ASL 04 F8C4 02 ILL F8C5 01 ILL F8C6 34 PSHS U/S,Y,X,DP,B,A, // vecteur VDRAW par défaut F8C8 86 LDA #60 F8CA 1F TFR A,DP F8CC CC LDD #0101 F8CF 34 PSHS B,A, F8D1 4F CLRA F8D2 E6 LDB 8,S F8D4 D0 SUBB 40 F8D6 22 BHI F8E6 F8D8 26 BNE F8E3 F8DA 0D TST 41 F8DC 26 BNE F8E3 F8DE 35 PULS B,A, F8E0 7E JMP F95D F8E3 60 NEG 1,S F8E5 50 NEGB F8E6 DD STD 6E F8E8 EC LDD 5,S F8EA 93 SUBD 3D F8EC 22 BHI F8F5 F8EE 60 NEG ,S F8F0 43 COMA F8F1 53 COMB F8F2 C3 ADDD #0001 F8F5 DD STD 6C F8F7 9E LDX 3D F8F9 10 9E LDY 3F F8FC 10 93 CMPD 6E F8FF 22 BHI F92F F901 D6 LDB 6F F903 27 BEQ F959 F905 54 LSRB F906 50 NEGB F907 86 LDA #FF F909 31 LEAY 1,Y F90B 6D TST 1,S F90D 2A BPL F911 F90F 31 LEAY fe,Y F911 D3 ADDD 6C F913 2B BMI F91F F915 30 LEAX 1,X F917 6D TST ,S F919 2A BPL F91D F91B 30 LEAX fe,X F91D 93 SUBD 6E F91F 34 PSHS CC F921 1A ORCC #50 F923 BD JSR F6DC F926 35 PULS CC F928 10 AC CMPY 7,S F92B 27 BEQ F959 F92D 20 BRA F909 F92F 43 COMA F930 53 COMB F931 C3 ADDD #0001 F934 47 ASRA F935 56 RORB F936 30 LEAX 1,X F938 6D TST ,S F93A 2A BPL F93E F93C 30 LEAX fe,X F93E D3 ADDD 6E F940 2B BMI F94C F942 31 LEAY 1,Y F944 6D TST 1,S F946 2A BPL F94A F948 31 LEAY fe,Y F94A 93 SUBD 6C F94C 34 PSHS CC F94E 1A ORCC #50 F950 BD JSR F6DC F953 35 PULS CC F955 AC CMPX 5,S F957 26 BNE F936 F959 32 LEAS 2,S F95B 35 PULS PC,U/S,Y,X,DP,B,A, F95D 9C CMPX 3D F95F 22 BHI F969 F961 27 BEQ F9BE F963 DE LDU 3D F965 1E EXG X,U F967 DF STU 3D F969 34 PSHS X, F96B 96 LDA 5F F96D 85 BITA #60 F96F 26 BNE F9CF F971 DC LDD 3D F973 44 LSRA F974 56 RORB F975 44 LSRA F976 56 RORB F977 54 LSRB F978 34 PSHS B, F97A 1F TFR X,D F97C 44 LSRA F97D 56 RORB F97E 44 LSRA F97F 56 RORB F980 54 LSRB F981 E0 SUBB ,S+ F983 27 BEQ F9C0 F985 34 PSHS B, F987 9E LDX 3D F989 BD JSR F7CC F98C BD JSR F796 F98F 58 ASLB F990 5A DECB F991 BD JSR F864 F994 0D TST 5F F996 2A BPL F9A6 F998 B6 LDA E7C3 F99B 44 LSRA F99C 24 BCC F9A3 F99E 7A DEC E7C3 F9A1 20 BRA F9A8 F9A3 7C INC E7C3 F9A6 30 LEAX 1,X F9A8 C6 LDB #FF F9AA 6A DEC ,S F9AC 2E BGT F991 F9AE 35 PULS B, F9B0 EC LDD ,S++ F9B2 BD JSR F7A5 F9B5 5A DECB F9B6 53 COMB F9B7 BD JSR F864 F9BA AE LDX 3,S F9BC 9F STX 3D F9BE 35 PULS PC,U/S,Y,X,DP,B,A, F9C0 9E LDX 3D F9C2 BD JSR F6DC F9C5 30 LEAX 1,X F9C7 AC CMPX ,S F9C9 2F BLE F9C2 F9CB 32 LEAS 2,S F9CD 20 BRA F9BA F9CF DC LDD 3D F9D1 54 LSRB F9D2 54 LSRB F9D3 34 PSHS B, F9D5 1F TFR X,D F9D7 54 LSRB F9D8 54 LSRB F9D9 E0 SUBB ,S+ F9DB 27 BEQ F9C0 F9DD 34 PSHS B, F9DF 9E LDX 3D F9E1 8D BSR FA14 F9E3 6A DEC ,S F9E5 2F BLE FA06 F9E7 BD JSR F7CC F9EA 96 LDA 5F F9EC 85 BITA #20 F9EE 26 BNE FA23 F9F0 D6 LDB 38 F9F2 58 ASLB F9F3 58 ASLB F9F4 58 ASLB F9F5 58 ASLB F9F6 DA ORB 38 F9F8 E7 STB ,X F9FA 7A DEC E7C3 F9FD E7 STB ,X+ F9FF 7C INC E7C3 FA02 6A DEC ,S FA04 2E BGT F9F8 FA06 35 PULS B, FA08 EC LDD ,S FA0A C4 ANDB #FC FA0C 1F TFR D,X FA0E EC LDD ,S++ FA10 8D BSR FA17 FA12 20 BRA F9BA FA14 1F TFR X,D FA16 53 COMB FA17 C4 ANDB #03 FA19 5C INCB FA1A BD JSR F6DC FA1D 30 LEAX 1,X FA1F 5A DECB FA20 26 BNE FA1A FA22 39 RTS FA23 C6 LDB #F0 FA25 BD JSR F7B1 FA28 34 PSHS B, FA2A E6 LDB ,S FA2C BD JSR F864 FA2F 30 LEAX 1,X FA31 6A DEC 1,S FA33 2E BGT FA2A FA35 35 PULS B, FA37 20 BRA FA06 FA39 96 LDA 5F FA3B 2B BMI FA48 FA3D 27 BEQ FA45 FA3F 96 LDA 16 FA41 84 ANDA #01 FA43 26 BNE FA4F FA45 7E JMP EEB2 FA48 39 RTS FA49 96 LDA 16 FA4B 84 ANDA #01 FA4D 26 BNE FA45 FA4F 7E JMP F4A6 FA52 34 PSHS U/S,A,CC FA54 CE LDU #3FEA FA57 20 BRA FA65 // IO K7 FA59 34 PSHS U/S,A,CC FA5B CE LDU #3FF3 FA5E 20 BRA FA65 FA60 34 PSHS U/S,A,CC FA62 CE LDU #3FF9 FA65 1A ORCC #50 FA67 86 LDA #03 FA69 BD JSR EC03 FA6C 24 BCC FA74 FA6E 86 LDA #01 FA70 AA ORA ,S FA72 20 BRA FA78 FA74 86 LDA #FE FA76 A4 ANDA ,S FA78 A7 STA ,S FA7A 35 PULS PC,U/S,A,CC // interruption FIRQ FA7C 6E JMP [6023] // interruption IRQ FA80 86 LDA #E7 FA82 1F TFR A,DP FA84 DC LDD C0 // est-ce une interrupt clavier? FA86 2B BMI FA9E FA88 B6 LDA 6074 FA8B 85 BITA #40 FA8D 27 BEQ FA9A FA8F DC LDD CE // scrute manette (mouse) FA91 1F TFR D,X FA93 10 9E LDY CC FA96 85 BITA #C0 FA98 26 BNE FAA9 FA9A 6E JMP [6021] // appel de VIRQ (interruption 50Hz) // cas evenement clavier FA9E 85 BITA #02 FAA0 27 BEQ FAA5 FAA2 54 LSRB FAA3 25 BCS FAC5 FAA5 44 LSRA FAA6 25 BCS FACF FAA8 3B RTI // gestion souris FAA9 A6 LDA a,S FAAB 84 ANDA #F8 FAAD 81 CMPA #E0 FAAF 27 BEQ FAC4 FAB1 FE LDU 6055 FAB4 34 PSHS U/S, FAB6 CE LDU #FFC3 // branche en ffc6 sur la rom mon 1 // cad lecture du clavier et de ses periph? FAB9 FF STU 6055 FABC BD JSR FFA0 FABF 35 PULS U/S, FAC1 FF STU 6055 FAC4 3B RTI FAC5 FE LDU 6055 FAC8 34 PSHS U/S, FACA CE LDU #FFC6 FACD 20 BRA FAB9 // Gestion du clavier FACF A6 LDA a,S FAD1 84 ANDA #F8 FAD3 81 CMPA #E0 FAD5 27 BEQ FAEC FAD7 7A DEC 60DC FADA 26 BNE FAE4 FADC B6 LDA E7C1 FADF 84 ANDA #F7 FAE1 B7 STA E7C1 FAE4 B6 LDA 60D4 FAE7 8A ORA #80 FAE9 B7 STA 60D4 FAEC B6 LDA 6019 FAEF 85 BITA #20 FAF1 27 BEQ FAF7 FAF3 6E JMP [6027] FAF7 B6 LDA 6019 FAFA 85 BITA #04 FAFC 27 BEQ FB11 FAFE F6 LDB E7C3 FB01 34 PSHS B, FB03 8D BSR FB15 FB05 63 COM [605A] FB09 73 COM 6075 FB0C 35 PULS B, FB0E F7 STB E7C3 FB11 BC CMPX E7C6 FB14 3B RTI FB15 BD JSR EEA9 FB18 7D TST 605F FB1B 2A BPL FB25 FB1D 7D TST 6086 FB20 2B BMI FB25 FB22 7A DEC E7C3 FB25 39 RTS FB26 34 PSHS X,A, FB28 B6 LDA E7C3 FB2B 84 ANDA #02 FB2D 8E LDX #04E2 FB30 30 LEAX ff,X FB32 26 BNE FB30 FB34 B4 ANDA E7C3 FB37 8B ADDA #FF FB39 35 PULS PC,X,A, // vecteur VRSCOH par défaut FB3B 34 PSHS U/S,Y,X,DP,B,A,CC FB3D 86 LDA #E7 FB3F 1F TFR A,DP FB41 10 8E LDY #603A FB45 A6 LDA f1,Y FB47 1F TFR A,CC FB49 25 BCS FB7F FB4B 29 BVS FBC3 FB4D 27 BEQ FB7F FB4F 10 2B LBMI FBC9 FB53 85 BITA #20 FB55 26 BNE FBCC FB57 85 BITA #40 FB59 26 BNE FB96 FB5B A6 LDA f2,Y FB5D 84 ANDA #FA FB5F 27 BEQ FB6B FB61 A6 LDA f2,Y FB63 84 ANDA #15 FB65 8A ORA #10 FB67 A7 STA f2,Y FB69 20 BRA FBD4 FB6B DC LDD E9 FB6D CA ORB #02 FB6F C4 ANDB #FE FB71 D7 STB EA FB73 BE LDX 608C FB76 AF STX FFE7,Y FB79 A6 LDA f2,Y FB7B 84 ANDA #70 FB7D 20 BRA FB65 FB7F A6 LDA f1,Y FB81 85 BITA #08 FB83 26 BNE FBC6 FB85 85 BITA #10 FB87 26 BNE FB6B FB89 85 BITA #04 FB8B 26 BNE FB90 FB8D 86 LDA #04 FB8F F5 BITB 8601 FB92 A5 BITA f2,Y FB94 26 BNE FBDF FB96 A6 LDA f2,Y FB98 84 ANDA #7F FB9A AA ORA f1,Y FB9C A7 STA f2,Y FB9E A6 LDA f1,Y FBA0 81 CMPA #40 FBA2 26 BNE FBE4 FBA4 96 LDA C9 FBA6 84 ANDA #07 FBA8 8A ORA #02 FBAA 97 STA C9 FBAC B6 LDA 6074 FBAF 85 BITA #10 FBB1 26 BNE FBD4 FBB3 86 LDA #40 FBB5 95 BITA C3 FBB7 26 BNE FBD9 FBB9 B6 LDA 6074 FBBC 8A ORA #10 FBBE B7 STA 6074 FBC1 20 BRA FBD4 FBC3 86 LDA #01 FBC5 F5 BITB 8605 FBC8 F5 BITB 8645 FBCB F5 BITB 8640 FBCE A5 BITA f2,Y FBD0 27 BEQ FBDF FBD2 8D BSR FC3B FBD4 35 PULS U/S,Y,X,DP,B,A,CC FBD6 1C & CC #FE FBD8 39 RTS FBD9 A6 LDA f2,Y FBDB 8A ORA #80 FBDD A7 STA f2,Y FBDF 35 PULS U/S,Y,X,DP,B,A,CC FBE1 1A ORCC #01 FBE3 39 RTS FBE4 1A ORCC #10 FBE6 A6 LDA a,Y FBE8 AA ORA b,Y FBEA 8E LDX #FCA3 FBED A1 CMPA ,X FBEF 27 BEQ FBFB FBF1 30 LEAX 2,X FBF3 8C CMPX #FCB1 FBF6 26 BNE FBED FBF8 EE LDU a,Y FBFA F5 BITB EE84 FBFD A6 LDA c,Y FBFF 84 ANDA #E1 FC01 88 EORA #61 FC03 8B ADDA #40 FC05 1C & CC #FE FC07 46 RORA FC08 24 BCC FC0C FC0A 8A ORA #80 FC0C 33 LEAU A,U FC0E 1F TFR U,D FC10 D7 STB EB FC12 E6 LDB c,Y FC14 C4 ANDB #1C FC16 58 ASLB FC17 58 ASLB FC18 58 ASLB FC19 96 LDA EA FC1B 84 ANDA #10 FC1D 8A ORA #09 FC1F A7 STA 32,Y FC22 EA ORB 32,Y FC25 D7 STB EA FC27 53 COMB FC28 D8 EORB EA FC2A 5C INCB FC2B 26 BNE FBD9 FC2D AE LDX FFE7,Y FC30 BF STX 608C FC33 CE LDU #ECAC FC36 EF STU FFE7,Y FC39 20 BRA FBD4 FC3B A6 LDA f1,Y FC3D 85 BITA #02 FC3F 26 BNE FC6B FC41 85 BITA #20 FC43 10 26 LBNE FC52 FC47 85 BITA #05 FC49 26 BNE FC90 FC4B A6 LDA f2,Y FC4D 84 ANDA #FA FC4F 27 BEQ FC90 FC51 86 LDA #40 FC53 95 BITA C3 FC55 26 BNE FC51 FC57 D7 STB C8 FC59 96 LDA C9 FC5B 84 ANDA #07 FC5D 44 LSRA FC5E 54 LSRB FC5F 49 ROLA FC60 97 STA C9 FC62 84 ANDA #05 FC64 97 STA C9 FC66 8A ORA #02 FC68 97 STA C9 FC6A 39 RTS FC6B 96 LDA E9 FC6D 85 BITA #08 FC6F 26 BNE FC87 FC71 1A ORCC #10 FC73 E6 LDB c,Y FC75 54 LSRB FC76 54 LSRB FC77 25 BCS FC7C FC79 48 ASLA FC7A 2B BMI FC82 FC7C 96 LDA EA FC7E 8A ORA #08 FC80 97 STA EA FC82 35 PULS X, FC84 16 LBRA FCDF FC87 D6 LDB E8 FC89 84 ANDA #03 FC8B 26 BNE FC71 FC8D E7 STB 4,S FC8F 39 RTS FC90 96 LDA E9 FC92 85 BITA #10 FC94 27 BEQ FC90 FC96 86 LDA #3C FC98 4A DECA FC99 26 BNE FC98 FC9B 96 LDA E9 FC9D 48 ASLA FC9E 2B BMI FC90 FCA0 D7 STB E8 FCA2 39 RTS FCA3 15 ILL FCA4 0C INC 2E FCA6 0A DEC 62 FCA8 08 ASL CA FCAA 07 ASR 9B FCAC 06 ROR 6E FCAE 03 COM 07 FCB0 0E JMP 34 // SETP$ A=couleur à modif / X=16bits OR modifier / Y=16bits AND modifier //si A=FF alors X pointe sur un tableau contenant la nouvelle palette FCB1 34 PSHS U,Y,DP,B,A,CC FCB3 C6 LDB #E7 FCB5 1F TFR B,DP FCB7 4D TSTA FCB8 2A BPL FCE1 // prog d'une couleur FCBA 8D BSR FCD6 // wait a VBL FCBC 10 8E LDY #0200 FCC0 31 LEAY -1,Y FCC2 26 BNE FCC0 // temporise 200x8µs FCC4 0F CLR DB // met a zero le registre de selection FCC6 10 8E LDY #0010 FCCA EC LDD ,X++ FCCC D7 STB DA // ecrit la valeur 16 bits dans le registre de donnée FCCE 97 STA DA FCD0 31 LEAY -1,Y FCD2 26 BNE FCCA // repete 16fois FCD4 35 PULS PC,U/S,Y,DP,B,A,CC // RETOUR FCD6 7D TST E7E7 // Wait a VBL FCD9 2A BPL FCD6 FCDB 7D TST E7E7 FCDE 2B BMI FCDB FCE0 39 RTS FCE1 1A ORCC #50 FCE3 48 ASLA // multiplie l'index de couleur par 2 FCE4 34 PSHS A, FCE6 8D BSR FD10 // attente de syncro FCE8 C6 LDB #0A FCEA 5A DECB FCEB 26 BNE FCEA // attente 5*10 µs FCED 12 NOP FCEE A6 LDA ,S FCF0 97 STA DB // ecrit l'index dans le registre de sel FCF2 1F TFR X,D FCF4 D4 ANDB DA // application du masque & dans le registre donnée FCF6 94 ANDA DA FCF8 34 PSHS B,A, FCFA 1F TFR Y,D FCFC AA ORA ,S+ FCFE EA ORB ,S+ FD00 AC CMPX ,X++ FD02 1F TFR D,X FD04 35 PULS A, FD06 97 STA DB // ecrit l'index dans le registre de sel FD08 1F TFR X,D FD0A D7 STB DA // application du masque ou FD0C 97 STA DA FD0E 35 PULS PC,U/S,Y,DP,B,A,CC // sortie de // attente de sync avec l'écran FD10 86 LDA #20 FD12 95 BITA E7 FD14 27 BEQ FD12 FD16 95 BITA E7 FD18 26 BNE FD16 FD1A 5A DECB FD1B 34 PSHS U/S,Y,X,DP,B,A, FD1D 3D MUL FD1E 3D MUL FD1F 1A ORCC #00 FD21 35 PULS U/S,Y,X,DP,B,A, FD23 B5 BITA E7E7 FD26 27 BEQ FD1A FD28 39 RTS // RETOUR // fin de SETP$ // pt d'entrée extramoniteur FD29 34 PSHS A, FD2B B6 LDA E7E6 FD2E 34 PSHS A, FD30 7F CLR E7E6 FD33 B6 LDA E7C3 FD36 84 ANDA #04 // verifie si cartouche présente FD38 26 BNE FD41 FD3A BA ORA 0020 FD3D 84 ANDA #03 FD3F 20 BRA FD44 FD41 BA ORA 0020 FD44 34 PSHS A, FD46 B6 LDA E7C3 FD49 8A ORA #04 FD4B B7 STA E7C3 FD4E B7 STA 0001 FD51 A6 LDA 2,S FD53 BD JSR 0029 // passe par la ROM1 FD56 35 PULS A, FD58 8D BSR FD61 FD5A 35 PULS A, FD5C B7 STA E7E6 FD5F 35 PULS PC,A, FD61 34 PSHS B,A, FD63 84 ANDA #04 FD65 F6 LDB E7C3 FD68 C4 ANDB #FB FD6A 34 PSHS B, FD6C AA ORA ,S FD6E B7 STA E7C3 FD71 86 LDA #00 FD73 A7 STA ,S FD75 A7 STA [,S++] FD77 35 PULS PC,B, // IO K7 FD79 34 PSHS A, FD7B B6 LDA E7E6 FD7E 34 PSHS A, FD80 7F CLR E7E6 FD83 B6 LDA E7C3 FD86 84 ANDA #04 FD88 26 BNE FD91 FD8A BA ORA 0020 FD8D 84 ANDA #03 FD8F 20 BRA FD94 FD91 BA ORA 0020 FD94 34 PSHS A, FD96 A6 LDA 2,S FD98 84 ANDA #30 FD9A 81 CMPA #30 FD9C 26 BNE FDA4 FD9E A6 LDA 2,S FDA0 84 ANDA #CF FDA2 20 BRA FDAA FDA4 A6 LDA 2,S FDA6 84 ANDA #CF FDA8 8A ORA #04 FDAA 8D BSR FD61 FDAC 34 PSHS A, FDAE B6 LDA 60CD FDB1 84 ANDA #C0 FDB3 81 CMPA #40 FDB5 35 PULS A, FDB7 26 BNE FDC0 FDB9 FF STU 6055 FDBC BD JSR FFA0 FDBF 7D TST ADC4 FDC2 20 BRA FD56 FDC4 6E JMP [602F] Pt d'entrée apres reset FDC8 1A ORCC #50 FDCA 7F CLR E7E6 FDCD C6 LDB #60 FDCF 1F TFR B,DP FDD1 10 CE LDS #60CC FDD5 86 LDA #D4 FDD7 DE LDU FE FDD9 11 83 CMPU #A55A FDDD 27 BEQ FDF5 // Hot reset FDDF 11 83 CMPU #A559 FDE3 27 BEQ FDF5 FDE5 B7 STA A7E7 // Memo GE7E7 FDE8 CE LDU #6000 FDEB 6F CLR ,U+ FDED 11 83 CMPU #7000 // clean zero page FDF1 26 BNE FDEB FDF3 03 COM 80 FDF5 B7 STA E7E7 // 60Hz Commutation RAM Mode Gate ARRAY FDF8 CE LDU #E000 FDFB E6 LDB ,U+ FDFD EB ADDB ,U+ FDFF EB ADDB ,U+ FE01 CB ADDB #55 FE03 E1 CMPB ,U // calcul du cookie FE05 26 BNE FE1D // ici le resultat est 55 FE07 E6 LDB -3,U FE09 C1 CMPB #52 // 4D FE0B 26 BNE FE15 // le saut est pris FE0D D6 LDB CD FE0F CA ORB #20 FE11 C4 ANDB #3F FE13 20 BRA FE21 FE15 D6 LDB CD FE17 C4 ANDB #DF FE19 CA ORB #C0 FE1B 20 BRA FE21 FE1D D6 LDB CD FE1F C4 ANDB #1F FE21 86 LDA #54 FE23 B7 STA E7E7 // 50 Hz mode PIA FE26 86 LDA #01 FE28 97 STA 48 FE2A 0F CLR 49 FE2C BD JSR E004 // appel (verif Disk) FE2F 96 LDA 4E FE31 24 BCC FE3B FE33 C5 BITB #C0 FE35 26 BNE FE4C FE37 0F CLR 80 FE39 20 BRA FE49 FE3B 81 CMPA #43 FE3D 26 BNE FE45 FE3F C4 ANDB #3F FE41 CA ORB #40 FE43 20 BRA FE49 FE45 C4 ANDB #3F FE47 CA ORB #80 FE49 86 LDA #54 FE4B 7D TST 86D4 FE4E D7 STB CD FE50 97 STA 81 FE52 B7 STA E7E7 FE55 8E LDX #607C FE58 96 LDA 47 FE5A D6 LDB 5F FE5C 1F TFR D,Y FE5E DE LDU 74 FE60 D6 LDB 2C FE62 4F CLRA FE63 A7 STA ,-X FE65 8C CMPX #6019 FE68 2E BGT FE63 FE6A D7 STB 2C FE6C DF STU 74 FE6E 1F TFR Y,D FE70 97 STA 47 FE72 D7 STB 5F FE74 C6 LDB #F0 FE76 D7 STB 1A FE78 D7 STB 1C FE7A D7 STB 1E FE7C 8E LDX #E844 FE7F 9F STX 21 FE81 9F STX 23 FE83 9F STX 27 FE85 9F STX 2F FE87 8E LDX #E845 FE8A 9F STX CF FE8C 8E LDX #6082 FE8F 9F STX 79 // mise en place du ptr sur le buf clav FE91 86 LDA #04 FE93 97 STA 7B FE95 8E LDX #6000 FE98 10 8E LDY #FF69 FE9C DE LDU FE FE9E 11 83 CMPU #A55A // Cold or Hot reset FEA2 26 BNE FEA8 FEA4 30 LEAX 4,X FEA6 31 LEAY 4,Y FEA8 EC LDD ,Y++ // copie la zone FF69-FF7D dans 6000-6014 FEAA ED STD ,X++ FEAC 10 8C CMPY #FF7F FEB0 2B BMI FEA8 FEB2 8E LDX #3C3C FEB5 BF STX E7CA FEB8 C6 LDB #F6 FEBA F7 STB E7C9 // PIA SYS FEBD CE LDU #3838 FEC0 FF STU E7CA FEC3 CC LDD #FEFF FEC6 FD STD E7C8 FEC9 BF STX E7CA FECC CC LDD #0000 FECF CE LDU #E7CC // PIA JOY FED2 ED STD 2,U FED4 8E LDX #0030 FED7 AF STX ,U FED9 8A ORA #04 FEDB CA ORB #04 FEDD ED STD 2,U FEDF 8E LDX #393D FEE2 BF STX E7C1 // 6846 Partie PIA FEE5 96 LDA CD FEE7 84 ANDA #C0 FEE9 81 CMPA #40 FEEB 27 BEQ FEF0 ??? code space FEED 86 LDA #2C FEEF 7D TST 863C // FEF0 LDA #3C FEF2 B7 STA E7C3 FEF5 B7 STA 0003 // commute la ROM 3 (gestion de fichiers) FEF8 7E JMP 3FF6 FEFB F7 STB E7C3 FEFE E7 STB ,Y FF00 6E JMP [,U] FF02 D7 STB 35 FF04 34 PSHS B,A, FF06 8D BSR FF37 FF08 E4 ANDB 1,S FF0A F7 STB E7C3 FF0D 9E LDX 8C FF0F E7 STB ,X FF11 86 LDA #55 FF13 9E LDX 76 FF15 E6 LDB ,X+ FF17 E7 STB FF9F,X FF1B 8C CMPX #001B FF1E 24 BCC FF22 FF20 AB ADDA ff,X FF22 8C CMPX #0021 FF25 25 BCS FF15 FF27 8D BSR FF37 FF29 F7 STB E7C3 FF2C F7 STB 0003 FF2F 8E LDX #5FA0 FF32 A1 CMPA 1A,X FF35 35 PULS PC,B,A, FF37 F6 LDB E7C3 FF3A CA ORB #04 FF3C 39 RTS // Utilisation de la table de redirection FF3D 6E JMP [6000] FF41 6E JMP [6002] FF45 6E JMP [6004] FF49 6E JMP [6006] FF4D 6E JMP [6008] FF51 6E JMP [600A] FF55 6E JMP [600C] FF59 6E JMP [600E] FF5D 6E JMP [6010] FF61 6E JMP [6012] FF65 6E JMP [6014] // Table Zero Page redir vectors At Bootup FF69 FF7F FF82 FF85 FF88 FF8B FF8E FF91 FF94 FF97 FF9A FF9D // vecteurs zéro Page par défaut FF7F 7E JMP FA60 FF82 7E JMP FB26 FF85 7E JMP EC30 ??? … verifier FF88 7E JMP EC7A FF8B 7E JMP ECC8 FF8E BD JSR ECB8 FF91 7E JMP F8C6 FF94 7E JMP F6DC FF97 7E JMP FB3B FF9A 7E JMP F724 FF9D BD JSR ECB8 // Switch & execute FFA0 34 PSHS A,CC FFA2 1A ORCC #50 FFA4 B6 LDA E7C3 FFA7 8A ORA #10 FFA9 B7 STA E7C3 // passe à l'autre ROM Moniteur // execute (from other page) FFAC 35 PULS A,CC FFAE AD JSR [6055] FFB2 34 PSHS A,CC FFB4 1A ORCC #50 FFB6 B6 LDA E7C3 FFB9 8A ORA #10 FFBB B7 STA E7C3 // repasse à la ROM mon 1 FFBE 35 PULS PC,A,CC // FIN de switch & execute FFC0 7E JMP EC3E FFC3 7E JMP EC7C FFC6 FF STU FFFF FFC9 FF STU FFFF FFCC FF STU FFFF FFCF FF STU CCCC FFD2 CC LDD #CCCC FFD5 CC LDD #CCCC FFD8 CC LDD #CCCC FFDB CC LDD #CCCC FFDE CC LDD #CCCC FFE1 CC LDD #CCCC FFE4 CC LDD #CCCC FFE7 CC LDD #CCCC FFEA CC LDD #CCCC FFED CC LDD #CCCC FFF0 0300 RESERVED FFF2 7000 SWI3 FFF4 6800 SWI2 FFF6 FA7C FIRQ FFF8 FA80 IRQ FFFA FDC4 SWI FFFC FDC8 NMI FFFE FDC8 RESET