GRUNDPROGRAMM

FILE INFORMATION

FILENAME(S): GRUNDPROGRAMM

FILE TYPE(S): PRG

FILE SIZE: 1K

FIRST SEEN: 2025-11-02 16:39:50

APPEARS ON: 1 disk(s)

FILE HASH

5feaa35f4571b748ab5e82f39e8e1080f060746cbedb5381155994909f9f1e43

FOUND ON DISKS (1 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
GRUND PRG	GRUNDPROGRAMM	PRG	Treasure Chest - Plattfuss	17	9	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 01 40 18 40 02 00 8F 20  32 44 20 47 52 55 4E 44  |.@.@... 2D GRUND|
00000010: 50 52 4F 47 52 41 4D 4D  00 25 40 03 00 DE 20 31  |PROGRAMM.%@... 1|
00000020: 2C 31 3A DE 30 00 35 40  05 00 50 49 B2 33 2E 31  |,1:.0.5@..PI.3.1|
00000030: 34 31 35 39 32 00 65 40  07 00 85 20 22 53 54 41  |41592.e@... "STA|
00000040: 4E 44 41 52 44 47 52 4F  45 53 53 45 20 28 4A 2F  |NDARDGROESSE (J/|
00000050: 4E 29 20 22 3B 41 24 3A  8B 20 41 24 B2 22 4A 22  |N) ";A$:. A$."J"|
00000060: A7 20 89 20 39 00 9E 40  08 00 85 20 22 58 4C 3D  |. . 9..@... "XL=|
00000070: 20 22 3B 58 4C 3A 85 20  22 58 52 3D 20 22 3B 58  | ";XL:. "XR= ";X|
00000080: 52 3A 85 20 22 59 42 3D  20 22 3B 59 42 3A 85 20  |R:. "YB= ";YB:. |
00000090: 22 59 54 3D 20 22 3B 59  54 3A 89 20 31 30 00 BA  |"YT= ";YT:. 10..|
000000A0: 40 09 00 58 4C B2 30 3A  58 52 B2 33 32 30 3A 59  |@..XL.0:XR.320:Y|
000000B0: 42 B2 30 3A 59 54 B2 32  30 30 00 F6 40 0A 00 4D  |B.0:YT.200..@..M|
000000C0: 48 B2 58 4C AA 28 58 52  AB 58 4C 29 AD 32 3A 4D  |H.XL.(XR.XL).2:M|
000000D0: 56 B2 59 42 AA 28 59 54  AB 59 42 29 AD 32 3A 58  |V.YB.(YT.YB).2:X|
000000E0: 46 41 B2 2E 37 38 3A 59  46 41 B2 30 2E 36 39 3A  |FA..78:YFA.0.69:|
000000F0: 89 20 32 30 30 30 00 0C  41 90 01 86 20 58 41 28  |. 2000..A... XA(|
00000100: 53 54 29 3A 86 20 59 41  28 53 54 29 00 2E 41 E8  |ST):. YA(ST)..A.|
00000110: 03 58 43 B2 58 41 AC 43  5A AB 59 41 AC 53 5A 3A  |.XC.XA.CZ.YA.SZ:|
00000120: 59 43 B2 58 41 AC 53 5A  AA 59 41 AC 43 5A 00 4C  |YC.XA.SZ.YA.CZ.L|
00000130: 41 F2 03 58 41 B2 B5 20  28 58 43 AA 4D 58 29 3A  |A..XA.. (XC.MX):|
00000140: 59 41 B2 B5 20 28 59 43  AA 59 4D 29 00 65 41 FC  |YA.. (YC.YM).eA.|
00000150: 03 8B 20 46 4D 41 54 24  B2 22 56 22 20 A7 20 89  |.. FMAT$."V" . .|
00000160: 20 31 30 35 30 00 79 41  06 04 58 41 B2 58 41 AA  | 1050.yA..XA.XA.|
00000170: 4D 48 3A 89 20 31 31 30  30 00 92 41 1A 04 54 54  |MH:. 1100..A..TT|
00000180: B2 59 41 3A 59 41 B2 4D  56 AB 58 41 3A 58 41 B2  |.YA:YA.MV.XA:XA.|
00000190: 54 54 00 98 41 4C 04 8F  00 AB 41 08 07 8B 20 50  |TT..AL....A... P|
000001A0: B1 30 20 A7 20 89 20 31  38 32 30 00 C5 41 12 07  |.0 . . 1820..A..|
000001B0: E6 20 58 41 AC 58 46 41  2C 32 30 30 AB 59 41 AC  |. XA.XFA,200.YA.|
000001C0: 59 46 41 3A 8E 00 E1 41  1C 07 E5 20 A4 20 58 41  |YFA:...A... . XA|
000001D0: AC 58 46 41 2C 32 30 30  AB 59 41 AC 59 46 41 3A  |.XFA,200.YA.YFA:|
000001E0: 8E 00 1C 42 D0 07 85 20  22 48 4F 52 49 5A 4F 4E  |...B... "HORIZON|
000001F0: 54 41 4C 45 53 20 28 48  29 20 4F 44 45 52 20 56  |TALES (H) ODER V|
00000200: 45 52 54 49 4B 41 4C 45  53 20 46 4F 52 4D 41 54  |ERTIKALES FORMAT|
00000210: 20 28 56 29 20 22 3B 46  4D 41 54 24 00 41 42 3E  | (V) ";FMAT$.AB>|
00000220: 08 85 20 22 4C 41 4E 47  45 20 41 43 48 53 45 20  |.. "LANGE ACHSE |
00000230: 44 45 52 20 45 4C 4C 49  50 53 45 20 3D 22 3B 41  |DER ELLIPSE =";A|
00000240: 41 00 66 42 48 08 85 20  22 4B 55 52 5A 45 20 41  |A.fBH.. "KURZE A|
00000250: 43 48 53 45 20 44 45 52  20 45 4C 4C 49 50 53 45  |CHSE DER ELLIPSE|
00000260: 20 3D 22 3B 41 42 00 8F  42 52 08 85 20 22 54 45  | =";AB..BR.. "TE|
00000270: 49 4C 55 4E 47 20 28 49  4E 20 47 52 41 44 29 20  |ILUNG (IN GRAD) |
00000280: 3D 22 3B 44 49 3A 53 34  B2 33 36 30 AD 44 49 00  |=";DI:S4.360.DI.|
00000290: B5 42 B8 0B 85 20 22 56  45 52 53 43 48 49 45 42  |.B... "VERSCHIEB|
000002A0: 55 4E 47 20 50 41 52 41  4C 4C 45 4C 20 58 20 3D  |UNG PARALLEL X =|
000002B0: 20 22 3B 4D 58 00 DA 42  C2 0B 85 20 22 56 45 52  | ";MX..B... "VER|
000002C0: 53 43 48 49 45 42 55 4E  47 20 50 41 52 41 4C 4C  |SCHIEBUNG PARALL|
000002D0: 45 4C 20 59 20 3D 22 3B  4D 59 00 0B 43 CC 0B 85  |EL Y =";MY..C...|
000002E0: 20 22 52 4F 54 41 54 49  4F 4E 20 55 4D 20 44 49  | "ROTATION UM DI|
000002F0: 45 20 5A 2D 41 43 48 53  45 20 22 3B 52 5A 3A 52  |E Z-ACHSE ";RZ:R|
00000300: 5A B2 52 5A AC 50 49 AD  31 38 30 00 23 43 E0 0B  |Z.RZ.PI.180.#C..|
00000310: 53 5A B2 BF 20 28 52 5A  29 3A 43 5A B2 BE 20 28  |SZ.. (RZ):CZ.. (|
00000320: 52 5A 29 00 3D 43 A0 0F  86 20 58 41 28 53 34 AA  |RZ).=C... XA(S4.|
00000330: 31 29 3A 86 20 59 41 28  53 34 AA 31 29 00 4C 43  |1):. YA(S4.1).LC|
00000340: AA 0F 81 20 49 B2 30 20  A4 20 53 34 00 82 43 B4  |... I.0 . S4..C.|
00000350: 0F 58 41 28 49 29 B2 41  41 AC BE 20 28 49 AC 44  |.XA(I).AA.. (I.D|
00000360: 49 AC 50 49 AD 31 38 30  29 3A 59 41 28 49 29 B2  |I.PI.180):YA(I).|
00000370: 41 42 AC BF 20 28 49 AC  44 49 AC 50 49 AD 31 38  |AB.. (I.DI.PI.18|
00000380: 30 29 00 88 43 BE 0F 82  00 92 43 88 13 DE 20 31  |0)..C.....C... 1|
00000390: 2C 30 00 9B 43 8D 13 53  32 B2 31 00 AA 43 92 13  |,0..C..S2.1..C..|
000003A0: 81 20 49 B2 30 20 A4 20  53 34 00 BA 43 9C 13 81  |. I.0 . S4..C...|
000003B0: 20 4A B2 53 32 20 A4 20  53 34 00 CB 43 A1 13 8B  | J.S2 . S4..C...|
000003C0: 20 4A B2 49 20 89 20 35  30 35 30 00 EC 43 A6 13  | J.I . 5050..C..|
000003D0: 58 41 B2 58 41 28 49 29  3A 59 41 B2 59 41 28 49  |XA.XA(I):YA.YA(I|
000003E0: 29 3A 50 B2 30 3A 8D 20  31 30 30 30 00 0D 44 B0  |):P.0:. 1000..D.|
000003F0: 13 58 41 B2 58 41 28 4A  29 3A 59 41 B2 59 41 28  |.XA.XA(J):YA.YA(|
00000400: 4A 29 3A 50 B2 31 3A 8D  20 31 30 30 30 00 15 44  |J):P.1:. 1000..D|
00000410: BA 13 82 20 4A 00 21 44  BF 13 53 32 B2 53 32 AA  |... J.!D..S2.S2.|
00000420: 31 00 29 44 C4 13 82 20  49 00 2F 44 10 27 80 00  |1.)D... I./D.'..|
00000430: 00 00                                             |..              |

