> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 0A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |....... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 33 08 14 00 8F |**********.3....|
00000020: 20 50 4C 4F 54 54 45 52 2D 42 41 53 49 43 20 44 | PLOTTER-BASIC D|
00000030: 45 4D 4F 00 4C 08 1E 00 8F 20 2A 2A 2A 2A 2A 2A |EMO.L.... ******|
00000040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 65 08 23 |************.e.#|
00000050: 00 2E 53 43 48 57 41 52 5A 3A 2E 47 4B 3A 2E 4D |..SCHWARZ:.GK:.M|
00000060: 49 54 54 45 4C 00 91 08 25 00 2E 54 45 58 54 2C |ITTEL...%..TEXT,|
00000070: 22 20 20 20 20 20 C4 52 45 48 55 4E 47 20 45 49 |" .REHUNG EI|
00000080: 4E 45 53 20 33 2D C4 2D CB 4F 45 52 50 45 52 53 |NES 3-.-.OERPERS|
00000090: 22 00 BD 08 26 00 2E 54 45 58 54 2C 22 20 20 20 |"...&..TEXT," |
000000A0: 20 20 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D | ==============|
000000B0: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 22 00 D3 08 |============"...|
000000C0: 27 00 2E 4D 4F 56 45 2C 30 2C AB 37 30 3A 2E 54 |'..MOVE,0,.70:.T|
000000D0: 45 58 54 00 F9 08 28 00 58 56 B2 32 34 30 3A 59 |EXT...(.XV.240:Y|
000000E0: 56 B2 30 3A 8F 20 56 45 52 53 43 48 49 45 42 55 |V.0:. VERSCHIEBU|
000000F0: 4E 47 53 56 45 4B 54 4F 52 00 1A 09 29 00 46 B2 |NGSVEKTOR...).F.|
00000100: 31 35 20 20 20 20 20 20 20 3A 8F 20 56 45 52 47 |15 :. VERG|
00000110: 52 4F 45 53 53 45 52 55 4E 47 00 3F 09 2A 00 57 |ROESSERUNG.?.*.W|
00000120: B2 33 35 20 20 20 20 20 20 20 3A 8F 20 42 45 54 |.35 :. BET|
00000130: 52 41 43 48 54 55 4E 47 53 57 49 4E 4B 45 4C 00 |RACHTUNGSWINKEL.|
00000140: 63 09 2B 00 4C B2 32 34 20 20 20 20 20 20 20 3A |c.+.L.24 :|
00000150: 8F 20 41 4E 5A 41 48 4C 20 44 45 52 20 4C 49 4E |. ANZAHL DER LIN|
00000160: 49 45 4E 00 83 09 2D 00 86 20 52 28 4C 29 20 20 |IEN...-.. R(L) |
00000170: 20 3A 8F 20 46 45 4C 44 20 44 45 52 20 4C 49 4E | :. FELD DER LIN|
00000180: 49 45 4E 00 AA 09 32 00 50 B2 38 20 20 20 20 20 |IEN...2.P.8 |
00000190: 20 20 20 3A 8F 20 41 4E 5A 41 48 4C 20 44 45 52 | :. ANZAHL DER|
000001A0: 20 45 43 4B 50 55 4E 4B 54 45 00 C3 09 37 00 86 | ECKPUNKTE...7..|
000001B0: 20 58 28 50 29 3A 86 20 59 28 50 29 3A 86 20 5A | X(P):. Y(P):. Z|
000001C0: 28 50 29 00 E0 09 3C 00 8F 20 45 49 4E 4C 45 53 |(P)...<.. EINLES|
000001D0: 45 4E 20 44 45 52 20 45 43 4B 50 55 4E 4B 54 45 |EN DER ECKPUNKTE|
000001E0: 00 EE 09 46 00 81 20 49 B2 31 20 A4 20 50 00 03 |...F.. I.1 . P..|
000001F0: 0A 50 00 87 20 58 28 49 29 2C 59 28 49 29 2C 5A |.P.. X(I),Y(I),Z|
00000200: 28 49 29 00 09 0A 5A 00 82 00 2D 0A 64 00 8F 20 |(I)...Z...-.d.. |
00000210: 45 49 4E 4C 45 53 45 4E 20 44 45 52 20 56 45 52 |EINLESEN DER VER|
00000220: 42 49 4E 44 55 4E 47 53 46 4F 4C 47 45 00 3B 0A |BINDUNGSFOLGE.;.|
00000230: 6E 00 81 20 49 B2 31 20 A4 20 4C 00 46 0A 78 00 |n.. I.1 . L.F.x.|
00000240: 87 20 52 28 49 29 00 4C 0A 82 00 82 00 5C 0A 8C |. R(I).L.....\..|
00000250: 00 8F 20 5A 45 49 43 48 4E 55 4E 47 00 6E 0A 96 |.. ZEICHNUNG.n..|
00000260: 00 81 20 49 B2 31 20 A4 20 4C 20 A9 20 32 00 BA |.. I.1 . L . 2..|
00000270: 0A A0 00 2E 54 52 41 4E 53 4C 2C 58 28 52 28 49 |....TRANSL,X(R(I|
00000280: 29 29 2C 59 28 52 28 49 29 29 2C 5A 28 52 28 49 |)),Y(R(I)),Z(R(I|
00000290: 29 29 2C 58 56 2C 59 56 2C 46 2C 57 2C 58 28 52 |)),XV,YV,F,W,X(R|
000002A0: 28 49 AA 31 29 29 2C 59 28 52 28 49 AA 31 29 29 |(I.1)),Y(R(I.1))|
000002B0: 2C 5A 28 52 28 49 AA 31 29 29 00 C0 0A AA 00 82 |,Z(R(I.1))......|
000002C0: 00 D9 0A B4 00 8F 20 44 52 45 48 55 4E 47 20 55 |...... DREHUNG U|
000002D0: 4D 20 31 30 20 47 52 41 44 00 E6 0A B9 00 44 57 |M 10 GRAD.....DW|
000002E0: B2 44 57 AA 31 30 00 F4 0A BE 00 81 20 49 B2 31 |.DW.10...... I.1|
000002F0: 20 A4 20 50 00 1A 0B C8 00 2E 54 55 52 4E 2C 58 | . P......TURN,X|
00000300: 28 49 29 2C 59 28 49 29 2C 44 57 3A 8F 20 44 52 |(I),Y(I),DW:. DR|
00000310: 45 48 55 4E 47 20 55 4D 20 5A 00 20 0B D2 00 82 |EHUNG UM Z. ....|
00000320: 00 31 0B DC 00 2E 4D 4F 56 45 2C 30 2C AB 31 35 |.1....MOVE,0,.15|
00000330: 30 00 54 0B E6 00 2E 54 45 58 54 20 20 20 20 20 |0.T....TEXT |
00000340: 20 20 20 20 20 20 20 20 3A 8F 20 43 52 20 53 45 | :. CR SE|
00000350: 4E 44 45 4E 00 77 0B F0 00 99 20 22 11 43 4F 4D |NDEN.w.... ".COM|
00000360: 4D 4F 44 4F 52 45 2D 54 41 53 54 45 20 44 52 55 |MODORE-TASTE DRU|
00000370: 45 43 4B 45 4E 21 22 00 83 0B FA 00 92 20 36 35 |ECKEN!"...... 65|
00000380: 33 2C 32 00 A7 0B 04 01 99 20 22 91 20 20 20 20 |3,2...... ". |
00000390: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000003A0: 20 20 20 20 20 91 22 00 B1 0B 0E 01 89 20 31 34 | ."...... 14|
000003B0: 30 00 C1 0B F3 01 8F 20 45 43 4B 50 55 4E 4B 54 |0...... ECKPUNKT|
000003C0: 45 00 FB 0B F4 01 83 20 2D 32 2C 2D 32 2C 30 2C |E...... -2,-2,0,|
000003D0: 32 2C 2D 32 2C 30 2C 32 2C 32 2C 30 2C 2D 32 2C |2,-2,0,2,2,0,-2,|
000003E0: 32 2C 30 2C 30 2C 30 2C 36 2C 34 2C 30 2C 36 2C |2,0,0,0,6,4,0,6,|
000003F0: 34 2C 34 2C 36 2C 30 2C 34 2C 36 00 1E 0C 57 02 |4,4,6,0,4,6...W.|
00000400: 8F 20 52 45 49 48 45 4E 46 4F 4C 47 45 20 44 45 |. REIHENFOLGE DE|
00000410: 52 20 56 45 52 42 49 4E 44 55 4E 47 45 4E 00 54 |R VERBINDUNGEN.T|
00000420: 0C 58 02 83 20 31 2C 32 2C 32 2C 33 2C 33 2C 34 |.X.. 1,2,2,3,3,4|
00000430: 2C 34 2C 31 2C 31 2C 35 2C 32 2C 36 2C 33 2C 37 |,4,1,1,5,2,6,3,7|
00000440: 2C 34 2C 38 2C 38 2C 35 2C 35 2C 36 2C 36 2C 37 |,4,8,8,5,5,6,6,7|
00000450: 2C 37 2C 38 00 00 00 |,7,8... |
....... ******************.3.... PLOTTER
-BASIC DEMO.L.... ******************.E.#
..SCHWARZ:.GK:.MITTEL...%..TEXT," DR
EHUNG EINES 3-D-KOERPERS"...&..TEXT,"
==========================".S.'..MOVE,
0,.70:.TEXT...(.XV.240:YV.0:. VERSCHIEBU
NGSVEKTOR...).F.15 :. VERGROESSERU
NG.?.*.W.35 :. BETRACHTUNGSWINKEL.
C.+.L.24 :. ANZAHL DER LINIEN...-.
. R(L) :. FELD DER LINIEN...2.P.8
:. ANZAHL DER ECKPUNKTE.C.7.. X(P):.
Y(P):. Z(P)...<.. EINLESEN DER ECKPUNKTE
...F.. I.1 . P...P.. X(I),Y(I),Z(I)...Z.
..-.D.. EINLESEN DER VERBINDUNGSFOLGE.;.
N.. I.1 . L.F.X.. R(I).L.....\.... ZEICH
NUNG.N.... I.1 . L . 2... ..TRANSL,X(R(I
)),Y(R(I)),Z(R(I)),XV,YV,F,W,X(R(I.1)),Y
(R(I.1)),Z(R(I.1)).......Y.... DREHUNG U
M 10 GRAD.....DW.DW.10...... I.1 . P...H
..TURN,X(I),Y(I),DW:. DREHUNG UM Z. .R..
.1....MOVE,0,.150.T....TEXT
:. CR SENDEN.W.... ".COMMODORE-TASTE DRU
ECKEN!"...... 653,2...... ".
."...... 140.A.... ECKPUNKT
E...... -2,-2,0,2,-2,0,2,2,0,-2,2,0,0,0,
6,4,0,6,4,4,6,0,4,6...W.. REIHENFOLGE DE
R VERBINDUNGEN.T.X.. 1,2,2,3,3,4,4,1,1,5
,2,6,3,7,4,8,8,5,5,6,6,7,7,8...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL