3D BERGE SIMONS
FILE INFORMATION
FILENAME(S): 3D BERGE SIMONS
FILE TYPE(S): PRG
FILE SIZE: 1.1K
FIRST SEEN: 2025-11-30 16:28:47
APPEARS ON: 1 disk(s)
FILE HASH
1d94399d3855d5157c422c7ec75c2da112a2b957b50a9ebf1e38c36148e1040d
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| RED WOLFGANG 01 | 3D BERGE SIMONS | PRG | BrainSkull, Wolfgang Red | 27 | 8 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 28 08 1E 00 8F 2A 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 00 4F 08 23 00 8F 2A 2A |********.O.#..**| 00000030: 20 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 2A 2A 00 | **.| 00000050: 76 08 28 00 8F 2A 2A 20 20 20 20 20 20 20 22 33 |v.(..** "3| 00000060: 44 2D 42 45 52 47 45 22 20 20 20 20 20 20 20 20 |D-BERGE" | 00000070: 20 20 20 20 2A 2A 00 9D 08 2D 00 8F 2A 2A 20 20 | **...-..** | 00000080: 20 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 2A 2A 00 C4 08 | **...| 000000A0: 32 00 8F 2A 2A 20 20 20 20 20 20 20 28 5A 3D 5A |2..** (Z=Z| 000000B0: 31 2A 5A 32 29 20 20 20 20 20 20 20 20 20 20 20 |1*Z2) | 000000C0: 20 20 2A 2A 00 EB 08 37 00 8F 2A 2A 20 28 5A 31 | **...7..** (Z1| 000000D0: 3D 43 4F 53 28 32 2A FF 2A 58 2F 39 30 2D FF 29 |=COS(2*.*X/90-.)| 000000E0: 2B 31 29 20 20 20 20 20 20 2A 2A 00 12 09 3C 00 |+1) **...<.| 000000F0: 8F 2A 2A 20 28 5A 32 3D 43 4F 53 28 32 2A FF 2A |.** (Z2=COS(2*.*| 00000100: 59 2F 39 30 2D FF 29 2B 31 29 20 20 20 20 20 20 |Y/90-.)+1) | 00000110: 2A 2A 00 39 09 41 00 8F 2A 2A 20 20 20 20 20 20 |**.9.A..** | 00000120: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | | 00000130: 20 20 20 20 20 20 20 2A 2A 00 60 09 46 00 8F 2A | **.`.F..*| 00000140: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000150: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000160: 00 66 09 4B 00 8F 00 82 09 50 00 8F 20 20 20 20 |.f.K.....P.. | 00000170: 20 20 53 20 49 20 4D 20 4F 20 4E 20 27 20 53 20 | S I M O N ' S | 00000180: 20 21 00 88 09 55 00 8F 00 A2 09 64 00 8F 20 20 | !...U.....d.. | 00000190: 20 20 20 20 20 45 20 49 20 4E 20 47 20 41 20 42 | E I N G A B| 000001A0: 20 45 00 AB 09 6E 00 99 22 93 22 00 DA 09 C8 00 | E...n..".".....| 000001B0: 85 22 20 50 52 4F 4A 45 4B 54 49 4F 4E 53 57 49 |." PROJEKTIONSWI| 000001C0: 4E 4B 45 4C 20 49 4E 20 47 52 41 44 28 34 35 2D |NKEL IN GRAD(45-| 000001D0: 31 33 35 29 20 22 3B 57 3A 99 00 07 0A D2 00 85 |135) ";W:.......| 000001E0: 22 20 56 45 52 4B 55 45 52 5A 55 4E 47 53 46 41 |" VERKUERZUNGSFA| 000001F0: 4B 54 4F 52 20 4B 20 28 30 2E 35 2D 30 2E 37 35 |KTOR K (0.5-0.75| 00000200: 29 20 22 3B 4B 3A 99 00 26 0A DC 00 55 B2 31 32 |) ";K:..&...U.12| 00000210: 38 3A 56 B2 31 31 30 3A 48 B2 30 2E 35 3A 42 4D |8:V.110:H.0.5:BM| 00000220: B2 FF AD 31 38 30 00 42 0A E6 00 43 B2 4B AC BE |...180.B...C.K..| 00000230: 28 57 AC 42 4D 29 3A 53 B2 4B AC BF 28 57 AC 42 |(W.BM):S.K..(W.B| 00000240: 4D 29 00 56 0A F0 00 44 58 B2 33 3A 44 59 B2 35 |M).V...DX.3:DY.5| 00000250: 3A 4B 31 B2 32 30 00 68 0A FA 00 50 49 B2 33 2E |:K1.20.h...PI.3.| 00000260: 31 34 31 35 39 32 36 35 00 75 0A 0E 01 86 20 48 |14159265.u.... H| 00000270: 28 32 35 35 29 00 93 0A 13 01 81 20 4C B2 30 20 |(255)...... L.0 | 00000280: A4 20 32 35 35 3A 48 28 4C 29 B2 31 30 30 30 3A |. 255:H(L).1000:| 00000290: 82 20 4C 00 99 0A 18 01 8F 00 B2 0A 1D 01 8F 20 |. L............ | 000002A0: 20 20 20 20 20 47 20 52 20 41 20 50 20 48 20 49 | G R A P H I| 000002B0: 20 4B 00 B8 0A 22 01 8F 00 C2 0A 27 01 64 01 31 | K...".....'.d.1| 000002C0: 2C 36 00 D9 0A 2C 01 81 20 59 59 B2 AB 39 30 20 |,6...,.. YY..90 | 000002D0: A4 20 39 30 20 A9 20 44 59 00 FE 0A 36 01 4D 31 |. 90 . DY...6.M1| 000002E0: B2 BE 28 59 59 AC 32 AC 50 49 AD 39 30 AB 50 49 |..(YY.2.PI.90.PI| 000002F0: 29 AA 31 3A 5A B2 4B 31 AC 4D 31 AC 4D 32 00 15 |).1:Z.K1.M1.M2..| 00000300: 0B 40 01 81 20 58 58 B2 AB 39 30 20 A4 20 39 30 |.@.. XX..90 . 90| 00000310: 20 A9 20 44 58 00 3A 0B 4A 01 4D 32 B2 BE 28 58 | . DX.:.J.M2..(X| 00000320: 58 AC 32 AC 50 49 AD 39 30 AB 50 49 29 AA 31 3A |X.2.PI.90.PI).1:| 00000330: 5A B2 4B 31 AC 4D 31 AC 4D 32 00 61 0B 54 01 58 |Z.K1.M1.M2.a.T.X| 00000340: 47 B2 B5 28 55 AA 58 58 AA 43 AC 59 59 AA 48 29 |G..(U.XX.C.YY.H)| 00000350: 3A 59 47 B2 B5 28 56 AB 53 AC 59 59 AB 5A AA 48 |:YG..(V.S.YY.Z.H| 00000360: 29 00 74 0B 5E 01 8B 20 58 58 B1 AB 39 30 20 A7 |).t.^.. XX..90 .| 00000370: 20 34 30 30 00 88 0B 68 01 46 31 B2 30 3A 4C B2 | 400...h.F1.0:L.| 00000380: B5 28 58 47 AD 44 58 29 00 A5 0B 72 01 8B 20 59 |.(XG.DX)...r.. Y| 00000390: 47 B3 B2 48 28 4C 29 A7 20 46 31 B2 31 3A 48 28 |G..H(L). F1.1:H(| 000003A0: 4C 29 B2 59 47 00 BA 0B 7C 01 58 31 B2 58 47 3A |L).YG...|.X1.XG:| 000003B0: 59 31 B2 59 47 3A 89 35 30 30 00 CE 0B 90 01 46 |Y1.YG:.500.....F| 000003C0: 32 B2 30 3A 4C B2 B5 28 58 47 AD 44 58 29 00 EC |2.0:L..(XG.DX)..| 000003D0: 0B 9A 01 8B 20 59 47 B3 B2 48 28 4C 29 20 A7 20 |.... YG..H(L) . | 000003E0: 46 32 B2 31 3A 48 28 4C 29 B2 59 47 00 FC 0B A4 |F2.1:H(L).YG....| 000003F0: 01 58 32 B2 58 47 3A 59 32 B2 59 47 00 31 0C AE |.X2.XG:Y2.YG.1..| 00000400: 01 8B 20 46 31 AC 46 32 B2 31 20 A7 20 58 B2 58 |.. F1.F2.1 . X.X| 00000410: 31 3A 59 B2 59 31 3A 58 31 B2 58 32 3A 59 31 B2 |1:Y.Y1:X1.X2:Y1.| 00000420: 59 32 3A 64 03 20 58 2C 59 2C 58 31 2C 59 31 2C |Y2:d. X,Y,X1,Y1,| 00000430: 31 00 47 0C B8 01 58 31 B2 58 32 3A 59 31 B2 59 |1.G...X1.X2:Y1.Y| 00000440: 32 3A 46 31 B2 46 32 00 50 0C F4 01 82 20 58 58 |2:F1.F2.P.... XX| 00000450: 00 59 0C FE 01 82 20 59 59 00 70 0C 08 02 A1 20 |.Y.... YY.p.... | 00000460: 41 24 3A 8B 20 41 24 B2 22 22 20 A7 20 35 32 30 |A$:. A$."" . 520| 00000470: 00 8D 0C 12 02 64 74 31 2C 22 43 53 45 54 32 3A |.....dt1,"CSET2:| 00000480: 50 41 55 53 45 35 22 AA C7 28 31 33 29 00 93 0C |PAUSE5"..(13)...| 00000490: 58 02 80 00 00 00 |X..... |
..(....*********************************
.O.#..** **.
V.(..** "3D-BERGE" **..
.-..** **.D.
2..** (Z=Z1*Z2) **...7
..** (Z1=COS(2*.*X/90-.)+1) **...<.
.** (Z2=COS(2*.*Y/90-.)+1) **.9.A..
** **.`.F..*
********************************.F.K....
.P.. S I M O N ' S !...U.....D..
E I N G A B E...N..".".Z.H.." PROJE
KTIONSWINKEL IN GRAD(45-135) ";W:....R..
" VERKUERZUNGSFAKTOR K (0.5-0.75) ";K:..
&...U.128:V.110:H.0.5:BM...180.B...C.K..
(W.BM):S.K..(W.BM).V...DX.3:DY.5:K1.20.H
...PI.3.14159265.U.... H(255)...... L.0
. 255:H(L).1000:. L............ G R
A P H I K..."...B.'.D.1,6.Y.,.. YY..90
. 90 . DY...6.M1..(YY.2.PI.90.PI).1:Z.K1
.M1.M2...@.. XX..90 . 90 . DX.:.J.M2..(X
X.2.PI.90.PI).1:Z.K1.M1.M2.A.T.XG..(U.XX
.C.YY.H):YG..(V.S.YY.Z.H).T.^.. XX..90 .
400...H.F1.0:L..(XG.DX)...R.. YG..H(L).
F1.1:H(L).YG...|.X1.XG:Y1.YG:.500.N...F
2.0:L..(XG.DX)...... YG..H(L) . F2.1:H(L
).YG.....X2.XG:Y2.YG.1.... F1.F2.1 . X.X
1:Y.Y1:X1.X2:Y1.Y2:D. X,Y,X1,Y1,1.G...X1
.X2:Y1.Y2:F1.F2.P.... XX.Y.... YY.P....
A$:. A$."" . 520.....DT1,"CSET2:PAUSE5".
G(13)...X.....
> CLICK IMAGE PREVIEW FOR FULL MODAL