GRAPHIK.A
FILE INFORMATION
FILENAME(S): GRAPHIK.A
FILE TYPE(S): PRG
FILE SIZE: 3.1K
FIRST SEEN: 2025-11-02 16:27:55
APPEARS ON: 4 disk(s)
FILE HASH
bca15c72963004cdafd531d2f844f24fb1802548cea394f2d281f877b21131fb
FOUND ON DISKS (4 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| FUCK FOR TUEV | GRAPHIK.A | PRG | Treasure Chest - NeppMOS | 13 | 0 | DOWNLOAD FILE |
| 128ER SONDERHEFT | GRAPHIK.A | PRG | C64er | 24 | 6 | DOWNLOAD FILE |
| 2405 THE FOX | GRAPHIK.A | PRG | DuncanTwain | 29 | 4 | DOWNLOAD FILE |
| 128ER SONDERHEFT | GRAPHIK.A | PRG | DuncanTwain | 24 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 23 1C 01 00 8F 20 22 20 20 20 20 20 20 20 |..#.... " | 00000010: 20 20 20 20 20 20 20 20 20 20 20 20 C7 52 41 50 | .RAP| 00000020: 48 49 4B 00 29 1C 02 00 3A 00 61 1C 03 00 8F 20 |HIK.)...:.a.... | 00000030: 22 20 20 20 20 20 20 20 20 56 45 52 BB 4E 44 45 |" VER.NDE| 00000040: 52 54 20 C1 55 53 46 BD 48 52 55 4E 47 20 44 45 |RT .USF.HRUNG DE| 00000050: 53 20 47 52 41 50 48 49 43 2D C2 45 46 45 48 4C |S GRAPHIC-.EFEHL| 00000060: 53 00 67 1C 04 00 3A 00 8A 1C 05 00 8F 20 22 20 |S.g...:...... " | 00000070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000080: 28 43 29 20 42 59 20 CB D2 D7 00 90 1C 06 00 3A |(C) BY ........:| 00000090: 00 B1 1C 07 00 8F 20 22 20 20 20 20 20 20 20 20 |...... " | 000000A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 31 39 38 | 198| 000000B0: 35 00 B7 1C 08 00 3A 00 DC 1C 09 00 8F 20 22 20 |5.....:...... " | 000000C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 000000D0: 56 45 52 53 49 4F 4E 20 31 2E 30 30 00 E2 1C 0A |VERSION 1.00....| 000000E0: 00 3A 00 E8 1C 0B 00 3A 00 FB 1C 14 00 4E 24 B2 |.:.....:.....N$.| 000000F0: 22 47 52 41 50 48 49 4B 2E 4D 22 00 1B 1D 1E 00 |"GRAPHIK.M".....| 00000100: 9F 20 31 35 2C 38 2C 31 35 2C 22 53 30 3A 22 AA |. 15,8,15,"S0:".| 00000110: 4E 24 3A 20 8D 20 36 30 31 30 30 00 3A 1D 28 00 |N$: . 60100.:.(.| 00000120: 9F 20 32 2C 38 2C 32 2C 4E 24 AA 22 2C 50 2C 57 |. 2,8,2,N$.",P,W| 00000130: 22 3A 20 8D 20 36 30 31 30 30 00 40 1D 46 00 3A |": . 60100.@.F.:| 00000140: 00 4D 1D 50 00 9E 20 39 AC 34 30 39 36 00 53 1D |.M.P.. 9.4096.S.| 00000150: 5A 00 3B 00 5F 1D 64 00 2E 4F 50 54 20 4F 32 00 |Z.;._.d..OPT O2.| 00000160: 65 1D 6E 00 3B 00 84 1D DC 00 3B 20 22 2A 2A 2A |e.n.;.....; "***| 00000170: 20 D5 4E 54 45 52 50 52 4F 47 52 41 4D 4D 45 20 | .NTERPROGRAMME | 00000180: 2A 2A 2A 22 00 8A 1D E6 00 3B 00 9E 1D F0 00 53 |***".....;.....S| 00000190: 45 54 52 45 47 20 20 B2 20 24 43 44 43 43 00 AF |ETREG . $CDCC..| 000001A0: 1D FA 00 E0 52 4F 4D 20 B2 20 24 43 45 30 43 00 |....ROM . $CE0C.| 000001B0: B5 1D 0E 01 3B 00 C2 1D 84 03 AC B2 20 24 31 41 |....;....... $1A| 000001C0: 33 45 00 C8 1D 8E 03 3B 00 F3 1D E8 03 AE 20 20 |3E.....;...... | 000001D0: 20 20 20 20 20 43 4D 50 20 23 24 39 45 20 20 20 | CMP #$9E | 000001E0: 20 20 20 20 20 3B 20 22 46 4F 4C 47 54 20 C3 CC | ; "FOLGT ..| 000001F0: D2 20 3F 00 0A 1E F2 03 AE 20 20 20 20 20 20 20 |. ?...... | 00000200: 42 4E 45 20 47 52 41 50 48 31 00 54 1E FC 03 AE |BNE GRAPH1.T....| 00000210: 20 20 20 20 20 20 20 4A 53 52 20 24 41 30 32 32 | JSR $A022| 00000220: 20 20 20 20 20 20 20 3B 20 22 4A 41 2C 20 44 41 | ; "JA, DA| 00000230: 4E 4E 20 4E 4F 52 4D 41 4C 45 20 D3 50 45 49 43 |NN NORMALE .PEIC| 00000240: 48 45 52 41 55 46 54 45 49 4C 55 4E 47 20 5A 55 |HERAUFTEILUNG ZU| 00000250: 52 BD 43 4B 00 7A 1E 06 04 AE 20 20 20 20 20 20 |R.CK.z.... | 00000260: 20 4A 53 52 20 24 30 33 38 30 20 20 20 20 20 20 | JSR $0380 | 00000270: 20 3B 20 22 43 48 52 47 45 54 00 8F 1E 10 04 AE | ; "CHRGET......| 00000280: 20 20 20 20 20 20 20 4C 44 41 20 23 24 30 30 00 | LDA #$00.| 00000290: C9 1E 1A 04 AE 20 20 20 20 20 20 20 53 54 41 20 |..... STA | 000002A0: 24 44 38 20 20 20 20 20 20 20 20 20 3B 20 22 C6 |$D8 ; ".| 000002B0: 4C 41 47 20 46 BD 52 20 D4 45 58 54 2D CD 4F 44 |LAG F.R .EXT-.OD| 000002C0: 55 53 20 53 45 54 5A 45 4E 00 D9 1E 24 04 AE 20 |US SETZEN...$.. | 000002D0: 20 20 20 20 20 20 52 54 53 00 0C 1F 2E 04 47 52 | RTS.....GR| 000002E0: 41 50 48 31 20 20 4A 53 52 20 24 38 37 46 34 20 |APH1 JSR $87F4 | 000002F0: 20 20 20 20 20 20 3B 20 22 C7 52 41 50 48 49 4B | ; ".RAPHIK| 00000300: 2D CD 4F 44 55 53 20 48 4F 4C 45 4E 00 37 1F 38 |-.ODUS HOLEN.7.8| 00000310: 04 AE 20 20 20 20 20 20 20 43 50 58 20 23 24 30 |.. CPX #$0| 00000320: 36 20 20 20 20 20 20 20 20 3B 20 22 C7 D2 C1 D0 |6 ; "....| 00000330: C8 C9 C3 20 36 20 3F 00 66 1F 42 04 AE 20 20 20 |... 6 ?.f.B.. | 00000340: 20 20 20 20 42 45 51 20 47 52 41 50 48 49 4B 20 | BEQ GRAPHIK | 00000350: 20 20 20 20 3B 20 22 4A 41 2C 20 44 41 4E 4E 20 | ; "JA, DANN | 00000360: D3 50 52 55 4E 47 00 A1 1F 4C 04 AE 20 20 20 20 |.PRUNG...L.. | 00000370: 20 20 20 42 43 53 20 45 52 52 B0 20 20 20 20 20 | BCS ERR. | 00000380: 20 20 3B 20 22 D8 3E 36 2C 20 44 41 4E 4E 20 27 | ; ".>6, DANN '| 00000390: 49 4C 4C 45 47 41 4C 20 51 55 41 4E 54 49 54 59 |ILLEGAL QUANTITY| 000003A0: 27 00 B1 1F 56 04 AE 20 20 20 20 20 20 20 54 58 |'...V.. TX| 000003B0: 41 00 D9 1F 60 04 AE 20 20 20 20 20 20 20 50 48 |A...`.. PH| 000003C0: 41 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 20 |A ; | 000003D0: 22 D8 20 4D 45 52 4B 45 4E 00 0C 20 74 04 AE 20 |". MERKEN.. t.. | 000003E0: 20 20 20 20 20 20 4C 44 41 20 23 24 30 30 20 20 | LDA #$00 | 000003F0: 20 20 20 20 20 20 3B 20 22 42 41 4E 4B 20 31 35 | ; "BANK 15| 00000400: 20 45 49 4E 53 43 48 41 4C 54 45 4E 00 22 20 7E | EINSCHALTEN." ~| 00000410: 04 AE 20 20 20 20 20 20 20 53 54 41 20 24 46 46 |.. STA $FF| 00000420: 30 30 00 6F 20 88 04 AE 20 20 20 20 20 20 20 4C |00.o ... L| 00000430: 44 58 20 23 32 35 20 20 20 20 20 20 20 20 20 3B |DX #25 ;| 00000440: 20 22 38 30 2D DA 45 49 43 48 45 4E 2D C2 49 4C | "80-.EICHEN-.IL| 00000450: 44 53 43 48 49 52 4D 20 41 55 46 20 D4 45 58 54 |DSCHIRM AUF .EXT| 00000460: 2D CD 4F 44 55 53 20 53 43 48 41 4C 54 45 4E 00 |-.ODUS SCHALTEN.| 00000470: 84 20 92 04 AE 20 20 20 20 20 20 20 4C 44 41 20 |. ... LDA | 00000480: 23 24 34 30 00 9B 20 9C 04 AE 20 20 20 20 20 20 |#$40.. ... | 00000490: 20 4A 53 52 20 53 45 54 52 45 47 00 E4 20 A6 04 | JSR SETREG.. ..| 000004A0: AE 20 20 20 20 20 20 20 4A 53 52 20 E0 52 4F 4D |. JSR .ROM| 000004B0: 20 20 20 20 20 3B 20 22 BD 42 45 52 20 D4 41 53 | ; ".BER .AS| 000004C0: 54 45 20 27 C1 D3 C3 C9 C9 2F C4 C9 CE 27 20 47 |TE '...../...' G| 000004D0: 45 57 BB 48 4C 54 45 4E 20 DA 45 49 43 48 45 4E |EW.HLTEN .EICHEN| 000004E0: 53 41 54 5A 00 1D 21 B0 04 AE 20 20 20 20 20 20 |SATZ..!... | 000004F0: 20 4C 44 41 20 24 44 37 20 20 20 20 20 20 20 20 | LDA $D7 | 00000500: 20 3B 20 22 49 4E 53 20 38 35 36 33 2D C3 C8 C1 | ; "INS 8563-...| 00000510: D2 D2 C1 CD 20 4B 4F 50 49 45 52 45 4E 00 2D 21 |.... KOPIEREN.-!| 00000520: BA 04 AE 20 20 20 20 20 20 20 50 48 41 00 61 21 |... PHA.a!| 00000530: C4 04 AE 20 20 20 20 20 20 20 4C 44 41 20 23 24 |... LDA #$| 00000540: 38 30 20 20 20 20 20 20 20 20 3B 20 22 DA 45 49 |80 ; ".EI| 00000550: 4C 45 20 31 32 30 30 20 42 49 53 20 31 32 36 30 |LE 1200 BIS 1260| 00000560: 3A 00 9E 21 CE 04 AE 20 20 20 20 20 20 20 53 54 |:..!... ST| 00000570: 41 20 24 44 37 20 20 20 20 20 20 20 20 20 3B 20 |A $D7 ; | 00000580: 22 38 30 2D DA 45 49 43 48 45 4E 2D C2 49 4C 44 |"80-.EICHEN-.ILD| 00000590: 53 43 48 49 52 4D 20 4C BC 53 43 48 45 4E 00 D2 |SCHIRM L.SCHEN..| 000005A0: 21 D8 04 AE 20 20 20 20 20 20 20 4A 53 52 20 24 |!... JSR $| 000005B0: 43 31 34 32 20 20 20 20 20 20 20 3B 20 22 4B 45 |C142 ; "KE| 000005C0: 52 4E 41 4C 2D D2 4F 55 54 49 4E 45 20 43 4C 45 |RNAL-.OUTINE CLE| 000005D0: 41 52 00 E2 21 E2 04 AE 20 20 20 20 20 20 20 50 |AR..!... P| 000005E0: 4C 41 00 F6 21 EC 04 AE 20 20 20 20 20 20 20 53 |LA..!... S| 000005F0: 54 41 20 24 44 37 00 39 22 3C 05 AE 20 20 20 20 |TA $D7.9"<.. | 00000600: 20 20 20 50 4C 41 20 20 20 20 20 20 20 20 20 20 | PLA | 00000610: 20 20 20 3B 20 22 D8 20 27 5A 45 52 53 54 BC 52 | ; ". 'ZERST.R| 00000620: 55 4E 47 53 46 52 45 49 27 20 41 55 53 20 D3 54 |UNGSFREI' AUS .T| 00000630: 41 43 4B 20 4C 41 44 45 4E 00 49 22 46 05 AE 20 |ACK LADEN.I"F.. | 00000640: 20 20 20 20 20 20 50 48 41 00 59 22 50 05 AE 20 | PHA.Y"P.. | 00000650: 20 20 20 20 20 20 54 41 58 00 9B 22 5A 05 AE 20 | TAX.."Z.. | 00000660: 20 20 20 20 20 20 4A 4D 50 20 24 36 42 36 45 20 | JMP $6B6E | 00000670: 20 20 20 20 20 20 3B 20 22 57 45 49 54 45 52 20 | ; "WEITER | 00000680: 4D 49 54 20 4E 4F 52 4D 41 4C 45 4D 20 C7 D2 C1 |MIT NORMALEM ...| 00000690: D0 C8 C9 C3 2D C2 45 46 45 48 4C 00 CC 22 64 05 |....-.EFEHL.."d.| 000006A0: 45 52 52 B0 20 20 20 4A 4D 50 20 24 37 44 32 38 |ERR. JMP $7D28| 000006B0: 20 20 20 20 20 20 20 3B 20 22 27 49 4C 4C 45 47 | ; "'ILLEG| 000006C0: 41 4C 20 51 55 41 4E 54 49 54 59 27 00 D2 22 6E |AL QUANTITY'.."n| 000006D0: 05 3B 00 05 23 78 05 47 52 41 50 48 49 4B 20 4C |.;..#x.GRAPHIK L| 000006E0: 44 41 20 23 24 30 30 20 20 20 20 20 20 20 20 3B |DA #$00 ;| 000006F0: 20 22 42 41 4E 4B 20 31 35 20 45 49 4E 53 43 48 | "BANK 15 EINSCH| 00000700: 41 4C 54 45 4E 00 1B 23 96 05 AE 20 20 20 20 20 |ALTEN..#... | 00000710: 20 20 53 54 41 20 24 46 46 30 30 00 2F 23 B4 05 | STA $FF00./#..| 00000720: AE 20 20 20 20 20 20 20 4C 44 58 20 23 32 35 00 |. LDX #25.| 00000730: 6A 23 BE 05 AE 20 20 20 20 20 20 20 4C 44 41 20 |j#... LDA | 00000740: 23 24 38 30 20 20 20 20 20 20 20 20 3B 20 22 38 |#$80 ; "8| 00000750: 35 36 33 2D C8 C9 D2 C5 D3 2D CD 4F 44 45 20 45 |563-.....-.ODE E| 00000760: 49 4E 53 43 48 41 4C 54 45 4E 00 81 23 C8 05 AE |INSCHALTEN..#...| 00000770: 20 20 20 20 20 20 20 4A 53 52 20 53 45 54 52 45 | JSR SETRE| 00000780: 47 00 B9 23 DC 05 AE 20 20 20 20 20 20 20 4A 53 |G..#... JS| 00000790: 52 20 24 39 45 31 43 20 20 20 20 20 20 20 3B 20 |R $9E1C ; | 000007A0: 22 43 48 4B 43 4F 4D 2C 20 42 59 54 45 2D D7 45 |"CHKCOM, BYTE-.E| 000007B0: 52 54 20 4E 41 43 48 20 D8 00 EB 23 DE 05 AE 20 |RT NACH ...#... | 000007C0: 20 20 20 20 20 20 4C 44 41 20 23 24 30 30 20 20 | LDA #$00 | 000007D0: 20 20 20 20 20 20 3B 20 22 57 49 45 44 45 52 20 | ; "WIEDER | 000007E0: 41 55 46 20 42 41 4E 4B 20 31 35 00 01 24 E0 05 |AUF BANK 15..$..| 000007F0: AE 20 20 20 20 20 20 20 53 54 41 20 24 46 46 30 |. STA $FF0| 00000800: 30 00 3B 24 E6 05 AE 20 20 20 20 20 20 20 43 50 |0.;$... CP| 00000810: 58 20 23 24 30 32 20 20 20 20 20 20 20 20 3B 20 |X #$02 ; | 00000820: 22 D8 3E 31 2C 20 44 41 4E 4E 20 49 4C 4C 45 47 |".>1, DANN ILLEG| 00000830: 41 4C 20 51 55 41 4E 54 49 54 59 00 50 24 F0 05 |AL QUANTITY.P$..| 00000840: AE 20 20 20 20 20 20 20 42 43 53 20 45 52 52 B0 |. BCS ERR.| 00000850: 00 98 24 F5 05 AE 20 20 20 20 20 20 20 43 50 58 |..$... CPX| 00000860: 20 23 24 30 30 20 20 20 20 20 20 20 20 3B 20 22 | #$00 ; "| 00000870: C8 49 52 45 53 20 45 49 4E 20 4F 48 4E 45 20 CC |.IRES EIN OHNE .| 00000880: BC 53 43 48 45 4E 20 44 45 53 20 C2 49 4C 44 53 |.SCHEN DES .ILDS| 00000890: 43 48 49 52 4D 53 20 3F 00 C1 24 FA 05 AE 20 20 |CHIRMS ?..$... | 000008A0: 20 20 20 20 20 42 45 51 20 80 45 20 20 20 20 20 | BEQ .E | 000008B0: 20 20 20 3B 20 22 44 41 4E 4E 20 46 45 52 54 49 | ; "DANN FERTI| 000008C0: 47 00 08 25 04 06 AE 20 20 20 20 20 20 20 4C 44 |G..%... LD| 000008D0: 59 20 23 24 34 30 20 20 20 20 20 20 20 20 3B 20 |Y #$40 ; | 000008E0: 22 DA 45 49 4C 45 20 31 35 34 30 20 42 49 53 20 |".EILE 1540 BIS | 000008F0: 31 36 37 30 3A 20 C8 C9 D2 C5 D3 2D C2 49 4C 44 |1670: .....-.ILD| 00000900: 20 4C BC 53 43 48 45 4E 00 48 25 0E 06 AE 20 20 | L.SCHEN.H%... | 00000910: 20 20 20 20 20 53 54 59 20 24 30 38 20 20 20 20 | STY $08 | 00000920: 20 20 20 20 20 3B 20 22 24 30 38 3A 20 27 C2 4C | ; "$08: '.L| 00000930: 4F 43 4B 5A BB 48 4C 45 52 27 3A 20 34 30 2A 32 |OCKZ.HLER': 40*2| 00000940: 35 36 20 42 59 54 45 53 00 5D 25 18 06 AE 20 20 |56 BYTES.]%... | 00000950: 20 20 20 20 20 4C 44 59 20 23 24 30 30 00 6D 25 | LDY #$00.m%| 00000960: 22 06 AE 20 20 20 20 20 20 20 54 59 41 00 9C 25 |".. TYA..%| 00000970: 2C 06 AE 20 20 20 20 20 20 20 4C 44 58 20 23 24 |,.. LDX #$| 00000980: 31 32 20 20 20 20 20 20 20 20 3B 20 22 D2 C1 CD |12 ; "...| 00000990: 2D DA 45 49 47 45 52 20 48 49 47 48 00 BF 25 36 |-.EIGER HIGH..%6| 000009A0: 06 AE 20 20 20 20 20 20 20 4A 53 52 20 53 45 54 |.. JSR SET| 000009B0: 52 45 47 20 20 20 20 20 20 3B 20 22 55 4E 44 00 |REG ; "UND.| 000009C0: ED 25 40 06 AE 20 20 20 20 20 20 20 4C 44 58 20 |.%@.. LDX | 000009D0: 23 24 31 33 20 20 20 20 20 20 20 20 3B 20 22 D2 |#$13 ; ".| 000009E0: C1 CD 2D DA 45 49 47 45 52 20 4C 4F 57 00 26 26 |..-.EIGER LOW.&&| 000009F0: 4A 06 AE 20 20 20 20 20 20 20 4A 53 52 20 53 45 |J.. JSR SE| 00000A00: 54 52 45 47 20 20 20 20 20 20 3B 20 22 41 55 46 |TREG ; "AUF| 00000A10: 20 C1 4E 46 41 4E 47 20 3D 20 24 30 30 30 30 20 | .NFANG = $0000 | 00000A20: 53 45 54 5A 45 4E 00 68 26 54 06 AE 20 20 20 20 |SETZEN.h&T.. | 00000A30: 20 20 20 4C 44 58 20 23 33 31 20 20 20 20 20 20 | LDX #31 | 00000A40: 20 20 20 3B 20 22 24 30 30 20 49 4E 20 47 45 57 | ; "$00 IN GEW| 00000A50: BB 48 4C 54 45 20 D2 C1 CD 2D D3 50 45 49 43 48 |.HLTE ...-.PEICH| 00000A60: 45 52 53 54 45 4C 4C 45 00 B0 26 5E 06 45 4D 50 |ERSTELLE..&^.EMP| 00000A70: 54 59 20 20 20 4A 53 52 20 53 45 54 52 45 47 20 |TY JSR SETREG | 00000A80: 20 20 20 20 20 3B 20 22 D2 C1 CD 2D DA 45 49 47 | ; "...-.EIG| 00000A90: 45 52 20 5A BB 48 4C 54 20 4E 41 43 48 20 27 53 |ER Z.HLT NACH 'S| 00000AA0: 54 41 27 20 53 45 4C 42 53 54 20 45 49 4E 45 4E |TA' SELBST EINEN| 00000AB0: 00 E0 26 68 06 AE 20 20 20 20 20 20 20 44 45 59 |..&h.. DEY| 00000AC0: 20 20 20 20 20 20 20 20 20 20 20 20 20 3B 20 22 | ; "| 00000AD0: D3 43 48 52 49 54 54 20 57 45 49 54 45 52 20 21 |.CHRITT WEITER !| 00000AE0: 00 F6 26 72 06 AE 20 20 20 20 20 20 20 42 4E 45 |..&r.. BNE| 00000AF0: 20 45 4D 50 54 59 00 0A 27 7C 06 AE 20 20 20 20 | EMPTY..'|.. | 00000B00: 20 20 20 44 45 43 20 24 30 38 00 20 27 86 06 AE | DEC $08. '...| 00000B10: 20 20 20 20 20 20 20 42 4E 45 20 45 4D 50 54 59 | BNE EMPTY| 00000B20: 00 44 27 90 06 80 45 20 20 20 20 52 54 53 20 20 |.D'...E RTS | 00000B30: 20 20 20 20 20 20 20 20 20 20 20 3B 20 22 46 45 | ; "FE| 00000B40: 52 54 49 47 00 4A 27 D4 17 3B 00 51 27 40 1F 2E |RTIG.J'..;.Q'@..| 00000B50: 80 00 57 27 28 23 80 00 71 27 60 EA 5A 5A 24 B2 |..W'(#..q'`.ZZ$.| 00000B60: 22 47 52 41 50 48 49 4B 2E 41 22 3A 20 55 4E B2 |"GRAPHIK.A": UN.| 00000B70: 38 00 8A 27 6A EA 9F 20 31 35 2C 55 4E 2C 31 35 |8..'j.. 15,UN,15| 00000B80: 2C 22 53 30 3A 22 AA 5A 5A 24 00 96 27 74 EA 8D |,"S0:".ZZ$..'t..| 00000B90: 20 36 30 31 30 30 00 A3 27 7E EA 94 20 5A 5A 24 | 60100..'~.. ZZ$| 00000BA0: 2C 55 4E 00 AF 27 88 EA 8D 20 36 30 31 30 30 00 |,UN..'... 60100.| 00000BB0: BC 27 92 EA 95 20 5A 5A 24 2C 55 4E 00 C5 27 9C |.'... ZZ$,UN..'.| 00000BC0: EA A0 20 31 35 00 CB 27 A6 EA 80 00 E3 27 C4 EA |.. 15..'.....'..| 00000BD0: 84 31 35 2C 20 53 31 2C 20 53 24 2C 20 53 32 2C |.15, S1, S$, S2,| 00000BE0: 20 53 33 00 F9 27 CE EA 8B 20 53 31 B2 31 20 A7 | S3..'... S1.1 .| 00000BF0: 20 99 20 53 32 3B 20 53 24 00 09 28 D8 EA 8B 20 | . S2; S$..(... | 00000C00: 53 31 B3 32 30 20 A7 20 8E 00 29 28 E2 EA 99 20 |S1.20 . ..)(... | 00000C10: 53 31 20 22 2C 20 22 20 53 24 20 22 2C 22 20 53 |S1 ", " S$ "," S| 00000C20: 32 3B 20 22 2C 22 20 53 33 00 32 28 EC EA A0 20 |2; "," S3.2(... | 00000C30: 31 35 00 00 00 |15... |
..#.... " GRAPHIK.)...
:.A.... " VER.NDERT AUSF.HRUNG DE
S GRAPHIC-BEFEHLS.G...:...... "
(C) BY KRW.....:...... "
1985.....:...... "
VERSION 1.00.....:.....:.....N$.
"GRAPHIK.M"...... 15,8,15,"S0:".N$: . 60
100.:.(.. 2,8,2,N$.",P,W": . 60100.@.F.:
.M.P.. 9.4096.S.Z.;._.D..OPT O2.E.N.;...
..; "*** UNTERPROGRAMME ***".....;.....S
ETREG . $CDCC......ROM . $CE0C.....;.B.
.... $1A3E.H...;...... CMP #$9E
; "FOLGT CLR ?...... BNE GRAP
H1.T.... JSR $A022 ; "JA, DA
NN NORMALE SPEICHERAUFTEILUNG ZUR.CK.Z..
.. JSR $0380 ; "CHRGET......
LDA #$00.I.... STA $D8
; "FLAG F.R TEXT-MODUS SETZEN.Y.$..
RTS.....GRAPH1 JSR $87F4 ;
"GRAPHIK-MODUS HOLEN.7.8.. CPX #$0
6 ; "GRAPHIC 6 ?.F.B.. BEQ
GRAPHIK ; "JA, DANN SPRUNG...L..
BCS ERR. ; "X>6, DANN 'ILLEGAL
QUANTITY'...V.. TXA.Y.`.. PH
A ; "X MERKEN.. T.. LD
A #$00 ; "BANK 15 EINSCHALTEN." ~
.. STA $FF00.O ... LDX #25
; "80-ZEICHEN-BILDSCHIRM AUF TEXT
-MODUS SCHALTEN.. ... LDA #$40.. .
.. JSR SETREG.. ... JSR .ROM
; ".BER TASTE 'ASCII/DIN' GEW.HLTEN
ZEICHENSATZ..!... LDA $D7
; "INS 8563-CHARRAM KOPIEREN.-!...
PHA.A!D.. LDA #$80 ; "ZEI
LE 1200 BIS 1260:..!N.. STA $D7
; "80-ZEICHEN-BILDSCHIRM L.SCHEN.R
!X.. JSR $C142 ; "KERNAL-ROU
TINE CLEAR..!... PLA..!... S
TA $D7.9"<.. PLA ; "X
'ZERST.RUNGSFREI' AUS STACK LADEN.I"F..
PHA.Y"P.. TAX.."Z.. JM
P $6B6E ; "WEITER MIT NORMALEM GRA
PHIC-BEFEHL.L"D.ERR. JMP $7D28 ;
"'ILLEGAL QUANTITY'.R"N.;..#X.GRAPHIK L
DA #$00 ; "BANK 15 EINSCHALTEN..#
... STA $FF00./#... LDX #25.
J#... LDA #$80 ; "8563-HIRE
S-MODE EINSCHALTEN..#H.. JSR SETRE
G..#... JSR $9E1C ; "CHKCOM,
BYTE-WERT NACH X..#... LDA #$00
; "WIEDER AUF BANK 15..$...
STA $FF00.;$... CPX #$02 ;
"X>1, DANN ILLEGAL QUANTITY.P$...
BCS ERR...$... CPX #$00 ; "
HIRES EIN OHNE L.SCHEN DES BILDSCHIRMS ?
.A$... BEQ .E ; "DANN FERTI
G..%... LDY #$40 ; "ZEILE 1
540 BIS 1670: HIRES-BILD L.SCHEN.H%...
STY $08 ; "$08: 'BLOCKZ.HLE
R': 40*256 BYTES.]%... LDY #$00.M%
".. TYA..%,.. LDX #$12
; "RAM-ZEIGER HIGH..%6.. JSR SET
REG ; "UND..%@.. LDX #$13
; "RAM-ZEIGER LOW.&&J.. JSR SE
TREG ; "AUF ANFANG = $0000 SETZEN.H
&T.. LDX #31 ; "$00 IN GEW
.HLTE RAM-SPEICHERSTELLE..&^.EMPTY JSR
SETREG ; "RAM-ZEIGER Z.HLT NACH 'S
TA' SELBST EINEN..&H.. DEY
; "SCHRITT WEITER !..&R.. BNE
EMPTY..'|.. DEC $08. '... B
NE EMPTY.D'...E RTS ; "FE
RTIG.J'T.;.Q'@....W'(#..Q'`.ZZ$."GRAPHIK
.A": UN.8..'J.. 15,UN,15,"S0:".ZZ$..'T..
60100..'~.. ZZ$,UN..'... 60100..'... ZZ
$,UN.E'.. 15.K'.....'D..15, S1, S$, S2,
S3..'N.. S1.1 . . S2; S$..(X.. S1.20 .
..)(... S1 ", " S$ "," S2; "," S3.2(..
15...
> CLICK IMAGE PREVIEW FOR FULL MODAL