ARITH13.SRC
FILE INFORMATION
FILENAME(S): ARITH13.SRC
FILE TYPE(S): SEQ
FILE SIZE: 3K
FIRST SEEN: 2025-11-30 21:13:12
APPEARS ON: 1 disk(s)
FILE HASH
5ed1b758ee5f38c7b877b3f57231c1d0d60d4cd447bb3cb8539e48a8e928e6c7
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10703 3 87 64ER | ARITH13.SRC | SEQ | DuncanTwain | 16 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 0D 20 20 20 20 20 20 20 20 2E 4E 4F 53 59 0D 42 |. .NOSY.B| 00000010: 55 46 46 20 20 20 20 3D 20 24 43 30 30 30 0D 50 |UFF = $C000.P| 00000020: 46 4C 41 47 20 20 20 3D 20 24 43 30 31 30 0D 2A |FLAG = $C010.*| 00000030: 20 20 20 20 20 20 20 3D 20 24 30 38 30 31 0D 20 | = $0801. | 00000040: 20 20 20 20 20 20 20 2E 42 59 54 45 24 30 46 2C | .BYTE$0F,| 00000050: 24 30 38 2C 24 30 41 2C 24 30 30 0D 20 20 20 20 |$08,$0A,$00. | 00000060: 20 20 20 20 2E 42 59 54 45 24 39 45 2C 24 32 30 | .BYTE$9E,$20| 00000070: 2C 24 33 32 2C 24 33 30 0D 20 20 20 20 20 20 20 |,$32,$30. | 00000080: 20 2E 42 59 54 45 24 33 36 2C 24 33 35 2C 24 32 | .BYTE$36,$35,$2| 00000090: 30 2C 24 32 30 0D 20 20 20 20 20 20 20 20 2E 42 |0,$20. .B| 000000A0: 59 54 45 24 32 30 2C 24 30 30 2C 24 30 30 2C 24 |YTE$20,$00,$00,$| 000000B0: 30 30 0D 49 4E 49 54 20 20 20 20 4C 44 41 23 3C |00.INIT LDA#<| 000000C0: 5B 4B 31 2B 4F 46 46 53 45 54 5D 20 20 3B 4E 41 |[K1+OFFSET] ;NA| 000000D0: 43 48 20 24 43 31 30 30 0D 20 20 20 20 20 20 20 |CH $C100. | 000000E0: 20 53 54 41 24 35 46 0D 20 20 20 20 20 20 20 20 | STA$5F. | 000000F0: 4C 44 41 23 3E 5B 4B 31 2B 4F 46 46 53 45 54 5D |LDA#>[K1+OFFSET]| 00000100: 0D 20 20 20 20 20 20 20 20 53 54 41 24 36 30 0D |. STA$60.| 00000110: 20 20 20 20 20 20 20 20 4C 44 41 23 3C 5B 45 4E | LDA#<[EN| 00000120: 44 45 2B 4F 46 46 53 45 54 5D 0D 20 20 20 20 20 |DE+OFFSET]. | 00000130: 20 20 20 53 54 41 24 35 41 0D 20 20 20 20 20 20 | STA$5A. | 00000140: 20 20 4C 44 41 23 3E 5B 45 4E 44 45 2B 4F 46 46 | LDA#>[ENDE+OFF| 00000150: 53 45 54 5D 0D 20 20 20 20 20 20 20 20 53 54 41 |SET]. STA| 00000160: 24 35 42 0D 20 20 20 20 20 20 20 20 4C 44 41 23 |$5B. LDA#| 00000170: 3C 45 4E 44 45 0D 20 20 20 20 20 20 20 20 53 54 |<ENDE. ST| 00000180: 41 24 35 38 0D 20 20 20 20 20 20 20 20 4C 44 41 |A$58. LDA| 00000190: 23 3E 45 4E 44 45 0D 20 20 20 20 20 20 20 20 53 |#>ENDE. S| 000001A0: 54 41 24 35 39 0D 20 20 20 20 20 20 20 20 4A 53 |TA$59. JS| 000001B0: 52 20 24 41 33 42 46 0D 41 4E 46 41 4E 47 20 20 |R $A3BF.ANFANG | 000001C0: 4C 44 41 23 24 30 30 20 20 3B 52 4F 4D 20 49 4E |LDA#$00 ;ROM IN| 000001D0: 53 20 52 41 4D 0D 20 20 20 20 20 20 20 20 53 54 |S RAM. ST| 000001E0: 41 24 35 46 0D 20 20 20 20 20 20 20 20 4C 44 41 |A$5F. LDA| 000001F0: 23 24 41 30 0D 20 20 20 20 20 20 20 20 53 54 41 |#$A0. STA| 00000200: 24 36 30 0D 20 20 20 20 20 20 20 20 4C 44 41 23 |$60. LDA#| 00000210: 24 30 31 0D 20 20 20 20 20 20 20 20 53 54 41 24 |$01. STA$| 00000220: 35 41 0D 20 20 20 20 20 20 20 20 53 54 41 24 35 |5A. STA$5| 00000230: 38 0D 20 20 20 20 20 20 20 20 4C 44 41 23 24 43 |8. LDA#$C| 00000240: 30 0D 20 20 20 20 20 20 20 20 53 54 41 24 35 42 |0. STA$5B| 00000250: 0D 20 20 20 20 20 20 20 20 53 54 41 24 35 39 0D |. STA$59.| 00000260: 20 20 20 20 20 20 20 20 4A 53 52 20 24 41 33 42 | JSR $A3B| 00000270: 46 0D 20 20 20 20 20 20 20 20 4C 44 41 23 24 45 |F. LDA#$E| 00000280: 30 0D 20 20 20 20 20 20 20 20 53 54 41 24 36 30 |0. STA$60| 00000290: 0D 20 20 20 20 20 20 20 20 4C 44 41 23 24 30 30 |. LDA#$00| 000002A0: 0D 20 20 20 20 20 20 20 20 53 54 41 24 35 46 0D |. STA$5F.| 000002B0: 20 20 20 20 20 20 20 20 53 54 41 24 35 41 0D 20 | STA$5A. | 000002C0: 20 20 20 20 20 20 20 53 54 41 24 35 38 0D 20 20 | STA$58. | 000002D0: 20 20 20 20 20 20 53 54 41 24 35 42 0D 20 20 20 | STA$5B. | 000002E0: 20 20 20 20 20 53 54 41 24 35 39 0D 20 20 20 20 | STA$59. | 000002F0: 20 20 20 20 4A 53 52 20 24 41 33 42 46 0D 20 20 | JSR $A3BF. | 00000300: 20 20 20 20 20 20 4C 44 41 23 24 33 35 0D 20 20 | LDA#$35. | 00000310: 20 20 20 20 20 20 53 54 41 20 31 0D 20 20 20 20 | STA 1. | 00000320: 20 20 20 20 4C 44 41 23 3C 41 45 4E 44 47 4E 0D | LDA#<AENDGN.| 00000330: 20 20 20 20 20 20 20 20 53 54 41 24 46 43 0D 20 | STA$FC. | 00000340: 20 20 20 20 20 20 20 4C 44 41 23 3E 41 45 4E 44 | LDA#>AEND| 00000350: 47 4E 0D 20 20 20 20 20 20 20 20 53 54 41 24 46 |GN. STA$F| 00000360: 44 0D 4C 41 45 31 20 20 20 20 4C 44 59 23 30 0D |D.LAE1 LDY#0.| 00000370: 20 20 20 20 20 20 20 20 4C 44 41 28 24 46 43 29 | LDA($FC)| 00000380: 2C 59 0D 20 20 20 20 20 20 20 20 53 54 41 24 46 |,Y. STA$F| 00000390: 45 0D 20 20 20 20 20 20 20 20 49 4E 59 0D 20 20 |E. INY. | 000003A0: 20 20 20 20 20 20 4C 44 41 28 24 46 43 29 2C 59 | LDA($FC),Y| 000003B0: 0D 20 20 20 20 20 20 20 20 42 4E 45 20 4C 41 45 |. BNE LAE| 000003C0: 32 0D 20 20 20 20 20 20 20 20 4A 4D 50 20 24 45 |2. JMP $E| 000003D0: 33 39 41 20 3B 45 49 4E 53 43 48 41 4C 54 4D 45 |39A ;EINSCHALTME| 000003E0: 4A EE EE DE D4 FA DF 9C 9E 40 80 80 80 88 EA 13 |J........@......| 000003F0: 2E 33 F3 F2 70 80 80 88 20 20 20 20 20 49 4E 59 |.3..p... INY| 00000400: 0D 20 20 20 20 20 20 20 20 4C 44 41 28 24 46 43 |. LDA($FC| 00000410: 29 2C 59 0D 20 20 20 20 20 20 20 20 53 54 41 24 |),Y. STA$| 00000420: 43 46 45 30 0D 20 20 20 20 20 20 20 20 54 41 59 |CFE0. TAY| 00000430: 0D 20 20 20 20 20 20 20 20 44 45 59 0D 20 20 20 |. DEY. | 00000440: 20 20 20 20 20 43 4C 43 0D 20 20 20 20 20 20 20 | CLC. | 00000450: 20 4C 44 41 24 46 43 0D 20 20 20 20 20 20 20 20 | LDA$FC. | 00000460: 41 44 43 23 33 0D 20 20 20 20 20 20 20 20 53 54 |ADC#3. ST| 00000470: 41 24 46 43 0D 20 20 20 20 20 20 20 20 42 43 43 |A$FC. BCC| 00000480: 20 4C 41 45 33 0D 20 20 20 20 20 20 20 20 49 4E | LAE3. IN| 00000490: 43 24 46 44 0D 4C 41 45 33 20 20 20 20 4C 44 41 |C$FD.LAE3 LDA| 000004A0: 28 24 46 43 29 2C 59 0D 20 20 20 20 20 20 20 20 |($FC),Y. | 000004B0: 53 54 41 28 24 46 45 29 2C 59 0D 20 20 20 20 20 |STA($FE),Y. | 000004C0: 20 20 20 44 45 59 0D 20 20 20 20 20 20 20 20 42 | DEY. B| 000004D0: 50 4C 20 4C 41 45 33 0D 20 20 20 20 20 20 20 20 |PL LAE3. | 000004E0: 43 4C 43 0D 20 20 20 20 20 20 20 20 4C 44 41 24 |CLC. LDA$| 000004F0: 46 43 0D 20 20 20 20 20 20 20 20 41 44 43 24 43 |FC. ADC$C| 00000500: 46 45 30 0D 20 20 20 20 20 20 20 20 53 54 41 24 |FE0. STA$| 00000510: 46 43 0D 20 20 20 20 20 20 20 20 42 43 43 20 4C |FC. BCC L| 00000520: 41 45 31 0D 20 20 20 20 20 20 20 20 49 4E 43 24 |AE1. INC$| 00000530: 46 44 0D 20 20 20 20 20 20 20 20 4A 4D 50 20 4C |FD. JMP L| 00000540: 41 45 31 0D 41 45 4E 44 47 4E 20 20 2E 57 4F 52 |AE1.AENDGN .WOR| 00000550: 44 24 42 31 30 43 0D 20 20 20 20 20 20 20 20 2E |D$B10C. .| 00000560: 42 59 54 45 20 32 0D 20 20 20 20 20 20 20 20 41 |BYTE 2. A| 00000570: 44 43 23 39 0D 20 20 20 20 20 20 20 20 2E 57 4F |DC#9. .WO| 00000580: 52 44 24 42 31 35 34 0D 20 20 20 20 20 20 20 20 |RD$B154. | 00000590: 2E 42 59 54 45 20 32 0D 20 20 20 20 20 20 20 20 |.BYTE 2. | 000005A0: 41 44 43 23 39 0D 20 20 20 20 20 20 20 20 2E 57 |ADC#9. .W| 000005B0: 4F 52 44 24 42 31 38 32 0D 20 20 20 20 20 20 20 |ORD$B182. | 000005C0: 20 2E 42 59 54 45 20 33 0D 20 20 20 20 20 20 20 | .BYTE 3. | 000005D0: 20 4A 53 52 20 4C 31 0D 20 20 20 20 20 20 20 20 | JSR L1. | 000005E0: 2E 57 4F 52 44 24 42 31 39 37 0D 20 20 20 20 20 |.WORD$B197. | 000005F0: 20 20 20 2E 42 59 54 45 20 32 0D 20 20 20 20 20 | .BYTE 2. | 00000600: 20 20 20 41 44 43 23 37 0D 20 20 20 20 20 20 20 | ADC#7. | 00000610: 20 2E 57 4F 52 44 24 42 32 36 42 0D 20 20 20 20 | .WORD$B26B. | 00000620: 20 20 20 20 2E 42 59 54 45 20 32 0D 20 20 20 20 | .BYTE 2. | 00000630: 20 20 20 20 4C 44 58 23 37 0D 20 20 20 20 20 20 | LDX#7. | 00000640: 20 20 2E 57 4F 52 44 24 42 33 32 41 0D 20 20 20 | .WORD$B32A. | 00000650: 20 20 20 20 20 2E 42 59 54 45 20 32 0D 20 20 20 | .BYTE 2. | 00000660: 20 20 20 20 20 4C 44 58 23 37 0D 20 20 20 20 20 | LDX#7. | 00000670: 20 20 20 2E 57 4F 52 44 24 42 38 34 39 0D 20 20 | .WORD$B849. | 00000680: 20 20 20 20 20 20 2E 42 59 54 45 20 34 0D 20 20 | .BYTE 4. | 00000690: 20 20 20 20 20 20 4C 44 41 23 3C 4B 31 0D 20 20 | LDA#<K1. | 000006A0: 20 20 20 20 20 20 4C 44 59 23 3E 4B 31 0D 20 20 | LDY#>K1. | 000006B0: 20 20 20 20 20 20 2E 57 4F 52 44 24 42 38 42 36 | .WORD$B8B6| 000006C0: 0D 20 20 20 20 20 20 20 20 2E 42 59 54 45 20 33 |. .BYTE 3| 000006D0: 0D 20 20 20 20 20 20 20 20 4A 53 52 20 4C 32 0D |. JSR L2.| 000006E0: 20 20 20 20 20 20 20 20 2E 57 4F 52 44 24 42 38 | .WORD$B8| 000006F0: 45 42 0D 20 20 20 20 20 20 20 20 2E 42 59 54 45 |EB. .BYTE| 00000700: 20 33 0D 20 20 20 20 20 20 20 20 4A 4D 50 20 4C | 3. JMP L| 00000710: 33 0D 20 20 20 20 20 20 20 20 2E 57 4F 52 44 24 |3. .WORD$| 00000720: 42 39 30 32 0D 20 20 20 20 20 20 20 20 2E 42 59 |B902. .BY| 00000730: 54 45 20 34 0D 20 20 20 20 20 20 20 20 4A 53 52 |TE 4. JSR| 00000740: 20 4C 34 0D 20 20 20 20 20 20 20 20 4E 4F 50 0D | L4. NOP.| 00000750: 20 20 20 20 20 20 20 20 2E 57 4F 52 44 24 42 39 | .WORD$B9| 00000760: 32 31 0D 20 20 20 20 20 20 20 20 2E 42 59 54 45 |21. .BYTE| 00000770: 20 34 0D 20 20 20 20 20 20 20 20 4A 53 52 20 4C | 4. JSR L| 00000780: 35 0D 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 20 |5. NOP. | 00000790: 20 20 20 20 20 20 2E 57 4F 52 44 24 42 39 34 32 | .WORD$B942| 000007A0: 0D 20 20 20 20 20 20 20 20 2E 42 59 54 45 20 33 |. .BYTE 3| 000007B0: 0D 20 20 20 20 20 20 20 20 4A 4D 50 20 4C 36 0D |. JMP L6.| 000007C0: 20 20 20 20 20 20 20 20 2E 57 4F 52 44 24 42 39 | .WORD$B9| 000007D0: 36 42 0D 20 20 20 20 20 20 20 20 2E 42 59 54 45 |6B. .BYTE| 000007E0: 20 33 0D 20 20 20 20 20 20 20 20 4A 4D 50 20 4C | 3. JMP L| 000007F0: 32 37 0D 20 20 20 20 20 20 20 20 2E 57 4F 52 44 |27. .WORD| 00000800: 24 42 39 36 46 0D 20 20 20 20 20 20 20 20 2E 42 |$B96F. .B| 00000810: 59 54 45 20 33 0D 20 20 20 20 20 20 20 20 4A 4D |YTE 3. JM| 00000820: 50 20 4C 37 0D 20 20 20 20 20 20 20 20 2E 57 4F |P L7. .WO| 00000830: 52 44 24 42 39 38 35 0D 20 20 20 20 20 20 20 20 |RD$B985. | 00000840: 2E 42 59 54 45 20 34 0D 20 20 20 20 20 20 20 20 |.BYTE 4. | 00000850: 4A 53 52 20 4C 39 0D 20 20 20 20 20 20 20 20 4E |JSR L9. N| 00000860: 4F 50 0D 20 20 20 20 20 20 20 20 2E 57 4F 52 44 |OP. .WORD| 00000870: 24 42 39 42 32 0D 20 20 20 20 20 20 20 20 2E 42 |$B9B2. .B| 00000880: 59 54 45 20 34 0D 20 20 20 20 20 20 20 20 4A 53 |YTE 4. JS| 00000890: 52 20 4C 31 30 0D 20 20 20 20 20 20 20 20 4E 4F |R L10. NO| 000008A0: 50 0D 20 20 20 20 20 20 20 20 2E 57 4F 52 44 24 |P. .WORD$| 000008B0: 42 41 33 44 0D 20 20 20 20 20 20 20 20 2E 42 59 |BA3D. .BY| 000008C0: 54 45 20 35 0D 20 20 20 20 20 20 20 20 4A 53 52 |TE 5. JSR| 000008D0: 20 4C 31 31 0D 20 20 20 20 20 20 20 20 4E 4F 50 | L11. NOP| 000008E0: 0D 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 |. NOP. | 000008F0: 20 20 20 20 20 2E 57 4F 52 44 24 42 41 36 35 0D | .WORD$BA65.| 00000900: 20 20 20 20 20 20 20 20 2E 42 59 54 45 20 34 0D | .BYTE 4.| 00000910: 20 20 20 20 20 20 20 20 4A 53 52 20 4C 31 32 0D | JSR L12.| 00000920: 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 20 | NOP. | 00000930: 20 20 20 20 2E 57 4F 52 44 24 42 41 38 33 0D 20 | .WORD$BA83. | 00000940: 20 20 20 20 20 20 20 2E 42 59 54 45 20 34 0D 20 | .BYTE 4. | 00000950: 20 20 20 20 20 20 20 4A 53 52 20 4C 31 33 0D 20 | JSR L13. | 00000960: 20 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 20 20 | NOP. | 00000970: 20 20 20 2E 57 4F 52 44 24 42 41 39 30 0D 20 20 | .WORD$BA90. | 00000980: 20 20 20 20 20 20 2E 42 59 54 45 20 34 0D 20 20 | .BYTE 4. | 00000990: 20 20 20 20 20 20 4A 53 52 20 4C 31 34 0D 20 20 | JSR L14. | 000009A0: 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 20 20 20 | NOP. | 000009B0: 20 20 2E 57 4F 52 44 24 42 42 30 31 0D 20 20 20 | .WORD$BB01. | 000009C0: 20 20 20 20 20 2E 42 59 54 45 20 34 0D 20 20 20 | .BYTE 4. | 000009D0: 20 20 20 20 20 4C 44 41 23 3C 4B 32 0D 20 20 20 | LDA#<K2. | 000009E0: 20 20 20 20 20 4C 44 59 23 3E 4B 32 0D 20 20 20 | LDY#>K2. | 000009F0: 20 20 20 20 20 2E 57 4F 52 44 24 42 42 33 42 0D | .WORD$BB3B.| 00000A00: 20 20 20 20 20 20 20 20 2E 42 59 54 45 20 34 0D | .BYTE 4.| 00000A10: 20 20 20 20 20 20 20 20 4A 53 52 20 4C 31 35 0D | JSR L15.| 00000A20: 20 20 20 20 20 20 20 20 4E 4F 50 0D 20 20 20 20 | NOP. | 00000A30: 20 20 20 20 2E 57 4F 52 44 24 42 42 32 35 0D 20 | .WORD$BB25. | 00000A40: 20 20 20 20 20 20 20 2E 42 59 54 45 20 32 0D 20 | .BYTE 2. | 00000A50: 20 20 20 20 20 20 20 4C 44 58 23 24 46 41 0D 20 | LDX#$FA. | 00000A60: 20 20 20 20 20 20 20 2E 57 4F 52 44 24 42 42 34 | .WORD$BB4| 00000A70: 33 0D 20 20 20 20 20 20 20 20 2E 42 59 54 45 20 |3. .BYTE | 00000A80: 33 0D 20 20 20 20 20 20 20 20 4A 53 52 20 4C 31 |3. JSR L1| 00000A90: 37 0D 20 20 20 20 20 20 20 20 2E 57 4F 52 44 24 |7. .WORD$| 00000AA0: 42 42 38 37 0D 20 20 20 20 20 20 20 20 2E 42 59 |BB87. .BY| 00000AB0: 54 45 20 33 0D 20 20 20 20 20 20 20 20 4A 4D 50 |TE 3. JMP| 00000AC0: 20 4C 31 38 0D 20 20 20 20 20 20 20 20 2E 57 4F | L18. .WO| 00000AD0: 52 44 24 42 42 39 46 0D 20 20 20 20 20 20 20 20 |RD$BB9F. | 00000AE0: 2E 42 59 54 45 20 33 0D 20 20 20 20 20 20 20 20 |.BYTE 3. | 00000AF0: 4A 4D 50 20 4C 31 39 0D 20 20 20 20 20 20 20 20 |JMP L19. | 00000B00: 2E 57 4F 52 44 24 42 42 41 36 0D 20 20 20 20 20 |.WORD$BBA6. | 00000B10: 20 20 20 2E 42 59 54 45 20 34 0D 20 20 20 20 20 | .BYTE 4. | 00000B20: 20 20 20 4A 53 52 20 4C 32 30 0D 20 20 20 20 20 | JSR L20. | 00000B30: 20 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 20 2E | NOP. .| 00000B40: 57 4F 52 44 24 42 42 43 43 0D 20 20 20 20 20 20 |WORD$BBCC. | 00000B50: 20 20 2E 42 59 54 45 20 33 0D 20 20 20 20 20 20 | .BYTE 3. | 00000B60: 20 20 4A 4D 50 20 4C 32 31 0D 20 20 20 20 20 20 | JMP L21. | 00000B70: 20 20 2E 57 4F 52 44 24 42 42 44 42 0D 20 20 20 | .WORD$BBDB. | 00000B80: 20 20 20 20 20 2E 42 59 54 45 20 34 0D 20 20 20 | .BYTE 4. | 00000B90: 20 20 20 20 20 4A 53 52 20 4C 32 32 0D 20 20 20 | JSR L22. | 00000BA0: 20 20 20 20 20 4E 4F 50 0D 20 20 20 20 20 20 20 | NOP. | 00000BB0: 20 2E 57 4F 52 44 24 42 43 30 30 0D 20 20 20 20 | .WORD$BC00. | 00000BC0: 20 20 20 20 2E 42 59 54 45 20 33 0D 20 20 20 20 | .BYTE 3. | 00000BD0: 20 20 20 20 4A 4D 50 20 4C 32 33 0D 20 20 20 20 | JMP L23. | 00000BE0: 20 20 20 20 2E 57 4F 52 | .WOR |
. .NOSY.BUFF = $C000.PFLAG =
$C010.* = $0801. .BYTE$0F,
$08,$0A,$00. .BYTE$9E,$20,$32,$30
. .BYTE$36,$35,$20,$20. .B
YTE$20,$00,$00,$00.INIT LDA#<[K1+OFFS
ET] ;NACH $C100. STA$5F.
LDA#>[K1+OFFSET]. STA$60.
LDA#<[ENDE+OFFSET]. STA$5A.
LDA#>[ENDE+OFFSET]. STA$5B.
LDA#<ENDE. STA$58. LDA
#>ENDE. STA$59. JSR $A3BF.
ANFANG LDA#$00 ;ROM INS RAM. ST
A$5F. LDA#$A0. STA$60.
LDA#$01. STA$5A. STA$5
8. LDA#$C0. STA$5B.
STA$59. JSR $A3BF. LDA#$E
0. STA$60. LDA#$00.
STA$5F. STA$5A. STA$58.
STA$5B. STA$59. JSR
$A3BF. LDA#$35. STA 1.
LDA#<AENDGN. STA$FC. L
DA#>AENDGN. STA$FD.LAE1 LDY#0.
LDA($FC),Y. STA$FE.
INY. LDA($FC),Y. BNE LAE
2. JMP $E39A ;EINSCHALTMEJ...T...
.@.......3..P... INY. LDA($FC
),Y. STA$CFE0. TAY.
DEY. CLC. LDA$FC.
ADC#3. STA$FC. BCC LAE3.
INC$FD.LAE3 LDA($FC),Y.
STA($FE),Y. DEY. BPL LAE3.
CLC. LDA$FC. ADC$C
FE0. STA$FC. BCC LAE1.
INC$FD. JMP LAE1.AENDGN .WOR
D$B10C. .BYTE 2. ADC#9.
.WORD$B154. .BYTE 2.
ADC#9. .WORD$B182. .BYTE 3
. JSR L1. .WORD$B197.
.BYTE 2. ADC#7. .WORD$B
26B. .BYTE 2. LDX#7.
.WORD$B32A. .BYTE 2. LDX
#7. .WORD$B849. .BYTE 4.
LDA#<K1. LDY#>K1. .W
ORD$B8B6. .BYTE 3. JSR L2.
.WORD$B8EB. .BYTE 3.
JMP L3. .WORD$B902. .BY
TE 4. JSR L4. NOP.
.WORD$B921. .BYTE 4. JSR L
5. NOP. .WORD$B942.
.BYTE 3. JMP L6. .WORD$B9
6B. .BYTE 3. JMP L27.
.WORD$B96F. .BYTE 3. JM
P L7. .WORD$B985. .BYTE 4.
JSR L9. NOP. .WORD
$B9B2. .BYTE 4. JSR L10.
NOP. .WORD$BA3D. .BY
TE 5. JSR L11. NOP.
NOP. .WORD$BA65. .BYTE 4.
JSR L12. NOP. .WOR
D$BA83. .BYTE 4. JSR L13.
NOP. .WORD$BA90. .B
YTE 4. JSR L14. NOP.
.WORD$BB01. .BYTE 4. LDA
#<K2. LDY#>K2. .WORD$BB3B.
.BYTE 4. JSR L15.
NOP. .WORD$BB25. .BYTE 2.
LDX#$FA. .WORD$BB43.
.BYTE 3. JSR L17. .WORD$
BB87. .BYTE 3. JMP L18.
.WORD$BB9F. .BYTE 3.
JMP L19. .WORD$BBA6. .BYTE
4. JSR L20. NOP. .
WORD$BBCC. .BYTE 3. JMP L2
1. .WORD$BBDB. .BYTE 4.
JSR L22. NOP. .WORD$B
C00. .BYTE 3. JMP L23.
.WOR
> CLICK IMAGE PREVIEW FOR FULL MODAL