3D-PROGRAMM
FILE INFORMATION
FILENAME(S): 3D-PROGRAMM
FILE TYPE(S): PRG
FILE SIZE: 3.2K
FIRST SEEN: 2025-11-02 16:24:02
APPEARS ON: 1 disk(s)
FILE HASH
060bac31bfe7eda821dd80903ad78c99d1341781231f0a54804882cc781a0c1f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| A H R1 A | 3D-PROGRAMM | PRG | Treasure Chest - Max | 33 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 29 08 01 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..).... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 51 08 02 00 8F 20 |*********.Q.... |
00000030: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |* |
00000040: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000050: 2A 00 79 08 03 00 8F 20 2A 20 20 20 33 44 2D 47 |*.y.... * 3D-G|
00000060: 52 41 46 49 4B 20 4D 49 54 54 45 4C 53 20 48 49 |RAFIK MITTELS HI|
00000070: 52 45 53 2D 33 20 20 20 2A 00 A1 08 04 00 8F 20 |RES-3 *...... |
00000080: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |* |
00000090: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000A0: 2A 00 C9 08 05 00 8F 20 2A 20 20 48 45 49 4D 4F |*...... * HEIMO|
000000B0: 20 50 4F 4E 4E 41 54 48 20 20 48 41 4D 42 55 52 | PONNATH HAMBUR|
000000C0: 47 20 31 39 38 35 20 20 2A 00 F1 08 06 00 8F 20 |G 1985 *...... |
000000D0: 2A 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |* |
000000E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000000F0: 2A 00 19 09 07 00 8F 20 2A 20 48 49 52 45 53 2D |*...... * HIRES-|
00000100: 33 20 4D 55 53 53 20 49 4D 20 53 50 45 49 43 48 |3 MUSS IM SPEICH|
00000110: 45 52 20 53 45 49 4E 20 2A 00 41 09 08 00 8F 20 |ER SEIN *.A.... |
00000120: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000130: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000140: 2A 00 47 09 09 00 8F 00 6D 09 0A 00 8F 20 2B 2B |*.G.....m.... ++|
00000150: 20 49 4E 49 54 49 41 4C 49 53 49 45 52 45 4E 20 | INITIALISIEREN |
00000160: 44 45 52 20 47 52 41 46 49 4B 20 2B 2B 00 73 09 |DER GRAFIK ++.s.|
00000170: 0F 00 8F 00 92 09 14 00 97 35 32 2C 31 31 32 3A |.........52,112:|
00000180: 97 35 36 2C 31 31 32 3A 9E 33 37 34 39 38 3A 89 |.56,112:.37498:.|
00000190: 36 30 00 98 09 19 00 8F 00 BE 09 1E 00 8F 20 2B |60............ +|
000001A0: 2B 20 55 50 20 20 43 55 52 53 4F 52 20 53 45 54 |+ UP CURSOR SET|
000001B0: 5A 45 4E 20 2B 2B 2B 2B 2B 2B 2B 2B 2B 2B 00 C4 |ZEN ++++++++++..|
000001C0: 09 23 00 8F 00 E1 09 28 00 97 32 31 31 2C 53 50 |.#.....(..211,SP|
000001D0: 3A 97 32 31 34 2C 5A 4C 3A 9E 35 38 36 34 30 3A |:.214,ZL:.58640:|
000001E0: 8E 00 E7 09 2D 00 8F 00 0E 0A 32 00 8F 20 2B 2B |....-.....2.. ++|
000001F0: 2B 20 45 49 4E 47 41 42 45 20 44 45 52 20 33 44 |+ EINGABE DER 3D|
00000200: 2D 46 55 4E 4B 54 49 4F 4E 20 2B 2B 2B 2B 00 14 |-FUNKTION ++++..|
00000210: 0A 37 00 8F 00 3D 0A 3C 00 99 C7 28 31 34 37 29 |.7...=.<...(147)|
00000220: 3A 9E 33 34 36 34 37 3A 97 36 34 36 2C 31 34 3A |:.34647:.646,14:|
00000230: 5A 4C B2 35 3A 53 50 B2 35 3A 8D 34 30 00 5A 0A |ZL.5:SP.5:.40.Z.|
00000240: 41 00 99 22 46 55 4E 4B 54 49 4F 4E 20 49 4D 20 |A.."FUNKTION IM |
00000250: 50 52 4F 47 52 41 4D 4D 3A 22 00 6B 0A 46 00 4B |PROGRAMM:".k.F.K|
00000260: B2 31 3A 8D 31 38 30 3A 4B B2 30 00 7E 0A 4B 00 |.1:.180:K.0.~.K.|
00000270: 99 3A 99 A3 33 29 22 59 3D 22 46 24 3A 99 00 BC |.:..3)"Y="F$:...|
00000280: 0A 50 00 99 A3 35 29 C7 28 31 38 29 22 41 22 C7 |.P...5).(18)"A".|
00000290: 28 31 34 36 29 22 4C 54 45 20 4F 44 45 52 20 22 |(146)"LTE ODER "|
000002A0: C7 28 31 38 29 22 4E 22 C7 28 31 34 36 29 22 45 |.(18)"N".(146)"E|
000002B0: 55 45 20 46 55 4E 4B 54 49 4F 4E 3F 00 D8 0A 55 |UE FUNKTION?...U|
000002C0: 00 A1 41 24 3A 8B 41 24 B3 B1 22 41 22 AF 41 24 |..A$:.A$.."A".A$|
000002D0: B3 B1 22 4E 22 A7 38 35 00 E8 0A 5A 00 8B 41 24 |.."N".85...Z..A$|
000002E0: B2 22 41 22 A7 31 34 30 00 13 0B 5F 00 99 C7 28 |."A".140..._...(|
000002F0: 31 34 37 29 3A 53 50 B2 33 3A 5A 4C B2 31 32 3A |147):SP.3:ZL.12:|
00000300: 8D 34 30 3A 85 22 59 3D 22 3B 46 24 3A 97 36 34 |.40:."Y=";F$:.64|
00000310: 36 2C 36 00 3D 0B 64 00 99 C7 28 31 34 37 29 C7 |6,6.=.d...(147).|
00000320: 28 31 37 29 C7 28 31 37 29 22 31 38 30 46 24 3D |(17).(17)"180F$=|
00000330: 22 C7 28 33 34 29 46 24 C7 28 33 34 29 00 54 0B |".(34)F$.(34).T.|
00000340: 69 00 99 22 31 39 30 44 45 46 46 4E 41 28 58 29 |i.."190DEFFNA(X)|
00000350: 3D 22 46 24 00 6A 0B 6E 00 99 22 52 55 4E 31 34 |="F$.j.n.."RUN14|
00000360: 30 22 3A 99 C7 28 31 39 29 3B 00 8F 0B 73 00 97 |0":..(19);...s..|
00000370: 36 33 31 2C 31 33 3A 97 36 33 32 2C 31 33 3A 97 |631,13:.632,13:.|
00000380: 36 33 33 2C 31 33 3A 97 31 39 38 2C 33 3A 80 00 |633,13:.198,3:..|
00000390: 95 0B 78 00 8F 00 BB 0B 7D 00 8F 20 2B 2B 2B 20 |..x.....}.. +++ |
000003A0: 4E 45 55 42 45 47 49 4E 4E 20 44 45 53 20 50 52 |NEUBEGINN DES PR|
000003B0: 4F 47 52 41 4D 4D 45 EE EF E7 E6 EF E6 F6 3E EE |OGRAMME.......>.|
000003C0: 31 EF E7 E7 E7 EF EF EF EE DE E6 EA EA EE EE DE |1...............|
000003D0: EE EE EE EE DE EE DE D6 EE D2 D0 DD EF EF EF E7 |................|
000003E0: E6 EF D4 F6 34 EE 30 EF 16 F6 2A EF 32 B5 E3 E7 |....4.0...*.2...|
000003F0: ED E5 E3 EF 35 EC ED EC 2C 31 34 00 01 0C 91 00 |....5...,14.....|
00000400: 8F 00 27 0C 96 00 8F 20 2B 2B 2B 20 46 55 4E 4B |..'.... +++ FUNK|
00000410: 54 49 4F 4E 45 4E 20 55 4E 44 20 56 41 52 49 41 |TIONEN UND VARIA|
00000420: 42 4C 45 20 2B 2B 2B 00 2D 0C 9B 00 8F 00 75 0C |BLE +++.-.....u.|
00000430: A0 00 58 B2 30 3A 5A B2 30 3A 53 50 B2 30 3A 5A |..X.0:Z.0:SP.0:Z|
00000440: 4C B2 30 3A 58 55 B2 30 3A 58 4F B2 30 3A 59 55 |L.0:XU.0:XO.0:YU|
00000450: B2 30 3A 59 4F B2 30 3A 5A 33 B2 30 3A 5A 34 B2 |.0:YO.0:Z3.0:Z4.|
00000460: 30 3A 5A 35 B2 30 3A 5A 36 B2 30 3A 5A 55 B2 30 |0:Z5.0:Z6.0:ZU.0|
00000470: 3A 5A 4F B2 30 00 C3 0C A5 00 5A 31 B2 30 3A 5A |:ZO.0.....Z1.0:Z|
00000480: 32 B2 30 3A 46 31 B2 31 3A 46 32 B2 36 3A 41 B2 |2.0:F1.1:F2.6:A.|
00000490: 31 3A 58 41 B2 30 3A 58 45 B2 30 3A 5A 41 B2 30 |1:XA.0:XE.0:ZA.0|
000004A0: 3A 5A 45 B2 30 3A 44 5A B2 31 3A 58 54 B2 30 3A |:ZE.0:DZ.1:XT.0:|
000004B0: 58 48 B2 30 3A 59 54 B2 30 3A 59 48 B2 30 3A 5A |XH.0:YT.0:YH.0:Z|
000004C0: 5A B2 31 00 C9 0C AA 00 8F 00 D3 0C AF 00 41 24 |Z.1...........A$|
000004D0: B2 22 22 00 EA 0C B4 00 46 24 B2 22 53 49 4E 28 |."".....F$."SIN(|
000004E0: 58 29 2A 53 49 4E 28 5A 29 22 00 F0 0C B9 00 8F |X)*SIN(Z)"......|
000004F0: 00 05 0D BE 00 96 A5 41 28 58 29 B2 BF 28 58 29 |.......A(X)..(X)|
00000500: AC BF 28 5A 29 00 1B 0D C3 00 96 A5 5A 28 5A 29 |..(Z).......Z(Z)|
00000510: B2 5A AD 28 32 AC BA 28 32 29 29 00 26 0D C8 00 |.Z.(2..(2)).&...|
00000520: 8B 4B B2 31 A7 8E 00 2C 0D CD 00 8F 00 52 0D D2 |.K.1...,.....R..|
00000530: 00 8F 20 2B 2B 20 45 49 4E 47 41 42 45 20 4B 4F |.. ++ EINGABE KO|
00000540: 4F 52 44 49 4E 41 54 45 4E 53 59 53 54 45 4D 20 |ORDINATENSYSTEM |
00000550: 2B 2B 00 58 0D D7 00 8F 00 6A 0D DC 00 53 50 B2 |++.X.....j...SP.|
00000560: 31 3A 5A 4C B2 33 3A 8D 34 30 00 9C 0D E1 00 99 |1:ZL.3:.40......|
00000570: C7 28 31 38 29 22 55 4E 53 45 52 20 53 59 53 54 |.(18)"UNSER SYST|
00000580: 45 4D 20 20 20 20 3A 22 C7 28 31 34 36 29 3A 53 |EM :".(146):S|
00000590: 50 B2 37 3A 5A 4C B2 35 3A 8D 34 30 00 D7 0D E6 |P.7:ZL.5:.40....|
000005A0: 00 85 22 58 55 2C 58 4F 3D 22 3B 58 55 2C 58 4F |.."XU,XO=";XU,XO|
000005B0: 3A 5A 4C B2 36 3A 8D 34 30 3A 85 22 59 55 2C 59 |:ZL.6:.40:."YU,Y|
000005C0: 4F 3D 22 3B 59 55 2C 59 4F 3A 53 50 B2 39 3A 5A |O=";YU,YO:SP.9:Z|
000005D0: 4C B2 38 3A 8D 34 30 00 12 0E EB 00 5A 33 B2 32 |L.8:.40.....Z3.2|
000005E0: AC 58 4F AC BA 28 32 29 3A 5A 34 B2 32 AC 59 4F |.XO..(2):Z4.2.YO|
000005F0: AC BA 28 32 29 3A 8B 5A 33 B3 5A 34 A7 99 22 5A |..(2):.Z3.Z4.."Z|
00000600: 4F 20 4D 41 58 49 4D 41 4C 3D 22 5A 33 3A 89 32 |O MAXIMAL="Z3:.2|
00000610: 34 35 00 27 0E F0 00 99 22 5A 4F 20 4D 41 58 49 |45.'...."ZO MAXI|
00000620: 4D 41 4C 3D 22 5A 34 00 3A 0E F5 00 53 50 B2 39 |MAL="Z4.:...SP.9|
00000630: 3A 5A 4C B2 31 30 3A 8D 34 30 00 75 0E FA 00 5A |:ZL.10:.40.u...Z|
00000640: 35 B2 32 AC 58 55 AC BA 28 32 29 3A 5A 36 B2 32 |5.2.XU..(2):Z6.2|
00000650: AC 59 55 AC BA 28 32 29 3A 8B 5A 35 B1 5A 36 A7 |.YU..(2):.Z5.Z6.|
00000660: 99 22 5A 55 20 4D 49 4E 49 4D 41 4C 3D 22 5A 35 |."ZU MINIMAL="Z5|
00000670: 3A 89 32 36 30 00 8A 0E FF 00 99 22 5A 55 20 4D |:.260......"ZU M|
00000680: 49 4E 49 4D 41 4C 3D 22 5A 36 00 C1 0E 04 01 53 |INIMAL="Z6.....S|
00000690: 50 B2 37 3A 5A 4C B2 31 32 3A 8D 34 30 3A 85 22 |P.7:ZL.12:.40:."|
000006A0: 5A 55 2C 5A 4F 3D 22 3B 5A 55 2C 5A 4F 3A 5A 31 |ZU,ZO=";ZU,ZO:Z1|
000006B0: B2 A5 5A 28 5A 4F 29 3A 5A 32 B2 A5 5A 28 5A 55 |..Z(ZO):Z2..Z(ZU|
000006C0: 29 00 D6 0E 09 01 8B 5A 31 B1 58 4F B0 5A 31 B1 |)......Z1.XO.Z1.|
000006D0: 59 4F A7 32 33 35 00 EB 0E 0E 01 8B 5A 32 B3 58 |YO.235......Z2.X|
000006E0: 55 B0 5A 32 B3 59 55 A7 32 33 35 00 F1 0E 13 01 |U.Z2.YU.235.....|
000006F0: 8F 00 17 0F 18 01 8F 20 2B 2B 2B 20 45 49 4E 47 |....... +++ EING|
00000700: 41 42 45 20 5A 45 49 43 48 45 4E 50 41 52 41 4D |ABE ZEICHENPARAM|
00000710: 45 54 45 52 20 2B 2B 00 1D 0F 1D 01 8F 00 50 0F |ETER ++.......P.|
00000720: 22 01 5A 4C B2 31 34 3A 53 50 B2 31 3A 8D 34 30 |".ZL.14:SP.1:.40|
00000730: 3A 99 C7 28 31 38 29 22 55 4E 53 45 52 45 20 5A |:..(18)"UNSERE Z|
00000740: 45 49 43 48 4E 55 4E 47 3A 22 C7 28 31 34 36 29 |EICHNUNG:".(146)|
00000750: 00 8B 0F 27 01 5A 4C B2 31 36 3A 53 50 B2 33 3A |...'.ZL.16:SP.3:|
00000760: 8D 34 30 3A 85 22 5A 45 49 43 48 45 4E 2D 20 55 |.40:."ZEICHEN- U|
00000770: 4E 44 20 48 49 4E 54 45 52 47 52 55 4E 44 46 41 |ND HINTERGRUNDFA|
00000780: 52 42 45 3D 22 3B 46 31 2C 46 32 00 B7 0F 2C 01 |RBE=";F1,F2...,.|
00000790: 5A 4C B2 31 38 3A 53 50 B2 37 3A 8D 34 30 3A 85 |ZL.18:SP.7:.40:.|
000007A0: 22 53 43 48 52 49 54 54 57 45 49 54 45 20 56 4F |"SCHRITTWEITE VO|
000007B0: 4E 20 5A 3D 22 3B 41 00 DF 0F 31 01 5A 4C B2 32 |N Z=";A...1.ZL.2|
000007C0: 30 3A 8D 34 30 3A 85 22 58 2D 42 45 52 45 49 43 |0:.40:."X-BEREIC|
000007D0: 48 20 58 41 2C 58 45 3D 22 3B 58 41 2C 58 45 00 |H XA,XE=";XA,XE.|
000007E0: 07 10 36 01 5A 4C B2 32 31 3A 8D 34 30 3A 85 22 |..6.ZL.21:.40:."|
000007F0: 5A 2D 42 45 52 45 49 43 48 20 5A 41 2C 5A 45 3D |Z-BEREICH ZA,ZE=|
00000800: 22 3B 5A 41 2C 5A 45 00 0D 10 3B 01 8F 00 31 10 |";ZA,ZE...;...1.|
00000810: 40 01 8F 20 2B 2B 2B 20 20 20 20 20 20 20 5A 45 |@.. +++ ZE|
00000820: 49 43 48 4E 45 4E 20 20 20 20 20 20 20 20 2B 2B |ICHNEN ++|
00000830: 2B 00 37 10 45 01 8F 00 5A 10 4A 01 44 5A B2 41 |+.7.E...Z.J.DZ.A|
00000840: AD 32 3A 58 54 B2 58 55 3A 58 48 B2 58 4F 3A 59 |.2:XT.XU:XH.XO:Y|
00000850: 54 B2 59 55 3A 59 48 B2 59 4F 00 78 10 4F 01 48 |T.YU:YH.YO.x.O.H|
00000860: 46 4C 2C 46 31 2C 46 32 3A 54 52 53 2C 58 55 2C |FL,F1,F2:TRS,XU,|
00000870: 58 4F 2C 59 55 2C 59 4F 00 7E 10 54 01 8F 00 A2 |XO,YU,YO.~.T....|
00000880: 10 59 01 8F 20 2D 2D 2D 2D 2D 20 4B 4F 4F 52 44 |.Y.. ----- KOORD|
00000890: 49 4E 41 54 45 4E 4B 52 45 55 5A 20 2D 2D 2D 2D |INATENKREUZ ----|
000008A0: 2D 2D 00 A8 10 5E 01 8F 00 D8 10 63 01 54 4C 4E |--...^.....c.TLN|
000008B0: 2C 58 55 2C 30 2C 58 4F 2C 30 3A 54 4C 4E 2C 30 |,XU,0,XO,0:TLN,0|
000008C0: 2C 59 55 2C 30 2C 59 4F 3A 54 4C 4E 2C 5A 32 2C |,YU,0,YO:TLN,Z2,|
000008D0: 5A 32 2C 5A 31 2C 5A 31 00 DE 10 68 01 8F 00 02 |Z2,Z1,Z1...h....|
000008E0: 11 6D 01 8F 20 2D 2D 2D 2D 2D 20 20 20 20 5A 2D |.m.. ----- Z-|
000008F0: 53 43 48 4C 45 49 46 45 20 20 20 20 2D 2D 2D 2D |SCHLEIFE ----|
00000900: 2D 2D 00 08 11 72 01 8F 00 46 11 77 01 81 5A B2 |--...r...F.w..Z.|
00000910: 5A 41 A4 5A 45 A9 44 5A 3A 5A 5A B2 A5 5A 28 44 |ZA.ZE.DZ:ZZ..Z(D|
00000920: 5A 29 3A 58 54 B2 58 54 AB 5A 5A 3A 58 48 B2 58 |Z):XT.XT.ZZ:XH.X|
00000930: 48 AB 5A 5A 3A 59 54 B2 59 54 AB 5A 5A 3A 59 48 |H.ZZ:YT.YT.ZZ:YH|
00000940: B2 59 48 AB 5A 5A 00 5A 11 7C 01 54 52 53 2C 58 |.YH.ZZ.Z.|.TRS,X|
00000950: 54 2C 58 48 2C 59 54 2C 59 48 00 6C 11 81 01 46 |T,XH,YT,YH.l...F|
00000960: 55 4E 4B 54 2C 41 2C 58 41 2C 58 45 00 73 11 86 |UNKT,A,XA,XE.s..|
00000970: 01 82 5A 00 87 11 8B 01 54 45 58 2C 22 59 3D 22 |..Z.....TEX,"Y="|
00000980: AA 46 24 2C 30 2C 33 00 8D 11 90 01 8F 00 B1 11 |.F$,0,3.........|
00000990: 95 01 8F 20 2D 2D 2D 2D 2D 20 5A 45 49 43 48 4E |... ----- ZEICHN|
000009A0: 55 4E 47 20 46 45 52 54 49 47 20 2D 2D 2D 2D 2D |UNG FERTIG -----|
000009B0: 2D 00 B7 11 9A 01 8F 00 CA 11 9F 01 A1 41 24 3A |-............A$:|
000009C0: 8B 41 24 B2 22 22 A7 34 31 35 00 D2 11 A4 01 48 |.A$."".415.....H|
000009D0: 4F 46 00 D8 11 A9 01 8F 00 FC 11 AE 01 8F 20 2B |OF............ +|
000009E0: 2B 2B 2B 2B 20 20 20 20 20 4D 45 4E 55 45 20 20 |++++ MENUE |
000009F0: 20 20 20 20 20 20 2B 2B 2B 2B 2B 2B 00 02 12 B3 | ++++++....|
00000A00: 01 8F 00 15 12 B8 01 5A 4C B2 32 33 3A 53 50 B2 |.......ZL.23:SP.|
00000A10: 31 3A 8D 34 30 00 47 12 BD 01 99 C7 28 31 38 29 |1:.40.G.....(18)|
00000A20: 22 45 22 C7 28 31 34 36 29 22 4E 44 45 20 20 20 |"E".(146)"NDE |
00000A30: 20 22 C7 28 31 38 29 22 47 22 C7 28 31 34 36 29 | ".(18)"G".(146)|
00000A40: 22 52 41 46 49 4B 22 00 5B 12 C2 01 5A 4C B2 32 |"RAFIK".[...ZL.2|
00000A50: 33 3A 53 50 B2 31 38 3A 8D 34 30 00 8E 12 C7 01 |3:SP.18:.40.....|
00000A60: 99 C7 28 31 38 29 22 4E 22 C7 28 31 34 36 29 22 |..(18)"N".(146)"|
00000A70: 45 55 20 20 20 20 20 22 C7 28 31 38 29 22 44 22 |EU ".(18)"D"|
00000A80: C7 28 31 34 36 29 22 52 55 43 4B 45 4E 22 00 BB |.(146)"RUCKEN"..|
00000A90: 12 CC 01 A1 41 24 3A 8B 41 24 B3 B1 22 45 22 AF |....A$:.A$.."E".|
00000AA0: 41 24 B3 B1 22 47 22 AF 41 24 B3 B1 22 4E 22 AF |A$.."G".A$.."N".|
00000AB0: 41 24 B3 B1 22 44 22 A7 34 36 30 00 C1 12 D1 01 |A$.."D".460.....|
00000AC0: 8F 00 E6 12 D6 01 8F 20 2D 2D 2D 2D 2D 2D 2D 2D |....... --------|
00000AD0: 20 4F 50 54 49 4F 4E 20 47 52 41 46 49 4B 20 2D | OPTION GRAFIK -|
00000AE0: 2D 2D 2D 2D 2D 2D 00 EC 12 DB 01 8F 00 14 13 E0 |------..........|
00000AF0: 01 8B 41 24 B2 22 47 22 A7 3A 48 41 4E 3A 97 31 |..A$."G".:HAN:.1|
00000B00: 39 38 2C 30 3A 92 31 39 38 2C 31 3A 48 4F 46 3A |98,0:.198,1:HOF:|
00000B10: 89 34 36 30 00 1A 13 E5 01 8F 00 3F 13 EA 01 8F |.460.......?....|
00000B20: 20 2D 2D 2D 2D 2D 2D 2D 2D 20 4F 50 54 49 4F 4E | -------- OPTION|
00000B30: 20 4E EE EE DE D6 EE DD EF EB EB EB EB EB EA EE | N..............|
00000B40: EE 7E D0 E6 30 EF C0 7E 0E E6 36 E7 ED 7E EE ED |.~..0..~..6..~..|
00000B50: EE F5 EE E2 E6 DD EF 31 E7 EB ED EB E7 EF EF 23 |.......1.......#|
00000B60: E7 EF EF E7 EF 3D EE ED E3 EC EE EE E2 D0 DE EF |.....=..........|
00000B70: FE 7E 12 E6 36 E7 ED 7E EE ED EE F5 31 E7 EB ED |.~..6..~....1...|
00000B80: EF 23 E7 EF 23 E7 EB EE E2 EE EB EE E2 EE EB EE |.#..#...........|
00000B90: E2 D1 EB EE E2 D1 EB EE E2 EE EB EE E2 EE EB EE |................|
00000BA0: E2 D1 EB EE E2 D0 EE B6 7E 1E E6 36 E7 ED 7E EE |........~..6..~.|
00000BB0: ED EE F5 23 E7 EB EE EE EE EB EE EE EE EB EE EE |...#............|
00000BC0: D1 EB EE EE D1 EB EE E7 EB EE E6 EE EE 6E FE FE |.............n..|
00000BD0: 36 E7 ED 7E EE ED EE F5 23 E7 EB EE E2 E7 EB EE |6..~....#.......|
00000BE0: E2 E7 EB EE E2 EE EB EE 58 45 2C 22 5A 41 3D 22 |........XE,"ZA="|
00000BF0: 5A 41 2C 22 5A 45 3D 22 5A 45 3A 98 31 3A A0 31 |ZA,"ZE="ZE:.1:.1|
00000C00: 3A 89 34 36 30 00 0B 14 08 02 8F 00 30 14 0D 02 |:.460.......0...|
00000C10: 8F 20 2D 2D 2D 20 4F 50 54 49 4F 4E 20 4E 45 55 |. --- OPTION NEU|
00000C20: 45 20 5A 45 49 43 48 4E 55 4E 47 20 2D 2D 2D 2D |E ZEICHNUNG ----|
00000C30: 00 36 14 12 02 8F 00 44 14 17 02 8B 41 24 B2 22 |.6.....D....A$."|
00000C40: 4E 22 A7 8A 00 4A 14 1C 02 8F 00 6F 14 21 02 8F |N"...J.....o.!..|
00000C50: 20 2D 2D 2D 20 20 4F 50 54 49 4F 4E 20 50 52 4F | --- OPTION PRO|
00000C60: 47 52 41 4D 4D 45 4E 44 45 20 20 2D 2D 2D 2D 00 |GRAMMENDE ----.|
00000C70: 75 14 26 02 8F 00 7B 14 2B 02 80 00 A1 14 30 02 |u.&...{.+.....0.|
00000C80: 8F 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 20 44 41 53 20 |. ********* DAS |
00000C90: 57 41 52 53 20 21 20 2A 2A 2A 2A 2A 2A 2A 2A 2A |WARS ! *********|
00000CA0: 2A 00 00 00 |*... |
..).... ********************************
*.Q.... *
*.Y.... * 3D-GRAFIK MITTELS HIRES-3
*...... *
*.I.... * HEIMO PONNATH HAMBURG 1985
*...... *
*...... * HIRES-3 MUSS IM SPEICHER SEIN
*.A.... ********************************
*.G.....M.... ++ INITIALISIEREN DER GRAF
IK ++.S..........52,112:.56,112:.37498:.
60............ ++ UP CURSOR SETZEN ++++
++++++.D.#.....(..211,SP:.214,ZL:.58640:
....-.....2.. +++ EINGABE DER 3D-FUNKTIO
N ++++...7...=.<..G(147):.34647:.646,14:
ZL.5:SP.5:.40.Z.A.."FUNKTION IM PROGRAMM
:".K.F.K.1:.180:K.0.~.K..:..3)"Y="F$:...
.P...5)G(18)"A"G(146)"LTE ODER "G(18)"N"
G(146)"EUE FUNKTION?.X.U..A$:.A$.."A".A$
.."N".85...Z..A$."A".140..._..G(147):SP.
3:ZL.12:.40:."Y=";F$:.646,6.=.D..G(147)G
(17)G(17)"180F$="G(34)F$G(34).T.I.."190D
EFFNA(X)="F$.J.N.."RUN140":.G(19);...S..
631,13:.632,13:.633,13:.198,3:....X.....
}.. +++ NEUBEGINN DES PROGRAMME.......>.
1......................V.RP.......T.4.0.
..*.2.......5...,14.......'.... +++ FUNK
TIONEN UND VARIABLE +++.-.....U. .X.0:Z.
0:SP.0:ZL.0:XU.0:XO.0:YU.0:YO.0:Z3.0:Z4.
0:Z5.0:Z6.0:ZU.0:ZO.0.C...Z1.0:Z2.0:F1.1
:F2.6:A.1:XA.0:XE.0:ZA.0:ZE.0:DZ.1:XT.0:
XH.0:YT.0:YH.0:ZZ.1.I.....S...A$."".....
F$."SIN(X)*SIN(Z)".............A(X)..(X)
..(Z)...C...Z(Z).Z.(2..(2)).&.H..K.1...,
.M...R.R.. ++ EINGABE KOORDINATENSYSTEM
++.X.W...J...SP.1:ZL.3:.40......G(18)"UN
SER SYSTEM :"G(146):SP.7:ZL.5:.40.W..
.."XU,XO=";XU,XO:ZL.6:.40:."YU,YO=";YU,Y
O:SP.9:ZL.8:.40.....Z3.2.XO..(2):Z4.2.YO
..(2):.Z3.Z4.."ZO MAXIMAL="Z3:.245.'....
"ZO MAXIMAL="Z4.:...SP.9:ZL.10:.40.U...Z
5.2.XU..(2):Z6.2.YU..(2):.Z5.Z6.."ZU MIN
IMAL="Z5:.260......"ZU MINIMAL="Z6.A...S
P.7:ZL.12:.40:."ZU,ZO=";ZU,ZO:Z1..Z(ZO):
Z2..Z(ZU).V....Z1.XO.Z1.YO.235......Z2.X
U.Z2.YU.235............ +++ EINGABE ZEIC
HENPARAMETER ++.......P.".ZL.14:SP.1:.40
:.G(18)"UNSERE ZEICHNUNG:"G(146)...'.ZL.
16:SP.3:.40:."ZEICHEN- UND HINTERGRUNDFA
RBE=";F1,F2...,.ZL.18:SP.7:.40:."SCHRITT
WEITE VON Z=";A...1.ZL.20:.40:."X-BEREIC
H XA,XE=";XA,XE...6.ZL.21:.40:."Z-BEREIC
H ZA,ZE=";ZA,ZE...;...1.@.. +++ ZE
ICHNEN +++.7.E...Z.J.DZ.A.2:XT.XU
:XH.XO:YT.YU:YH.YO.X.O.HFL,F1,F2:TRS,XU,
XO,YU,YO.~.T.....Y.. ----- KOORDINATENKR
EUZ ------...^...X.C.TLN,XU,0,XO,0:TLN,0
,YU,0,YO:TLN,Z2,Z2,Z1,Z1...H.....M.. ---
-- Z-SCHLEIFE ------...R...F.W..Z.
ZA.ZE.DZ:ZZ..Z(DZ):XT.XT.ZZ:XH.XH.ZZ:YT.
YT.ZZ:YH.YH.ZZ.Z.|.TRS,XT,XH,YT,YH.L...F
UNKT,A,XA,XE.S....Z.....TEX,"Y=".F$,0,3.
........... ----- ZEICHNUNG FERTIG -----
-.......J....A$:.A$."".415.R...HOF.X....
...... +++++ MENUE ++++++....
.......ZL.23:SP.1:.40.G....G(18)"E"G(146
)"NDE "G(18)"G"G(146)"RAFIK".[.B.ZL.2
3:SP.18:.40...G..G(18)"N"G(146)"EU "
G(18)"D"G(146)"RUCKEN"...L..A$:.A$.."E".
A$.."G".A$.."N".A$.."D".460.A.Q.....V..
-------- OPTION GRAFIK -------..........
..A$."G".:HAN:.198,0:.198,1:HOF:.460....
...?.... -------- OPTION N...V..........
.~P.0..~..6..~.........1.......#.....=..
.....P...~..6..~....1....#..#...........
.Q...Q...........Q...P..~..6..~....#....
........Q...Q........N..6..~....#.......
........XE,"ZA="ZA,"ZE="ZE:.1: 1:.460...
....0.... --- OPTION NEUE ZEICHNUNG ----
.6.....D....A$."N"...J.....O.!.. --- OP
TION PROGRAMMENDE ----.U.&...{.+.....0.
. ********* DAS WARS ! **********...
> CLICK IMAGE PREVIEW FOR FULL MODAL