128-64 SYS
FILE INFORMATION
FILENAME(S): 128-64 SYS
FILE TYPE(S): PRG
FILE SIZE: 2.5K
FIRST SEEN: 2025-11-02 16:41:30
APPEARS ON: 1 disk(s)
FILE HASH
20cb333df658623cc0d48324f557e1e047fda8ae984587c7c8d84ffc4f6f6e6e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 15825 SH 25 | 128-64 SYS | PRG | Treasure Chest - PrettyOldPixel | 23 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000010: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000020: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000030: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000040: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000050: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000060: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000070: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000080: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 00000090: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 000000A0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 000000B0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 000000C0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 000000D0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 000000E0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 01 |................| 000000F0: 01 01 01 01 01 01 01 01 01 01 01 01 01 01 4C 4F |..............LO| 00000100: 43 4B 20 4C 45 53 45 4E 22 00 E8 2C 1A 2B 53 54 |CK LESEN"..,.+ST| 00000110: 41 20 24 30 30 3B 20 41 4C 53 20 41 55 46 54 52 |A $00; ALS AUFTR| 00000120: 41 47 20 46 55 45 52 20 50 55 46 46 45 52 20 30 |AG FUER PUFFER 0| 00000130: 00 0C 2D 1C 2B 57 41 52 54 45 4E 20 4C 44 41 20 |..-.+WARTEN LDA | 00000140: 24 30 30 3B 20 53 54 41 54 55 53 20 50 55 46 46 |$00; STATUS PUFF| 00000150: 45 52 20 30 00 34 2D 20 2B 42 4D 49 20 57 41 52 |ER 0.4- +BMI WAR| 00000160: 54 45 4E 3B 20 46 41 4C 4C 53 20 4E 4F 43 48 20 |TEN; FALLS NOCH | 00000170: 4E 49 43 48 54 20 46 45 52 54 49 47 00 50 2D 2A |NICHT FERTIG.P-*| 00000180: 2B 43 4D 50 20 23 31 3B 20 46 45 48 4C 45 52 20 |+CMP #1; FEHLER | 00000190: 41 42 46 52 41 47 45 4E 00 73 2D 34 2B 42 4E 45 |ABFRAGEN.s-4+BNE| 000001A0: 20 80 45 3B 20 46 41 4C 4C 53 20 46 45 48 4C 45 | .E; FALLS FEHLE| 000001B0: 52 20 41 55 46 A1 52 45 54 45 4E 00 79 2D 5C 2B |R AUF.RETEN.y-\+| 000001C0: 3B 00 A3 2D 66 2B 44 4E 41 4D 45 20 4C 44 41 20 |;..-f+DNAME LDA | 000001D0: 50 55 46 46 45 52 AA 31 34 34 2C 58 3B 20 44 49 |PUFFER.144,X; DI| 000001E0: 53 4B 4E 41 4D 45 4E 20 48 4F C3 00 CB 2D 70 2B |SKNAMEN HO...-p+| 000001F0: 53 54 41 20 41 55 53 47 41 42 45 2C 58 3B 20 49 |STA AUSGABE,X; I| 00000200: 4E 20 44 45 4E 20 41 55 53 47 41 42 45 50 55 46 |N DEN AUSGABEPUF| 00000210: 46 45 52 00 D3 2D 7A 2B 49 4E 58 00 F3 2D 84 2B |FER..-z+INX..-.+| 00000220: 43 50 58 20 23 32 30 3B 20 4E 41 4D 45 20 55 4E |CPX #20; NAME UN| 00000230: 44 20 49 44 20 4B 4F 4D 50 88 54 00 14 2E 8E 2B |D ID KOMP.T....+| 00000240: 42 4E 45 20 44 4E 41 4D 45 3B 20 57 45 49 54 45 |BNE DNAME; WEITE| 00000250: 52 20 46 41 4C 4C 53 20 4E 45 49 4E 00 1A 2E EC |R FALLS NEIN....| 00000260: 2C 3B 00 3E 2E F6 2C 82 20 4C 44 41 20 50 55 46 |,;.>..,. LDA PUF| 00000270: 46 45 52 3B 20 42 4C 4F 43 4B 5A 45 49 47 45 52 |FER; BLOCKZEIGER| 00000280: 20 54 52 41 43 4B 00 62 2E 00 2D 42 45 51 20 80 | TRACK.b..-BEQ .| 00000290: 45 3B 20 46 41 4C 4C 53 20 4E 41 45 43 48 53 54 |E; FALLS NAECHST| 000002A0: 45 52 20 54 52 41 43 4B 20 30 00 6E 2E 0A 2D 53 |ER TRACK 0.n..-S| 000002B0: 54 41 20 24 30 36 00 92 2E 14 2D 4C 44 41 20 50 |TA $06....-LDA P| 000002C0: 55 46 46 45 52 AA 31 3B 20 42 4C 4F 43 4B 5A 45 |UFFER.1; BLOCKZE| 000002D0: 49 47 45 52 20 53 45 4B A4 52 00 9E 2E 1E 2D 53 |IGER SEK.R....-S| 000002E0: 54 41 20 24 30 37 00 C2 2E 28 2D 4C 44 41 20 23 |TA $07...(-LDA #| 000002F0: 24 38 30 3B 20 4A 4F 42 43 4F 44 45 20 22 42 4C |$80; JOBCODE "BL| 00000300: 4F 43 4B 20 4C 45 53 45 4E 22 00 E9 2E 32 2D 53 |OCK LESEN"...2-S| 00000310: 54 41 20 24 30 30 3B 20 41 4C 53 20 41 55 46 54 |TA $00; ALS AUFT| 00000320: 52 41 47 20 46 55 45 52 20 50 55 46 46 45 52 20 |RAG FUER PUFFER | 00000330: 30 00 0E 2F 3C 2D 57 41 52 54 45 4E 31 20 4C 44 |0../<-WARTEN1 LD| 00000340: 41 20 24 30 30 3B 20 53 54 41 54 55 53 20 50 55 |A $00; STATUS PU| 00000350: 46 46 45 52 20 30 00 37 2F 46 2D 42 4D 49 20 57 |FFER 0.7/F-BMI W| 00000360: 41 52 54 45 4E 31 3B 20 46 41 4C 4C 53 20 4E 4F |ARTEN1; FALLS NO| 00000370: 43 48 20 4E 49 43 48 54 20 46 45 52 54 49 47 00 |CH NICHT FERTIG.| 00000380: 4A 2F B4 2D 4C 44 41 20 23 B1 50 55 46 46 45 52 |J/.-LDA #.PUFFER| 00000390: AA 32 00 5B 2F BE 2D 53 54 41 20 5A 45 49 47 45 |.2.[/.-STA ZEIGE| 000003A0: 52 AA 31 00 7F 2F C8 2D 4C 44 41 20 23 B3 50 55 |R.1../.-LDA #.PU| 000003B0: 46 46 45 52 AA 32 3B 20 41 4E 46 41 4E 47 20 31 |FFER.2; ANFANG 1| 000003C0: 2E 20 45 B5 52 41 47 00 B1 2F D2 2D 4E 4F 43 48 |. E.RAG../.-NOCH| 000003D0: 4D 41 4C 20 53 54 41 20 5A 45 49 47 45 52 3B 20 |MAL STA ZEIGER; | 000003E0: 5A 45 49 47 45 52 20 49 4E 20 50 55 46 46 45 52 |ZEIGER IN PUFFER| 000003F0: 20 48 45 52 53 54 45 4C C3 00 BC 2F E6 2D 4C 44 | HERSTEL.../.-LD| 00000400: 59 20 23 30 00 DA 2F F0 2D 4C 44 41 20 28 5A 45 |Y #0../.-LDA (ZE| 00000410: 49 47 45 52 29 2C 59 3B 20 46 49 88 59 50 20 48 |IGER),Y; FI.YP H| 00000420: 4F C3 00 F6 2F FA 2D 42 45 51 20 57 45 49 54 45 |O.../.-BEQ WEITE| 00000430: 52 3B 20 46 41 4C 4C 53 20 44 45 88 45 44 00 02 |R; FALLS DE.ED..| 00000440: 30 18 2E 4C 44 59 20 23 32 32 00 23 30 22 2E 4C |0..LDY #22.#0".L| 00000450: 44 41 20 28 5A 45 49 47 45 52 29 2C 59 3B 20 4D |DA (ZEIGER),Y; M| 00000460: 41 52 4B 49 45 8A 47 20 48 4F C3 00 42 30 2C 2E |ARKIE.G HO..B0,.| 00000470: 42 4D 49 20 57 45 49 54 45 52 3B 20 46 41 4C 4C |BMI WEITER; FALL| 00000480: 53 20 4D 41 52 4B 49 45 52 54 00 6F 30 36 2E 53 |S MARKIERT.o06.S| 00000490: 54 41 20 41 55 53 47 41 42 45 2C 58 3B 20 53 91 |TA AUSGABE,X; S.| 000004A0: 53 54 20 49 4E 20 44 45 4E 20 41 55 53 47 41 42 |ST IN DEN AUSGAB| 000004B0: 45 50 55 46 46 45 52 00 7C 30 40 2E 49 4E 58 3A |EPUFFER.|0@.INX:| 000004C0: 20 49 4E 59 00 A2 30 42 2E 4C 44 41 20 28 5A 45 | INY..0B.LDA (ZE| 000004D0: 49 47 45 52 29 2C 59 3B 20 52 45 53 45 52 56 49 |IGER),Y; RESERVI| 000004E0: 45 52 54 45 20 42 59 54 45 53 00 B9 30 44 2E 53 |ERTE BYTES..0D.S| 000004F0: 54 41 20 41 55 53 47 41 42 45 2C 58 3B 20 48 4F |TA AUSGABE,X; HO| 00000500: C3 00 C6 30 46 2E 49 4E 58 3A 20 49 4E 59 00 E9 |...0F.INX: INY..| 00000510: 30 47 2E 4C 44 41 20 28 5A 45 49 47 45 52 29 2C |0G.LDA (ZEIGER),| 00000520: 59 3B 20 28 53 54 41 52 54 41 44 52 45 53 53 45 |Y; (STARTADRESSE| 00000530: 29 00 0B 31 48 2E 53 54 41 20 41 55 53 47 41 42 |)..1H.STA AUSGAB| 00000540: 45 2C 58 3B 20 55 4E 44 20 55 45 42 45 52 47 45 |E,X; UND UEBERGE| 00000550: 42 45 4E 00 13 31 49 2E 49 4E 58 00 2D 31 4A 2E |BEN..1I.INX.-1J.| 00000560: 4C 44 59 20 23 33 3B 20 41 4E 46 41 4E 47 20 46 |LDY #3; ANFANG F| 00000570: 49 C3 41 4D 45 00 52 31 54 2E 4E 41 4D 45 20 4C |I.AME.R1T.NAME L| 00000580: 44 41 20 28 5A 45 49 47 45 52 29 2C 59 3B 20 5A |DA (ZEIGER),Y; Z| 00000590: 45 49 43 48 45 4E 20 48 4F C3 00 7E 31 5E 2E 53 |EICHEN HO..~1^.S| 000005A0: 54 41 20 41 55 53 47 41 42 45 2C 58 3B 20 55 4E |TA AUSGABE,X; UN| 000005B0: 44 20 49 4E 20 44 45 4E 20 41 55 53 47 41 42 45 |D IN DEN AUSGABE| 000005C0: 50 55 46 46 45 52 00 86 31 68 2E 49 4E 58 00 AF |PUFFER..1h.INX..| 000005D0: 31 72 2E 42 4E 45 20 4F 4B 3B 20 46 41 4C 4C 53 |1r.BNE OK; FALLS| 000005E0: 20 50 55 46 46 45 52 20 4E 4F 43 48 20 4E 49 43 | PUFFER NOCH NIC| 000005F0: 48 54 20 56 4F 4C 4C 00 C3 31 AE 2E 53 54 59 20 |HT VOLL..1..STY | 00000600: 94 3B 20 59 20 52 45 54 54 45 4E 00 EB 31 B8 2E |.; Y RETTEN..1..| 00000610: 52 54 53 3B 20 52 55 45 43 4B 47 41 42 45 20 44 |RTS; RUECKGABE D| 00000620: 45 52 20 4B 91 54 52 4F 4C 4C 45 20 41 4E 53 20 |ER K.TROLLE ANS | 00000630: 44 4F 53 00 F1 31 C8 32 3B 00 04 32 D2 32 45 49 |DOS..1.2;..2.2EI| 00000640: 4E 53 50 52 47 20 4C 44 58 20 23 30 00 28 32 DC |NSPRG LDX #0.(2.| 00000650: 32 4C 44 59 20 94 3B 20 52 45 47 49 53 54 45 52 |2LDY .; REGISTER| 00000660: 20 57 49 45 44 45 52 20 48 45 52 53 54 45 4C C3 | WIEDER HERSTEL.| 00000670: 00 33 32 FA 32 4F 4B 20 49 4E 59 00 59 32 04 33 |.32.2OK INY.Y2.3| 00000680: 43 50 59 20 23 31 39 3B 20 88 5A 54 45 53 20 5A |CPY #19; .ZTES Z| 00000690: 45 49 43 48 45 4E 20 44 45 53 20 4E 41 4D 45 4E |EICHEN DES NAMEN| 000006A0: 53 00 7F 32 0E 33 42 4E 45 20 4E 41 4D 45 3B 20 |S..2.3BNE NAME; | 000006B0: 46 41 4C 4C 53 20 4E 4F 43 48 20 4E 49 43 48 54 |FALLS NOCH NICHT| 000006C0: 20 46 45 52 54 49 47 00 95 32 2C 33 57 45 49 54 | FERTIG..2,3WEIT| 000006D0: 45 52 20 4C 44 41 20 5A 45 49 47 45 52 00 B1 32 |ER LDA ZEIGER..2| 000006E0: 36 33 43 4C 43 3B 20 41 44 44 49 54 49 91 20 56 |63CLC; ADDITI. V| 000006F0: B0 42 45 52 45 49 54 45 4E 00 D9 32 40 33 41 44 |.BEREITEN..2@3AD| 00000700: 43 20 23 33 32 3B 20 5A 45 49 47 45 52 20 41 55 |C #32; ZEIGER AU| 00000710: 46 20 4E 41 45 43 48 53 54 45 4E 20 45 B5 52 41 |F NAECHSTEN E.RA| 00000720: 47 00 FF 32 4A 33 42 43 43 20 4E 4F 43 48 4D 41 |G..2J3BCC NOCHMA| 00000730: 4C 3B 20 46 41 4C 4C 53 20 4E 4F 43 48 20 45 49 |L; FALLS NOCH EI| 00000740: 4E 20 45 B5 52 41 47 00 1F 33 54 33 42 43 53 20 |N E.RAG..3T3BCS | 00000750: 82 3B 20 53 91 53 54 20 4E 41 45 43 48 53 54 45 |.; S.ST NAECHSTE| 00000760: 4E 20 42 4C 4F 43 4B 00 25 33 86 33 3B 00 46 33 |N BLOCK.%3.3;.F3| 00000770: 90 33 80 45 20 4C 44 41 20 23 24 46 46 3B 20 5A |.3.E LDA #$FF; Z| 00000780: 45 49 43 48 45 4E 20 46 55 45 52 20 80 45 00 6E |EICHEN FUER .E.n| 00000790: 33 9A 33 53 54 41 20 41 55 53 47 41 42 45 2C 58 |3.3STA AUSGABE,X| 000007A0: 3B 20 49 4E 20 44 45 4E 20 41 55 53 47 41 42 45 |; IN DEN AUSGABE| 000007B0: 50 55 46 46 45 52 00 90 33 A4 33 52 54 53 3B 20 |PUFFER..3.3RTS; | 000007C0: 4B 91 54 52 4F 4C 4C 45 20 5A 55 52 55 45 43 4B |K.TROLLE ZURUECK| 000007D0: 20 41 4E 53 20 44 4F 53 00 96 33 C2 33 3B 00 CF | ANS DOS..3.3;..| 000007E0: 33 53 34 50 52 4F 47 80 20 2E C6 20 22 1E 20 20 |3S4PROG. .. ". | 000007F0: 44 49 53 4B 2D 4E 41 4D 45 3A 20 20 20 20 20 20 |DISK-NAME: | 00000800: 20 20 20 20 20 20 20 20 20 20 20 20 20 49 44 3A | ID:| 00000810: 20 20 20 20 20 20 22 00 06 34 58 34 54 45 58 54 | "..4X4TEXT| 00000820: 31 20 2E C6 20 22 4D 49 54 20 43 55 52 53 4F 52 |1 .. "MIT CURSOR| 00000830: 54 41 53 54 45 4E 20 41 55 53 57 41 45 48 4C 45 |TASTEN AUSWAEHLE| 00000840: 4E 20 55 4E 44 20 52 45 54 55 52 4E 9E 22 00 36 |N UND RETURN.".6| 00000850: 34 62 34 54 45 58 54 32 20 2E C6 20 22 4D 2D 52 |4b4TEXT2 .. "M-R| 00000860: 22 3A 20 2E 42 59 54 45 20 B3 41 55 53 47 41 42 |": .BYTE .AUSGAB| 00000870: 45 2C 20 B1 41 55 53 47 41 42 45 2C 20 30 00 67 |E, .AUSGABE, 0.g| 00000880: 34 6C 34 54 45 58 54 33 20 2E C6 20 22 4D 2D 45 |4l4TEXT3 .. "M-E| 00000890: 22 3A 20 2E 42 59 54 45 20 B3 24 30 35 30 30 AA |": .BYTE .$0500.| 000008A0: 45 49 4E 53 50 52 47 AB 50 52 4F 47 41 4E 46 00 |EINSPRG.PROGANF.| 000008B0: 88 34 76 34 2E 42 59 54 45 20 B1 24 30 35 30 30 |.4v4.BYTE .$0500| 000008C0: AA 45 49 4E 53 50 52 47 AB 50 52 4F 47 41 4E 46 |.EINSPRG.PROGANF| 000008D0: 00 8E 34 B0 36 3B 00 A9 34 BA 36 3B 20 4C 41 44 |..4.6;..4.6; LAD| 000008E0: 45 AB 20 AD 20 53 54 41 52 54 52 4F 55 54 49 4E |E. . STARTROUTIN| 000008F0: 45 00 AF 34 C4 36 3B 00 BF 34 E2 36 54 45 58 54 |E..4.6;..4.6TEXT| 00000900: 34 20 4A 53 52 20 93 00 CB 34 EC 36 53 54 58 20 |4 JSR ...4.6STX | 00000910: 24 32 44 00 EA 34 F6 36 53 54 59 20 24 32 45 3B |$2D..4.6STY $2E;| 00000920: 20 5A 45 49 47 45 52 20 50 52 4F 47 52 41 4D 4D | ZEIGER PROGRAMM| 00000930: 80 45 00 F8 34 14 3A 4A 53 52 20 24 41 35 33 33 |.E..4.:JSR $A533| 00000940: 00 20 35 16 3A 4C 44 41 20 23 31 3A 20 4A 53 52 |. 5.:LDA #1: JSR| 00000950: 20 A0 3B 20 4C 41 44 45 4B 41 4E 41 4C 20 53 43 | .; LADEKANAL SC| 00000960: 48 4C 49 45 53 53 45 4E 00 43 35 1B 3A 4A 53 52 |HLIESSEN.C5.:JSR| 00000970: 20 43 4C 45 41 52 3B 20 42 49 4C 44 53 43 48 49 | CLEAR; BILDSCHI| 00000980: 52 4D 20 4C 4F 45 53 43 48 45 4E 00 50 35 1D 3A |RM LOESCHEN.P5.:| 00000990: 50 4C 41 3A 20 50 4C 41 00 62 35 20 3A 4C 44 41 |PLA: PLA.b5 :LDA| 000009A0: 20 23 24 41 37 3A 20 50 48 41 00 89 35 22 3A 4C | #$A7: PHA..5":L| 000009B0: 44 41 20 23 24 41 45 3A 20 50 48 41 3B 20 53 54 |DA #$AE: PHA; ST| 000009C0: 41 43 4B 20 41 4B 54 55 41 4C 49 53 49 45 52 45 |ACK AKTUALISIERE| 000009D0: 4E 00 AF 35 24 3A 46 49 4E 20 4A 4D 50 20 24 41 |N..5$:FIN JMP $A| 000009E0: 36 35 39 3B 20 4B B0 52 45 4B 54 45 52 20 52 55 |659; K.REKTER RU| 000009F0: 45 43 4B 53 50 8A 47 00 B6 35 3E 3A 2E 80 00 00 |ECKSP.G..5>:....| 00000A00: 00 |. |
........................................ ........................................ ........................................ ........................................ ........................................ ........................................ ..............LOCK LESEN"..,.+STA $00; A LS AUFTRAG FUER PUFFER 0..-.+WARTEN LDA $00; STATUS PUFFER 0.4- +BMI WARTEN; FAL LS NOCH NICHT FERTIG.P-*+CMP #1; FEHLER ABFRAGEN.S-4+BNE .E; FALLS FEHLER AUF.RE TEN.Y-\+;..-F+DNAME LDA PUFFER.144,X; DI SKNAMEN HOC.K-P+STA AUSGABE,X; IN DEN AU SGABEPUFFER.S-Z+INX..-.+CPX #20; NAME UN D ID KOMP.T....+BNE DNAME; WEITER FALLS NEIN....,;.>..,. LDA PUFFER; BLOCKZEIGER TRACK.B..-BEQ .E; FALLS NAECHSTER TRACK 0.N..-STA $06....-LDA PUFFER.1; BLOCKZE IGER SEK.R....-STA $07.B.(-LDA #$80; JOB CODE "BLOCK LESEN"...2-STA $00; ALS AUFT RAG FUER PUFFER 0../<-WARTEN1 LDA $00; S TATUS PUFFER 0.7/F-BMI WARTEN1; FALLS NO CH NICHT FERTIG.J/.-LDA #.PUFFER.2.[/.-S TA ZEIGER.1./H-LDA #.PUFFER.2; ANFANG 1 . E.RAG../R-NOCHMAL STA ZEIGER; ZEIGER I N PUFFER HERSTELC../.-LDY #0.Z/.-LDA (ZE IGER),Y; FI.YP HOC../.-BEQ WEITER; FALLS DE.ED..0..LDY #22.#0".LDA (ZEIGER),Y; M ARKIE.G HOC.B0,.BMI WEITER; FALLS MARKIE RT.O06.STA AUSGABE,X; S.ST IN DEN AUSGAB EPUFFER.|0@.INX: INY..0B.LDA (ZEIGER),Y; RESERVIERTE BYTES..0D.STA AUSGABE,X; HO C.F0F.INX: INY..0G.LDA (ZEIGER),Y; (STAR TADRESSE)..1H.STA AUSGABE,X; UND UEBERGE BEN..1I.INX.-1J.LDY #3; ANFANG FICAME.R1 T.NAME LDA (ZEIGER),Y; ZEICHEN HOC.~1^.S TA AUSGABE,X; UND IN DEN AUSGABEPUFFER.. 1H.INX..1R.BNE OK; FALLS PUFFER NOCH NIC HT VOLL.C1..STY .; Y RETTEN..1..RTS; RUE CKGABE DER K.TROLLE ANS DOS..1H2;..2R2EI NSPRG LDX #0.(2.2LDY .; REGISTER WIEDER HERSTELC.32.2OK INY.Y2.3CPY #19; .ZTES Z EICHEN DES NAMENS.2.3BNE NAME; FALLS NO CH NICHT FERTIG..2,3WEITER LDA ZEIGER..2 63CLC; ADDITI. V.BEREITEN.Y2@3ADC #32; Z EIGER AUF NAECHSTEN E.RAG..2J3BCC NOCHMA L; FALLS NOCH EIN E.RAG..3T3BCS .; S.ST NAECHSTEN BLOCK.%3.3;.F3.3.E LDA #$FF; Z EICHEN FUER .E.N3.3STA AUSGABE,X; IN DEN AUSGABEPUFFER..3.3RTS; K.TROLLE ZURUECK ANS DOS..3B3;.O3S4PROG. .F ". DISK-NAM E: ID: "..4X4TEXT 1 .F "MIT CURSORTASTEN AUSWAEHLEN UND RE TURN.".64B4TEXT2 .F "M-R": .BYTE .AUSGAB E, .AUSGABE, 0.G4L4TEXT3 .F "M-E": .BYTE .$0500.EINSPRG.PROGANF..4V4.BYTE .$0500 .EINSPRG.PROGANF..4.6;..4.6; LADE. . STA RTROUTINE..4D6;..4.6TEXT4 JSR ..K4.6STX $2D..4.6STY $2E; ZEIGER PROGRAMM.E..4.:J SR $A533. 5.:LDA #1: JSR ; LADEKANAL SC HLIESSEN.C5.:JSR CLEAR; BILDSCHIRM LOESC HEN.P5.:PLA: PLA.B5 :LDA #$A7: PHA..5":L DA #$AE: PHA; STACK AKTUALISIEREN..5$:FI N JMP $A659; K.REKTER RUECKSP.G..5>:.... .
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL