; Apple I BASIC Disassembly ; ========================= ; ; Created by loading Achim Breidenbach's (achim@boinx.com) ; disassembly, correcting some errors, and re-disassembling ; it with the Apple II Monitor disassembler. The errors ; that were found and corrected are noted. I now have ; even greater admiration for Woz's ability to key this ; in correctly so many times! ; ; Some problems still remain which can be resolved either ; by comparison with another copy of Apple I BASIC or by ; more thorough reverse-engineering and commenting. ; ; -Michael Mahon, September 14, 2003. E000- 4C B0 E2 JMP $E2B0 ; Cold entry E003- AD 11 D0 LDA $D011 ; Wait for keypress E006- 10 FB BPL $E003 E008- AD 10 D0 LDA $D010 ; Return key in A. E00B- 60 RTS E00C- 8A TXA E00D- 29 20 AND #$20 E00F- F0 23 BEQ $E034 E011- A9 A0 LDA #$A0 E013- 85 E4 STA $E4 E015- 4C C9 E3 JMP $E3C9 E018- A9 20 LDA #$20 E01A- C5 24 CMP $24 E01C- B0 0C BCS $E02A E01E- A9 8D LDA #$8D E020- A0 07 LDY #$07 E022- 20 C9 E3 JSR $E3C9 E025- A9 A0 LDA #$A0 E027- 88 DEY E028- D0 F8 BNE $E022 E02A- A0 00 LDY #$00 E02C- B1 E2 LDA ($E2),Y E02E- E6 E2 INC $E2 E030- D0 02 BNE $E034 E032- E6 E3 INC $E3 E034- 60 RTS E035- 20 15 E7 JSR $E715 E038- 20 76 E5 JSR $E576 E03B- A5 E2 LDA $E2 E03D- C5 E6 CMP $E6 E03F- A5 E3 LDA $E3 E041- E5 E7 SBC $E7 E043- B0 EF BCS $E034 E045- 20 6D E0 JSR $E06D E048- 4C 3B E0 JMP $E03B E04B- A5 CA LDA $CA E04D- 85 E2 STA $E2 E04F- A5 CB LDA $CB E051- 85 E3 STA $E3 E053- A5 4C LDA $4C E055- 85 E6 STA $E6 E057- A5 4D LDA $4D E059- 85 E7 STA $E7 E05B- D0 DE BNE $E03B E05D- 20 15 E7 JSR $E715 E060- 20 6D E5 JSR $E56D E063- A5 E4 LDA $E4 E065- 85 E2 STA $E2 E067- A5 E5 LDA $E5 E069- 85 E3 STA $E3 E06B- B0 C7 BCS $E034 E06D- 86 D8 STX $D8 E06F- A9 A0 LDA #$A0 E071- 85 FA STA $FA E073- 20 2A E0 JSR $E02A E076- 98 TYA E077- 85 E4 STA $E4 E079- 20 2A E0 JSR $E02A E07C- AA TAX E07D- 20 2A E0 JSR $E02A E080- 20 1B E5 JSR $E51B E083- 20 18 E0 JSR $E018 E086- 84 FA STY $FA E088- AA TAX E089- 10 18 BPL $E0A3 E08B- 0A ASL E08C- 10 E9 BPL $E077 E08E- A5 E4 LDA $E4 E090- D0 03 BNE $E095 E092- 20 11 E0 JSR $E011 E095- 8A TXA E096- 20 C9 E3 JSR $E3C9 E099- A9 25 LDA #$25 E09B- 20 1A E0 JSR $E01A E09E- AA TAX E09F- 30 F5 BMI $E096 E0A1- 85 E4 STA $E4 E0A3- C9 01 CMP #$01 E0A5- D0 05 BNE $E0AC E0A7- A6 D8 LDX $D8 E0A9- 4C CD E3 JMP $E3CD E0AC- 48 PHA E0AD- 84 CE STY $CE E0AF- A2 ED LDX #$ED E0B1- 86 CF STX $CF E0B3- C9 51 CMP #$51 E0B5- 90 04 BCC $E0BB E0B7- C6 CF DEC $CF E0B9- E9 50 SBC #$50 E0BB- 48 PHA E0BC- B1 CE LDA ($CE),Y E0BE- AA TAX E0BF- 88 DEY E0C0- B1 CE LDA ($CE),Y E0C2- 10 FA BPL $E0BE E0C4- E0 C0 CPX #$C0 E0C6- B0 04 BCS $E0CC E0C8- E0 00 CPX #$00 E0CA- 30 F2 BMI $E0BE E0CC- AA TAX E0CD- 68 PLA E0CE- E9 01 SBC #$01 E0D0- D0 E9 BNE $E0BB E0D2- 24 E4 BIT $E4 E0D4- 30 03 BMI $E0D9 E0D6- 20 F8 EF JSR $EFF8 E0D9- B1 CE LDA ($CE),Y E0DB- 10 10 BPL $E0ED E0DD- AA TAX E0DE- 29 3F AND #$3F E0E0- 85 E4 STA $E4 E0E2- 18 CLC E0E3- 69 A0 ADC #$A0 E0E5- 20 C9 E3 JSR $E3C9 E0E8- 88 DEY E0E9- E0 C0 CPX #$C0 E0EB- 90 EC BCC $E0D9 E0ED- 20 0C E0 JSR $E00C E0F0- 68 PLA E0F1- C9 5D CMP #$5D E0F3- F0 A4 BEQ $E099 E0F5- C9 28 CMP #$28 E0F7- D0 8A BNE $E083 E0F9- F0 9E BEQ $E099 E0FB- 20 18 E1 JSR $E118 E0FE- 95 50 STA $50,X E100- D5 78 CMP $78,X E102- 90 11 BCC $E115 E104- A0 2B LDY #$2B E106- 4C E0 E3 JMP $E3E0 E109- 20 34 EE JSR $EE34 E10C- D5 50 CMP $50,X E10E- 90 F4 BCC $E104 E110- 20 E4 EF JSR $EFE4 E113- 95 78 STA $78,X E115- 4C 23 E8 JMP $E823 E118- 20 34 EE JSR $EE34 E11B- F0 E7 BEQ $E104 E11D- 38 SEC E11E- E9 01 SBC #$01 E120- 60 RTS E121- 20 18 E1 JSR $E118 E124- 95 50 STA $50,X E126- 18 CLC E127- F5 78 SBC $78,X E129- 4C 02 E1 JMP $E102 E12C- A0 14 LDY #$14 E12E- D0 D6 BNE $E106 E130- 20 18 E1 JSR $E118 E133- E8 INX E134- B5 50 LDA $50,X E136- 85 DA STA $DA E138- 65 CE ADC $CE E13A- 48 PHA E13B- A8 TAY E13C- B5 78 LDA $78,X E13E- 85 DB STA $DB E140- 65 CF ADC $CF E142- 48 PHA E143- C4 CA CPY $CA E145- E5 CB SBC $CB E147- B0 E3 BCS $E12C E149- A5 DA LDA $DA E14B- 69 FE ADC #$FE E14D- 85 DA STA $DA E14F- A9 FF LDA #$FF E151- A8 TAY E152- 65 DB ADC $DB E154- 85 DB STA $DB E156- C8 INY E157- B1 DA LDA ($DA),Y E159- D9 CC 00 CMP $00CC,Y E15C- D0 0F BNE $E16D E15E- 98 TYA E15F- F0 F5 BEQ $E156 E161- 68 PLA E162- 91 DA STA ($DA),Y E164- 99 CC 00 STA $00CC,Y E167- 88 DEY E168- 10 F7 BPL $E161 E16A- E8 INX E16B- 60 RTS E16C- EA NOP E16D- A0 80 LDY #$80 E16F- D0 95 BNE $E106 E171- A9 00 LDA #$00 E173- 20 0A E7 JSR $E70A E176- A0 02 LDY #$02 E178- 94 78 STY $78,X E17A- 20 0A E7 JSR $E70A E17D- A9 BF LDA #$BF E17F- 20 C9 E3 JSR $E3C9 E182- A0 00 LDY #$00 E184- 20 9E E2 JSR $E29E E187- 94 78 STY $78,X E189- EA NOP ; patch to Debug? E18A- EA NOP E18B- EA NOP E18C- B5 51 LDA $51,X E18E- 85 CE STA $CE E190- B5 79 LDA $79,X E192- 85 CF STA $CF E194- E8 INX E195- E8 INX E196- 20 BC E1 JSR $E1BC E199- B5 4E LDA $4E,X E19B- D5 76 CMP $76,X E19D- B0 15 BCS $E1B4 E19F- F6 4E INC $4E,X E1A1- A8 TAY E1A2- B1 CE LDA ($CE),Y E1A4- B4 50 LDY $50,X E1A6- C4 E4 CPY $E4 E1A8- 90 04 BCC $E1AE E1AA- A0 83 LDY #$83 E1AC- D0 C1 BNE $E16F E1AE- 91 DA STA ($DA),Y E1B0- F6 50 INC $50,X E1B2- 90 E5 BCC $E199 E1B4- B4 50 LDY $50,X E1B6- 8A TXA E1B7- 91 DA STA ($DA),Y E1B9- E8 INX E1BA- E8 INX E1BB- 60 RTS E1BC- B5 51 LDA $51,X E1BE- 85 DA STA $DA E1C0- 38 SEC E1C1- E9 02 SBC #$02 E1C3- 85 E4 STA $E4 E1C5- B5 79 LDA $79,X E1C7- 85 DB STA $DB E1C9- E9 00 SBC #$00 E1CB- 85 E5 STA $E5 E1CD- A0 00 LDY #$00 E1CF- B1 E4 LDA ($E4),Y E1D1- 18 CLC E1D2- E5 DA SBC $DA E1D4- 85 E4 STA $E4 E1D6- 60 RTS E1D7- B5 53 LDA $53,X E1D9- 85 CE STA $CE E1DB- B5 7B LDA $7B,X E1DD- 85 CF STA $CF E1DF- B5 51 LDA $51,X E1E1- 85 DA STA $DA E1E3- B5 79 LDA $79,X E1E5- 85 DB STA $DB E1E7- E8 INX E1E8- E8 INX E1E9- E8 INX E1EA- A0 00 LDY #$00 E1EC- 94 78 STY $78,X E1EE- 94 A0 STY $A0,X E1F0- C8 INY E1F1- 94 50 STY $50,X E1F3- B5 4D LDA $4D,X E1F5- D5 75 CMP $75,X E1F7- 08 PHP E1F8- 48 PHA E1F9- B5 4F LDA $4F,X E1FB- D5 77 CMP $77,X E1FD- 90 07 BCC $E206 E1FF- 68 PLA E200- 28 PLP E201- B0 02 BCS $E205 E203- 56 50 LSR $50,X E205- 60 RTS E206- A8 TAY E207- B1 CE LDA ($CE),Y E209- 85 E4 STA $E4 E20B- 68 PLA E20C- A8 TAY E20D- 28 PLP E20E- B0 F3 BCS $E203 E210- B1 DA LDA ($DA),Y E212- C5 E4 CMP $E4 E214- D0 ED BNE $E203 E216- F6 4F INC $4F,X E218- F6 4D INC $4D,X E21A- B0 D7 BCS $E1F3 E21C- 20 D7 E1 JSR $E1D7 E21F- 4C 36 E7 JMP $E736 E222- 20 54 E2 JSR $E254 E225- 06 CE ASL $CE E227- 26 CF ROL $CF E229- 90 0D BCC $E238 E22B- 18 CLC E22C- A5 E6 LDA $E6 E22E- 65 DA ADC $DA E230- 85 E6 STA $E6 E232- A5 E7 LDA $E7 E234- 65 DB ADC $DB E236- 85 E7 STA $E7 E238- 88 DEY E239- F0 09 BEQ $E244 E23B- 06 E6 ASL $E6 E23D- 26 E7 ROL $E7 E23F- 10 E4 BPL $E225 E241- 4C 7E E7 JMP $E77E E244- A5 E6 LDA $E6 E246- 20 08 E7 JSR $E708 E249- A5 E7 LDA $E7 E24B- 95 A0 STA $A0,X E24D- 06 E5 ASL $E5 E24F- 90 28 BCC $E279 E251- 4C 6F E7 JMP $E76F E254- A9 55 LDA #$55 E256- 85 E5 STA $E5 E258- 20 5B E2 JSR $E25B E25B- A5 CE LDA $CE E25D- 85 DA STA $DA E25F- A5 CF LDA $CF E261- 85 DB STA $DB E263- 20 15 E7 JSR $E715 E266- 84 E6 STY $E6 E268- 84 E7 STY $E7 E26A- A5 CF LDA $CF E26C- 10 09 BPL $E277 E26E- CA DEX E26F- 06 E5 ASL $E5 E271- 20 6F E7 JSR $E76F E274- 20 15 E7 JSR $E715 E277- A0 10 LDY #$10 E279- 60 RTS E27A- 20 6C EE JSR $EE6C E27D- F0 C5 BEQ $E244 E27F- FF ;??? E280- C9 84 CMP #$84 E282- D0 02 BNE $E286 E284- 46 F8 LSR $F8 E286- C9 DF CMP #$DF E288- F0 11 BEQ $E29B E28A- C9 9B CMP #$9B E28C- F0 06 BEQ $E294 E28E- 99 00 02 STA $0200,Y E291- C8 INY E292- 10 0A BPL $E29E E294- A0 8B LDY #$8B E296- 20 C4 E3 JSR $E3C4 E299- A0 01 LDY #$01 E29B- 88 DEY E29C- 30 F6 BMI $E294 E29E- 20 03 E0 JSR $E003 E2A1- EA NOP E2A2- EA NOP E2A3- 20 C9 E3 JSR $E3C9 E2A6- C9 8D CMP #$8D E2A8- D0 D6 BNE $E280 E2AA- A9 DF LDA #$DF E2AC- 99 00 02 STA $0200,Y E2AF- 60 RTS E2B0- 20 D3 EF JSR $EFD3 E2B3- 20 CD E3 JSR $E3CD E2B6- 46 D9 LSR $D9 E2B8- A9 BE LDA #$BE ; (Address corrected) E2BA- 20 C9 E3 JSR $E3C9 E2BD- A0 00 LDY #$00 E2BF- 84 FA STY $FA E2C1- 24 F8 BIT $F8 E2C3- 10 0C BPL $E2D1 E2C5- A6 F6 LDX $F6 E2C7- A5 F7 LDA $F7 E2C9- 20 1B E5 JSR $E51B E2CC- A9 A0 LDA #$A0 E2CE- 20 C9 E3 JSR $E3C9 E2D1- A2 FF LDX #$FF E2D3- 9A TXS E2D4- 20 9E E2 JSR $E29E E2D7- 84 F1 STY $F1 E2D9- 8A TXA E2DA- 85 C8 STA $C8 E2DC- A2 20 LDX #$20 E2DE- 20 91 E4 JSR $E491 E2E1- A5 C8 LDA $C8 E2E3- 69 00 ADC #$00 E2E5- 85 E0 STA $E0 E2E7- A9 00 LDA #$00 E2E9- AA TAX E2EA- 69 02 ADC #$02 E2EC- 85 E1 STA $E1 E2EE- A1 E0 LDA ($E0,X) E2F0- 29 F0 AND #$F0 E2F2- C9 B0 CMP #$B0 E2F4- F0 03 BEQ $E2F9 E2F6- 4C 83 E8 JMP $E883 E2F9- A0 02 LDY #$02 E2FB- B1 E0 LDA ($E0),Y E2FD- 99 CD 00 STA $00CD,Y E300- 88 DEY E301- D0 F8 BNE $E2FB E303- 20 8A E3 JSR $E38A E306- A5 F1 LDA $F1 E308- E5 C8 SBC $C8 E30A- C9 04 CMP #$04 E30C- F0 A8 BEQ $E2B6 E30E- 91 E0 STA ($E0),Y E310- A5 CA LDA $CA E312- F1 E0 SBC ($E0),Y E314- 85 E4 STA $E4 E316- A5 CB LDA $CB E318- E9 00 SBC #$00 E31A- 85 E5 STA $E5 E31C- A5 E4 LDA $E4 E31E- C5 CC CMP $CC E320- A5 E5 LDA $E5 E322- E5 CD SBC $CD E324- 90 45 BCC $E36B E326- A5 CA LDA $CA E328- F1 E0 SBC ($E0),Y E32A- 85 E6 STA $E6 E32C- A5 CB LDA $CB E32E- E9 00 SBC #$00 E330- 85 E7 STA $E7 E332- B1 CA LDA ($CA),Y E334- 91 E6 STA ($E6),Y E336- E6 CA INC $CA E338- D0 02 BNE $E33C E33A- E6 CB INC $CB E33C- A5 E2 LDA $E2 E33E- C5 CA CMP $CA E340- A5 E3 LDA $E3 E342- E5 CB SBC $CB E344- B0 E0 BCS $E326 E346- B5 E4 LDA $E4,X E348- 95 CA STA $CA,X E34A- CA DEX E34B- 10 F9 BPL $E346 E34D- B1 E0 LDA ($E0),Y E34F- A8 TAY E350- 88 DEY E351- B1 E0 LDA ($E0),Y E353- 91 E6 STA ($E6),Y E355- 98 TYA E356- D0 F8 BNE $E350 E358- 24 F8 BIT $F8 E35A- 10 09 BPL $E365 E35C- B5 F7 LDA $F7,X E35E- 75 F5 ADC $F5,X E360- 95 F7 STA $F7,X E362- E8 INX E363- F0 F7 BEQ $E35C E365- 10 7E BPL $E3E5 E367- 00 00 00 00 ;??? E36B- A0 14 LDY #$14 E36D- D0 71 BNE $E3E0 E36F- 20 15 E7 JSR $E715 E372- A5 E2 LDA $E2 E374- 85 E6 STA $E6 E376- A5 E3 LDA $E3 E378- 85 E7 STA $E7 E37A- 20 75 E5 JSR $E575 E37D- A5 E2 LDA $E2 E37F- 85 E4 STA $E4 E381- A5 E3 LDA $E3 E383- 85 E5 STA $E5 E385- D0 0E BNE $E395 E387- 20 15 E7 JSR $E715 E38A- 20 6D E5 JSR $E56D E38D- A5 E6 LDA $E6 E38F- 85 E2 STA $E2 E391- A5 E7 LDA $E7 E393- 85 E3 STA $E3 E395- A0 00 LDY #$00 E397- A5 CA LDA $CA E399- C5 E4 CMP $E4 E39B- A5 CB LDA $CB E39D- E5 E5 SBC $E5 E39F- B0 16 BCS $E3B7 E3A1- A5 E4 LDA $E4 E3A3- D0 02 BNE $E3A7 E3A5- C6 E5 DEC $E5 E3A7- C6 E4 DEC $E4 E3A9- A5 E6 LDA $E6 E3AB- D0 02 BNE $E3AF E3AD- C6 E7 DEC $E7 E3AF- C6 E6 DEC $E6 E3B1- B1 E4 LDA ($E4),Y E3B3- 91 E6 STA ($E6),Y E3B5- 90 E0 BCC $E397 E3B7- A5 E6 LDA $E6 E3B9- 85 CA STA $CA E3BB- A5 E7 LDA $E7 E3BD- 85 CB STA $CB E3BF- 60 RTS E3C0- 20 C9 E3 JSR $E3C9 E3C3- C8 INY E3C4- B9 00 EB LDA $EB00,Y E3C7- 30 F7 BMI $E3C0 E3C9- C9 8D CMP #$8D E3CB- D0 06 BNE $E3D3 E3CD- A9 00 LDA #$00 E3CF- 85 24 STA $24 E3D1- A9 8D LDA #$8D E3D3- E6 24 INC $24 E3D5- 2C F2 D0 BIT $D0F2 ;??? Apple I hardware? E3D8- 30 FB BMI $E3D5 E3DA- 8D F2 D0 STA $D0F2 ;??? Apple I hardware? E3DD- 60 RTS E3DE- A0 06 LDY #$06 E3E0- 20 D3 EE JSR $EED3 E3E3- 24 D9 BIT $D9 E3E5- 30 03 BMI $E3EA E3E7- 4C B6 E2 JMP $E2B6 E3EA- 4C 9A EB JMP $EB9A E3ED- 2A ROL E3EE- 69 A0 ADC #$A0 E3F0- DD 00 02 CMP $0200,X E3F3- D0 53 BNE $E448 E3F5- B1 FE LDA ($FE),Y E3F7- 0A ASL E3F8- 30 06 BMI $E400 E3FA- 88 DEY E3FB- B1 FE LDA ($FE),Y E3FD- 30 29 BMI $E428 E3FF- C8 INY E400- 86 C8 STX $C8 E402- 98 TYA E403- 48 PHA E404- A2 00 LDX #$00 E406- A1 FE LDA ($FE,X) E408- AA TAX E409- 4A LSR E40A- 49 48 EOR #$48 E40C- 11 FE ORA ($FE),Y E40E- C9 C0 CMP #$C0 E410- 90 01 BCC $E413 E412- E8 INX E413- C8 INY E414- D0 F3 BNE $E409 E416- 68 PLA E417- A8 TAY E418- 8A TXA E419- 4C C0 E4 JMP $E4C0 E41C- E6 F1 INC $F1 E41E- A6 F1 LDX $F1 E420- F0 BC BEQ $E3DE E422- 9D 00 02 STA $0200,X E425- 60 RTS E426- A6 C8 LDX $C8 E428- A9 A0 LDA #$A0 E42A- E8 INX E42B- DD 00 02 CMP $0200,X E42E- B0 FA BCS $E42A E430- B1 FE LDA ($FE),Y E432- 29 3F AND #$3F E434- 4A LSR E435- D0 B6 BNE $E3ED E437- BD 00 02 LDA $0200,X E43A- B0 06 BCS $E442 E43C- 69 3F ADC #$3F E43E- C9 1A CMP #$1A E440- 90 6F BCC $E4B1 E442- 69 4F ADC #$4F E444- C9 0A CMP #$0A E446- 90 69 BCC $E4B1 E448- A6 FD LDX $FD E44A- C8 INY E44B- B1 FE LDA ($FE),Y E44D- 29 E0 AND #$E0 E44F- C9 20 CMP #$20 E451- F0 7A BEQ $E4CD E453- B5 A8 LDA $A8,X E455- 85 C8 STA $C8 E457- B5 D1 LDA $D1,X E459- 85 F1 STA $F1 E45B- 88 DEY E45C- B1 FE LDA ($FE),Y E45E- 0A ASL E45F- 10 FA BPL $E45B E461- 88 DEY E462- B0 38 BCS $E49C E464- 0A ASL E465- 30 35 BMI $E49C E467- B4 58 LDY $58,X E469- 84 FF STY $FF E46B- B4 80 LDY $80,X E46D- E8 INX E46E- 10 DA BPL $E44A E470- F0 B3 BEQ $E425 E472- C9 7E CMP #$7E E474- B0 22 BCS $E498 E476- CA DEX E477- 10 04 BPL $E47D E479- A0 06 LDY #$06 E47B- 10 29 BPL $E4A6 E47D- 94 80 STY $80,X E47F- A4 FF LDY $FF E481- 94 58 STY $58,X E483- A4 C8 LDY $C8 E485- 94 A8 STY $A8,X E487- A4 F1 LDY $F1 E489- 94 D1 STY $D1,X E48B- 29 1F AND #$1F E48D- A8 TAY E48E- B9 20 EC LDA $EC20,Y E491- 0A ASL E492- A8 TAY E493- A9 76 LDA #$76 E495- 2A ROL E496- 85 FF STA $FF E498- D0 01 BNE $E49B E49A- C8 INY E49B- C8 INY E49C- 86 FD STX $FD E49E- B1 FE LDA ($FE),Y E4A0- 30 84 BMI $E426 E4A2- D0 05 BNE $E4A9 E4A4- A0 0E LDY #$0E E4A6- 4C E0 E3 JMP $E3E0 E4A9- C9 03 CMP #$03 E4AB- B0 C3 BCS $E470 E4AD- 4A LSR E4AE- A6 C8 LDX $C8 E4B0- E8 INX E4B1- BD 00 02 LDA $0200,X E4B4- 90 04 BCC $E4BA E4B6- C9 A2 CMP #$A2 E4B8- F0 0A BEQ $E4C4 E4BA- C9 DF CMP #$DF E4BC- F0 06 BEQ $E4C4 E4BE- 86 C8 STX $C8 E4C0- 20 1C E4 JSR $E41C E4C3- C8 INY E4C4- 88 DEY E4C5- A6 FD LDX $FD E4C7- B1 FE LDA ($FE),Y E4C9- 88 DEY E4CA- 0A ASL E4CB- 10 CF BPL $E49C E4CD- B4 58 LDY $58,X E4CF- 84 FF STY $FF E4D1- B4 80 LDY $80,X E4D3- E8 INX E4D4- B1 FE LDA ($FE),Y E4D6- 29 9F AND #$9F E4D8- D0 ED BNE $E4C7 E4DA- 85 F2 STA $F2 E4DC- 85 F3 STA $F3 E4DE- 98 TYA E4DF- 48 PHA E4E0- 86 FD STX $FD E4E2- B4 D0 LDY $D0,X E4E4- 84 C9 STY $C9 E4E6- 18 CLC E4E7- A9 0A LDA #$0A E4E9- 85 F9 STA $F9 E4EB- A2 00 LDX #$00 E4ED- C8 INY E4EE- B9 00 02 LDA $0200,Y E4F1- 29 0F AND #$0F E4F3- 65 F2 ADC $F2 E4F5- 48 PHA E4F6- 8A TXA E4F7- 65 F3 ADC $F3 E4F9- 30 1C BMI $E517 E4FB- AA TAX E4FC- 68 PLA E4FD- C6 F9 DEC $F9 E4FF- D0 F2 BNE $E4F3 E501- 85 F2 STA $F2 E503- 86 F3 STX $F3 E505- C4 F1 CPY $F1 E507- D0 DE BNE $E4E7 E509- A4 C9 LDY $C9 E50B- C8 INY E50C- 84 F1 STY $F1 E50E- 20 1C E4 JSR $E41C E511- 68 PLA E512- A8 TAY E513- A5 F3 LDA $F3 E515- B0 A9 BCS $E4C0 E517- A0 00 LDY #$00 E519- 10 8B BPL $E4A6 E51B- 85 F3 STA $F3 E51D- 86 F2 STX $F2 E51F- A2 04 LDX #$04 E521- 86 C9 STX $C9 E523- A9 B0 LDA #$B0 E525- 85 F9 STA $F9 E527- A5 F2 LDA $F2 E529- DD 63 E5 CMP $E563,X E52C- A5 F3 LDA $F3 E52E- FD 68 E5 SBC $E568,X E531- 90 0D BCC $E540 E533- 85 F3 STA $F3 E535- A5 F2 LDA $F2 E537- FD 63 E5 SBC $E563,X E53A- 85 F2 STA $F2 E53C- E6 F9 INC $F9 E53E- D0 E7 BNE $E527 E540- A5 F9 LDA $F9 E542- E8 INX E543- CA DEX E544- F0 0E BEQ $E554 E546- C9 B0 CMP #$B0 E548- F0 02 BEQ $E54C E54A- 85 C9 STA $C9 E54C- 24 C9 BIT $C9 E54E- 30 04 BMI $E554 E550- A5 FA LDA $FA E552- F0 0B BEQ $E55F E554- 20 C9 E3 JSR $E3C9 E557- 24 F8 BIT $F8 E559- 10 04 BPL $E55F E55B- 99 00 02 STA $0200,Y E55E- C8 INY E55F- CA DEX E560- 10 C1 BPL $E523 E562- 60 RTS E563- 01 0A 64 E8 10 ; Powers of 10 (low bytes) E568- 00 00 00 03 27 ; Powers of 10 (high bytes) E56D- A5 CA LDA $CA E56F- 85 E6 STA $E6 E571- A5 CB LDA $CB E573- 85 E7 STA $E7 E575- E8 INX E576- A5 E7 LDA $E7 E578- 85 E5 STA $E5 E57A- A5 E6 LDA $E6 E57C- 85 E4 STA $E4 E57E- C5 4C CMP $4C E580- A5 E5 LDA $E5 E582- E5 4D SBC $4D E584- B0 26 BCS $E5AC E586- A0 01 LDY #$01 E588- B1 E4 LDA ($E4),Y E58A- E5 CE SBC $CE E58C- C8 INY E58D- B1 E4 LDA ($E4),Y E58F- E5 CF SBC $CF E591- B0 19 BCS $E5AC E593- A0 00 LDY #$00 E595- A5 E6 LDA $E6 E597- 71 E4 ADC ($E4),Y E599- 85 E6 STA $E6 E59B- 90 03 BCC $E5A0 E59D- E6 E7 INC $E7 E59F- 18 CLC E5A0- C8 INY E5A1- A5 CE LDA $CE E5A3- F1 E4 SBC ($E4),Y E5A5- C8 INY E5A6- A5 CF LDA $CF E5A8- F1 E4 SBC ($E4),Y E5AA- B0 CA BCS $E576 E5AC- 60 RTS E5AD- 46 F8 LSR $F8 E5AF- A5 4C LDA $4C E5B1- 85 CA STA $CA E5B3- A5 4D LDA $4D E5B5- 85 CB STA $CB E5B7- A5 4A LDA $4A E5B9- 85 CC STA $CC E5BB- A5 4B LDA $4B E5BD- 85 CD STA $CD E5BF- A9 00 LDA #$00 E5C1- 85 FB STA $FB E5C3- 85 FC STA $FC E5C5- 85 FE STA $FE E5C7- A9 00 LDA #$00 E5C9- 85 1D STA $1D E5CB- 60 RTS E5CC- A5 D0 LDA $D0 E5CE- 69 05 ADC #$05 E5D0- 85 D2 STA $D2 E5D2- A5 D1 LDA $D1 E5D4- 69 00 ADC #$00 E5D6- 85 D3 STA $D3 E5D8- A5 D2 LDA $D2 E5DA- C5 CA CMP $CA E5DC- A5 D3 LDA $D3 E5DE- E5 CB SBC $CB E5E0- 90 03 BCC $E5E5 E5E2- 4C 6B E3 JMP $E36B E5E5- A5 CE LDA $CE E5E7- 91 D0 STA ($D0),Y E5E9- A5 CF LDA $CF E5EB- C8 INY E5EC- 91 D0 STA ($D0),Y E5EE- A5 D2 LDA $D2 E5F0- C8 INY E5F1- 91 D0 STA ($D0),Y E5F3- A5 D3 LDA $D3 E5F5- C8 INY E5F6- 91 D0 STA ($D0),Y E5F8- A9 00 LDA #$00 E5FA- C8 INY E5FB- 91 D0 STA ($D0),Y E5FD- C8 INY E5FE- 91 D0 STA ($D0),Y E600- A5 D2 LDA $D2 E602- 85 CC STA $CC E604- A5 D3 LDA $D3 E606- 85 CD STA $CD E608- A5 D0 LDA $D0 E60A- 90 43 BCC $E64F E60C- 85 CE STA $CE E60E- 84 CF STY $CF E610- 20 FF E6 JSR $E6FF E613- 30 0E BMI $E623 E615- C9 40 CMP #$40 E617- F0 0A BEQ $E623 E619- 4C 28 E6 JMP $E628 E61C- 06 C9 49 D0 ;??? Unreachable? Data? E620- 07 A9 49 E623- 85 CF STA $CF E625- 20 FF E6 JSR $E6FF E628- A5 4B LDA $4B E62A- 85 D1 STA $D1 E62C- A5 4A LDA $4A E62E- 85 D0 STA $D0 E630- C5 CC CMP $CC E632- A5 D1 LDA $D1 E634- E5 CD SBC $CD E636- B0 94 BCS $E5CC E638- B1 D0 LDA ($D0),Y E63A- C8 INY E63B- C5 CE CMP $CE E63D- D0 06 BNE $E645 E63F- B1 D0 LDA ($D0),Y E641- C5 CF CMP $CF E643- F0 0E BEQ $E653 E645- C8 INY E646- B1 D0 LDA ($D0),Y E648- 48 PHA E649- C8 INY E64A- B1 D0 LDA ($D0),Y E64C- 85 D1 STA $D1 E64E- 68 PLA E64F- A0 00 LDY #$00 E651- F0 DB BEQ $E62E E653- A5 D0 LDA $D0 E655- 69 03 ADC #$03 E657- 20 0A E7 JSR $E70A E65A- A5 D1 LDA $D1 E65C- 69 00 ADC #$00 E65E- 95 78 STA $78,X E660- A5 CF LDA $CF E662- C9 40 CMP #$40 E664- D0 1C BNE $E682 E666- 88 DEY E667- 98 TYA E668- 20 0A E7 JSR $E70A E66B- 88 DEY E66C- 94 78 STY $78,X E66E- A0 03 LDY #$03 E670- F6 78 INC $78,X E672- C8 INY E673- B1 D0 LDA ($D0),Y E675- 30 F9 BMI $E670 E677- 10 09 BPL $E682 E679- A9 00 LDA #$00 E67B- 85 D4 STA $D4 E67D- 85 D5 STA $D5 E67F- A2 20 LDX #$20 E681- 48 PHA E682- A0 00 LDY #$00 E684- B1 E0 LDA ($E0),Y E686- 10 18 BPL $E6A0 E688- 0A ASL E689- 30 81 BMI $E60C E68B- 20 FF E6 JSR $E6FF E68E- 20 08 E7 JSR $E708 E691- 20 FF E6 JSR $E6FF E694- 95 A0 STA $A0,X E696- 24 D4 BIT $D4 E698- 10 01 BPL $E69B E69A- CA DEX E69B- 20 FF E6 JSR $E6FF E69E- B0 E6 BCS $E686 E6A0- C9 28 CMP #$28 E6A2- D0 1F BNE $E6C3 E6A4- A5 E0 LDA $E0 E6A6- 20 0A E7 JSR $E70A E6A9- A5 E1 LDA $E1 E6AB- 95 78 STA $78,X E6AD- 24 D4 BIT $D4 E6AF- 30 0B BMI $E6BC E6B1- A9 01 LDA #$01 E6B3- 20 0A E7 JSR $E70A E6B6- A9 00 LDA #$00 E6B8- 95 78 STA $78,X E6BA- F6 78 INC $78,X E6BC- 20 FF E6 JSR $E6FF E6BF- 30 F9 BMI $E6BA E6C1- B0 D3 BCS $E696 E6C3- 24 D4 BIT $D4 E6C5- 10 06 BPL $E6CD E6C7- C9 04 CMP #$04 E6C9- B0 D0 BCS $E69B E6CB- 46 D4 LSR $D4 E6CD- A8 TAY E6CE- 85 D6 STA $D6 E6D0- B9 98 E9 LDA $E998,Y E6D3- 29 55 AND #$55 E6D5- 0A ASL E6D6- 85 D7 STA $D7 E6D8- 68 PLA E6D9- A8 TAY E6DA- B9 98 E9 LDA $E998,Y E6DD- 29 AA AND #$AA E6DF- C5 D7 CMP $D7 E6E1- B0 09 BCS $E6EC E6E3- 98 TYA E6E4- 48 PHA E6E5- 20 FF E6 JSR $E6FF E6E8- A5 D6 LDA $D6 E6EA- 90 95 BCC $E681 E6EC- B9 10 EA LDA $EA10,Y E6EF- 85 CE STA $CE E6F1- B9 88 EA LDA $EA88,Y E6F4- 85 CF STA $CF E6F6- 20 FC E6 JSR $E6FC E6F9- 4C D8 E6 JMP $E6D8 E6FC- 6C CE 00 JMP ($00CE) E6FF- E6 E0 INC $E0 E701- D0 02 BNE $E705 E703- E6 E1 INC $E1 E705- B1 E0 LDA ($E0),Y E707- 60 RTS E708- 94 77 STY $77,X E70A- CA DEX E70B- 30 03 BMI $E710 E70D- 95 50 STA $50,X E70F- 60 RTS E710- A0 66 LDY #$66 E712- 4C E0 E3 JMP $E3E0 E715- A0 00 LDY #$00 E717- B5 50 LDA $50,X E719- 85 CE STA $CE E71B- B5 A0 LDA $A0,X E71D- 85 CF STA $CF E71F- B5 78 LDA $78,X E721- F0 0E BEQ $E731 E723- 85 CF STA $CF E725- B1 CE LDA ($CE),Y E727- 48 PHA E728- C8 INY E729- B1 CE LDA ($CE),Y E72B- 85 CF STA $CF E72D- 68 PLA E72E- 85 CE STA $CE E730- 88 DEY E731- E8 INX E732- 60 RTS E733- 20 4A E7 JSR $E74A E736- 20 15 E7 JSR $E715 E739- 98 TYA E73A- 20 08 E7 JSR $E708 E73D- 95 A0 STA $A0,X E73F- C5 CE CMP $CE E741- D0 06 BNE $E749 E743- C5 CF CMP $CF E745- D0 02 BNE $E749 E747- F6 50 INC $50,X E749- 60 RTS E74A- 20 82 E7 JSR $E782 E74D- 20 59 E7 JSR $E759 E750- 20 15 E7 JSR $E715 E753- 24 CF BIT $CF E755- 30 1B BMI $E772 E757- CA DEX E758- 60 RTS E759- 20 15 E7 JSR $E715 E75C- A5 CF LDA $CF E75E- D0 04 BNE $E764 E760- A5 CE LDA $CE E762- F0 F3 BEQ $E757 E764- A9 FF LDA #$FF E766- 20 08 E7 JSR $E708 E769- 95 A0 STA $A0,X E76B- 24 CF BIT $CF E76D- 30 E9 BMI $E758 E76F- 20 15 E7 JSR $E715 E772- 98 TYA E773- 38 SEC E774- E5 CE SBC $CE E776- 20 08 E7 JSR $E708 E779- 98 TYA E77A- E5 CF SBC $CF E77C- 50 23 BVC $E7A1 E77E- A0 00 LDY #$00 E780- 10 90 BPL $E712 E782- 20 6F E7 JSR $E76F E785- 20 15 E7 JSR $E715 E788- A5 CE LDA $CE E78A- 85 DA STA $DA E78C- A5 CF LDA $CF E78E- 85 DB STA $DB E790- 20 15 E7 JSR $E715 E793- 18 CLC E794- A5 CE LDA $CE E796- 65 DA ADC $DA E798- 20 08 E7 JSR $E708 E79B- A5 CF LDA $CF E79D- 65 DB ADC $DB E79F- 70 DD BVS $E77E E7A1- 95 A0 STA $A0,X E7A3- 60 RTS E7A4- 20 15 E7 JSR $E715 E7A7- A4 CE LDY $CE E7A9- F0 05 BEQ $E7B0 E7AB- 88 DEY E7AC- A5 CF LDA $CF E7AE- F0 0C BEQ $E7BC E7B0- 60 RTS E7B1- A5 24 LDA $24 E7B3- 09 07 ORA #$07 E7B5- A8 TAY E7B6- C8 INY E7B7- A9 A0 LDA #$A0 E7B9- 20 C9 E3 JSR $E3C9 E7BC- C4 24 CPY $24 E7BE- B0 F7 BCS $E7B7 E7C0- 60 RTS E7C1- 20 B1 E7 JSR $E7B1 E7C4- 20 15 E7 JSR $E715 E7C7- A5 CF LDA $CF E7C9- 10 0A BPL $E7D5 E7CB- A9 AD LDA #$AD E7CD- 20 C9 E3 JSR $E3C9 E7D0- 20 72 E7 JSR $E772 E7D3- 50 EF BVC $E7C4 E7D5- 88 DEY E7D6- 84 D5 STY $D5 E7D8- 86 CF STX $CF E7DA- A6 CE LDX $CE E7DC- 20 1B E5 JSR $E51B E7DF- A6 CF LDX $CF E7E1- 60 RTS E7E2- 20 15 E7 JSR $E715 E7E5- A5 CE LDA $CE E7E7- 85 F6 STA $F6 E7E9- A5 CF LDA $CF E7EB- 85 F7 STA $F7 E7ED- 88 DEY E7EE- 84 F8 STY $F8 E7F0- C8 INY E7F1- A9 0A LDA #$0A E7F3- 85 F4 STA $F4 E7F5- 84 F5 STY $F5 E7F7- 60 RTS E7F8- 20 15 E7 JSR $E715 E7FB- A5 CE LDA $CE E7FD- A4 CF LDY $CF E7FF- 10 F2 BPL $E7F3 E801- 20 15 E7 JSR $E715 E804- B5 50 LDA $50,X E806- 85 DA STA $DA E808- B5 78 LDA $78,X E80A- 85 DB STA $DB E80C- A5 CE LDA $CE E80E- 91 DA STA ($DA),Y E810- C8 INY E811- A5 CF LDA $CF E813- 91 DA STA ($DA),Y E815- E8 INX E816- 60 RTS E817- 68 PLA E818- 68 PLA E819- 24 D5 BIT $D5 E81B- 10 05 BPL $E822 E81D- 20 CD E3 JSR $E3CD E820- 46 D5 LSR $D5 E822- 60 RTS ; (Address corrected) E823- A0 FF LDY #$FF E825- 84 D7 STY $D7 E827- 60 RTS E828- 20 CD EF JSR $EFCD E82B- F0 07 BEQ $E834 E82D- A9 25 LDA #$25 E82F- 85 D6 STA $D6 E831- 88 DEY E832- 84 D4 STY $D4 E834- E8 INX E835- 60 RTS E836- A5 CA LDA $CA E838- A4 CB LDY $CB E83A- D0 5A BNE $E896 E83C- A0 41 LDY #$41 E83E- A5 FC LDA $FC E840- C9 08 CMP #$08 E842- B0 5E BCS $E8A2 E844- A8 TAY E845- E6 FC INC $FC E847- A5 E0 LDA $E0 E849- 99 00 01 STA $0100,Y E84C- A5 E1 LDA $E1 E84E- 99 08 01 STA $0108,Y E851- A5 DC LDA $DC E853- 99 10 01 STA $0110,Y E856- A5 DD LDA $DD E858- 99 18 01 STA $0118,Y E85B- 20 15 E7 JSR $E715 E85E- 20 6D E5 JSR $E56D E861- 90 04 BCC $E867 E863- A0 37 LDY #$37 E865- D0 3B BNE $E8A2 E867- A5 E4 LDA $E4 E869- A4 E5 LDY $E5 E86B- 85 DC STA $DC E86D- 84 DD STY $DD E86F- 2C 11 D0 BIT $D011 ; Key pressed? E872- 30 4F BMI $E8C3 E874- 18 CLC E875- 69 03 ADC #$03 E877- 90 01 BCC $E87A E879- C8 INY E87A- A2 FF LDX #$FF E87C- 86 D9 STX $D9 E87E- 9A TXS E87F- 85 E0 STA $E0 E881- 84 E1 STY $E1 E883- 20 79 E6 JSR $E679 E886- 24 D9 BIT $D9 E888- 10 49 BPL $E8D3 E88A- 18 CLC E88B- DC ??? E88C- 0D A5 DC ORA $DCA5 E88F- 71 DC ADC ($DC),Y E891- A4 DD LDY $DD E893- 90 01 BCC $E896 E895- C8 INY E896- C5 4C CMP $4C E898- D0 D1 BNE $E86B E89A- C4 4D CPY $4D E89C- D0 CD BNE $E86B E89E- A0 34 LDY #$34 E8A0- 46 4C LSR $4C E8A2- E0 E3 CPX #$E3 E8A4- FF ??? E8A5- A0 4A LDY #$4A E8A7- A5 FC LDA $FC E8A9- F0 F7 BEQ $E8A2 E8AB- C6 FC DEC $FC E8AD- A8 TAY E8AE- B9 0F 01 LDA $010F,Y E8B1- 85 DC STA $DC E8B3- B9 17 01 LDA $0117,Y E8B6- 85 DD STA $DD E8B8- BE FF 00 LDX $00FF,Y E8BB- B9 07 01 LDA $0107,Y E8BE- A8 TAY E8BF- 8A TXA E8C0- 4C 7A E8 JMP $E87A E8C3- A0 63 LDY #$63 E8C5- 20 C4 E3 JSR $E3C4 E8C8- A0 01 LDY #$01 E8CA- B1 DC LDA ($DC),Y E8CC- AA TAX E8CD- C8 INY E8CE- B1 DC LDA ($DC),Y E8D0- 20 1B E5 JSR $E51B E8D3- 4C B3 E2 JMP $E2B3 E8D6- C6 FB DEC $FB E8D8- A0 5B LDY #$5B E8DA- A5 FB LDA $FB E8DC- F0 C4 BEQ $E8A2 E8DE- A8 TAY E8DF- B5 50 LDA $50,X E8E1- D9 1F 01 CMP $011F,Y E8E4- D0 F0 BNE $E8D6 E8E6- B5 78 LDA $78,X E8E8- D9 27 01 CMP $0127,Y E8EB- D0 E9 BNE $E8D6 E8ED- B9 2F 01 LDA $012F,Y E8F0- 85 DA STA $DA E8F2- B9 37 01 LDA $0137,Y E8F5- 85 DB STA $DB E8F7- 20 15 E7 JSR $E715 E8FA- CA DEX E8FB- 20 93 E7 JSR $E793 E8FE- 20 01 E8 JSR $E801 E901- CA DEX E902- A4 FB LDY $FB E904- B9 67 01 LDA $0167,Y E907- 95 9F STA $9F,X E909- B9 5F 01 LDA $015F,Y E90C- A0 00 LDY #$00 E90E- 20 08 E7 JSR $E708 E911- 20 82 E7 JSR $E782 E914- 20 59 E7 JSR $E759 E917- 20 15 E7 JSR $E715 E91A- A4 FB LDY $FB E91C- A5 CE LDA $CE E91E- F0 05 BEQ $E925 E920- 59 37 01 EOR $0137,Y E923- 10 12 BPL $E937 E925- B9 3F 01 LDA $013F,Y E928- 85 DC STA $DC E92A- B9 47 01 LDA $0147,Y E92D- 85 DD STA $DD E92F- BE 4F 01 LDX $014F,Y E932- B9 57 01 LDA $0157,Y E935- D0 87 BNE $E8BE E937- C6 FB DEC $FB E939- 60 RTS E93A- A0 54 LDY #$54 E93C- A5 FB LDA $FB E93E- C9 08 CMP #$08 E940- F0 9A BEQ $E8DC E942- E6 FB INC $FB E944- A8 TAY E945- B5 50 LDA $50,X E947- 99 20 01 STA $0120,Y E94A- B5 78 LDA $78,X E94C- 99 28 01 STA $0128,Y E94F- 60 RTS E950- 20 15 E7 JSR $E715 E953- A4 FB LDY $FB E955- A5 CE LDA $CE E957- 99 5F 01 STA $015F,Y E95A- A5 CF LDA $CF E95C- 99 67 01 STA $0167,Y E95F- A9 01 LDA #$01 E961- 99 2F 01 STA $012F,Y E964- A9 00 LDA #$00 E966- 99 37 01 STA $0137,Y E969- A5 DC LDA $DC E96B- 99 3F 01 STA $013F,Y E96E- A5 DD LDA $DD E970- 99 47 01 STA $0147,Y E973- A5 E0 LDA $E0 E975- 99 4F 01 STA $014F,Y E978- A5 E1 LDA $E1 E97A- 99 57 01 STA $0157,Y E97D- 60 RTS E97E- 20 15 E7 JSR $E715 E981- A4 FB LDY $FB E983- A5 CE LDA $CE E985- 99 2F 01 STA $012F,Y E988- A5 CF LDA $CF E98A- 4C 66 E9 JMP $E966 E98D- 00 00 00 E990- 00 00 00 00 00 00 00 00 E998- 00 00 00 AB 03 03 03 03 ; Table E9A0- 03 03 03 03 03 03 03 03 E9A8- 03 03 3F 3F C0 C0 3C 3C E9B0- 3C 3C 3C 3C 3C 30 0F C0 E9B8- CC FF 55 00 AB AB 03 03 E9C0- FF FF 55 FF FF 55 CF CF E9C8- CF CF CF FF 55 C3 C3 C3 E9D0- 55 F0 F0 CF 56 56 56 55 E9D8- FF FF 55 03 03 03 03 03 E9E0- 03 03 FF FF FF 03 03 03 E9E8- 03 03 03 03 03 03 03 03 E9F0- 03 03 03 03 03 00 AB 03 E9F8- 57 03 03 03 03 07 03 03 EA00- 03 03 03 03 03 03 03 03 EA08- 03 03 AA FF FF FF FF FF EA10- 17 FF FF 19 5D 35 4B F2 ; JSR table (low bytes) EA18- EC 87 6F AD B7 E2 F8 54 EA20- 80 96 85 82 22 10 33 4A EA28- 13 06 0B 4A 01 40 47 7A EA30- 00 FF 23 09 5B 16 B6 CB EA38- FF FF FB FF FF 24 F6 4E EA40- 59 50 00 FF 23 3A 6F 36 EA48- 23 D7 1C 22 C2 AE BA 23 EA50- FF FF 21 30 1E 03 C4 20 EA58- 00 C1 FF FF FF A0 30 1E EA60- A4 D3 B6 BC AA 3A 01 50 EA68- 7E D8 D8 A5 3C FF 16 5B EA70- 28 03 C4 1D 00 0C 4E 00 EA78- 3E 00 A6 B0 00 BC C6 57 EA80- 8C 01 27 FF FF FF FF FF EA88- E8 FF FF E8 E0 E0 E0 EF ; JSR table (high bytes) EA90- EF E3 E3 E5 E5 E7 E7 EE EA98- EF EF E7 E7 E2 EF E7 E7 EAA0- EC EC EC E7 EC EC EC E2 EAA8- 00 FF E8 E1 E8 E8 EF EB EAB0- FF FF E0 FF FF EF EE EF EAB8- E7 E7 00 FF E8 E7 E7 E7 EAC0- E8 E1 E2 EE EE EE EE E8 EAC8- FF FF E1 E1 EF EE E7 E8 EAD0- EE E7 FF FF FF EE E1 EF EAD8- E7 E8 EF EF EB E9 E8 E9 EAE0- E9 E8 E8 E8 E8 FF E8 E8 EAE8- E8 EE E7 E8 EF EF EE EF EAF0- EE EF EE EE EF EE EE EE EAF8- E1 E8 E8 FF FF FF FF FF EB00- BE B3 B2 B7 B6 37 ; '>32767' EB06- D4 CF CF A0 CC CF CE 47 ; 'TOO LONG' EB0E- D3 D9 CE D4 C1 58 ; 'SYNTAX' EB14- CD C5 CD A0 C6 D5 CC 4C ; 'MEM FULL' EB1C- D4 CF CF A0 CD C1 CE D9 ; 'TOO MANY EB24- A0 D0 C1 D2 C5 CE 53 ; PARENS' EB2B- D3 D4 D2 C9 CE 47 ; 'STRING' EB31- CE CF A0 C5 CE 44 ; 'NO END' EB37- C2 C1 C4 A0 C2 D2 C1 CE C3 48 ; 'BAD BRANCH' EB41- BE B8 A0 C7 CF D3 D5 C2 53 ; '>8 GOSUBS' EB4A- C2 C1 C4 A0 D2 C5 D4 D5 D2 4E ; 'BAD RETURN' EB54- BE B8 A0 C6 CF D2 53 ; '>8 FORS' EB5B- C2 C1 C4 A0 CE C5 D8 54 ; 'BAD NEXT' EB63- D3 D4 CF D0 D0 C5 C4 A0 C1 D4 20 ; 'STOPPED AT ' EB6E- AA AA AA 20 ; '*** ' EB73- A0 C5 D2 D2 0D ; ' ERR' EB77- BE B2 B5 35 ; '>255' EB7B- D2 C1 CE C7 45 ; 'RANGE' EB80- C4 C9 4D ; 'DIM' EB83- D3 D4 D2 A0 CF D6 C6 4C ; 'STR OVFL' E88B- DC 0D ; '\' EB8D- D2 C5 D4 D9 D0 C5 A0 CC C9 CE C5 8D ; 'RETYPE LINE' EB99- 3F ; '?' EB9A- 46 D9 LSR $D9 EB9C- 90 03 BCC $EBA1 EB9E- 4C C3 E8 JMP $E8C3 EBA1- A6 CF LDX $CF EBA3- 9A TXS EBA4- A6 CE LDX $CE EBA6- A0 8D LDY #$8D EBA8- D0 02 BNE $EBAC EBAA- A0 99 LDY #$99 EBAC- 20 C4 E3 JSR $E3C4 EBAF- 86 CE STX $CE EBB1- BA TSX EBB2- 86 CF STX $CF EBB4- A0 FE LDY #$FE EBB6- 84 D9 STY $D9 EBB8- C8 INY EBB9- 84 C8 STY $C8 EBBB- 20 99 E2 JSR $E299 EBBE- 84 F1 STY $F1 EBC0- A2 20 LDX #$20 EBC2- A9 30 LDA #$30 EBC4- 20 91 E4 JSR $E491 EBC7- E6 D9 INC $D9 EBC9- A6 CE LDX $CE EBCB- A4 C8 LDY $C8 EBCD- 0A ASL EBCE- 85 CE STA $CE EBD0- C8 INY EBD1- B9 00 02 LDA $0200,Y EBD4- C9 74 CMP #$74 EBD6- F0 D2 BEQ $EBAA EBD8- 49 B0 EOR #$B0 EBDA- C9 0A CMP #$0A EBDC- B0 F0 BCS $EBCE EBDE- C8 INY EBDF- C8 INY EBE0- 84 C8 STY $C8 EBE2- B9 00 02 LDA $0200,Y EBE5- 48 PHA EBE6- B9 FF 01 LDA $01FF,Y EBE9- A0 00 LDY #$00 EBEB- 20 08 E7 JSR $E708 EBEE- 68 PLA EBEF- 95 A0 STA $A0,X EBF1- A5 CE LDA $CE EBF3- C9 C7 CMP #$C7 EBF5- D0 03 BNE $EBFA EBF7- 20 6F E7 JSR $E76F EBFA- 4C 01 E8 JMP $E801 EBFD- FF FF FF 50 EC01- 20 13 EC JSR $EC13 EC04- D0 15 BNE $EC1B ; (Address corrected) EC06- 20 0B EC JSR $EC0B EC09- D0 10 BNE $EC1B EC0B- 20 82 E7 JSR $E782 EC0E- 20 6F E7 JSR $E76F EC11- 50 03 BVC $EC16 EC13- 20 82 E7 JSR $E782 EC16- 20 59 E7 JSR $E759 EC19- 56 50 LSR $50,X EC1B- 4C 36 E7 JMP $E736 EC1E- FF FF EC20- C1 FF 7F D1 CC C7 CF CE ; Table EC28- C5 9A 98 8B 96 95 93 BF EC30- B2 32 2D 2B BC B0 AC BE EC38- 35 8E 61 FF FF FF DD FB EC40- 20 C9 EF JSR $EFC9 ; (Address corrected) EC43- 15 4F ORA $4F,X EC45- 10 05 BPL $EC4C EC47- 20 C9 EF JSR $EFC9 EC4A- 35 4F AND $4F,X EC4C- 95 50 STA $50,X EC4E- 10 CB BPL $EC1B EC50- 4C C9 EF JMP $EFC9 EC53- 50 60 8D 60 8B EC58- 00 7E 8C 33 00 00 60 03 EC60- BF 12 00 40 89 C9 47 9D EC68- 17 68 9D 0A 00 40 60 8D EC70- 60 8B 00 7E 8C 3C 00 00 EC78- 60 03 BF 1B 4B 67 B4 A1 EC80- 17 8C 07 AE A9 AC A8 67 EC88- 8C 07 B4 AF AC B0 67 9D EC90- B2 AF AC AF A3 67 8C 07 EC98- A5 AB AF B0 F4 AE A9 B2 ECA0- B0 7F E0 27 B4 AE A9 B2 ECA8- B0 7F 0E 28 B4 AE A9 B2 ECB0- B0 64 07 A6 A9 67 AF B4 ECB8- AF A7 78 B4 A5 AC 78 7F ECC0- 02 AD A5 B2 67 A2 B5 B3 ECC8- AF A7 EE B2 B5 B4 A5 B2 ECD0- 7E 8C 39 B4 B8 A5 AE 67 ECD8- B0 A5 B4 B3 27 AF B4 07 ECE0- 9D 19 B2 AF A6 7F 05 37 ECE8- B4 B5 B0 AE A9 7F 05 28 ECF0- B4 B5 B0 AE A9 7F 05 2A ; (G5 corrected (?) to B5) ECF8- B4 B5 B0 AE A9 E4 AE A5 ED00- 00 FF FF 47 A2 A1 B4 7F ED08- 0D 30 AD A9 A4 7F 0D 23 ED10- AD A9 A4 67 AC AC A1 A3 ED18- 00 40 80 C0 C1 80 00 47 ED20- 8C 68 8C DB 67 9B 68 9B ED28- 50 8C 63 8C 7F 01 51 07 ED30- 88 29 84 80 C4 80 57 71 ED38- 07 88 14 ED A5 AD AF AC ED40- ED A5 AD A9 A8 F2 AF AC ED48- AF A3 71 08 88 AD A5 AC ED50- 68 83 08 68 9D 08 71 07 ED58- 88 60 76 B4 AF AE 76 8D ED60- 76 8B 51 07 88 19 B8 A4 ED68- AE B2 F2 B3 B5 F3 A2 A1 ED70- EE A7 B3 E4 AE B2 EB A5 ED78- A5 B0 51 07 88 39 81 C1 ED80- 4F 7F 0F 2F 00 51 06 88 ED88- 29 C2 0C 82 57 8C 6A 8C ED90- 42 AE A5 A8 B4 60 AE A5 ED98- A8 B4 4F 7E 1E 35 8C 27 EDA0- 51 07 88 09 8B FE E4 AF EDA8- AD F2 AF E4 AE A1 DC DE EDB0- 9C DD 9C DE DD 9E C3 DD EDB8- CF CA CD CB 00 47 9D AD EDC0- A5 AD AF AC 76 9D AD A5 EDC8- AD A9 A8 E6 A6 AF 60 8C EDD0- 20 AF B4 B5 A1 F2 AC A3 EDD8- F2 A3 B3 60 8C 20 AC A5 EDE0- A4 EE B5 B2 60 AE B5 B2 EDE8- F4 B3 A9 AC 60 8C 20 B4 EDF0- B3 A9 AC 7A 7E 9A 22 20 EDF8- 00 60 03 BF 60 03 BF 1F EE00- 20 B1 E7 JSR $E7B1 EE03- E8 INX EE04- E8 INX EE05- B5 4F LDA $4F,X EE07- 85 DA STA $DA EE09- B5 77 LDA $77,X EE0B- 85 DB STA $DB EE0D- B4 4E LDY $4E,X EE0F- 98 TYA EE10- D5 76 CMP $76,X EE12- B0 09 BCS $EE1D EE14- B1 DA LDA ($DA),Y EE16- 20 C9 E3 JSR $E3C9 EE19- C8 INY EE1A- 4C 0F EE JMP $EE0F EE1D- A9 FF LDA #$FF EE1F- 85 D5 STA $D5 EE21- 60 RTS EE22- E8 INX EE23- A9 00 LDA #$00 EE25- 95 78 STA $78,X EE27- 95 A0 STA $A0,X EE29- B5 77 LDA $77,X EE2B- 38 SEC EE2C- F5 4F SBC $4F,X EE2E- 95 50 STA $50,X EE30- 4C 23 E8 JMP $E823 EE33- FF EE34- 20 15 E7 JSR $E715 EE37- A5 CF LDA $CF EE39- D0 28 BNE $EE63 EE3B- A5 CE LDA $CE EE3D- 60 RTS EE3E- 20 34 EE JSR $EE34 EE41- A4 C8 LDY $C8 EE43- C9 30 CMP #$30 EE45- B0 21 BCS $EE68 EE47- C0 28 CPY #$28 EE49- B0 1D BCS $EE68 EE4B- 60 RTS EE4C- EA NOP EE4D- EA NOP EE4E- 20 34 EE JSR $EE34 EE51- 60 RTS EE52- EA NOP EE53- 8A TXA EE54- A2 01 LDX #$01 EE56- B4 CE LDY $CE,X EE58- 94 4C STY $4C,X EE5A- B4 48 LDY $48,X EE5C- 94 CA STY $CA,X EE5E- CA DEX EE5F- F0 F5 BEQ $EE56 EE61- AA TAX EE62- 60 RTS EE63- A0 77 LDY #$77 EE65- 4C E0 E3 JMP $E3E0 EE68- A0 7B LDY #$7B EE6A- D0 F9 BNE $EE65 EE6C- 20 54 E2 JSR $E254 EE6F- A5 DA LDA $DA EE71- D0 07 BNE $EE7A EE73- A5 DB LDA $DB EE75- D0 03 BNE $EE7A EE77- 4C 7E E7 JMP $E77E EE7A- 06 CE ASL $CE EE7C- 26 CF ROL $CF EE7E- 26 E6 ROL $E6 EE80- 26 E7 ROL $E7 EE82- A5 E6 LDA $E6 EE84- C5 DA CMP $DA EE86- A5 E7 LDA $E7 EE88- E5 DB SBC $DB EE8A- 90 0A BCC $EE96 EE8C- 85 E7 STA $E7 EE8E- A5 E6 LDA $E6 EE90- E5 DA SBC $DA EE92- 85 E6 STA $E6 EE94- E6 CE INC $CE EE96- 88 DEY EE97- D0 E1 BNE $EE7A EE99- 60 RTS EE9A- FF FF FF FF FF FF EEA0- 20 15 E7 JSR $E715 EEA3- 6C CE 00 JMP ($00CE) EEA6- A5 4C LDA $4C EEA8- D0 02 BNE $EEAC EEAA- C6 4D DEC $4D EEAC- C6 4C DEC $4C EEAE- A5 48 LDA $48 EEB0- D0 02 BNE $EEB4 EEB2- C6 49 DEC $49 EEB4- C6 48 DEC $48 EEB6- A0 00 LDY #$00 EEB8- B1 4C LDA ($4C),Y EEBA- 91 48 STA ($48),Y EEBC- A5 CA LDA $CA EEBE- C5 4C CMP $4C EEC0- A5 CB LDA $CB EEC2- E5 4D SBC $4D EEC4- 90 E0 BCC $EEA6 EEC6- 4C 53 EE JMP $EE53 EEC9- C9 28 CMP #$28 EECB- B0 9B BCS $EE68 EECD- A8 TAY EECE- A5 C8 LDA $C8 EED0- 60 RTS EED1- EA NOP EED2- EA NOP EED3- 98 TYA EED4- AA TAX EED5- A0 6E LDY #$6E EED7- 20 C4 E3 JSR $E3C4 EEDA- 8A TXA EEDB- A8 TAY EEDC- 20 C4 E3 JSR $E3C4 EEDF- A0 72 LDY #$72 EEE1- 4C C4 E3 JMP $E3C4 EEE4- 20 15 E7 JSR $E715 EEE7- 06 CE ASL $CE EEE9- 26 CF ROL $CF EEEB- 30 FA BMI $EEE7 EEED- B0 DC BCS $EECB EEEF- D0 04 BNE $EEF5 EEF1- C5 CE CMP $CE EEF3- B0 D6 BCS $EECB EEF5- 60 RTS EEF6- 20 15 E7 JSR $E715 EEF9- B1 CE LDA ($CE),Y EEFB- 94 9F STY $9F,X EEFD- 4C 08 E7 JMP $E708 EF00- 20 34 EE JSR $EE34 EF03- A5 CE LDA $CE EF05- 48 PHA EF06- 20 15 E7 JSR $E715 EF09- 68 PLA EF0A- 91 CE STA ($CE),Y EF0C- 60 RTS EF0D- FF FF FF EF10- 20 6C EE JSR $EE6C EF13- A5 CE LDA $CE EF15- 85 E6 STA $E6 EF17- A5 CF LDA $CF EF19- 85 E7 STA $E7 EF1B- 4C 44 E2 JMP $E244 EF1E- 20 E4 EE JSR $EEE4 EF21- 4C 34 E1 JMP $E134 EF24- 20 E4 EE JSR $EEE4 EF27- B4 78 LDY $78,X EF29- B5 50 LDA $50,X EF2B- 69 FE ADC #$FE EF2D- B0 01 BCS $EF30 EF2F- 88 DEY EF30- 85 DA STA $DA EF32- 84 DB STY $DB EF34- 18 CLC EF35- 65 CE ADC $CE EF37- 95 50 STA $50,X EF39- 98 TYA EF3A- 65 CF ADC $CF EF3C- 95 78 STA $78,X EF3E- A0 00 LDY #$00 EF40- B5 50 LDA $50,X EF42- D1 DA CMP ($DA),Y EF44- C8 INY EF45- B5 78 LDA $78,X EF47- F1 DA SBC ($DA),Y EF49- B0 80 BCS $EECB EF4B- 4C 23 E8 JMP $E823 EF4E- 20 15 E7 JSR $E715 EF51- A5 4E LDA $4E EF53- 20 08 E7 JSR $E708 EF56- A5 4F LDA $4F EF58- D0 04 BNE $EF5E EF5A- C5 4E CMP $4E EF5C- 69 00 ADC #$00 EF5E- 29 7F AND #$7F EF60- 85 4F STA $4F EF62- 95 A0 STA $A0,X EF64- A0 11 LDY #$11 EF66- A5 4F LDA $4F EF68- 0A ASL EF69- 18 CLC EF6A- 69 40 ADC #$40 EF6C- 0A ASL EF6D- 26 4E ROL $4E EF6F- 26 4F ROL $4F EF71- 88 DEY EF72- D0 F2 BNE $EF66 EF74- A5 CE LDA $CE EF76- 20 08 E7 JSR $E708 EF79- A5 CF LDA $CF EF7B- 95 A0 STA $A0,X EF7D- 4C 7A E2 JMP $E27A EF80- 20 15 E7 JSR $E715 EF83- A4 CE LDY $CE EF85- C4 4C CPY $4C EF87- A5 CF LDA $CF EF89- E5 4D SBC $4D EF8B- 90 1F BCC $EFAC EF8D- 84 48 STY $48 EF8F- A5 CF LDA $CF EF91- 85 49 STA $49 EF93- 4C B6 EE JMP $EEB6 EF96- 20 15 E7 JSR $E715 EF99- A4 CE LDY $CE EF9B- C4 CA CPY $CA EF9D- A5 CF LDA $CF EF9F- E5 CB SBC $CB EFA1- B0 09 BCS $EFAC EFA3- 84 4A STY $4A EFA5- A5 CF LDA $CF EFA7- 85 4B STA $4B EFA9- 4C B7 E5 JMP $E5B7 EFAC- 4C CB EE JMP $EECB EFAF- EA NOP EFB0- EA NOP EFB1- EA NOP EFB2- EA NOP EFB3- 20 C9 EF JSR $EFC9 EFB6- 20 71 E1 JSR $E171 EFB9- 4C BF EF JMP $EFBF EFBC- 20 03 EE JSR $EE03 EFBF- A9 FF LDA #$FF EFC1- 85 C8 STA $C8 EFC3- A9 74 LDA #$74 EFC5- 8D 00 02 STA $0200 EFC8- 60 RTS EFC9- 20 36 E7 JSR $E736 EFCC- E8 INX EFCD- 20 36 E7 JSR $E736 EFD0- B5 50 LDA $50,X EFD2- 60 RTS EFD3- A9 00 LDA #$00 EFD5- 85 4A STA $4A EFD7- 85 4C STA $4C EFD9- A9 08 LDA #$08 EFDB- 85 4B STA $4B EFDD- A9 10 LDA #$10 EFDF- 85 4D STA $4D EFE1- 4C AD E5 JMP $E5AD EFE4- D5 78 CMP $78,X EFE6- D0 01 BNE $EFE9 EFE8- 18 CLC EFE9- 4C 02 E1 JMP $E102 EFEC- 20 B7 E5 JSR $E5B7 EFEF- 4C 36 E8 JMP $E836 EFF2- 20 B7 E5 JSR $E5B7 EFF5- 4C 5B E8 JMP $E85B EFF8- E0 80 CPX #$80 EFFA- D0 01 BNE $EFFD EFFC- 88 DEY EFFD- 4C 0C E0 JMP $E00C