SHOWSORT3.ASM
FILE INFORMATION
FILENAME(S): SHOWSORT3.ASM
FILE TYPE(S): PRG
FILE SIZE: 7K
FIRST SEEN: 2025-11-30 21:27:21
APPEARS ON: 1 disk(s)
FILE HASH
80f408142733e3d8fb9c72681396c98f21e5a74e9115268d71180a060681e6f2
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MASTERMMSOFT | SHOWSORT3.ASM | PRG | DuncanTwain | 27 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 00 00 30 F7 4B 2E 00 01 20 BB 10 01 20 3B 20 2A |..0.K... ... ; *| 00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A AA 20 01 |*************. .| 00000030: 20 3B 20 2A 20 20 4F 4C 44 4C 49 4E 3A 20 20 42 | ; * OLDLIN: B| 00000040: 45 57 45 47 55 4E 47 20 48 4F 43 48 20 20 20 20 |EWEGUNG HOCH | 00000050: 20 AA 30 01 20 3B 20 2A 2A 2A 2A 2A 2A 2A 2A 2A | .0. ; *********| 00000060: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000070: 2A 2A 2A 2A 2A AA 40 01 20 BB 50 01 4F 4C 44 4C |*****.@. .P.OLDL| 00000080: 49 4E 20 20 20 20 20 4C 44 41 20 2A 41 43 54 4C |IN LDA *ACTL| 00000090: 49 4E 20 20 20 20 20 20 20 20 20 20 20 3B 20 41 |IN ; A| 000000A0: 4B 54 55 45 4C 4C 45 20 42 2E 5A 45 49 4C C5 60 |KTUELLE B.ZEIL.`| 000000B0: 01 20 42 45 51 20 4F 4C 44 33 20 3B 20 42 3A 20 |. BEQ OLD3 ; B: | 000000C0: 5A 45 49 4C 45 20 B0 70 01 20 BB 80 01 20 43 4D |ZEILE .p. ... CM| 000000D0: 50 20 23 33 20 3B 20 4F 42 45 52 45 20 53 43 52 |P #3 ; OBERE SCR| 000000E0: 4F 4C 4C 47 52 45 4E 5A 45 BF 90 01 20 42 4E 45 |OLLGRENZE... BNE| 000000F0: 20 4F 4C 44 31 20 3B 20 42 3A 20 4E 45 49 CE 00 | OLD1 ; B: NEI..| 00000100: 02 20 BB 10 02 20 BB 20 02 20 3B 20 56 49 45 52 |. ... . . ; VIER| 00000110: 54 45 20 42 49 4C 44 53 43 48 2E 5A 45 49 4C 45 |TE BILDSCH.ZEILE| 00000120: BA 30 02 20 BB 40 02 20 20 20 20 20 20 20 20 20 |.0. .@. | 00000130: 20 20 4C 44 41 20 2A 46 4E 52 2B 31 20 20 20 20 | LDA *FNR+1 | 00000140: 20 20 20 20 20 20 20 20 3B 20 34 2E 20 46 49 4C | ; 4. FIL| 00000150: 45 45 49 4E 54 52 41 47 BF 50 02 20 20 20 20 20 |EEINTRAG.P. | 00000160: 20 20 20 20 20 20 42 4E 45 20 53 43 52 44 4E 20 | BNE SCRDN | 00000170: 20 20 20 20 20 20 20 20 20 20 20 3B 20 4E 45 49 | ; NEI| 00000180: 4E 3A 20 4D 45 48 52 20 41 4C 53 20 32 35 B6 60 |N: MEHR ALS 25.`| 00000190: 02 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 20 |. LDA | 000001A0: 2A 46 4E D2 70 02 20 43 4D 50 20 23 34 20 3B 20 |*FN.p. CMP #4 ; | 000001B0: 34 2E 20 46 49 4C 45 45 49 4E 54 52 41 47 BF 80 |4. FILEEINTRAG..| 000001C0: 02 20 20 20 20 20 20 20 20 20 20 20 42 4E 45 20 |. BNE | 000001D0: 53 43 52 44 4E 20 20 20 20 20 20 20 20 20 20 20 |SCRDN | 000001E0: 20 3B 20 42 3A 20 4E 45 49 CE 90 02 20 BB 00 03 | ; B: NEI... ...| 000001F0: 20 BB 10 03 20 3B 20 45 49 4E 46 41 43 48 45 20 | ... ; EINFACHE | 00000200: 42 45 57 45 47 55 4E 47 20 4E 41 43 48 20 4F 42 |BEWEGUNG NACH OB| 00000210: 45 4E BA 20 03 20 BB 30 03 4F 4C 44 31 20 20 20 |EN. . .0.OLD1 | 00000220: 20 20 20 20 44 45 43 20 2A 41 43 54 4C 49 4E 20 | DEC *ACTLIN | 00000230: 20 20 20 20 20 20 20 20 20 20 3B 20 41 4B 54 2E | ; AKT.| 00000240: 20 42 2E 5A 45 49 4C 45 20 2D 20 B1 40 03 20 20 | B.ZEILE - .@. | 00000250: 20 20 20 20 4C 44 58 20 2A 46 4E 52 20 20 20 20 | LDX *FNR | 00000260: 20 20 20 20 20 20 20 20 20 3B 20 45 49 4E 54 52 | ; EINTR| 00000270: 41 47 53 4E 52 2E 20 2D 20 B1 50 03 20 42 4E 45 |AGSNR. - .P. BNE| 00000280: 20 4F 4C 44 B2 60 03 20 20 20 20 20 20 20 20 20 | OLD.`. | 00000290: 20 20 44 45 43 20 2A 46 4E 52 2B B1 70 03 4F 4C | DEC *FNR+.p.OL| 000002A0: 44 32 20 20 20 20 20 20 20 44 45 43 20 2A 46 4E |D2 DEC *FN| 000002B0: D2 80 03 20 BB 90 03 4F 4C 44 33 20 20 20 20 20 |... ...OLD3 | 000002C0: 20 20 4A 4D 50 20 50 41 55 53 C5 00 04 20 BB 10 | JMP PAUS... ..| 000002D0: 04 20 BB 20 04 20 20 20 20 20 20 20 20 20 20 20 |. . . | 000002E0: 3B 20 52 55 4E 54 45 52 53 43 52 4F 4C 4C 45 4E |; RUNTERSCROLLEN| 000002F0: 20 45 49 4E 4C 45 49 54 45 CE 30 04 20 BB 40 04 | EINLEITE.0. .@.| 00000300: 20 3B 20 42 49 4C 44 53 43 48 49 52 4D 5A 45 49 | ; BILDSCHIRMZEI| 00000310: 47 45 52 20 4D 4F 44 49 46 49 5A 49 45 52 45 CE |GER MODIFIZIERE.| 00000320: 50 04 20 BB 60 04 53 43 52 44 4E 20 20 20 20 20 |P. .`.SCRDN | 00000330: 20 53 45 43 20 20 20 20 20 20 20 20 20 20 20 20 | SEC | 00000340: 20 20 20 20 20 20 3B 20 5A 45 49 47 45 52 20 4D | ; ZEIGER M| 00000350: 49 4E 55 53 20 32 B3 70 04 20 20 20 20 20 20 20 |INUS 2.p. | 00000360: 20 20 20 20 4C 44 41 20 2A 41 4E 46 4C 49 CE 80 | LDA *ANFLI..| 00000370: 04 20 20 20 20 20 20 20 20 20 20 20 53 42 43 20 |. SBC | 00000380: 23 32 B3 90 04 20 20 20 20 20 20 20 20 20 20 20 |#2... | 00000390: 53 54 41 20 2A 41 4E 46 4C 49 CE 00 05 20 20 20 |STA *ANFLI... | 000003A0: 20 20 20 20 20 20 20 20 42 43 53 20 53 43 52 44 | BCS SCRD| 000003B0: 4E B1 10 05 20 20 20 20 20 20 20 20 20 20 20 44 |N... D| 000003C0: 45 43 20 2A 41 4E 46 4C 49 4E 2B B1 20 05 20 BB |EC *ANFLIN+. . .| 000003D0: 30 05 53 43 52 44 4E 31 20 20 20 20 20 53 45 C3 |0.SCRDN1 SE.| 000003E0: 40 05 20 20 20 20 20 20 20 20 20 20 20 4C 44 41 |@. LDA| 000003F0: 20 2A 45 4E 44 4C 49 CE 50 05 20 20 20 20 20 20 | *ENDLI.P. | 00000400: 20 20 20 20 20 53 42 43 20 23 32 B3 60 05 20 20 | SBC #2.`. | 00000410: 20 20 20 20 20 20 20 20 20 53 54 41 20 2A 45 4E | STA *EN| 00000420: 44 4C 49 CE 70 05 20 20 20 20 20 20 20 20 20 20 |DLI.p. | 00000430: 20 42 43 53 20 53 43 52 44 4E B2 80 05 20 20 20 | BCS SCRDN... | 00000440: 20 20 20 20 20 20 20 20 44 45 43 20 2A 45 4E 44 | DEC *END| 00000450: 4C 49 4E 2B B1 90 05 20 BB 00 06 53 43 52 44 4E |LIN+... ...SCRDN| 00000460: 32 20 20 20 20 20 4A 53 52 20 44 4F 57 4E 20 20 |2 JSR DOWN | 00000470: 20 20 20 20 20 20 20 20 20 20 20 3B 20 48 4F 43 | ; HOC| 00000480: 48 53 43 52 4F 4C 4C 45 CE 10 06 20 BB 20 06 20 |HSCROLLE... . . | 00000490: 20 20 20 20 20 20 20 20 20 20 4C 44 41 20 23 30 | LDA #0| 000004A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B | ;| 000004B0: 20 5A 45 49 4C 45 20 31 20 48 4F 4C 45 CE 30 06 | ZEILE 1 HOLE.0.| 000004C0: 20 20 20 20 20 20 20 20 20 20 20 53 54 41 20 2A | STA *| 000004D0: 43 4E 54 4C 49 CE 40 06 20 4A 53 52 20 4F 55 54 |CNTLI.@. JSR OUT| 000004E0: 4C 49 CE 50 06 20 BB 60 06 20 4C 44 41 20 2A 46 |LI.P. .`. LDA *F| 000004F0: 4E 52 20 3B 20 45 49 4E 54 52 41 47 53 4E 52 2E |NR ; EINTRAGSNR.| 00000500: 20 2D 20 B1 70 06 20 42 4E 45 20 53 43 52 44 4E | - .p. BNE SCRDN| 00000510: B3 80 06 20 44 45 43 20 2A 46 4E 52 2B B1 90 06 |... DEC *FNR+...| 00000520: 53 43 52 44 4E 33 20 44 45 43 20 2A 46 4E D2 00 |SCRDN3 DEC *FN..| 00000530: 07 20 BB 10 07 20 52 54 D3 20 07 20 BB 30 07 20 |. ... RT. . .0. | 00000540: BB 40 07 20 3B 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.@. ; **********| 00000550: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000560: 2A 2A 2A 2A AA 50 07 20 3B 20 2A 20 20 48 4F 43 |****.P. ; * HOC| 00000570: 48 53 43 52 4F 4C 4C 52 4F 55 54 49 4E 45 20 20 |HSCROLLROUTINE | 00000580: 20 20 20 20 20 20 20 20 AA 60 07 20 3B 20 2A 2A | .`. ; **| 00000590: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000005A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A AA 70 07 20 |************.p. | 000005B0: BB 80 07 55 50 20 4C 44 58 20 23 31 20 3B 20 5A |...UP LDX #1 ; Z| 000005C0: 41 45 48 4C 45 D2 90 07 20 BB 00 08 55 50 31 20 |AEHLE... ...UP1 | 000005D0: 20 20 20 20 20 20 20 4C 44 41 20 42 41 44 52 4C | LDA BADRL| 000005E0: 4F 2C 58 20 20 20 20 20 20 20 20 20 3B 20 41 44 |O,X ; AD| 000005F0: 52 45 53 53 45 4E 20 53 45 54 5A 45 CE 10 08 20 |RESSEN SETZE... | 00000600: 53 54 41 20 53 43 31 2B 31 20 3B 20 51 55 45 4C |STA SC1+1 ; QUEL| 00000610: 4C 41 44 52 45 53 53 C5 20 08 20 20 20 20 20 20 |LADRESS. . | 00000620: 20 20 20 20 20 4C 44 41 20 42 41 44 52 48 49 2C | LDA BADRHI,| 00000630: D8 30 08 20 53 54 41 20 53 43 31 2B B2 40 08 20 |.0. STA SC1+.@. | 00000640: BB 50 08 20 44 45 D8 60 08 20 20 20 20 20 20 20 |.P. DE.`. | 00000650: 20 20 20 20 4C 44 41 20 42 41 44 52 4C 4F 2C D8 | LDA BADRLO,.| 00000660: 70 08 20 53 54 41 20 53 43 32 2B 31 20 3B 20 5A |p. STA SC2+1 ; Z| 00000670: 49 45 4C 41 44 52 45 53 53 C5 80 08 20 20 20 20 |IELADRESS... | 00000680: 20 20 20 20 20 20 20 4C 44 41 20 42 41 44 52 48 | LDA BADRH| 00000690: 49 2C D8 90 08 20 53 54 41 20 53 43 32 2B B2 00 |I,... STA SC2+..| 000006A0: 09 20 49 4E D8 10 09 20 BB 20 09 20 4A 53 52 20 |. IN... . . JSR | 000006B0: 53 43 52 4C 49 4E 20 3B 20 31 20 5A 45 49 4C 45 |SCRLIN ; 1 ZEILE| 000006C0: 20 56 45 52 53 43 48 49 45 42 45 CE 30 09 20 BB | VERSCHIEBE.0. .| 000006D0: 40 09 20 49 4E D8 50 09 20 43 50 58 20 23 32 B5 |@. IN.P. CPX #2.| 000006E0: 60 09 20 42 4E 45 20 55 50 B1 70 09 20 BB 80 09 |`. BNE UP.p. ...| 000006F0: 20 4A 53 52 20 53 43 50 41 55 D3 90 09 20 BB 00 | JSR SCPAU... ..| 00000700: 10 20 52 54 D3 10 10 20 BB 20 10 20 BB 30 10 20 |. RT... . . .0. | 00000710: 3B 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |; **************| 00000720: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000730: AA 40 10 20 3B 20 2A 20 20 53 43 52 4C 49 4E 3A |.@. ; * SCRLIN:| 00000740: 20 20 5A 45 49 4C 45 20 56 45 52 53 43 48 49 45 | ZEILE VERSCHIE| 00000750: 42 45 4E 20 AA 50 10 20 3B 20 2A 20 20 20 51 55 |BEN .P. ; * QU| 00000760: 45 4C 4C 2D 2F 5A 49 45 4C 41 44 52 2E 20 4D 4F |ELL-/ZIELADR. MO| 00000770: 44 49 46 49 45 44 20 20 AA 60 10 20 3B 20 2A 2A |DIFIED .`. ; **| 00000780: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000790: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A AA 70 10 20 |************.p. | 000007A0: BB 80 10 53 43 52 4C 49 4E 20 20 20 20 20 4C 44 |...SCRLIN LD| 000007B0: 59 20 23 32 38 20 20 20 20 20 20 20 20 20 20 20 |Y #28 | 000007C0: 20 20 20 3B 20 32 39 20 5A 45 49 43 48 45 CE 90 | ; 29 ZEICHE..| 000007D0: 10 53 43 31 20 4C 44 41 20 24 38 38 38 38 2C 59 |.SC1 LDA $8888,Y| 000007E0: 20 3B 20 51 55 45 4C 4C 41 44 52 45 53 53 C5 00 | ; QUELLADRESS..| 000007F0: 11 53 43 32 20 53 54 41 20 24 38 38 38 38 2C 59 |.SC2 STA $8888,Y| 00000800: 20 3B 20 5A 49 45 4C 41 44 52 45 53 53 C5 10 11 | ; ZIELADRESS...| 00000810: 20 44 45 D9 20 11 20 20 20 20 20 20 20 20 20 20 | DE. . | 00000820: 20 42 50 4C 20 53 43 B1 30 11 20 52 54 D3 40 11 | BPL SC.0. RT.@.| 00000830: 20 BB 50 11 20 BB 60 11 20 3B 20 2A 2A 2A 2A 2A | .P. .`. ; *****| 00000840: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000850: 2A 2A 2A 2A 2A 2A 2A 2A 2A AA 70 11 20 3B 20 2A |*********.p. ; *| 00000860: 20 20 4E 45 57 4C 49 4E 3A 20 20 5A 45 49 4C 45 | NEWLIN: ZEILE| 00000870: 20 4E 41 43 48 20 55 4E 54 45 4E 20 20 AA 80 11 | NACH UNTEN ...| 00000880: 20 3B 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ; *************| 00000890: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000008A0: 2A AA 90 11 20 BB 00 12 4E 45 57 4C 49 4E 20 20 |*... ...NEWLIN | 000008B0: 20 20 20 4C 44 41 20 2A 41 43 54 4C 49 4E 20 20 | LDA *ACTLIN | 000008C0: 20 20 20 20 20 20 20 20 20 3B 20 41 4B 54 55 45 | ; AKTUE| 000008D0: 4C 4C 45 20 42 2E 5A 45 49 4C C5 10 12 20 43 4D |LLE B.ZEIL... CM| 000008E0: 50 20 23 32 34 20 3B 20 32 35 2E 20 5A 45 49 4C |P #24 ; 25. ZEIL| 000008F0: 45 20 3D 20 46 49 4C 45 45 4E 44 45 BF 20 12 20 |E = FILEENDE. . | 00000900: 42 45 51 20 4E 45 57 33 20 3B 20 42 3A 20 4A 41 |BEQ NEW3 ; B: JA| 00000910: 2C 20 46 45 52 54 49 C7 30 12 20 BB 40 12 20 43 |, FERTI.0. .@. C| 00000920: 4D 50 20 23 32 31 20 3B 20 42 2E 5A 45 49 4C 45 |MP #21 ; B.ZEILE| 00000930: 20 32 31 20 3D 20 53 43 52 4F 4C 4C 47 52 45 4E | 21 = SCROLLGREN| 00000940: 5A 45 BF 50 12 20 42 4E 45 20 4E 45 57 31 20 3B |ZE.P. BNE NEW1 ;| 00000950: 20 42 3A 20 4E 45 49 CE 60 12 20 BB 70 12 20 BB | B: NEI.`. .p. .| 00000960: 80 12 20 3B 20 32 32 2E 20 42 2E 5A 45 49 4C 45 |.. ; 22. B.ZEILE| 00000970: 3A 20 53 43 52 4F 4C 4C 45 CE 90 12 20 BB 00 13 |: SCROLLE... ...| 00000980: 20 53 45 C3 10 13 20 4C 44 41 20 2A 46 41 4E 5A | SE... LDA *FANZ| 00000990: 20 3B 20 41 4E 5A 41 48 4C 20 45 49 4E 54 52 41 | ; ANZAHL EINTRA| 000009A0: 45 47 C5 20 13 20 53 42 43 20 2A 46 4E 52 20 3B |EG. . SBC *FNR ;| 000009B0: 20 2D 20 41 4B 54 55 45 4C 4C 45 52 20 45 49 4E | - AKTUELLER EIN| 000009C0: 54 52 41 C7 30 13 20 54 41 58 20 3B 20 44 49 46 |TRA.0. TAX ; DIF| 000009D0: 46 20 28 4C 4F 29 20 4D 45 52 4B 45 CE 40 13 20 |F (LO) MERKE.@. | 000009E0: 4C 44 41 20 2A 46 41 4E 5A 2B B1 50 13 20 53 42 |LDA *FANZ+.P. SB| 000009F0: 43 20 2A 46 4E 52 2B B1 60 13 20 20 20 20 20 20 |C *FNR+.`. | 00000A00: 20 20 20 20 20 42 4E 45 20 53 43 52 55 50 20 20 | BNE SCRUP | 00000A10: 20 20 20 20 20 20 20 20 20 20 3B 20 44 49 46 46 | ; DIFF| 00000A20: 45 52 45 4E 5A 20 47 54 20 32 35 B6 70 13 20 BB |ERENZ GT 25.p. .| 00000A30: 80 13 20 43 50 58 20 23 34 20 3B 20 44 49 46 46 |.. CPX #4 ; DIFF| 00000A40: 45 52 45 4E 5A 20 47 45 20 34 BF 90 13 20 20 20 |ERENZ GE 4... | 00000A50: 20 20 20 20 20 20 20 20 42 43 53 20 53 43 52 55 | BCS SCRU| 00000A60: 50 20 20 20 20 20 20 20 20 20 20 20 20 3B 20 42 |P ; B| 00000A70: 3A 20 4A 41 2C 20 53 43 52 4F 4C 4C 45 CE 00 14 |: JA, SCROLLE...| 00000A80: 20 BB 10 14 20 BB 20 14 20 3B 20 4E 4F 52 4D 41 | ... . . ; NORMA| 00000A90: 4C 45 20 42 45 57 45 47 55 4E 47 20 4E 41 43 48 |LE BEWEGUNG NACH| 00000AA0: 20 55 4E 54 45 CE 30 14 20 BB 40 14 4E 45 57 31 | UNTE.0. .@.NEW1| 00000AB0: 20 49 4E 43 20 2A 41 43 54 4C 49 4E 20 3B 20 41 | INC *ACTLIN ; A| 00000AC0: 43 54 4C 49 4E 20 2B 20 B1 50 14 20 49 4E 43 20 |CTLIN + .P. INC | 00000AD0: 2A 46 4E 52 20 3B 20 45 49 4E 54 52 41 47 53 4E |*FNR ; EINTRAGSN| 00000AE0: 52 2E 20 2B 20 B1 60 14 20 42 4E 45 20 4E 45 57 |R. + .`. BNE NEW| 00000AF0: B3 70 14 20 49 4E 43 20 2A 46 4E 52 2B B1 80 14 |.p. INC *FNR+...| 00000B00: 20 BB 90 14 4E 45 57 33 20 20 20 20 20 20 20 4A | ...NEW3 J| 00000B10: 4D 50 20 50 41 55 53 C5 00 15 20 BB 10 15 20 BB |MP PAUS... ... .| 00000B20: 20 15 20 20 20 20 20 20 20 20 20 20 20 3B 20 48 | . ; H| 00000B30: 4F 43 48 53 43 52 4F 4C 4C 45 4E 20 45 49 4E 4C |OCHSCROLLEN EINL| 00000B40: 45 49 54 45 4E BA 30 15 20 BB 40 15 53 43 52 55 |EITEN.0. .@.SCRU| 00000B50: 50 20 20 20 20 20 20 43 4C 43 20 20 20 20 20 20 |P CLC | 00000B60: 20 20 20 20 20 20 20 20 20 20 20 20 3B 20 5A 45 | ; ZE| 00000B70: 49 47 45 52 20 57 45 49 54 45 52 53 45 54 5A 45 |IGER WEITERSETZE| 00000B80: CE 50 15 20 20 20 20 20 20 20 20 20 20 20 4C 44 |.P. LD| 00000B90: 41 20 2A 41 4E 46 4C 49 CE 60 15 20 20 20 20 20 |A *ANFLI.`. | 00000BA0: 20 20 20 20 20 20 41 44 43 20 23 32 B3 70 15 20 | ADC #2.p. | 00000BB0: 20 20 20 20 20 20 20 20 20 20 53 54 41 20 2A 41 | STA *A| 00000BC0: 4E 46 4C 49 CE 80 15 20 20 20 20 20 20 20 20 20 |NFLI... | 00000BD0: 20 20 42 43 43 20 53 43 52 55 50 B1 90 15 20 20 | BCC SCRUP... | 00000BE0: 20 20 20 20 20 20 20 20 20 49 4E 43 20 2A 41 4E | INC *AN| 00000BF0: 46 4C 49 4E 2B B1 00 16 20 BB 10 16 53 43 52 55 |FLIN+... ...SCRU| 00000C00: 50 31 20 20 20 20 20 43 4C C3 20 16 20 20 20 20 |P1 CL. . | 00000C10: 20 20 20 20 20 20 20 4C 44 41 20 2A 45 4E 44 4C | LDA *ENDL| 00000C20: 49 CE 30 16 20 20 20 20 20 20 20 20 20 20 20 41 |I.0. A| 00000C30: 44 43 20 23 32 B3 40 16 20 20 20 20 20 20 20 20 |DC #2.@. | 00000C40: 20 20 20 53 54 41 20 2A 45 4E 44 4C 49 CE 50 16 | STA *ENDLI.P.| 00000C50: 20 20 20 20 20 20 20 20 20 20 20 42 43 43 20 53 | BCC S| 00000C60: 43 52 55 50 B2 60 16 20 20 20 20 20 20 20 20 20 |CRUP.`. | 00000C70: 20 20 49 4E 43 20 2A 45 4E 44 4C 49 4E 2B B1 70 | INC *ENDLIN+.p| 00000C80: 16 20 BB 80 16 53 43 52 55 50 32 20 20 20 20 20 |. ...SCRUP2 | 00000C90: 4A 53 52 20 55 50 20 20 3B 20 48 4F 43 48 53 43 |JSR UP ; HOCHSC| 00000CA0: 52 4F 4C 4C 45 CE 90 16 20 BB 00 17 20 20 20 20 |ROLLE... ... | 00000CB0: 20 20 20 20 20 20 20 4C 44 41 20 23 32 34 20 3B | LDA #24 ;| 00000CC0: 20 5A 45 49 4C 45 20 32 35 20 41 4E 5A 45 49 47 | ZEILE 25 ANZEIG| 00000CD0: 45 CE 10 17 20 20 20 20 20 20 20 20 20 20 20 53 |E... S| 00000CE0: 54 41 20 2A 43 4E 54 4C 49 CE 20 17 20 4A 53 52 |TA *CNTLI. . JSR| 00000CF0: 20 4F 55 54 4C 49 CE 30 17 20 BB 40 17 20 49 4E | OUTLI.0. .@. IN| 00000D00: 43 20 2A 46 4E 52 20 3B 20 45 49 4E 54 52 41 47 |C *FNR ; EINTRAG| 00000D10: 53 4E 52 2E 20 2B 20 B1 50 17 20 42 4E 45 20 53 |SNR. + .P. BNE S| 00000D20: 43 52 55 50 B3 60 17 20 49 4E 43 20 2A 46 4E 52 |CRUP.`. INC *FNR| 00000D30: 2B B1 70 17 20 BB 80 17 53 43 52 55 50 33 20 20 |+.p. ...SCRUP3 | 00000D40: 20 20 20 52 54 D3 90 17 20 BB 00 18 20 BB 10 18 | RT... ... ...| 00000D50: 20 3B 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A | ; *************| 00000D60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000D70: 2A AA 20 18 20 3B 20 2A 20 20 44 4F 57 4E 3A 20 |*. . ; * DOWN: | 00000D80: 20 52 55 4E 54 45 52 53 43 52 4F 4C 4C 45 4E 20 | RUNTERSCROLLEN | 00000D90: 20 20 20 20 20 AA 30 18 20 3B 20 2A 2A 2A 2A 2A | .0. ; *****| 00000DA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000DB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A AA 40 18 20 BB 50 18 |*********.@. .P.| 00000DC0: 44 4F 57 4E 20 20 20 20 20 20 20 4C 44 58 20 23 |DOWN LDX #| 00000DD0: 32 33 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |23 | 00000DE0: 3B 20 5A 41 45 48 4C 45 52 20 32 34 20 5A 45 49 |; ZAEHLER 24 ZEI| 00000DF0: 4C 45 CE 60 18 20 BB 70 18 44 4F 57 4E 31 20 4C |LE.`. .p.DOWN1 L| 00000E00: 44 41 20 42 41 44 52 4C 4F 2C D8 80 18 20 53 54 |DA BADRLO,... ST| 00000E10: 41 20 53 43 31 2B 31 20 3B 20 51 55 45 4C 4C 41 |A SC1+1 ; QUELLA| 00000E20: 44 52 45 53 53 C5 90 18 20 4C 44 41 20 42 41 44 |DRESS... LDA BAD| 00000E30: 52 48 49 2C D8 00 19 20 53 54 41 20 53 43 31 2B |RHI,... STA SC1+| 00000E40: B2 10 19 20 BB 20 19 20 49 4E D8 30 19 20 4C 44 |... . . IN.0. LD| 00000E50: 41 20 42 41 44 52 4C 4F 2C D8 40 19 20 53 54 41 |A BADRLO,.@. STA| 00000E60: 20 53 43 32 2B 31 20 3B 20 5A 49 45 4C 41 44 52 | SC2+1 ; ZIELADR| 00000E70: 45 53 53 C5 50 19 20 4C 44 41 20 42 41 44 52 48 |ESS.P. LDA BADRH| 00000E80: 49 2C D8 60 19 20 53 54 41 20 53 43 32 2B B2 70 |I,.`. STA SC2+.p| 00000E90: 19 20 44 45 D8 80 19 20 BB 90 19 20 4A 53 52 20 |. DE... ... JSR | 00000EA0: 53 43 52 4C 49 4E 20 3B 20 45 49 4E 45 20 5A 45 |SCRLIN ; EINE ZE| 00000EB0: 49 4C 45 20 42 45 57 45 47 45 CE 00 20 20 BB 10 |ILE BEWEGE.. ..| 00000EC0: 20 20 44 45 D8 20 20 20 42 50 4C 20 44 4F 57 4E | DE. BPL DOWN| 00000ED0: B1 30 20 20 BB 40 20 20 4A 53 52 20 53 43 50 41 |.0 .@ JSR SCPA| 00000EE0: 55 D3 50 20 20 BB 60 20 20 52 54 D3 70 20 20 BB |U.P .` RT.p .| 00000EF0: 80 20 20 3B 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |. ; ***********| 00000F00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000F10: 2A 2A 2A AA 90 20 20 3B 20 2A 20 20 50 41 53 55 |***.. ; * PASU| 00000F20: 45 3A 20 20 56 45 52 5A 4F 45 47 45 52 55 4E 47 |E: VERZOEGERUNG| 00000F30: 20 20 20 20 20 20 20 AA 00 21 20 3B 20 2A 2A 2A | ..! ; ***| 00000F40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000F50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A AA 10 21 20 BB |***********..! .| 00000F60: 20 21 53 43 50 41 55 53 20 20 20 20 20 4C 44 58 | !SCPAUS LDX| 00000F70: 20 23 30 35 20 20 20 20 20 20 20 20 20 20 20 20 | #05 | 00000F80: 20 20 3B 20 4B 55 52 5A 45 20 50 41 55 53 C5 30 | ; KURZE PAUS.0| 00000F90: 21 20 2E 42 59 20 24 32 43 20 3B 20 42 49 54 2D |! .BY $2C ; BIT-| 00000FA0: 42 45 46 45 48 CC 40 21 20 BB 50 21 50 41 55 53 |BEFEH.@! .P!PAUS| 00000FB0: 45 20 20 20 20 20 20 4C 44 58 20 23 35 B0 60 21 |E LDX #5.`!| 00000FC0: 20 4C 44 59 20 23 B0 70 21 50 41 55 53 45 31 20 | LDY #.p!PAUSE1 | 00000FD0: 44 45 D9 80 21 20 42 4E 45 20 50 41 55 53 45 B1 |DE..! BNE PAUSE.| 00000FE0: 90 21 20 44 45 D8 00 22 20 20 20 20 20 20 20 20 |.! DE.." | 00000FF0: 20 20 20 42 4E 45 20 50 41 55 53 45 B1 10 22 20 | BNE PAUSE.." | 00001000: 52 54 D3 20 22 20 BB 30 22 20 BB 40 22 20 3B 20 |RT. " .0" .@" ; | 00001010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A AA 50 |**************.P| 00001030: 22 20 3B 20 2A 20 20 45 4E 49 52 51 3A 20 20 45 |" ; * ENIRQ: E| 00001040: 4E 41 42 4C 45 20 52 41 53 54 45 52 2D 49 52 51 |NABLE RASTER-IRQ| 00001050: 20 20 AA 60 22 20 3B 20 2A 2A 2A 2A 2A 2A 2A 2A | .`" ; ********| 00001060: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001070: 2A 2A 2A 2A 2A 2A AA 70 22 20 BB 80 22 45 4E 49 |******.p" .."ENI| 00001080: 52 51 20 53 45 C9 90 22 20 4C 44 58 20 23 4C 2C |RQ SE.." LDX #L,| 00001090: 52 41 53 49 52 D1 00 23 20 4C 44 59 20 23 48 2C |RASIR..# LDY #H,| 000010A0: 52 41 53 49 52 D1 10 23 20 53 54 58 20 24 30 33 |RASIR..# STX $03| 000010B0: 31 34 20 3B 20 49 52 51 2D 56 45 4B 54 4F 52 20 |14 ; IRQ-VEKTOR | 000010C0: 56 45 52 42 49 45 47 45 CE 20 23 20 53 54 59 20 |VERBIEGE. # STY | 000010D0: 24 30 33 31 B5 30 23 20 BB 40 23 20 4C 44 41 20 |$031.0# .@# LDA | 000010E0: 23 24 38 B1 50 23 20 53 54 41 20 24 44 30 31 41 |#$8.P# STA $D01A| 000010F0: 20 3B 20 49 52 51 2D 4D 41 53 4B 45 4E 2D 52 45 | ; IRQ-MASKEN-RE| 00001100: 47 AE 60 23 20 BB 70 23 20 4C 44 41 20 23 24 31 |G.`# .p# LDA #$1| 00001110: C2 80 23 20 53 54 41 20 24 44 30 31 31 20 3B 20 |..# STA $D011 ; | 00001120: 52 41 53 54 45 52 2D 52 45 47 2E 20 4D 53 42 20 |RASTER-REG. MSB | 00001130: 3D 20 B0 90 23 20 BB 00 24 20 53 54 41 20 24 44 |= ..# ..$ STA $D| 00001140: 30 31 32 20 3B 20 52 41 53 54 45 52 52 45 47 AE |012 ; RASTERREG.| 00001150: 10 24 20 53 54 41 20 52 4C 49 4E 2B 31 20 3B 20 |.$ STA RLIN+1 ; | 00001160: 5A 45 49 4C 45 20 32 37 20 28 44 55 4D 4D 59 A9 |ZEILE 27 (DUMMY.| 00001170: 20 24 20 BB 30 24 20 43 4C C9 40 24 20 52 54 D3 | $ .0$ CL.@$ RT.| 00001180: 50 24 20 BB 60 24 20 BB 70 24 20 3B 20 2A 2A 2A |P$ .`$ .p$ ; ***| 00001190: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000011A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A AA 80 24 20 3B |***********..$ ;| 000011B0: 20 2A 20 20 44 49 53 49 52 51 3A 20 44 49 53 41 | * DISIRQ: DISA| 000011C0: 42 4C 45 20 52 41 53 54 45 52 2D 49 52 51 20 AA |BLE RASTER-IRQ .| 000011D0: 90 24 20 3B 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.$ ; ***********| 000011E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000011F0: 2A 2A 2A AA 00 25 20 BB 10 25 44 49 53 49 52 51 |***..% ..%DISIRQ| 00001200: 20 53 45 C9 20 25 20 4C 44 58 20 23 24 33 B1 30 | SE. % LDX #$3.0| 00001210: 25 20 4C 44 59 20 23 24 45 C1 40 25 20 53 54 58 |% LDY #$E.@% STX| 00001220: 20 24 30 33 31 B4 50 25 20 53 54 59 20 24 30 33 | $031.P% STY $03| 00001230: 31 35 20 3B 20 49 52 51 2D 56 45 4B 54 4F 52 20 |15 ; IRQ-VEKTOR | 00001240: 24 45 41 33 B1 60 25 20 BB 70 25 20 4C 44 41 20 |$EA3.`% .p% LDA | 00001250: 23 B0 80 25 20 53 54 41 20 24 44 30 31 41 20 3B |#..% STA $D01A ;| 00001260: 20 4D 41 53 4B 45 4E 52 45 47 49 53 54 45 D2 90 | MASKENREGISTE..| 00001270: 25 20 4C 44 41 20 24 44 30 31 39 20 3B 20 46 4C |% LDA $D019 ; FL| 00001280: 41 47 52 45 47 49 53 54 45 D2 00 26 20 BB 10 26 |AGREGISTE..& ..&| 00001290: 20 43 4C C9 20 26 20 52 54 D3 30 26 20 BB 40 26 | CL. & RT.0& .@&| 000012A0: 20 BB 50 26 20 3B 20 2A 2A 2A 2A 2A 2A 2A 2A 2A | .P& ; *********| 000012B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000012C0: 2A 2A 2A 2A 2A AA 60 26 20 3B 20 2A 20 20 52 41 |*****.`& ; * RA| 000012D0: 53 49 52 51 3A 20 20 52 41 53 54 45 52 49 4E 54 |SIRQ: RASTERINT| 000012E0: 45 52 52 55 50 54 20 20 20 AA 70 26 20 3B 20 2A |ERRUPT .p& ; *| 000012F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001300: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A AA 80 26 |*************..&| 00001310: 20 BB 90 26 52 41 53 49 52 51 20 4C 44 41 20 24 | ..&RASIRQ LDA $| 00001320: 44 30 31 39 20 3B 20 46 4C 41 47 2D 52 45 47 49 |D019 ; FLAG-REGI| 00001330: 53 54 45 D2 00 27 20 53 54 41 20 24 44 30 31 B9 |STE..' STA $D01.| 00001340: 10 27 20 42 4D 49 20 52 41 53 54 45 52 20 3B 20 |.' BMI RASTER ; | 00001350: 42 3A 20 52 41 53 54 45 52 2D 49 52 D1 20 27 20 |B: RASTER-IR. ' | 00001360: BB 30 27 20 4C 44 41 20 24 44 43 30 44 20 3B 20 |.0' LDA $DC0D ; | 00001370: 43 49 41 3A 20 49 52 51 2D 46 4C 41 47 20 4C 4F |CIA: IRQ-FLAG LO| 00001380: 45 53 43 48 45 CE 40 27 20 43 4C 49 20 3B 20 55 |ESCHE.@' CLI ; U| 00001390: 4E 54 45 52 42 52 45 43 48 42 41 52 20 4D 41 43 |NTERBRECHBAR MAC| 000013A0: 48 45 CE 50 27 20 4A 4D 50 20 24 45 41 33 31 20 |HE.P' JMP $EA31 | 000013B0: 3B 20 4E 4F 52 4D 41 4C 45 52 20 49 52 D1 60 27 |; NORMALER IR.`'| 000013C0: 20 BB 70 27 52 41 53 54 45 52 20 20 20 20 20 4C | .p'RASTER L| 000013D0: 44 58 20 2A 41 43 54 4C 49 4E 20 20 20 20 20 20 |DX *ACTLIN | 000013E0: 20 20 20 20 20 3B 20 41 4B 54 55 45 4C 4C 45 20 | ; AKTUELLE | 000013F0: 42 2E 5A 45 49 4C C5 80 27 52 4C 49 4E 20 43 50 |B.ZEIL..'RLIN CP| 00001400: 58 20 23 24 38 38 20 3B 20 4D 4F 44 49 46 49 5A |X #$88 ; MODIFIZ| 00001410: 49 45 52 54 21 21 A1 90 27 20 20 20 20 20 20 20 |IERT!!..' | 00001420: 20 20 20 20 42 4E 45 20 43 48 47 52 41 53 20 20 | BNE CHGRAS | 00001430: 20 20 20 20 20 20 20 20 20 3B 20 41 43 54 4C 49 | ; ACTLI| 00001440: 4E 20 57 55 52 44 45 20 47 45 41 45 4E 44 45 52 |N WURDE GEAENDER| 00001450: D4 00 28 20 BB 10 28 20 4C 44 41 20 23 36 20 3B |..( ..( LDA #6 ;| 00001460: 20 44 55 4E 4B 45 4C 42 4C 41 D5 20 28 20 53 54 | DUNKELBLA. ( ST| 00001470: 41 20 24 44 30 32 B1 30 28 20 53 54 41 20 24 44 |A $D02.0( STA $D| 00001480: 30 32 B0 40 28 20 BB 50 28 20 54 58 41 20 3B 20 |02.@( .P( TXA ; | 00001490: 41 43 54 4C 49 4E 20 4D 41 4C 20 38 BA 60 28 20 |ACTLIN MAL 8.`( | 000014A0: 20 20 20 20 20 20 20 20 20 20 41 53 4C 20 41 20 | ASL A | 000014B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3B | ;| 000014C0: 20 52 2E 5A 45 49 4C 45 20 2B 20 38 20 42 45 52 | R.ZEILE + 8 BER| 000014D0: 45 43 48 4E 45 CE 70 28 20 41 53 4C 20 C1 80 28 |ECHNE.p( ASL ..(| 000014E0: 20 41 53 4C 20 C1 90 28 20 20 20 20 20 20 20 20 | ASL ..( | 000014F0: 20 20 20 41 44 43 20 23 24 33 39 20 20 20 20 20 | ADC #$39 | 00001500: 20 20 20 20 20 20 20 20 3B 20 24 33 31 20 2B 20 | ; $31 + | 00001510: 38 20 41 44 44 49 45 52 45 CE 00 29 20 BB 10 29 |8 ADDIERE..) ..)| 00001520: 20 4C 44 59 20 23 30 20 3B 20 53 43 48 57 41 52 | LDY #0 ; SCHWAR| 00001530: DA 20 29 20 BB 30 29 52 41 53 54 31 20 20 20 20 |. ) .0)RAST1 | 00001540: 43 4D 50 20 24 44 30 31 32 20 20 20 20 20 20 20 |CMP $D012 | 00001550: 20 20 20 20 20 3B 20 57 41 52 54 45 4E 20 42 49 | ; WARTEN BI| 00001560: 53 20 B9 40 29 20 20 20 20 20 20 20 20 20 20 20 |S .@) | 00001570: 42 43 53 20 52 41 53 54 31 20 20 20 20 20 20 20 |BCS RAST1 | 00001580: 20 20 20 20 20 3B 20 52 2E 5A 45 49 4C 45 4E 20 | ; R.ZEILEN | 00001590: 57 45 49 54 45 D2 50 29 20 BB 60 29 20 20 20 20 |WEITE.P) .`) | 000015A0: 20 20 20 20 20 20 20 53 54 59 20 24 44 30 32 B0 | STY $D02.| 000015B0: 70 29 20 20 20 20 20 20 20 20 20 20 20 53 54 59 |p) STY| 000015C0: 20 24 44 30 32 B1 80 29 20 BB 90 29 20 4A 4D 50 | $D02..) ..) JMP| 000015D0: 20 24 45 41 38 31 20 3B 20 52 45 47 2E 20 56 4F | $EA81 ; REG. VO| 000015E0: 4D 20 53 54 41 43 4B 20 2F 20 52 54 C9 00 30 20 |M STACK / RT..0 | 000015F0: BB 10 30 20 BB 20 30 43 48 47 52 41 53 20 20 20 |..0 . 0CHGRAS | 00001600: 20 20 53 54 58 20 52 4C 49 4E 2B 31 20 20 20 20 | STX RLIN+1 | 00001610: 20 20 20 20 20 20 20 3B 20 4E 45 55 45 20 41 43 | ; NEUE AC| 00001620: 54 4C 49 CE 30 30 20 54 58 41 20 3B 20 41 43 54 |TLI.00 TXA ; ACT| 00001630: 4C 49 CE 40 30 20 41 53 4C 20 41 20 3B 20 41 43 |LI.@0 ASL A ; AC| 00001640: 54 4C 49 4E 20 4D 41 4C 20 B8 50 30 20 41 53 4C |TLIN MAL .P0 ASL| 00001650: 20 C1 60 30 20 41 53 4C 20 C1 70 30 20 20 20 20 | .`0 ASL .p0 | 00001660: 20 20 20 20 20 20 20 41 44 43 20 23 24 33 31 20 | ADC #$31 | 00001670: 20 20 20 20 20 20 20 20 20 20 20 20 3B 20 4F 42 | ; OB| 00001680: 45 52 45 52 20 52 41 48 4D 45 CE 80 30 20 53 54 |ERER RAHME..0 ST| 00001690: 41 20 24 44 30 31 32 20 3B 20 4E 45 55 45 20 52 |A $D012 ; NEUE R| 000016A0: 2E 49 52 51 2D 5A 45 49 4C C5 90 30 20 4A 4D 50 |.IRQ-ZEIL..0 JMP| 000016B0: 20 24 45 41 38 31 20 3B 20 52 45 47 2E 20 56 4F | $EA81 ; REG. VO| 000016C0: 4D 20 53 54 41 43 4B 20 2F 20 52 54 C9 00 31 20 |M STACK / RT..1 | 000016D0: BB 10 31 20 BB 20 31 20 3B 20 2A 2A 2A 2A 2A 2A |..1 . 1 ; ******| 000016E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000016F0: 2A 2A 2A 2A 2A 2A 2A 2A AA 30 31 20 3B 20 2A 20 |********.01 ; * | 00001700: 20 4D 55 4C 54 49 50 4C 49 4B 41 54 49 4F 4E 53 | MULTIPLIKATIONS| 00001710: 54 41 42 45 4C 4C 45 4E 20 20 20 20 AA 40 31 20 |TABELLEN .@1 | 00001720: 3B 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |; **************| 00001730: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001740: AA 50 31 20 BB 60 31 4D 55 4C 32 33 4C 20 20 20 |.P1 .`1MUL23L | 00001750: 20 20 2E 42 59 20 24 30 30 20 24 31 37 20 24 32 | .BY $00 $17 $2| 00001760: 45 20 24 34 35 20 24 35 43 20 24 37 B3 70 31 20 |E $45 $5C $7.p1 | 00001770: 20 20 20 20 20 20 20 20 20 20 2E 42 59 20 24 38 | .BY $8| 00001780: 41 20 24 41 31 20 24 42 38 20 24 43 46 20 24 45 |A $A1 $B8 $CF $E| 00001790: 36 20 24 46 C4 80 31 20 20 20 20 20 20 20 20 20 |6 $F..1 | 000017A0: 20 20 2E 42 59 20 24 31 34 20 24 32 42 20 24 34 | .BY $14 $2B $4| 000017B0: 32 20 24 35 39 20 24 37 30 20 24 38 B7 90 31 20 |2 $59 $70 $8..1 | 000017C0: 20 20 20 20 20 20 20 20 20 20 2E 42 59 20 24 39 | .BY $9| 000017D0: 45 20 24 42 35 20 24 43 43 20 24 45 33 20 24 46 |E $B5 $CC $E3 $F| 000017E0: 41 20 24 31 31 20 24 32 B8 00 32 4D 55 4C 32 33 |A $11 $2..2MUL23| 000017F0: 48 20 20 20 20 20 2E 42 59 20 30 20 30 20 30 20 |H .BY 0 0 0 | 00001800: 30 20 30 20 30 20 30 20 30 20 30 20 B0 10 32 20 |0 0 0 0 0 0 ..2 | 00001810: 20 20 20 20 20 20 20 20 20 20 2E 42 59 20 30 20 | .BY 0 | 00001820: 30 20 31 20 31 20 31 20 31 20 31 20 31 20 B1 20 |0 1 1 1 1 1 1 . | 00001830: 32 20 20 20 20 20 20 20 20 20 20 20 2E 42 59 20 |2 .BY | 00001840: 31 20 31 20 31 20 31 20 32 20 B2 30 32 20 BB 40 |1 1 1 1 2 .02 .@| 00001850: 32 42 41 44 52 4C 4F 20 2E 42 59 20 24 30 30 20 |2BADRLO .BY $00 | 00001860: 24 32 38 20 24 35 30 20 24 37 38 20 24 41 30 20 |$28 $50 $78 $A0 | 00001870: 24 43 B8 50 32 20 2E 42 59 20 24 46 30 20 24 31 |$C.P2 .BY $F0 $1| 00001880: 38 20 24 34 30 20 24 36 38 20 24 39 30 20 24 42 |8 $40 $68 $90 $B| 00001890: B8 60 32 20 2E 42 59 20 24 45 30 20 24 30 38 20 |.`2 .BY $E0 $08 | 000018A0: 24 33 30 20 24 35 38 20 24 38 30 20 24 41 B8 70 |$30 $58 $80 $A.p| 000018B0: 32 20 20 20 2E 42 59 20 20 20 20 20 24 44 30 20 |2 .BY $D0 | 000018C0: 24 46 38 20 24 32 30 20 24 34 38 20 24 37 30 20 |$F8 $20 $48 $70 | 000018D0: 24 39 38 20 24 43 30 20 24 45 B8 80 32 42 41 44 |$98 $C0 $E..2BAD| 000018E0: 52 48 49 20 2E 42 59 20 34 20 34 20 34 20 34 20 |RHI .BY 4 4 4 4 | 000018F0: 34 20 34 20 B4 90 32 20 2E 42 59 20 35 20 35 20 |4 4 ..2 .BY 5 5 | 00001900: 35 20 35 20 35 20 B5 00 33 20 2E 42 59 20 36 20 |5 5 5 ..3 .BY 6 | 00001910: 36 20 36 20 36 20 36 20 36 20 B6 10 33 20 2E 42 |6 6 6 6 6 ..3 .B| 00001920: 59 20 37 20 37 20 37 20 37 20 37 20 37 20 B7 20 |Y 7 7 7 7 7 7 . | 00001930: 33 20 BB 30 33 20 BB 40 33 20 3B 20 2A 2A 2A 2A |3 .03 .@3 ; ****| 00001940: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001950: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A AA 50 33 20 20 20 |**********.P3 | 00001960: 20 20 20 20 20 20 20 20 3B 20 2A 20 20 41 55 53 | ; * AUS| 00001970: 47 41 42 45 54 45 58 54 45 20 20 20 20 20 20 20 |GABETEXTE | 00001980: 20 20 20 20 20 20 20 20 AA 60 33 20 3B 20 2A 2A | .`3 ; **| 00001990: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000019A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A AA 70 33 20 |************.p3 | 000019B0: BB 80 33 54 4F 50 54 58 54 20 20 20 20 20 2E 42 |..3TOPTXT .B| 000019C0: 59 20 31 34 37 20 27 53 48 4F 57 44 41 54 20 56 |Y 147 'SHOWDAT V| 000019D0: 31 2E 30 42 20 28 53 4F 52 54 45 52 20 36 34 29 |1.0B (SORTER 64)| 000019E0: 27 20 31 B3 90 33 20 2E 42 59 20 27 57 52 49 54 |' 1..3 .BY 'WRIT| 000019F0: 54 45 4E 20 42 59 20 4F 44 59 53 53 45 55 53 27 |TEN BY ODYSSEUS'| 00001A00: 20 31 33 20 31 B3 00 34 20 2E 42 59 20 27 55 53 | 13 1..4 .BY 'US| 00001A10: 45 20 4A 4F 59 53 54 49 43 4B 20 49 4E 20 50 4F |E JOYSTICK IN PO| 00001A20: 52 54 20 32 27 20 31 B3 10 34 20 20 20 20 20 20 |RT 2' 1..4 | 00001A30: 20 20 20 20 20 2E 42 59 20 27 46 49 52 45 3A 20 | .BY 'FIRE: | 00001A40: 53 45 4C 45 43 54 20 46 49 4C 45 27 20 31 B3 20 |SELECT FILE' 1. | 00001A50: 34 20 2E 42 59 20 27 48 4F 4D 45 3A 20 54 4F 50 |4 .BY 'HOME: TOP| 00001A60: 20 4F 46 20 46 49 4C 45 27 20 31 B3 30 34 20 20 | OF FILE' 1.04 | 00001A70: 20 20 20 20 20 20 20 20 20 2E 42 59 20 27 45 53 | .BY 'ES| 00001A80: 43 41 50 45 20 28 3D 20 41 52 52 4F 57 20 54 4F |CAPE (= ARROW TO| 00001A90: 20 4C 45 46 54 29 3A 20 45 4E 44 27 20 31 33 20 | LEFT): END' 13 | 00001AA0: 31 33 20 B0 40 34 20 BB 50 34 53 54 45 58 54 20 |13 .@4 .P4STEXT | 00001AB0: 20 20 20 20 20 2E 42 59 20 31 33 20 31 33 20 27 | .BY 13 13 '| 00001AC0: 4F 55 54 50 55 54 2D 46 49 4C 45 3A 27 20 31 B3 |OUTPUT-FILE:' 1.| 00001AD0: 60 34 46 54 45 58 54 20 20 20 20 20 20 2E 42 59 |`4FTEXT .BY| 00001AE0: 20 27 46 49 4C 45 4E 41 4D 45 3A 20 27 20 B0 70 | 'FILENAME: ' .p| 00001AF0: 34 20 BB 80 34 45 4D 50 54 59 20 2E 42 59 20 31 |4 ..4EMPTY .BY 1| 00001B00: 33 20 27 53 4F 55 52 43 45 2D 46 49 4C 45 20 45 |3 'SOURCE-FILE E| 00001B10: 4D 50 54 59 21 27 20 B0 90 34 20 BB 00 35 20 BB |MPTY!' ..4 ..5 .| 00001B20: 10 35 20 3B 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.5 ; ***********| 00001B30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001B40: 2A 2A 2A AA 20 35 20 3B 20 2A 20 20 45 49 4E 2D |***. 5 ; * EIN-| 00001B50: 20 2F 20 41 55 53 47 41 42 45 50 55 46 46 45 52 | / AUSGABEPUFFER| 00001B60: 20 20 20 20 20 20 20 AA 30 35 20 3B 20 2A 2A 2A | .05 ; ***| 00001B70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00001B80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A AA 40 35 20 BB |***********.@5 .| 00001B90: 50 35 46 4E 41 4D 20 2E 44 53 20 32 30 20 3B 20 |P5FNAM .DS 20 ; | 00001BA0: 50 55 46 46 45 52 20 46 2E 20 46 49 4C 45 4E 41 |PUFFER F. FILENA| 00001BB0: 4D C5 60 35 20 BB 70 35 45 42 55 46 20 2E 44 53 |M.`5 .p5EBUF .DS| 00001BC0: 20 32 37 20 3B 20 45 49 4E 54 52 41 47 20 41 42 | 27 ; EINTRAG AB| 00001BD0: 4C 45 47 45 CE 80 35 20 BB 90 35 46 54 41 42 20 |LEGE..5 ..5FTAB | 00001BE0: 2E 42 59 20 30 20 3B 20 46 49 4C 45 45 49 4E 54 |.BY 0 ; FILEEINT| 00001BF0: 52 41 45 47 C5 00 36 20 BB 10 36 20 BB 00 |RAEG..6 ..6 .. |
..0.K... ... ; *************************
*****. . ; * OLDLIN: BEWEGUNG HOCH
.0. ; ******************************.@.
.P.OLDLIN LDA *ACTLIN ; A
KTUELLE B.ZEILE`. BEQ OLD3 ; B: ZEILE .P
. ... CMP #3 ; OBERE SCROLLGRENZE... BNE
OLD1 ; B: NEIN.. ... . . ; VIERTE BILDS
CH.ZEILE.0. .@. LDA *FNR+1
; 4. FILEEINTRAG.P. BN
E SCRDN ; NEIN: MEHR ALS 25.`
. LDA *FNRP. CMP #4 ; 4. FILEE
INTRAG... BNE SCRDN
; B: NEIN.. ... ... ; EINFACHE BEWEGUNG
NACH OBEN. . .0.OLD1 DEC *ACTLIN
; AKT. B.ZEILE - .@. LDX
*FNR ; EINTRAGSNR. - .P. BNE
OLD.`. DEC *FNR+.P.OLD2
DEC *FNR.. ...OLD3 JMP PAUSE.. ..
. . . ; RUNTERSCROLLEN EINLEIT
EN0. .@. ; BILDSCHIRMZEIGER MODIFIZIEREN
P. .`.SCRDN SEC ;
ZEIGER MINUS 2.P. LDA *ANFLIN.
. SBC #2... STA *ANF
LIN.. BCS SCRDN... D
EC *ANFLIN+. . .0.SCRDN1 SEC@.
LDA *ENDLINP. SBC #2.`.
STA *ENDLINP. BCS SCR
DN... DEC *ENDLIN+... ...SCRDN
2 JSR DOWN ; HOCHSCROLLE
N.. . . LDA #0 ;
ZEILE 1 HOLEN0. STA *CNTLIN@.
JSR OUTLINP. .`. LDA *FNR ; EINTRAGSNR.
- .P. BNE SCRDN... DEC *FNR+...SCRDN3 D
EC *FNR.. ... RTS . .0. .@. ; **********
********************.P. ; * HOCHSCROLLR
OUTINE .`. ; ******************
************.P. ...UP LDX #1 ; ZAEHLER..
...UP1 LDA BADRLO,X ; AD
RESSEN SETZEN.. STA SC1+1 ; QUELLADRESSE
. LDA BADRHI,X0. STA SC1+.@.
.P. DEX`. LDA BADRLO,XP. STA S
C2+1 ; ZIELADRESSE.. LDA BADRH
I,X.. STA SC2+... INX.. . . JSR SCRLIN ;
1 ZEILE VERSCHIEBEN0. .@. INXP. CPX #2.
`. BNE UP.P. ... JSR SCPAUS.. ... RTS..
. . .0. ; ******************************
.@. ; * SCRLIN: ZEILE VERSCHIEBEN .P.
; * QUELL-/ZIELADR. MODIFIED .`. ; **
****************************.P. ...SCRLI
N LDY #28 ; 29 ZEICHEN.
.SC1 LDA $8888,Y ; QUELLADRESSE..SC2 STA
$8888,Y ; ZIELADRESSE.. DEY .
BPL SC.0. RTS@. .P. .`. ; *************
*****************.P. ; * NEWLIN: ZEILE
NACH UNTEN ... ; *********************
*********... ...NEWLIN LDA *ACTLIN
; AKTUELLE B.ZEILE.. CMP #24 ;
25. ZEILE = FILEENDE. . BEQ NEW3 ; B: JA
, FERTIG0. .@. CMP #21 ; B.ZEILE 21 = SC
ROLLGRENZE.P. BNE NEW1 ; B: NEIN`. .P. .
.. ; 22. B.ZEILE: SCROLLEN.. ... SEC.. L
DA *FANZ ; ANZAHL EINTRAEGE . SBC *FNR ;
- AKTUELLER EINTRAG0. TAX ; DIFF (LO) M
ERKEN@. LDA *FANZ+.P. SBC *FNR+.`.
BNE SCRUP ; DIFFERENZ GT
25.P. ... CPX #4 ; DIFFERENZ GE 4...
BCS SCRUP ; B: JA, SC
ROLLEN.. ... . . ; NORMALE BEWEGUNG NACH
UNTEN0. .@.NEW1 INC *ACTLIN ; ACTLIN +
.P. INC *FNR ; EINTRAGSNR. + .`. BNE NEW
.P. INC *FNR+... ...NEW3 JMP PAUSE
.. ... . . ; HOCHSCROLLEN EINL
EITEN.0. .@.SCRUP CLC
; ZEIGER WEITERSETZENP. LD
A *ANFLIN`. ADC #2.P.
STA *ANFLIN.. BCC SCRUP...
INC *ANFLIN+... ...SCRUP1 C
LC . LDA *ENDLIN0. A
DC #2.@. STA *ENDLINP.
BCC SCRUP.`. INC *ENDLIN+.P
. ...SCRUP2 JSR UP ; HOCHSCROLLEN..
... LDA #24 ; ZEILE 25 ANZEIG
EN.. STA *CNTLIN . JSR OUTLIN0
. .@. INC *FNR ; EINTRAGSNR. + .P. BNE S
CRUP.`. INC *FNR+.P. ...SCRUP3 RTS..
... ... ; *****************************
*. . ; * DOWN: RUNTERSCROLLEN .0.
; ******************************.@. .P.
DOWN LDX #23 ; ZAEHLE
R 24 ZEILEN`. .P.DOWN1 LDA BADRLO,X.. ST
A SC1+1 ; QUELLADRESSE.. LDA BADRHI,X..
STA SC1+... . . INX0. LDA BADRLO,X@. STA
SC2+1 ; ZIELADRESSEP. LDA BADRHI,X`. ST
A SC2+.P. DEX.. ... JSR SCRLIN ; EINE ZE
ILE BEWEGEN. .. DEX BPL DOWN.0 .@
JSR SCPAUSP .` RTSP .. ; ***********
*******************.. ; * PASUE: VERZ
OEGERUNG ..! ; *******************
***********..! . !SCPAUS LDX #05
; KURZE PAUSE0! .BY $2C ; BIT-
BEFEHL@! .P!PAUSE LDX #5.`! LDY #.P
!PAUSE1 DEY.! BNE PAUSE..! DEX."
BNE PAUSE.." RTS " .0" .@" ; ********
**********************.P" ; * ENIRQ: E
NABLE RASTER-IRQ .`" ; ****************
**************.P" .."ENIRQ SEI." LDX #L,
RASIRQ.# LDY #H,RASIRQ.# STX $0314 ; IRQ
-VEKTOR VERBIEGEN # STY $031.0# .@# LDA
#$8.P# STA $D01A ; IRQ-MASKEN-REG.`# .P#
LDA #$1B.# STA $D011 ; RASTER-REG. MSB
= ..# ..$ STA $D012 ; RASTERREG..$ STA R
LIN+1 ; ZEILE 27 (DUMMY. $ .0$ CLI@$ RTS
P$ .`$ .P$ ; ***************************
***..$ ; * DISIRQ: DISABLE RASTER-IRQ .
.$ ; ******************************..% .
.%DISIRQ SEI % LDX #$3.0% LDY #$EA@% STX
$031.P% STY $0315 ; IRQ-VEKTOR $EA3.`%
.P% LDA #..% STA $D01A ; MASKENREGISTER.
% LDA $D019 ; FLAGREGISTER.& ..& CLI & R
TS0& .@& .P& ; *************************
*****.`& ; * RASIRQ: RASTERINTERRUPT
.P& ; ******************************..&
..&RASIRQ LDA $D019 ; FLAG-REGISTER.' S
TA $D01..' BMI RASTER ; B: RASTER-IRQ '
.0' LDA $DC0D ; CIA: IRQ-FLAG LOESCHEN@'
CLI ; UNTERBRECHBAR MACHENP' JMP $EA31
; NORMALER IRQ`' .P'RASTER LDX *ACTL
IN ; AKTUELLE B.ZEILE.'RLIN CP
X #$88 ; MODIFIZIERT!!..' BNE
CHGRAS ; ACTLIN WURDE GEAENDER
T.( ..( LDA #6 ; DUNKELBLAU ( STA $D02.0
( STA $D02.@( .P( TXA ; ACTLIN MAL 8.`(
ASL A ; R.ZEILE
+ 8 BERECHNENP( ASL A.( ASL A.(
ADC #$39 ; $31 + 8 ADDIER
EN.) ..) LDY #0 ; SCHWARZ ) .0)RAST1
CMP $D012 ; WARTEN BIS .@)
BCS RAST1 ; R.ZEILEN
WEITERP) .`) STY $D02.P)
STY $D02..) ..) JMP $EA81 ; REG. VO
M STACK / RTI.0 ..0 . 0CHGRAS STX RL
IN+1 ; NEUE ACTLIN00 TXA ; ACT
LIN@0 ASL A ; ACTLIN MAL .P0 ASL A`0 ASL
AP0 ADC #$31 ; OB
ERER RAHMEN.0 STA $D012 ; NEUE R.IRQ-ZEI
LE.0 JMP $EA81 ; REG. VOM STACK / RTI.1
..1 . 1 ; ******************************
.01 ; * MULTIPLIKATIONSTABELLEN .@1
; ******************************.P1 .`1M
UL23L .BY $00 $17 $2E $45 $5C $7.P1
.BY $8A $A1 $B8 $CF $E6 $FD.1
.BY $14 $2B $42 $59 $70 $8..1
.BY $9E $B5 $CC $E3 $FA $11 $2
..2MUL23H .BY 0 0 0 0 0 0 0 0 0 ..2
.BY 0 0 1 1 1 1 1 1 . 2
.BY 1 1 1 1 2 .02 .@2BADRLO .BY $00
$28 $50 $78 $A0 $C.P2 .BY $F0 $18 $40 $6
8 $90 $B.`2 .BY $E0 $08 $30 $58 $80 $A.P
2 .BY $D0 $F8 $20 $48 $70 $98 $C0
$E..2BADRHI .BY 4 4 4 4 4 4 ..2 .BY 5 5
5 5 5 ..3 .BY 6 6 6 6 6 6 ..3 .BY 7 7 7
7 7 7 . 3 .03 .@3 ; ********************
**********.P3 ; * AUSGABETEXT
E .`3 ; ******************
************.P3 ..3TOPTXT .BY 147 'S
HOWDAT V1.0B (SORTER 64)' 1..3 .BY 'WRIT
TEN BY ODYSSEUS' 13 1..4 .BY 'USE JOYSTI
CK IN PORT 2' 1..4 .BY 'FIRE:
SELECT FILE' 1. 4 .BY 'HOME: TOP OF FILE
' 1.04 .BY 'ESCAPE (= ARROW TO
LEFT): END' 13 13 .@4 .P4STEXT .BY
13 13 'OUTPUT-FILE:' 1.`4FTEXT .BY
'FILENAME: ' .P4 ..4EMPTY .BY 13 'SOURC
E-FILE EMPTY!' ..4 ..5 ..5 ; ***********
*******************. 5 ; * EIN- / AUSGA
BEPUFFER .05 ; *******************
***********.@5 .P5FNAM .DS 20 ; PUFFER F
. FILENAME`5 .P5EBUF .DS 27 ; EINTRAG AB
LEGEN.5 ..5FTAB .BY 0 ; FILEEINTRAEGE.6
..6 ..
> CLICK IMAGE PREVIEW FOR FULL MODAL