EDTASM+/01.01.00 PAGE 1 0E00 00100 ORG $0E00 0E00 0E0A 00110 USR0 FDB RECORD 0E02 0E4B 00120 USR1 FDB PLAY 0E04 0000 00130 SB FDB $0000 0E06 FFFF 00140 SE FDB $FFFF 0E08 01 00150 DELAY FCB 1 0E09 00 00160 PAGE FCB 0 00170 0E0A 1A 50 00180 RECORD ORCC #$50 0E0C 4F 00190 CLRA 0E0D B7 0E09 00200 STA PAGE 00210 0E10 B6 0E09 00220 REC100 LDA PAGE 0E13 8B 30 00230 ADDA #$30 0E15 B7 FFA1 00240 STA $FFA1 0E18 8E 2000 00250 LDX #$2000 00260 0E1B C6 08 00270 REC150 LDB #8 0E1D 4F 00280 CLRA 0E1E 34 02 00290 PSHS A 0E20 B6 FF20 00300 REC200 LDA $FF20 0E23 44 00310 LSRA 0E24 66 E4 00320 ROR ,S 0E26 B6 0E08 00330 REC201 LDA DELAY 0E29 4A 00340 REC202 DECA 0E2A 26 FD 00350 BNE REC202 0E2C 5A 00360 DECB 0E2D 26 F1 00370 BNE REC200 0E2F A6 E0 00380 LDA ,S+ 0E31 A7 80 00390 STA ,X+ 00400 00410 0E33 8C 4000 00420 CMPX #$4000 0E36 26 E3 00430 BNE REC150 00440 0E38 B6 0E09 00450 LDA PAGE 0E3B 4C 00460 INCA 0E3C 81 08 00470 CMPA #8 0E3E 27 05 00480 BEQ DONE 0E40 B7 0E09 00490 STA PAGE 0E43 20 CB 00500 BRA REC100 00510 0E45 86 39 00520 DONE LDA #$39 0E47 B7 FFA1 00530 STA $FFA1 0E4A 39 00540 RTS 00550 0E4B 1A 50 00560 PLAY ORCC #$50 0E4D B6 FF01 00570 LDA $FF01 0E50 84 F7 00580 ANDA #$F7 0E52 B7 FF01 00590 STA $FF01 0E55 B6 FF03 00600 LDA $FF03 0E58 84 F7 00610 ANDA #$F7 0E5A B7 FF03 00620 STA $FF03 0E5D B6 FF23 00630 LDA $FF23 0E60 8A 08 00640 ORA #8 EDTASM+/01.01.00 PAGE 2 0E62 B7 FF23 00650 STA $FF23 00660 0E65 4F 00670 CLRA 0E66 B7 0E09 00680 STA PAGE 00690 0E69 FE 0E04 00700 LDU SB 0E6C 8D 22 00710 PLY200 BSR LPEEK 0E6E 34 02 00720 PSHS A 0E70 C6 08 00730 LDB #8 0E72 4F 00740 PLY300 CLRA 0E73 66 E4 00750 ROR ,S 0E75 46 00760 RORA 0E76 B7 FF20 00770 STA $FF20 0E79 B6 0E08 00780 PLY400 LDA DELAY 0E7C 4A 00790 PLY410 DECA 0E7D 26 FD 00800 BNE PLY410 0E7F 5A 00810 DECB 0E80 26 F0 00820 BNE PLY300 0E82 32 61 00830 LEAS 1,S 0E84 11B3 0E06 00840 CMPU SE 0E88 26 E2 00850 BNE PLY200 0E8A 86 39 00860 LDA #$39 0E8C B7 FFA1 00870 STA $FFA1 0E8F 39 00880 RTS 00890 0E90 1F 30 00900 LPEEK TFR U,D 0E92 1F 02 00910 TFR D,Y 0E94 44 00920 GPAGE LSRA 0E95 44 00930 LSRA 0E96 44 00940 LSRA 0E97 44 00950 LSRA 0E98 44 00960 LSRA 0E99 8A 30 00970 ORA #$30 0E9B B7 FFA1 00980 STA $FFA1 0E9E 1F 20 00990 TFR Y,D 0EA0 84 1F 01000 ANDA #$1F 0EA2 8A 20 01010 ORA #$20 0EA4 1F 02 01020 TFR D,Y 0EA6 A6 A4 01030 LDA ,Y 0EA8 33 41 01040 LEAU 1,U 0EAA 39 01050 RTS MISSING END STATEMENT 00001 TOTAL ERRORS EDTASM+/01.01.00 PAGE 3 DELAY 0E08 DONE 0E45 GPAGE 0E94 LPEEK 0E90 PAGE 0E09 PLAY 0E4B PLY200 0E6C PLY300 0E72 PLY400 0E79 PLY410 0E7C REC100 0E10 REC150 0E1B REC200 0E20 REC201 0E26 REC202 0E29 RECORD 0E0A SB 0E04 SE 0E06 USR0 0E00 USR1 0E02