> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 39 08 01 00 89 39 30 3A 8F 20 53 41 56 45 |..9....90:. SAVE|
00000010: 22 40 30 3A 50 4C 4F 2D 44 45 4D 4F 36 34 22 2C |"@0:PLO-DEMO64",|
00000020: 38 3A 52 45 4D 20 50 2E 4B 49 54 54 45 4C 20 46 |8:REM P.KITTEL F|
00000030: 46 4D 20 39 2E 36 2E 38 37 00 59 08 02 00 9E 50 |FM 9.6.87.Y....P|
00000040: 3A 8E 3A 8F 20 4C 49 4E 49 45 20 4E 41 43 48 20 |:.:. LINIE NACH |
00000050: 28 58 58 25 2C 59 59 25 29 00 6D 08 03 00 9E 50 |(XX%,YY%).m....P|
00000060: AA 33 3A 8E 3A 8F 20 50 45 4E 20 55 50 00 83 08 |.3:.:. PEN UP...|
00000070: 06 00 9E 50 AA 36 3A 8E 3A 8F 20 50 45 4E 20 44 |...P.6:.:. PEN D|
00000080: 4F 57 4E 00 A6 08 09 00 9E 50 AA 39 3A 8E 3A 8F |OWN......P.9:.:.|
00000090: 20 50 45 4E 2D 53 54 45 4C 4C 55 4E 47 20 57 45 | PEN-STELLUNG WE|
000000A0: 43 48 53 45 4C 4E 00 D1 08 0F 00 9E 50 AA 31 35 |CHSELN......P.15|
000000B0: 3A 8E 3A 8F 20 54 45 58 54 20 41 55 53 20 5A 5A |:.:. TEXT AUS ZZ|
000000C0: 24 20 48 4F 52 49 5A 20 53 43 48 52 45 49 42 45 |$ HORIZ SCHREIBE|
000000D0: 4E 00 FF 08 12 00 9E 50 AA 31 38 3A 8E 3A 8F 20 |N......P.18:.:. |
000000E0: 54 45 58 54 20 41 55 53 20 5A 5A 24 20 56 45 52 |TEXT AUS ZZ$ VER|
000000F0: 54 49 4B 41 4C 20 53 43 48 52 45 49 42 45 4E 00 |TIKAL SCHREIBEN.|
00000100: 3A 09 13 00 8D 33 37 3A 9F 31 2C 34 2C 31 3A 98 |:....37:.1,4,1:.|
00000110: 31 2C C7 28 31 32 29 3B 3A A0 31 3A 8F 20 46 4F |1,.(12);:.1:. FO|
00000120: 52 4D 46 45 45 44 20 5A 55 4D 20 4E 41 45 43 48 |RMFEED ZUM NAECH|
00000130: 53 54 45 4E 20 42 4C 41 54 54 00 65 09 14 00 99 |STEN BLATT.e....|
00000140: 22 11 CE 45 55 45 53 20 C2 4C 41 54 54 2C 20 CE |"..EUES .LATT, .|
00000150: 55 4C 4C 50 55 4E 4B 54 20 45 49 4E 47 45 53 54 |ULLPUNKT EINGEST|
00000160: 45 4C 4C 54 2E 00 93 09 15 00 9E 50 AA 32 31 3A |ELLT.......P.21:|
00000170: 58 58 25 B2 30 3A 59 59 25 B2 30 3A 8E 3A 8F 20 |XX%.0:YY%.0:.:. |
00000180: 4E 55 4C 4C 50 55 4E 4B 54 20 46 45 53 54 4C 45 |NULLPUNKT FESTLE|
00000190: 47 45 4E 00 B3 09 1E 00 97 50 AA 33 30 2C 43 53 |GEN......P.30,CS|
000001A0: 3A 8E 3A 8F 20 43 48 41 52 41 43 54 45 52 2D 53 |:.:. CHARACTER-S|
000001B0: 49 5A 45 00 F2 09 1F 00 9E 50 AA 33 31 3A 8E 3A |IZE......P.31:.:|
000001C0: 8F 20 4B 52 45 49 53 42 4F 47 45 4E 20 47 45 47 |. KREISBOGEN GEG|
000001D0: 55 48 52 53 49 4E 4E 20 58 58 25 3D 52 2C 20 59 |UHRSINN XX%=R, Y|
000001E0: 59 25 3D 41 4E 46 4F 4B 54 2B 38 2A 45 4E 44 4F |Y%=ANFOKT+8*ENDO|
000001F0: 4B 54 00 31 0A 22 00 9E 50 AA 33 34 3A 8E 3A 8F |KT.1."..P.34:.:.|
00000200: 20 4B 52 45 49 53 42 4F 47 45 4E 20 4D 49 54 55 | KREISBOGEN MITU|
00000210: 48 52 53 49 4E 4E 20 58 58 25 3D 52 2C 20 59 59 |HRSINN XX%=R, YY|
00000220: 25 3D 41 4E 46 4F 4B 54 2B 38 2A 45 4E 44 4F 4B |%=ANFOKT+8*ENDOK|
00000230: 54 00 4D 0A 25 00 9E 50 AA 33 37 3A 8E 3A 8F 20 |T.M.%..P.37:.:. |
00000240: 42 55 46 46 45 52 20 4C 45 45 52 45 4E 00 8F 0A |BUFFER LEEREN...|
00000250: 28 00 97 50 AA 34 30 2C 41 53 3A 8E 3A 8F 20 41 |(..P.40,AS:.:. A|
00000260: 53 50 45 4B 54 56 45 52 48 41 45 4C 54 4E 49 53 |SPEKTVERHAELTNIS|
00000270: 20 46 45 53 54 20 28 31 33 32 2F 38 30 2D 31 29 | FEST (132/80-1)|
00000280: 2A 32 35 36 3D 31 36 36 20 42 45 49 20 46 58 00 |*256=166 BEI FX.|
00000290: C4 0A 29 00 97 50 AA 34 31 2C 41 45 3A 8E 3A 8F |..)..P.41,AE:.:.|
000002A0: 20 46 4C 41 47 20 46 55 45 52 20 41 53 50 45 4B | FLAG FUER ASPEK|
000002B0: 54 3A 20 4C 41 48 4D 47 45 4C 45 47 54 20 42 45 |T: LAHMGELEGT BE|
000002C0: 49 20 3D 30 00 E7 0A 4F 00 58 58 25 B2 30 3A 59 |I =0...O.XX%.0:Y|
000002D0: 59 25 B2 30 3A 8D 33 37 3A 8D 33 3A 89 32 3A 8F |Y%.0:.37:.3:.2:.|
000002E0: 20 27 48 4F 4D 45 27 00 12 0B 50 00 8F 20 53 4B | 'HOME'...P.. SK|
000002F0: 45 4C 45 54 54 20 46 55 45 52 20 50 4C 4F 54 54 |ELETT FUER PLOTT|
00000300: 45 52 2D 54 52 45 49 42 45 52 50 52 4F 47 52 41 |ER-TREIBERPROGRA|
00000310: 4D 4D 00 18 0B 51 00 8F 00 53 0B 52 00 8F 20 41 |MM...Q...S.R.. A|
00000320: 55 46 52 55 46 45 20 53 4F 4C 4C 54 45 4E 20 4E |UFRUFE SOLLTEN N|
00000330: 55 52 20 55 45 42 45 52 20 44 49 45 53 45 20 53 |UR UEBER DIESE S|
00000340: 55 42 52 4F 55 54 49 4E 45 4E 20 45 52 46 4F 4C |UBROUTINEN ERFOL|
00000350: 47 45 4E 00 90 0B 53 00 8F 20 52 45 53 45 52 56 |GEN...S.. RESERV|
00000360: 49 45 52 54 45 20 56 41 52 49 41 42 4C 45 4E 3A |IERTE VARIABLEN:|
00000370: 20 50 2C 58 58 25 2C 59 59 25 2C 5A 5A 24 2C 57 | P,XX%,YY%,ZZ$,W|
00000380: 31 2C 57 33 2C 57 47 2C 43 53 2C 41 53 2C 41 45 |1,W3,WG,CS,AS,AE|
00000390: 00 CF 0B 54 00 8F 20 4A 45 20 4E 41 43 48 20 5A |...T.. JE NACH Z|
000003A0: 45 49 43 48 45 4E 47 45 52 41 45 54 2F 43 4F 4D |EICHENGERAET/COM|
000003B0: 50 55 54 45 52 20 46 4F 4C 47 45 4E 44 45 20 5A |PUTER FOLGENDE Z|
000003C0: 45 49 4C 45 4E 20 41 4E 50 41 53 53 45 4E 3A 00 |EILEN ANPASSEN:.|
000003D0: EA 0B 55 00 8F 20 31 39 2C 32 30 2C 34 30 2C 37 |..U.. 19,20,40,7|
000003E0: 39 2C 39 30 2C 39 31 2C 39 32 00 28 0C 5A 00 50 |9,90,91,92.(.Z.P|
000003F0: B2 31 34 32 AC 32 35 36 3A 8B C2 28 50 29 B3 B1 |.142.256:..(P)..|
00000400: 37 36 B0 C2 28 50 AA 33 29 B3 B1 37 36 A7 97 35 |76..(P.3)..76..5|
00000410: 36 2C 31 34 32 3A 9C 3A 93 22 46 58 50 4C 4F 54 |6,142:.:."FXPLOT|
00000420: 31 32 2A 22 2C 38 2C 31 00 4D 0C 5B 00 43 53 B2 |12*",8,1.M.[.CS.|
00000430: 34 3A 8F 20 4E 4F 52 4D 41 4C 45 20 43 48 41 52 |4:. NORMALE CHAR|
00000440: 41 43 54 45 52 2D 47 52 4F 45 53 53 45 00 77 0C |ACTER-GROESSE.w.|
00000450: 5C 00 58 39 B2 37 35 30 3A 59 39 B2 39 35 39 3A |\.X9.750:Y9.959:|
00000460: 8F 20 4D 41 58 2E 20 4B 4F 4F 52 44 49 4E 41 54 |. MAX. KOORDINAT|
00000470: 45 4E 57 45 52 54 45 00 BB 0C 5D 00 58 30 B2 30 |ENWERTE...].X0.0|
00000480: 3A 59 30 B2 30 3A 59 41 B2 59 39 AD 28 C2 28 50 |:Y0.0:YA.Y9.(.(P|
00000490: AA 34 30 29 AD 32 35 36 AA 31 29 3A 8F 20 4D 49 |.40).256.1):. MI|
000004A0: 4E 2E 20 4B 4F 4F 52 44 2C 20 4D 41 58 2E 20 59 |N. KOORD, MAX. Y|
000004B0: 20 42 45 49 20 41 53 50 45 4B 54 00 C7 0C 62 00 | BEI ASPEKT...b.|
000004C0: 8D 32 30 3A 8D 33 30 00 E9 0C 63 00 8F 20 46 4F |.20:.30...c.. FO|
000004D0: 4C 47 54 20 45 49 47 45 4E 54 4C 49 43 48 45 53 |LGT EIGENTLICHES|
000004E0: 20 50 52 4F 47 52 41 4D 4D 00 F3 0C 64 00 99 22 | PROGRAMM...d.."|
000004F0: 93 0E 22 00 0C 0D 6E 00 41 45 B2 31 3A 8D 34 31 |.."...n.AE.1:.41|
00000500: 3A 8F 20 41 53 50 45 4B 54 20 4A 41 00 1F 0D 77 |:. ASPEKT JA...w|
00000510: 00 99 22 11 DA 45 49 43 48 45 4E 53 41 54 5A 00 |.."..EICHENSATZ.|
00000520: 36 0D 78 00 81 49 B2 30 A4 31 3A 81 4A B2 33 32 |6.x..I.0.1:.J.32|
00000530: A4 39 35 A9 31 36 00 5E 0D 79 00 58 58 25 B2 30 |.95.16.^.y.XX%.0|
00000540: 3A 59 59 25 B2 59 41 AC 28 31 AB 28 49 AC 34 AA |:YY%.YA.(1.(I.4.|
00000550: 4A AD 31 36 29 AD 39 29 3A 8D 33 3A 8D 32 00 8C |J.16).9):.3:.2..|
00000560: 0D 7A 00 5A 5A 24 B2 22 22 3A 81 4B B2 30 A4 31 |.z.ZZ$."":.K.0.1|
00000570: 35 3A 5A 5A 24 B2 5A 5A 24 AA C7 28 49 AC 31 32 |5:ZZ$.ZZ$..(I.12|
00000580: 38 AA 4A AA 4B 29 3A 82 3A 8D 31 35 00 94 0D 7B |8.J.K):.:.15...{|
00000590: 00 82 3A 82 00 A8 0D 81 00 99 22 11 CC 49 4E 49 |..:......."..INI|
000005A0: 45 4E 47 52 41 46 49 4B 00 CE 0D 82 00 58 32 B2 |ENGRAFIK.....X2.|
000005B0: 31 36 AC 43 53 AC 36 3A 41 45 B2 30 3A 8D 34 31 |16.CS.6:AE.0:.41|
000005C0: 3A 8F 20 41 53 50 45 4B 54 20 4E 45 49 4E 00 0A |:. ASPEKT NEIN..|
000005D0: 0E 83 00 58 28 30 29 B2 58 32 3A 59 28 30 29 B2 |...X(0).X2:Y(0).|
000005E0: 30 3A 58 28 31 29 B2 28 58 39 AA 58 32 29 AD 32 |0:X(1).(X9.X2).2|
000005F0: 3A 59 28 31 29 B2 59 39 AB 35 30 3A 58 28 32 29 |:Y(1).Y9.50:X(2)|
00000600: B2 58 39 3A 59 28 32 29 B2 30 00 29 0E 8C 00 58 |.X9:Y(2).0.)...X|
00000610: 58 25 B2 58 28 32 29 3A 59 59 25 B2 59 28 32 29 |X%.X(2):YY%.Y(2)|
00000620: 3A 8D 33 3A 8D 32 3A 8D 36 00 4B 0E 8D 00 81 49 |:.3:.2:.6.K....I|
00000630: B2 30 A4 32 3A 58 58 25 B2 58 28 49 29 3A 59 59 |.0.2:XX%.X(I):YY|
00000640: 25 B2 59 28 49 29 3A 8D 32 3A 82 00 62 0E 8E 00 |%.Y(I):.2:..b...|
00000650: 58 31 B2 58 58 25 3A 59 31 B2 59 59 25 3A 46 B2 |X1.XX%:Y1.YY%:F.|
00000660: 2E 39 00 9A 0E 96 00 49 B2 49 AA 31 3A 8B 49 B1 |.9.....I.I.1:.I.|
00000670: 32 A7 49 B2 30 3A 8B B6 28 58 28 30 29 AB 58 28 |2.I.0:..(X(0).X(|
00000680: 31 29 29 AA B6 28 59 28 30 29 AB 59 28 31 29 29 |1))..(Y(0).Y(1))|
00000690: B3 39 A7 8D 33 3A 89 31 36 30 00 C7 0E 97 00 58 |.9..3:.160.....X|
000006A0: 58 25 B2 58 31 AA 46 AC 28 58 28 49 29 AB 58 31 |X%.X1.F.(X(I).X1|
000006B0: 29 3A 59 59 25 B2 59 31 AA 46 AC 28 59 28 49 29 |):YY%.Y1.F.(Y(I)|
000006C0: AB 59 31 29 3A 8D 32 00 F0 0E 98 00 58 28 49 29 |.Y1):.2.....X(I)|
000006D0: B2 58 58 25 3A 59 28 49 29 B2 59 59 25 3A 58 31 |.XX%:Y(I).YY%:X1|
000006E0: B2 58 58 25 3A 59 31 B2 59 59 25 3A 89 31 35 30 |.XX%:Y1.YY%:.150|
000006F0: 00 F8 0E A0 00 8D 31 39 00 06 0F AA 00 99 22 11 |......19......".|
00000700: CB 52 45 49 53 45 00 37 0F AB 00 52 B2 B5 28 58 |.REISE.7...R..(X|
00000710: 39 AD 34 29 3A 58 32 B2 52 AA 31 30 3A 59 32 B2 |9.4):X2.R.10:Y2.|
00000720: 31 30 3A 41 45 B2 31 3A 8D 34 31 3A 8F 20 41 53 |10:AE.1:.41:. AS|
00000730: 50 45 4B 54 20 4A 41 00 5A 0F AF 00 81 49 B2 31 |PEKT JA.Z....I.1|
00000740: 30 A4 31 A9 AB 31 3A 58 58 25 B2 58 32 3A 59 59 |0.1..1:XX%.X2:YY|
00000750: 25 B2 59 32 3A 8D 33 3A 8D 32 00 77 0F B0 00 58 |%.Y2:.3:.2.w...X|
00000760: 58 25 B2 52 AC 49 AD 31 30 3A 59 59 25 B2 36 AA |X%.R.I.10:YY%.6.|
00000770: 35 AC 38 3A 8D 33 31 00 7D 0F B1 00 82 00 AA 0F |5.8:.31.}.......|
00000780: B4 00 52 49 B2 52 3A 58 32 B2 33 AC 52 AA 32 30 |..RI.R:X2.3.R.20|
00000790: 3A 59 32 B2 31 30 3A 58 58 25 B2 58 32 3A 59 59 |:Y2.10:XX%.X2:YY|
000007A0: 25 B2 59 32 3A 8D 33 3A 8D 32 00 BD 0F B5 00 4F |%.Y2:.3:.2.....O|
000007B0: 31 B2 36 3A 4F 39 B2 35 3A 4F 44 B2 37 00 D8 0F |1.6:O9.5:OD.7...|
000007C0: B9 00 58 58 25 B2 52 49 3A 59 59 25 B2 4F 31 AA |..XX%.RI:YY%.O1.|
000007D0: 4F 39 AC 38 3A 8D 33 31 00 F4 0F BA 00 52 49 B2 |O9.8:.31.....RI.|
000007E0: 52 49 AC 2E 39 3A 8B 52 49 B3 59 39 AD 31 30 30 |RI..9:.RI.Y9.100|
000007F0: A7 31 39 30 00 22 10 BB 00 4F 31 B2 28 4F 39 AA |.190."...O1.(O9.|
00000800: 31 29 AF 37 3A 4F 44 B2 28 4F 44 AA 37 29 AF 37 |1).7:OD.(OD.7).7|
00000810: 3A 4F 39 B2 28 4F 31 AA 4F 44 29 AF 37 3A 89 31 |:O9.(O1.OD).7:.1|
00000820: 38 35 00 2A 10 BE 00 8D 31 39 00 42 10 C8 00 99 |85.*....19.B....|
00000830: 22 11 D3 43 48 52 49 46 54 5A 55 47 20 36 34 27 |"..CHRIFTZUG 64'|
00000840: 45 52 00 58 10 D2 00 58 58 25 B2 30 3A 59 59 25 |ER.X...XX%.0:YY%|
00000850: B2 30 3A 8D 33 3A 8D 32 00 76 10 DC 00 43 53 B2 |.0:.3:.2.v...CS.|
00000860: 32 35 3A 8D 33 30 3A 5A 5A 24 B2 22 36 34 27 45 |25:.30:ZZ$."64'E|
00000870: 52 22 3A 8D 31 35 00 7E 10 E6 00 8D 31 39 00 84 |R":.15.~....19..|
00000880: 10 E7 03 80 00 00 00 |....... |
..9....90:. SAVE"@0:PLO-DEMO64",8:REM P.
KITTEL FFM 9.6.87.Y....P:.:. LINIE NACH
(XX%,YY%).M....P.3:.:. PEN UP......P.6:.
:. PEN DOWN......P.9:.:. PEN-STELLUNG WE
CHSELN.Q....P.15:.:. TEXT AUS ZZ$ HORIZ
SCHREIBEN......P.18:.:. TEXT AUS ZZ$ VER
TIKAL SCHREIBEN.:....37:.1,4,1:.1,G(12);
: 1:. FORMFEED ZUM NAECHSTEN BLATT.E....
".NEUES BLATT, NULLPUNKT EINGESTELLT....
...P.21:XX%.0:YY%.0:.:. NULLPUNKT FESTLE
GEN......P.30,CS:.:. CHARACTER-SIZE.....
.P.31:.:. KREISBOGEN GEGUHRSINN XX%=R, Y
Y%=ANFOKT+8*ENDOKT.1."..P.34:.:. KREISBO
GEN MITUHRSINN XX%=R, YY%=ANFOKT+8*ENDOK
T.M.%..P.37:.:. BUFFER LEEREN...(..P.40,
AS:.:. ASPEKTVERHAELTNIS FEST (132/80-1)
*256=166 BEI FX.D.)..P.41,AE:.:. FLAG FU
ER ASPEKT: LAHMGELEGT BEI =0...O.XX%.0:Y
Y%.0:.37:.3:.2:. 'HOME'...P.. SKELETT FU
ER PLOTTER-TREIBERPROGRAMM...Q...S.R.. A
UFRUFE SOLLTEN NUR UEBER DIESE SUBROUTIN
EN ERFOLGEN...S.. RESERVIERTE VARIABLEN:
P,XX%,YY%,ZZ$,W1,W3,WG,CS,AS,AE.O.T.. J
E NACH ZEICHENGERAET/COMPUTER FOLGENDE Z
EILEN ANPASSEN:...U.. 19,20,40,79,90,91,
92.(.Z.P.142.256:.B(P)..76.B(P.3)..76..5
6,142:.:."FXPLOT12*",8,1.M.[.CS.4:. NORM
ALE CHARACTER-GROESSE.W.\.X9.750:Y9.959:
. MAX. KOORDINATENWERTE...].X0.0:Y0.0:YA
.Y9.(B(P.40).256.1):. MIN. KOORD, MAX. Y
BEI ASPEKT.G.B..20:.30...C.. FOLGT EIGE
NTLICHES PROGRAMM...D..".."...N.AE.1:.41
:. ASPEKT JA...W..".ZEICHENSATZ.6.X..I.0
.1:.J.32.95.16.^.Y.XX%.0:YY%.YA.(1.(I.4.
J.16).9):.3:.2...Z.ZZ$."":.K.0.15:ZZ$.ZZ
$.G(I.128.J.K):.:.15...{..:.......".LINI
ENGRAFIK.N...X2.16.CS.6:AE.0:.41:. ASPEK
T NEIN.....X(0).X2:Y(0).0:X(1).(X9.X2).2
:Y(1).Y9.50:X(2).X9:Y(2).0.)...XX%.X(2):
YY%.Y(2):.3:.2:.6.K....I.0.2:XX%.X(I):YY
%.Y(I):.2:..B...X1.XX%:Y1.YY%:F..9.....I
.I.1:.I.2.I.0:..(X(0).X(1))..(Y(0).Y(1))
.9..3:.160.G...XX%.X1.F.(X(I).X1):YY%.Y1
.F.(Y(I).Y1):.2.....X(I).XX%:Y(I).YY%:X1
.XX%:Y1.YY%:.150... ..19......".KREISE.7
...R..(X9.4):X2.R.10:Y2.10:AE.1:.41:. AS
PEKT JA.Z....I.10.1..1:XX%.X2:YY%.Y2:.3:
.2.W...XX%.R.I.10:YY%.6.5.8:.31.}.......
..RI.R:X2.3.R.20:Y2.10:XX%.X2:YY%.Y2:.3:
.2.....O1.6:O9.5:OD.7.X...XX%.RI:YY%.O1.
O9.8:.31.....RI.RI..9:.RI.Y9.100.190."..
.O1.(O9.1).7:OD.(OD.7).7:O9.(O1.OD).7:.1
85.*....19.B.H..".SCHRIFTZUG 64'ER.X.R.X
X%.0:YY%.0:.3:.2.V...CS.25:.30:ZZ$."64'E
R":.15.~....19.........
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL