_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\

SEITE.8.LOGO

FILE INFORMATION

FILENAME(S): SEITE.8.LOGO

FILE TYPE(S): PRG

FILE SIZE: 635b

FIRST SEEN: 2025-10-20 14:37:14

APPEARS ON: 1 disk(s)

FILE HASH

7212050a545c06d25c4d161088df00928d3655f155dc3d8d532bc45adccd5183

FOUND ON DISKS (1 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
BUCH SEITE.8.LOGO PRG Treasure Chest - LehrerMIL 17 8 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 00 20 50 52 20 56 2E 4B  55 47 45 4C 20 3A 52 0D  |. PR V.KUGEL :R.|
00000010: 20 52 47 20 34 20 2F 20  33 20 2A 20 33 2E 31 34  | RG 4 / 3 * 3.14|
00000020: 20 2A 20 3A 52 20 2A 20  3A 52 20 2A 20 3A 52 0D  | * :R * :R * :R.|
00000030: 45 4E 44 45 0D 50 52 20  56 2E 5A 59 4C 49 4E 44  |ENDE.PR V.ZYLIND|
00000040: 45 52 20 3A 52 20 3A 48  4F 45 48 45 0D 20 52 47  |ER :R :HOEHE. RG|
00000050: 20 33 2E 31 34 20 2A 20  3A 52 20 2A 20 3A 52 20  | 3.14 * :R * :R |
00000060: 2A 20 3A 48 4F 45 48 45  0D 45 4E 44 45 0D 50 52  |* :HOEHE.ENDE.PR|
00000070: 20 41 2E 4B 52 45 49 53  20 3A 52 41 44 49 55 53  | A.KREIS :RADIUS|
00000080: 0D 20 52 47 20 33 2E 31  34 20 2A 20 3A 52 41 44  |. RG 3.14 * :RAD|
00000090: 49 55 53 20 2A 20 3A 52  41 44 49 55 53 0D 45 4E  |IUS * :RADIUS.EN|
000000A0: 44 45 0D 50 52 20 41 2E  44 52 45 49 45 43 4B 20  |DE.PR A.DREIECK |
000000B0: 3A 47 52 55 4E 44 4C 49  4E 49 45 20 3A 48 4F 45  |:GRUNDLINIE :HOE|
000000C0: 48 45 0D 20 52 47 20 30  2E 35 20 2A 20 3A 47 52  |HE. RG 0.5 * :GR|
000000D0: 55 4E 44 4C 49 4E 49 45  20 2A 20 3A 48 4F 45 48  |UNDLINIE * :HOEH|
000000E0: 45 0D 45 4E 44 45 0D 50  52 20 41 2E 54 52 41 50  |E.ENDE.PR A.TRAP|
000000F0: 45 5A 20 3A 41 20 3A 43  20 3A 48 0D 20 53 45 54  |EZ :A :C :H. SET|
00000100: 5A 45 20 22 4D 20 28 20  3A 41 20 2B 20 3A 43 20  |ZE "M ( :A + :C |
00000110: 29 20 2F 20 32 0D 20 53  45 54 5A 45 20 22 46 54  |) / 2. SETZE "FT|
00000120: 20 3A 4D 20 2A 20 3A 48  0D 20 52 55 45 43 4B 47  | :M * :H. RUECKG|
00000130: 41 42 45 20 3A 46 54 0D  45 4E 44 45 0D 50 52 20  |ABE :FT.ENDE.PR |
00000140: 4F 2E 57 55 45 52 46 45  4C 20 3A 41 0D 20 53 45  |O.WUERFEL :A. SE|
00000150: 54 5A 45 20 22 53 20 3A  41 20 2A 20 3A 41 0D 20  |TZE "S :A * :A. |
00000160: 53 45 54 5A 45 20 22 4F  20 36 20 2A 20 3A 53 0D  |SETZE "O 6 * :S.|
00000170: 20 52 55 45 43 4B 47 41  42 45 20 3A 4F 0D 45 4E  | RUECKGABE :O.EN|
00000180: 44 45 0D 50 52 20 55 2E  4B 52 45 49 53 2E 4D 49  |DE.PR U.KREIS.MI|
00000190: 54 2E 44 55 52 43 48 4D  45 53 53 45 52 20 3A 44  |T.DURCHMESSER :D|
000001A0: 0D 20 53 45 54 5A 45 20  22 50 49 20 33 2E 31 34  |. SETZE "PI 3.14|
000001B0: 0D 20 53 45 54 5A 45 20  22 55 20 3A 50 49 20 2A  |. SETZE "U :PI *|
000001C0: 20 3A 44 0D 20 52 55 45  43 4B 47 41 42 45 20 3A  | :D. RUECKGABE :|
000001D0: 55 0D 45 4E 44 45 0D 50  52 20 55 2E 52 45 43 48  |U.ENDE.PR U.RECH|
000001E0: 54 45 43 4B 20 3A 4C 20  3A 42 0D 20 53 45 54 5A  |TECK :L :B. SETZ|
000001F0: 45 20 22 55 4D 46 41 4E  47 20 32 20 2A 20 28 20  |E "UMFANG 2 * ( |
00000200: 3A 4C 20 2B 20 3A 42 20  29 0D 20 52 55 45 43 4B  |:L + :B ). RUECK|
00000210: 47 41 42 45 20 3A 55 4D  46 41 4E 47 0D 45 4E 44  |GABE :UMFANG.END|
00000220: 45 0D 50 52 20 41 2E 52  45 43 48 54 45 43 4B 20  |E.PR A.RECHTECK |
00000230: 3A 4C 41 45 4E 47 45 20  3A 42 52 45 49 54 45 0D  |:LAENGE :BREITE.|
00000240: 20 53 45 54 5A 45 20 22  46 4C 41 45 43 48 45 20  | SETZE "FLAECHE |
00000250: 3A 4C 41 45 4E 47 45 20  2A 20 3A 42 52 45 49 54  |:LAENGE * :BREIT|
00000260: 45 0D 20 52 55 45 43 4B  47 41 42 45 20 3A 46 4C  |E. RUECKGABE :FL|
00000270: 41 45 43 48 45 0D 45 4E  44 45 0D                 |AECHE.ENDE.     |

. PR V.KUGEL :R. RG 4 / 3 * 3.14 * :R * 
:R * :R.ENDE.PR V.ZYLINDER :R :HOEHE. RG
 3.14 * :R * :R * :HOEHE.ENDE.PR A.KREIS
 :RADIUS. RG 3.14 * :RADIUS * :RADIUS.EN
DE.PR A.DREIECK :GRUNDLINIE :HOEHE. RG 0
.5 * :GRUNDLINIE * :HOEHE.ENDE.PR A.TRAP
EZ :A :C :H. SETZE "M ( :A + :C ) / 2. S
ETZE "FT :M * :H. RUECKGABE :FT.ENDE.PR 
O.WUERFEL :A. SETZE "S :A * :A. SETZE "O
 6 * :S. RUECKGABE :O.ENDE.PR U.KREIS.MI
T.DURCHMESSER :D. SETZE "PI 3.14. SETZE 
"U :PI * :D. RUECKGABE :U.ENDE.PR U.RECH
TECK :L :B. SETZE "UMFANG 2 * ( :L + :B 
). RUECKGABE :UMFANG.ENDE.PR A.RECHTECK 
:LAENGE :BREITE. SETZE "FLAECHE :LAENGE 
* :BREITE. RUECKGABE :FLAECHE.ENDE.
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL