00000000: 01 1C 2E 1C 64 00 8F 20 20 20 20 20 20 20 20 20 |....d.. |
00000010: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 50 49 | PI|
00000020: 43 20 2D 20 53 41 56 20 2D 20 44 45 4D 4F 00 5C |C - SAV - DEMO.\|
00000030: 1C 6E 00 8F 20 20 20 20 20 20 20 20 20 20 20 20 |.n.. |
00000040: 20 20 20 20 20 20 20 20 20 20 3D 3D 3D 3D 3D 3D | ======|
00000050: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 00 A1 1C 78 |============...x|
00000060: 00 8F 20 20 52 45 54 54 45 4E 20 45 49 4E 45 53 |.. RETTEN EINES|
00000070: 20 56 44 43 2D 4D 55 4C 54 49 43 4F 4C 4F 52 2D | VDC-MULTICOLOR-|
00000080: 42 49 4C 44 45 53 20 49 4E 20 44 45 4E 20 46 52 |BILDES IN DEN FR|
00000090: 45 49 45 4E 20 56 44 43 2D 53 50 45 49 43 48 45 |EIEN VDC-SPEICHE|
000000A0: 52 00 E6 1C 82 00 8F 20 20 30 32 2E 31 39 39 32 |R...... 02.1992|
000000B0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000C0: 20 20 20 20 20 20 20 20 20 50 52 4F 47 52 41 4D | PROGRAM|
000000D0: 4D 49 45 52 54 20 56 4F 4E 20 20 50 2E 48 55 45 |MIERT VON P.HUE|
000000E0: 4C 53 54 45 44 45 00 EC 1C 8C 00 3A 00 01 1D 96 |LSTEDE.....:....|
000000F0: 00 FE 25 3A 99 20 C7 28 31 34 29 3A D7 20 34 37 |..%:. .(14):. 47|
00000100: 30 00 3C 1D A0 00 FE 11 20 22 47 52 41 46 49 4B |0.<..... "GRAFIK|
00000110: 2D 38 30 2F 32 58 38 22 3A 8F 20 20 20 20 20 20 |-80/2X8":. |
00000120: 20 20 20 20 20 20 20 20 20 50 52 4F 47 52 41 4D | PROGRAM|
00000130: 4D 45 20 4E 41 43 48 4C 41 44 45 4E 00 5E 1D AA |ME NACHLADEN.^..|
00000140: 00 FE 11 20 22 43 4F 4C 2D 50 41 43 4B 22 2C 42 |... "COL-PACK",B|
00000150: 30 2C 50 28 D1 28 22 30 45 38 30 22 29 29 00 86 |0,P(.("0E80"))..|
00000160: 1D B4 00 FE 11 20 22 4B 4F 41 4C 41 2D 44 45 4D |..... "KOALA-DEM|
00000170: 4F 20 50 49 43 22 2C 42 30 2C 50 28 D1 28 22 41 |O PIC",B0,P(.("A|
00000180: 30 30 30 22 29 29 00 CB 1D BE 00 FE 02 20 31 35 |000"))....... 15|
00000190: 3A 9E 20 34 38 36 37 3A 8F 20 20 20 20 20 20 20 |:. 4867:. |
000001A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 27 47 52 | 'GR|
000001B0: 41 46 49 4B 2D 38 30 2F 32 58 38 27 20 49 4E 49 |AFIK-80/2X8' INI|
000001C0: 54 49 41 4C 49 53 49 45 52 45 4E 00 0E 1E C8 00 |TIALISIEREN.....|
000001D0: 50 41 B2 D1 28 22 30 45 38 30 22 29 3A 8F 20 20 |PA..("0E80"):. |
000001E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000001F0: 20 20 20 20 41 44 52 45 53 53 45 4E 20 44 45 52 | ADRESSEN DER|
00000200: 20 48 49 4C 46 53 52 4F 55 54 49 4E 45 4E 00 14 | HILFSROUTINEN..|
00000210: 1E D2 00 3A 00 2A 1E DC 00 E7 20 36 2C 31 3A E7 |...:.*.... 6,1:.|
00000220: 20 32 2C 31 3A E7 20 33 2C 31 00 59 1E E6 00 DE | 2,1:. 3,1.Y....|
00000230: 20 36 2C 31 3A 8F 20 20 20 20 20 20 20 20 20 20 | 6,1:. |
00000240: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 47 | G|
00000250: 52 41 46 49 4B 20 45 49 4E 00 8D 1E F0 00 9E 20 |RAFIK EIN...... |
00000260: 50 41 2C 31 2C 31 36 30 3A 8F 20 20 20 20 20 20 |PA,1,160:. |
00000270: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000280: 20 20 42 49 4C 44 20 5A 45 49 47 45 4E 00 BF 1E | BILD ZEIGEN...|
00000290: FA 00 8D 20 36 30 30 32 30 3A 8F 20 20 20 20 20 |... 60020:. |
000002A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002B0: 20 20 20 20 42 49 4C 44 20 52 45 54 54 45 4E 00 | BILD RETTEN.|
000002C0: C9 1E 04 01 A1 F9 20 41 24 00 CF 1E 0E 01 3A 00 |...... A$.....:.|
000002D0: 01 1F 18 01 DE 20 36 2C 31 3A 8F 20 20 20 20 20 |..... 6,1:. |
000002E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000002F0: 20 20 20 20 42 49 4C 44 20 4C 4F 45 53 43 48 45 | BILD LOESCHE|
00000300: 4E 00 0A 1F 22 01 46 4C B2 30 00 1F 1F 2C 01 81 |N...".FL.0...,..|
00000310: 20 49 B2 31 20 A4 20 31 36 3A 53 B2 49 AC 36 00 | I.1 . 16:S.I.6.|
00000320: 4E 1F 36 01 E7 20 32 2C 49 3A E7 20 33 2C 49 3A |N.6.. 2,I:. 3,I:|
00000330: 8F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000340: 20 20 46 41 52 42 45 20 53 45 54 5A 45 4E 00 6A | FARBE SETZEN.j|
00000350: 1F 40 01 E2 20 31 2C 33 32 30 2C 31 30 30 2C 53 |.@.. 1,320,100,S|
00000360: AC 32 2C 53 2C 2C 2C 2C 31 30 00 B2 1F 4A 01 DF |.2,S,,,,10...J..|
00000370: 20 46 4C 2C 33 32 30 2C 39 39 AA 53 3A 46 4C B2 | FL,320,99.S:FL.|
00000380: 31 AB 46 4C 3A 8F 20 20 20 20 20 20 20 20 20 20 |1.FL:. |
00000390: 20 52 49 4E 47 20 46 55 45 4C 4C 45 4E 20 55 4E | RING FUELLEN UN|
000003A0: 44 20 46 41 52 42 45 20 55 4D 53 43 48 41 4C 54 |D FARBE UMSCHALT|
000003B0: 45 4E 00 BA 1F 54 01 82 20 49 00 CB 1F 5E 01 E7 |EN...T.. I...^..|
000003C0: 20 32 2C 31 3A E7 20 33 2C 31 36 00 E5 1F 68 01 | 2,1:. 3,16...h.|
000003D0: E1 20 30 2C 31 32 38 2C 39 34 2C 35 31 32 2C 31 |. 0,128,94,512,1|
000003E0: 30 35 2C 2C 31 00 23 20 72 01 E0 20 31 2C 31 30 |05,,1.# r.. 1,10|
000003F0: 2C 31 30 30 2C 30 2C 22 C5 49 4E 20 D4 41 53 54 |,100,0,".IN .AST|
00000400: 45 4E 44 52 55 43 4B 20 48 4F 4C 54 20 44 41 53 |ENDRUCK HOLT DAS|
00000410: 20 41 4C 54 45 20 C2 49 4C 44 20 5A 55 52 55 45 | ALTE .ILD ZURUE|
00000420: 43 4B 22 00 2D 20 7C 01 A1 F9 20 41 24 00 33 20 |CK".- |... A$.3 |
00000430: 86 01 3A 00 6C 20 90 01 8D 20 36 30 31 32 30 3A |..:.l ... 60120:|
00000440: 8F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |. |
00000450: 20 20 20 20 20 20 20 20 20 20 42 49 4C 44 20 5A | BILD Z|
00000460: 55 52 55 45 43 4B 20 48 4F 4C 45 4E 00 76 20 9A |URUECK HOLEN.v .|
00000470: 01 A1 F9 20 41 24 00 7E 20 A4 01 DE 20 35 00 84 |... A$.~ ... 5..|
00000480: 20 AE 01 80 00 8A 20 B8 01 3A 00 AE 20 C2 01 8F | ..... ..:.. ...|
00000490: 20 20 2A 2A 2A 2A 20 20 46 45 48 4C 45 52 42 45 | **** FEHLERBE|
000004A0: 48 41 4E 44 4C 55 4E 47 20 20 2A 2A 2A 2A 00 B4 |HANDLUNG ****..|
000004B0: 20 CC 01 3A 00 BC 20 D6 01 DE 20 35 00 CD 20 E0 | ..:.. ... 5.. .|
000004C0: 01 99 20 45 52 2C D3 28 45 52 29 3A EA 00 D3 20 |.. ER,.(ER):... |
000004D0: EA 01 80 00 D9 20 F4 01 3A 00 0C 21 60 EA 8F 20 |..... ..:..!`.. |
000004E0: 20 2A 2A 2A 2A 20 20 42 49 4C 44 20 49 4E 20 46 | **** BILD IN F|
000004F0: 52 45 49 45 4E 20 42 45 52 45 49 43 48 20 4B 4F |REIEN BEREICH KO|
00000500: 50 49 45 52 45 4E 20 20 2A 2A 2A 2A 00 12 21 6A |PIEREN ****..!j|
00000510: EA 3A 00 56 21 74 EA 9E 20 D1 28 22 43 44 43 43 |.:.V!t.. .("CDCC|
00000520: 22 29 2C 31 36 30 2C 32 34 3A 8F 20 20 20 20 20 |"),160,24:. |
00000530: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000540: 20 20 20 20 56 44 43 20 49 4E 20 4B 4F 50 49 45 | VDC IN KOPIE|
00000550: 52 4D 4F 44 55 53 00 99 21 7E EA 9E 20 D1 28 22 |RMODUS..!~.. .("|
00000560: 43 44 43 43 22 29 2C 36 34 2C 33 32 3A 9E 20 D1 |CDCC"),64,32:. .|
00000570: 28 22 43 44 43 43 22 29 2C 30 2C 33 33 3A 8F 20 |("CDCC"),0,33:. |
00000580: 20 20 20 20 51 55 45 4C 4C 2D 41 44 52 45 53 53 | QUELL-ADRESS|
00000590: 45 20 28 24 34 30 30 30 29 00 DB 21 88 EA 9E 20 |E ($4000)..!... |
000005A0: D1 28 22 43 44 43 43 22 29 2C 31 35 37 2C 31 38 |.("CDCC"),157,18|
000005B0: 3A 9E 20 D1 28 22 43 44 43 43 22 29 2C 32 30 38 |:. .("CDCC"),208|
000005C0: 2C 31 39 3A 8F 20 20 5A 49 45 4C 2D 41 44 52 45 |,19:. ZIEL-ADRE|
000005D0: 53 53 45 20 28 24 39 44 44 30 29 00 1B 22 92 EA |SSE ($9DD0).."..|
000005E0: 81 20 49 B2 31 20 A4 20 39 36 3A 9E 20 D1 28 22 |. I.1 . 96:. .("|
000005F0: 43 44 43 43 22 29 2C 32 35 30 2C 33 30 3A 82 20 |CDCC"),250,30:. |
00000600: 49 3A 8F 20 20 20 20 32 34 30 30 30 20 42 59 54 |I:. 24000 BYT|
00000610: 45 53 20 4B 4F 50 49 45 52 45 4E 00 5E 22 9C EA |ES KOPIEREN.^"..|
00000620: 9E 20 D1 28 22 43 44 43 43 22 29 2C 33 32 2C 32 |. .("CDCC"),32,2|
00000630: 34 3A 8F 20 20 20 20 20 20 20 20 20 20 20 20 20 |4:. |
00000640: 20 20 20 20 20 20 20 20 20 20 20 20 20 56 44 43 | VDC|
00000650: 20 49 4E 20 46 55 45 4C 4C 4D 4F 44 55 53 00 64 | IN FUELLMODUS.d|
00000660: 22 A6 EA 8E 00 6A 22 B0 EA 3A 00 93 22 C4 EA 8F |"....j"..:.."...|
00000670: 20 20 2A 2A 2A 2A 20 20 42 49 4C 44 20 5A 55 52 | **** BILD ZUR|
00000680: 55 45 43 4B 2D 4B 4F 50 49 45 52 45 4E 20 20 2A |UECK-KOPIEREN *|
00000690: 2A 2A 2A 00 99 22 CE EA 3A 00 DD 22 D8 EA 9E 20 |***.."..:.."... |
000006A0: D1 28 22 43 44 43 43 22 29 2C 31 36 30 2C 32 34 |.("CDCC"),160,24|
000006B0: 3A 8F 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |:. |
000006C0: 20 20 20 20 20 20 20 20 20 20 20 56 44 43 20 49 | VDC I|
000006D0: 4E 20 4B 4F 50 49 45 52 4D 4F 44 55 53 00 20 23 |N KOPIERMODUS. #|
000006E0: E2 EA 9E 20 D1 28 22 43 44 43 43 22 29 2C 31 35 |... .("CDCC"),15|
000006F0: 37 2C 33 32 3A 9E 20 D1 28 22 43 44 43 43 22 29 |7,32:. .("CDCC")|
00000700: 2C 32 30 38 2C 33 33 3A 8F 20 20 51 55 45 4C 4C |,208,33:. QUELL|
00000710: 2D 41 44 52 45 53 53 45 20 28 24 39 44 44 30 29 |-ADRESSE ($9DD0)|
00000720: 00 62 23 EC EA 9E 20 D1 28 22 43 44 43 43 22 29 |.b#... .("CDCC")|
00000730: 2C 36 34 2C 31 38 3A 9E 20 D1 28 22 43 44 43 43 |,64,18:. .("CDCC|
00000740: 22 29 2C 30 2C 31 39 3A 8F 20 20 20 20 20 5A 49 |"),0,19:. ZI|
00000750: 45 4C 2D 41 44 52 45 53 53 45 20 28 24 34 30 30 |EL-ADRESSE ($400|
00000760: 30 29 00 A2 23 F6 EA 81 20 49 B2 31 20 A4 20 39 |0)..#... I.1 . 9|
00000770: 36 3A 9E 20 D1 28 22 43 44 43 43 22 29 2C 32 35 |6:. .("CDCC"),25|
00000780: 30 2C 33 30 3A 82 20 49 3A 8F 20 20 20 20 32 34 |0,30:. I:. 24|
00000790: 30 30 30 20 42 59 54 45 53 20 4B 4F 50 49 45 52 |000 BYTES KOPIER|
000007A0: 45 4E 00 E5 23 00 EB 9E 20 D1 28 22 43 44 43 43 |EN..#... .("CDCC|
000007B0: 22 29 2C 33 32 2C 32 34 3A 8F 20 20 20 20 20 20 |"),32,24:. |
000007C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000007D0: 20 20 20 20 56 44 43 20 49 4E 20 46 55 45 4C 4C | VDC IN FUELL|
000007E0: 4D 4F 44 55 53 00 EB 23 0A EB 8E 00 00 00 |MODUS..#...... |
....D.. PIC - SAV
- DEMO.\.N.. ======
============...X.. RETTEN EINES VDC-MUL
TICOLOR-BILDES IN DEN FREIEN VDC-SPEICHE
R...... 02.1992
PROGRAMMIERT VON P.HUELSTEDE.....:....
..%:. G(14):W 470.<. ... "GRAFIK-80/2X8"
:. PROGRAMME NACHLADEN.^..
... "COL-PACK",B0,P(Q("0E80"))....... "K
OALA-DEMO PIC",B0,P(Q("A000")).K..... 15
:. 4867:. 'GRAFIK-80/
2X8' INITIALISIEREN...H.PA.Q("0E80"):.
ADRESSEN DER HILFSRO
UTINEN...R.:.*.... 6,1:. 2,1:. 3,1.Y....
6,1:. GRAFIK EI
N...... PA,1,160:.
BILD ZEIGEN...... 60020:.
BILD RETTEN.I..... A$.O...:.
..... 6,1:. BILD
LOESCHEN...".FL.0...,.. I.1 . 16:S.I.6.
N.6.. 2,I:. 3,I:. FARBE
SETZEN.J.@.. 1,320,100,S.2,S,,,,10...J..
FL,320,99.S:FL.1.FL:. RING FU
ELLEN UND FARBE UMSCHALTEN...T.. I.K.^..
2,1:. 3,16...H.. 0,128,94,512,105,,1.#
R.. 1,10,100,0,"EIN TASTENDRUCK HOLT DAS
ALTE BILD ZURUECK".- |... A$.3 ..:.L ..
. 60120:. BILD Z
URUECK HOLEN.V .... A$.~ ... 5.. ..... .
.:.. B.. **** FEHLERBEHANDLUNG ****..
L.:.. V.. 5.M ... ER,S(ER):..S ....Y ..
:..!`.. **** BILD IN FREIEN BEREICH KO
PIEREN ****..!J.:.V!T.. Q("CDCC"),160,2
4:. VDC IN KOPIE
RMODUS..!~.. Q("CDCC"),64,32:. Q("CDCC")
,0,33:. QUELL-ADRESSE ($4000)..!...
Q("CDCC"),157,18:. Q("CDCC"),208,19:. Z
IEL-ADRESSE ($9DD0).."... I.1 . 96:. Q("
CDCC"),250,30:. I:. 24000 BYTES KOPIE
REN.^"... Q("CDCC"),32,24:.
VDC IN FUELLMODUS.D"....J".
.:.."D.. **** BILD ZURUECK-KOPIEREN *
***.."N.:.."X.. Q("CDCC"),160,24:.
VDC IN KOPIERMODUS. #
... Q("CDCC"),157,32:. Q("CDCC"),208,33:
. QUELL-ADRESSE ($9DD0).B#... Q("CDCC")
,64,18:. Q("CDCC"),0,19:. ZIEL-ADRES
SE ($4000)..#... I.1 . 96:. Q("CDCC"),25
0,30:. I:. 24000 BYTES KOPIEREN..#...
Q("CDCC"),32,24:.
VDC IN FUELLMODUS..#......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL