MONA LISA 64
FILE INFORMATION
FILENAME(S): MONA LISA 64
FILE TYPE(S): PRG
FILE SIZE: 2K
FIRST SEEN: 2025-12-02 23:21:37
APPEARS ON: 2 disk(s)
FILE HASH
a0b43b070a476b7056e4d0979fc64d3cc44d33a097fe43c212941fb427d14b2b
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DINKEL S DISK | MONA LISA 64 | PRG | swasti, dinkel | 1 | 3 | DOWNLOAD FILE |
| DRAGAN SPIELE | MONA LISA 64 | PRG | swasti, dinkel | 1 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0C 08 01 00 9F 33 2C 34 2C 37 00 13 08 02 |.......3,4,7....|
00000010: 00 9D 33 00 2A 08 03 00 99 22 50 52 4F 47 52 41 |..3.*...."PROGRA|
00000020: 4D 4D 4C 49 53 54 49 4E 47 22 00 30 08 04 00 9B |MMLISTING".0....|
00000030: 00 43 08 0A 00 8F 20 4D 4F 4E 41 20 4C 49 53 41 |.C.... MONA LISA|
00000040: 20 36 34 00 52 08 14 00 8F 20 20 20 28 43 29 20 | 64.R.... (C) |
00000050: 42 59 00 64 08 1E 00 8F 20 49 2E 20 45 4C 46 45 |BY.d.... I. ELFE|
00000060: 52 49 4E 47 00 7C 08 28 00 97 35 33 32 38 30 2C |RING.|.(..53280,|
00000070: 31 34 3A 97 35 33 32 38 31 2C 31 34 00 AC 08 32 |14:.53281,14...2|
00000080: 00 99 C7 28 31 34 37 29 2C C7 28 31 34 29 3A 99 |...(147),.(14):.|
00000090: 22 20 20 20 20 20 20 20 20 20 20 12 1C CD 4F 4E |" ...ON|
000000A0: 41 20 4C 49 53 41 20 36 34 92 05 22 00 C8 08 3C |A LISA 64.."...<|
000000B0: 00 99 22 11 20 4A 4F 59 53 54 49 43 4B 20 49 4E |..". JOYSTICK IN|
000000C0: 20 50 4F 52 54 20 31 22 00 EF 08 46 00 99 22 11 | PORT 1"...F..".|
000000D0: 12 46 55 4E 4B 54 49 4F 4E 45 4E 3A 92 20 20 46 |.FUNKTIONEN:. F|
000000E0: 31 3D 4C 4F 45 53 43 48 45 20 42 49 4C 44 22 00 |1=LOESCHE BILD".|
000000F0: 15 09 50 00 99 22 11 20 46 45 55 45 52 4B 4E 4F |..P..". FEUERKNO|
00000100: 50 46 3D 20 20 20 46 32 3D 4E 45 55 20 53 54 41 |PF= F2=NEU STA|
00000110: 52 54 45 4E 22 00 40 09 5A 00 99 22 11 20 4C 41 |RTEN".@.Z..". LA|
00000120: 4E 47 53 41 4D 2F 53 54 4F 50 20 20 46 33 3D 4E |NGSAM/STOP F3=N|
00000130: 45 55 45 20 52 41 48 4D 45 4E 46 41 52 42 45 22 |EUE RAHMENFARBE"|
00000140: 00 6C 09 64 00 99 22 11 42 45 49 20 46 34 20 55 |.l.d..".BEI F4 U|
00000150: 2E 45 35 21 22 20 46 34 B2 4E 45 55 45 20 5A 45 |.E5!" F4.NEUE ZE|
00000160: 49 43 48 45 4E 46 41 52 42 45 4E 22 00 98 09 6E |ICHENFARBEN"...n|
00000170: 00 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |.." |
00000180: 20 20 46 35 3D 4E 45 55 45 20 48 49 4E 54 45 52 | F5=NEUE HINTER|
00000190: 47 2E 46 41 52 42 45 22 00 BA 09 78 00 99 22 20 |G.FARBE"...x.." |
000001A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 36 | F6|
000001B0: 3D 5A 45 49 43 48 4E 45 4E 22 00 DD 09 82 00 99 |=ZEICHNEN"......|
000001C0: 22 11 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |". |
000001D0: 20 46 37 3D 4C 4F 45 53 43 48 45 4E 22 00 FF 09 | F7=LOESCHEN"...|
000001E0: 8C 00 99 22 11 20 20 20 20 20 20 20 20 20 20 20 |...". |
000001F0: 20 20 20 20 46 38 3D 42 45 57 45 47 45 4E 22 00 | F8=BEWEGEN".|
00000200: 22 0A 96 00 99 22 10 11 20 20 20 12 42 49 54 54 |"....".. .BITT|
00000210: 45 20 44 52 55 45 43 4B 45 4E 20 53 49 45 20 22 |E DRUECKEN SIE "|
00000220: 53 22 00 3F 0A A0 00 A1 41 24 3A 8B 41 24 B3 B1 |S".?....A$:.A$..|
00000230: 22 53 22 AF 41 24 B3 B1 22 D3 22 89 31 36 30 00 |"S".A$..".".160.|
00000240: 4B 0A AA 00 8F 20 53 54 41 52 54 00 8A 0A B4 00 |K.... START.....|
00000250: 52 46 B2 35 3A 48 46 B2 35 3A 5A 46 B2 31 3A 4D |RF.5:HF.5:ZF.1:M|
00000260: 4F B2 31 3A 4A 50 B2 35 36 33 32 31 3A 58 B2 31 |O.1:JP.56321:X.1|
00000270: 36 30 3A 59 B2 31 30 30 3A 56 B2 35 33 32 34 38 |60:Y.100:V.53248|
00000280: 3A 8D 32 30 30 3A 89 32 38 30 00 A5 0A BE 00 8F |:.200:.280......|
00000290: 20 47 52 41 46 49 4B 42 45 52 45 49 43 48 20 53 | GRAFIKBEREICH S|
000002A0: 45 54 5A 45 4E 00 DE 0A C8 00 99 C7 28 31 34 37 |ETZEN.......(147|
000002B0: 29 2C C7 28 31 34 29 3A 99 22 11 11 11 11 11 11 |),.(14):."......|
000002C0: 11 11 11 11 20 20 20 20 20 20 20 20 20 20 12 20 |.... . |
000002D0: 42 49 54 54 45 20 57 41 52 54 45 4E 21 22 00 F3 |BITTE WARTEN!"..|
000002E0: 0A D2 00 8F 20 4C 4F 45 53 43 48 45 20 47 52 41 |.... LOESCHE GRA|
000002F0: 46 49 4B 00 10 0B DC 00 81 44 B2 38 31 39 32 A4 |FIK......D.8192.|
00000300: 31 36 33 38 33 3A 97 44 2C 30 3A 82 3A 44 B2 30 |16383:.D,0:.:D.0|
00000310: 00 2E 0B E6 00 8F 20 47 52 41 46 49 4B 20 41 55 |...... GRAFIK AU|
00000320: 46 20 46 41 52 42 45 20 53 45 54 5A 45 4E 00 48 |F FARBE SETZEN.H|
00000330: 0B F0 00 8F 20 48 46 3D 48 49 4E 54 45 52 47 52 |.... HF=HINTERGR|
00000340: 55 4E 44 46 41 52 42 45 00 5E 0B FA 00 8F 20 5A |UNDFARBE.^.... Z|
00000350: 46 3D 5A 45 49 43 48 45 4E 46 41 52 42 45 00 7B |F=ZEICHENFARBE.{|
00000360: 0B 04 01 81 44 B2 31 30 32 34 A4 32 30 32 33 3A |....D.1024.2023:|
00000370: 97 44 2C 5A 46 AC 31 36 AA 48 46 00 AA 0B 06 01 |.D,ZF.16.HF.....|
00000380: 57 B2 AB 28 28 C2 28 4A 50 29 AF 31 36 29 B2 30 |W..((.(JP).16).0|
00000390: 29 3A 8B 57 B2 31 AF 44 46 B2 31 A7 44 46 B2 30 |):.W.1.DF.1.DF.0|
000003A0: 3A 8D 32 37 30 3A 89 32 38 30 00 BD 0B 08 01 8B |:.270:.280......|
000003B0: 57 B2 31 AF 44 46 B2 30 A7 44 46 B2 31 00 D2 0B |W.1.DF.0.DF.1...|
000003C0: 0A 01 8B 44 46 B2 31 A7 81 54 B2 31 A4 33 35 30 |...DF.1..T.1.350|
000003D0: 3A 82 00 E5 0B 0C 01 82 3A 44 46 B2 30 3A 44 B2 |:.......:DF.0:D.|
000003E0: 30 3A 57 B2 30 00 FD 0B 0E 01 97 56 AA 31 37 2C |0:W.0......V.17,|
000003F0: 35 39 3A 97 56 AA 32 34 2C 32 34 3A 8E 00 2D 0C |59:.V.24,24:..-.|
00000400: 18 01 41 24 B2 22 22 3A A1 41 24 3A 8B 41 24 B2 |..A$."":.A$:.A$.|
00000410: 22 80 22 A7 97 56 31 37 2C 32 34 3A 97 56 32 34 |"."..V17,24:.V24|
00000420: 2C 32 31 3A 8D 32 30 30 3A 89 32 38 30 00 4F 0C |,21:.200:.280.O.|
00000430: 22 01 8B 41 24 B2 22 89 22 A7 97 56 AA 31 37 2C |"..A$."."..V.17,|
00000440: 32 34 3A 97 56 AA 32 34 2C 32 31 3A 89 34 30 00 |24:.V.24,21:.40.|
00000450: 60 0C 2C 01 8B 41 24 B2 22 80 22 A7 8D 34 32 30 |`.,..A$."."..420|
00000460: 00 71 0C 36 01 8B 41 24 B2 22 8A 22 A7 8D 34 37 |.q.6..A$."."..47|
00000470: 30 00 82 0C 40 01 8B 41 24 B2 22 87 22 A7 8D 35 |0...@..A$."."..5|
00000480: 31 30 00 98 0C 4A 01 8B 41 24 B2 22 28 22 A7 4D |10...J..A$."(".M|
00000490: 4F B2 31 3A 89 33 36 30 00 AE 0C 54 01 8B 41 24 |O.1:.360...T..A$|
000004A0: B2 22 B3 22 A7 4D 4F B2 32 3A 89 33 36 30 00 C4 |.".".MO.2:.360..|
000004B0: 0C 5E 01 8B 41 24 B2 22 B9 22 A7 4D 4F B2 33 3A |.^..A$.".".MO.3:|
000004C0: 89 33 36 30 00 E6 0C 68 01 48 B2 28 28 C2 28 4A |.360...h.H.((.(J|
000004D0: 50 29 AF 34 29 B2 30 29 AB 28 28 C2 28 4A 50 29 |P).4).0).((.(JP)|
000004E0: AF 38 29 B2 30 29 00 08 0D 72 01 57 B2 28 28 C2 |.8).0)...r.W.((.|
000004F0: 28 4A 50 29 AF 31 29 B2 30 29 AB 28 28 C2 28 4A |(JP).1).0).((.(J|
00000500: 50 29 AF 32 29 B2 30 29 00 19 0D 7C 01 8B 48 B2 |P).2).0)...|..H.|
00000510: 30 AF 57 B2 30 89 32 38 30 00 43 0D 86 01 41 58 |0.W.0.280.C...AX|
00000520: B2 58 3A 41 59 B2 59 3A 58 B2 58 AA 48 3A 59 B2 |.X:AY.Y:X.X.H:Y.|
00000530: 59 AA 57 3A 8F 20 4E 45 55 45 20 50 4F 53 49 54 |Y.W:. NEUE POSIT|
00000540: 49 4F 4E 00 57 0D 90 01 8D 35 35 30 3A 8F 20 5A |ION.W....550:. Z|
00000550: 45 49 43 48 4E 45 4E 00 60 0D 9A 01 89 32 38 30 |EICHNEN.`....280|
00000560: 00 77 0D A4 01 8F 20 4E 45 55 45 20 52 41 48 4D |.w.... NEUE RAHM|
00000570: 45 4E 46 41 52 42 45 00 8F 0D AE 01 52 46 B2 52 |ENFARBE.....RF.R|
00000580: 46 AA 31 3A 8B 52 46 B1 31 35 A7 52 46 B2 30 00 |F.1:.RF.15.RF.0.|
00000590: 9F 0D B8 01 8B 52 46 B3 30 A7 52 46 B2 31 35 00 |.....RF.0.RF.15.|
000005A0: AD 0D C2 01 97 35 33 32 38 30 2C 52 46 00 B6 0D |.....53280,RF...|
000005B0: CC 01 89 33 36 30 00 CE 0D D6 01 8F 20 4E 45 55 |...360...... NEU|
000005C0: 45 20 5A 45 49 43 48 45 4E 46 41 52 42 45 00 E6 |E ZEICHENFARBE..|
000005D0: 0D E0 01 5A 46 B2 5A 46 AA 31 3A 8B 5A 46 B1 31 |...ZF.ZF.1:.ZF.1|
000005E0: 35 A7 5A 46 B2 30 00 F6 0D EA 01 8B 5A 46 B3 30 |5.ZF.0......ZF.0|
000005F0: A7 5A 46 B2 31 35 00 01 0E F4 01 8D 32 36 30 3A |.ZF.15......260:|
00000600: 8E 00 1D 0E FE 01 8F 20 4E 45 55 45 20 48 49 4E |....... NEUE HIN|
00000610: 54 45 52 47 52 55 4E 44 46 41 52 42 45 00 35 0E |TERGRUNDFARBE.5.|
00000620: 08 02 48 46 B2 48 46 AA 31 3A 8B 48 46 B1 31 35 |..HF.HF.1:.HF.15|
00000630: A7 48 46 B2 30 00 45 0E 12 02 8B 48 46 B3 30 A7 |.HF.0.E....HF.0.|
00000640: 48 46 B2 31 35 00 50 0E 1C 02 8D 32 36 30 3A 8E |HF.15.P....260:.|
00000650: 00 5E 0E 26 02 8F 20 50 4C 4F 54 54 45 4E 00 79 |.^.&.. PLOTTEN.y|
00000660: 0E 30 02 8B 4D 4F B2 31 A7 8D 36 30 30 3A 8E 3A |.0..MO.1..600:.:|
00000670: 8F 20 5A 45 49 43 48 45 4E 00 95 0E 3A 02 8B 4D |. ZEICHEN...:..M|
00000680: 4F B2 32 A7 8D 36 33 30 3A 8E 3A 8F 20 4C 4F 45 |O.2..630:.:. LOE|
00000690: 53 43 48 45 4E 00 B0 0E 44 02 8B 4D 4F B2 33 A7 |SCHEN...D..MO.3.|
000006A0: 8D 36 36 30 3A 8E 3A 8F 20 42 45 57 45 47 45 4E |.660:.:. BEWEGEN|
000006B0: 00 B6 0E 4E 02 8E 00 E9 0E 58 02 59 59 B2 33 32 |...N.....X.YY.32|
000006C0: 30 AC B5 28 59 AD 38 29 AA 28 59 AF 37 29 3A 58 |0..(Y.8).(Y.7):X|
000006D0: 58 B2 38 AC B5 28 58 AD 38 29 3A 42 49 B2 32 AE |X.8..(X.8):BI.2.|
000006E0: 28 28 37 AB 58 29 AF 37 29 00 0A 0F 62 02 97 38 |((7.X).7)...b..8|
000006F0: 31 39 32 AA 58 58 AA 59 59 2C C2 28 38 31 39 32 |192.XX.YY,.(8192|
00000700: AA 58 58 AA 59 59 29 B0 42 49 00 10 0F 6C 02 8E |.XX.YY).BI...l..|
00000710: 00 43 0F 76 02 59 59 B2 33 32 30 AC B5 28 59 AD |.C.v.YY.320..(Y.|
00000720: 38 29 AA 28 59 AF 37 29 3A 58 58 B2 38 AC B5 28 |8).(Y.7):XX.8..(|
00000730: 58 AD 38 29 3A 42 49 B2 32 AE 28 28 37 AB 58 29 |X.8):BI.2.((7.X)|
00000740: AF 37 29 00 65 0F 80 02 97 38 31 39 32 AA 58 58 |.7).e....8192.XX|
00000750: AA 59 59 2C C2 28 38 31 39 32 AA 58 58 AA 59 59 |.YY,.(8192.XX.YY|
00000760: 29 AF A8 42 49 00 6B 0F 8A 02 8E 00 92 0F 94 02 |)..BI.k.........|
00000770: 58 31 B2 58 3A 59 31 B2 59 3A 58 B2 41 58 3A 59 |X1.X:Y1.Y:X.AX:Y|
00000780: B2 41 59 3A 8D 36 33 30 3A 58 B2 58 31 3A 59 B2 |.AY:.630:X.X1:Y.|
00000790: 59 31 00 C5 0F 9E 02 59 59 B2 33 32 30 AC B5 28 |Y1.....YY.320..(|
000007A0: 59 AD 38 29 AA 28 59 AF 37 29 3A 58 58 B2 38 AC |Y.8).(Y.7):XX.8.|
000007B0: B5 28 58 AD 38 29 3A 42 49 B2 32 AE 28 28 37 AB |.(X.8):BI.2.((7.|
000007C0: 58 29 AF 37 29 00 E6 0F A8 02 97 38 31 39 32 AA |X).7)......8192.|
000007D0: 58 58 AA 59 59 2C C2 28 38 31 39 32 AA 58 58 AA |XX.YY,.(8192.XX.|
000007E0: 59 59 29 B0 42 49 00 EC 0F B2 02 8E 00 00 00 |YY).BI......... |
.......3,4,7......3.*...."PROGRAMMLISTIN
G".0.....C.... MONA LISA 64.R.... (C)
BY.D.... I. ELFERING.|.(..53280,14:.5328
1,14...2..G(147),G(14):." ..MON
A LISA 64..".H.<..". JOYSTICK IN PORT 1"
...F.."..FUNKTIONEN:. F1=LOESCHE BILD".
..P..". FEUERKNOPF= F2=NEU STARTEN".@.
Z..". LANGSAM/STOP F3=NEUE RAHMENFARBE"
.L.D..".BEI F4 U.E5!" F4.NEUE ZEICHENFAR
BEN"...N.." F5=NEUE HINTER
G.FARBE"...X.." F6=ZEICHNE
N"......". F7=LOESCHEN"...
...". F8=BEWEGEN"."...."..
.BITTE DRUECKEN SIE "S".?. ..A$:.A$..
"S".A$.."S".160.K.... START.....RF.5:HF.
5:ZF.1:MO.1:JP.56321:X.160:Y.100:V.53248
:.200:.280...... GRAFIKBEREICH SETZEN...
H..G(147),G(14):.".......... .
BITTE WARTEN!"...R.. LOESCHE GRAFIK.....
.D.8192.16383:.D,0:.:D.0...... GRAFIK AU
F FARBE SETZEN.H.... HF=HINTERGRUNDFARBE
.^.... ZF=ZEICHENFARBE.{....D.1024.2023:
.D,ZF.16.HF.....W..((B(JP).16).0):.W.1.D
F.1.DF.0:.270:.280......W.1.DF.0.DF.1.R.
...DF.1..T.1.350:.......:DF.0:D.0:W.0...
...V.17,59:.V.24,24:..-...A$."":.A$:.A$.
"."..V17,24:.V24,21:.200:.280.O."..A$.".
"..V.17,24:.V.24,21:.40.`.,..A$."."..420
.Q.6..A$."."..470...@..A$."."..510...J..
A$."(".MO.1:.360...T..A$.".".MO.2:.360.D
.^..A$.".".MO.3:.360...H.H.((B(JP).4).0)
.((B(JP).8).0)...R.W.((B(JP).1).0).((B(J
P).2).0)...|..H.0.W.0.280.C...AX.X:AY.Y:
X.X.H:Y.Y.W:. NEUE POSITION.W....550:. Z
EICHNEN.`....280.W.... NEUE RAHMENFARBE.
....RF.RF.1:.RF.15.RF.0......RF.0.RF.15.
..B..53280,RF...L..360.N.V.. NEUE ZEICHE
NFARBE.....ZF.ZF.1:.ZF.15.ZF.0......ZF.0
.ZF.15......260:....... NEUE HINTERGRUND
FARBE.5...HF.HF.1:.HF.15.HF.0.E....HF.0.
HF.15.P....260:..^.&.. PLOTTEN.Y.0..MO.1
..600:.:. ZEICHEN...:..MO.2..630:.:. LOE
SCHEN...D..MO.3..660:.:. BEWEGEN...N....
.X.YY.320..(Y.8).(Y.7):XX.8..(X.8):BI.2.
((7.X).7)...B..8192.XX.YY,B(8192.XX.YY).
BI...L...C.V.YY.320..(Y.8).(Y.7):XX.8..(
X.8):BI.2.((7.X).7).E....8192.XX.YY,B(81
92.XX.YY)..BI.K.........X1.X:Y1.Y:X.AX:Y
.AY:.630:X.X1:Y.Y1.E...YY.320..(Y.8).(Y.
7):XX.8..(X.8):BI.2.((7.X).7)......8192.
XX.YY,B(8192.XX.YY).BI.........
> CLICK IMAGE PREVIEW FOR FULL MODAL