.@.@... 2D GRUNDPROGRAMM.%@... 1,1:.0.5@
..PI.3.141592.E@... "STANDARDGROESSE (J/
N) ";A$:. A$."J". . 9..@... "XL= ";XL:. 
"XR= ";XR:. "YB= ";YB:. "YT= ";YT:. 10..
@..XL.0:XR.320:YB.0:YT.200..@..MH.XL.(XR
.XL).2:MV.YB.(YT.YB).2:XFA..78:YFA.0.69:
. 2000..A... XA(ST):. YA(ST)..A..XC.XA.C
Z.YA.SZ:YC.XA.SZ.YA.CZ.LA..XA.. (XC.MX):
YA.. (YC.YM).EA... FMAT$."V" . . 1050.YA
..XA.XA.MH:. 1100..A..TT.YA:YA.MV.XA:XA.
TT..AL....A... P.0 . . 1820.EA... XA.XFA
,200.YA.YFA:...A... . XA.XFA,200.YA.YFA:
...BP.. "HORIZONTALES (H) ODER VERTIKALE
S FORMAT (V) ";FMAT$.AB>.. "LANGE ACHSE 
DER ELLIPSE =";AA.FBH.. "KURZE ACHSE DER
 ELLIPSE =";AB..BR.. "TEILUNG (IN GRAD) 
=";DI:S4.360.DI..B... "VERSCHIEBUNG PARA
LLEL X = ";MX.ZBB.. "VERSCHIEBUNG PARALL
EL Y =";MY..CL.. "ROTATION UM DIE Z-ACHS
E ";RZ:RZ.RZ.PI.180.#C..SZ.. (RZ):CZ.. (
RZ).=C .. XA(S4.1):. YA(S4.1).LC... I.0 
. S4..C..XA(I).AA.. (I.DI.PI.180):YA(I).
AB.. (I.DI.PI.180)..C.....C... 1,0..C..S
2.1..C... I.0 . S4..C... J.S2 . S4.KC...
 J.I . 5050..C..XA.XA(I):YA.YA(I):P.0:. 
1000..D..XA.XA(J):YA.YA(J):P.1:. 1000..D
... J.!D..S2.S2.1.)DD.. I./D.'....

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL