PYRAMIDE
FILE INFORMATION
FILENAME(S): PYRAMIDE
FILE TYPE(S): PRG
FILE SIZE: 4.6K
FIRST SEEN: 2025-10-20 14:26:13
APPEARS ON: 1 disk(s)
FILE HASH
1089858c1950cf85b55e89240303764ebb57c2b8f6dac0d98ebc93149331d9b2
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| BERNDS DISK22 | PYRAMIDE | PRG | Treasure Chest - Katarakt | 11 | 5 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0B 08 0A 00 89 20 31 30 30 00 34 08 14 00 |....... 100.4...|
00000010: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................|
00000020: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................|
00000030: AC AC AC AC 00 5D 08 1E 00 AC 20 50 52 4F 47 52 |.....].... PROGR|
00000040: 41 4D 4D 20 5A 55 52 20 42 45 52 45 43 48 4E 55 |AMM ZUR BERECHNU|
00000050: 4E 47 20 45 49 4E 45 52 20 20 20 20 AC 00 86 08 |NG EINER ....|
00000060: 28 00 AC 20 50 59 52 41 4D 49 44 45 20 20 20 20 |(.. PYRAMIDE |
00000070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000080: 20 20 20 20 20 AC 00 AF 08 32 00 AC 20 AB AB AB | ....2.. ...|
00000090: AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB AB |................|
000000A0: AB AB AB AB AB AB AB AB AB AB 20 20 20 20 AC 00 |.......... ..|
000000B0: D8 08 3C 00 AC 20 28 43 29 20 31 39 38 38 20 42 |..<.. (C) 1988 B|
000000C0: 59 20 4D 41 52 4B 55 53 20 50 41 48 4C 20 20 20 |Y MARKUS PAHL |
000000D0: 20 20 20 20 20 20 20 AC 00 FF 08 46 00 AC 20 49 | ....F.. I|
000000E0: 44 45 45 20 42 59 20 42 45 BB 20 4C 4F 53 53 20 |DEE BY BE. LOSS |
000000F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 AC 00 | ..|
00000100: 28 09 50 00 AC AC AC AC AC AC AC AC AC AC AC AC |(.P.............|
00000110: AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC AC |................|
00000120: AC AC AC AC AC AC AC AC 00 2E 09 5A 00 3A 00 4A |...........Z.:.J|
00000130: 09 64 00 8F 20 2D 2D 4D 45 4E 55 45 50 52 4F 47 |.d.. --MENUEPROG|
00000140: 52 41 4D 4D 2D 2D 20 3C 30 3E 00 81 09 6E 00 97 |RAMM-- <0>...n..|
00000150: 20 35 33 32 38 30 2C 30 3A 97 20 35 33 32 38 31 | 53280,0:. 53281|
00000160: 2C 30 3A 97 20 36 34 36 2C 35 3A 99 22 93 22 3A |,0:. 646,5:.".":|
00000170: 99 20 C7 28 38 29 3A 97 20 35 33 32 37 32 2C 32 |. .(8):. 53272,2|
00000180: 33 00 8F 09 73 00 97 20 38 30 38 2C 32 32 35 00 |3...s.. 808,225.|
00000190: B5 09 78 00 99 22 13 11 20 20 20 20 20 20 20 20 |..x..".. |
000001A0: 20 D0 59 52 41 4D 49 44 45 4E 2D C2 45 52 45 43 | .YRAMIDEN-.EREC|
000001B0: 48 4E 55 4E 47 00 DA 09 82 00 99 22 20 20 20 20 |HNUNG......" |
000001C0: 20 20 20 20 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | -----------|
000001D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 22 00 E6 09 8C 00 99 |---------"......|
000001E0: 3A 99 3A 99 3A 99 00 0A 0A 96 00 99 22 05 3C 31 |:.:.:.......".<1|
000001F0: 3E 20 C2 45 52 45 43 48 4E 55 4E 47 20 44 45 53 |> .ERECHNUNG DES|
00000200: 20 D6 4F 4C 55 4D 45 4E 53 22 00 2B 0A A0 00 99 | .OLUMENS".+....|
00000210: 22 9E 3C 32 3E 20 C2 45 52 45 43 48 4E 55 4E 47 |".<2> .ERECHNUNG|
00000220: 20 44 45 52 20 C8 4F 45 48 45 22 00 54 0A AA 00 | DER .OEHE".T...|
00000230: 99 22 81 3C 33 3E 20 C2 45 52 45 43 48 4E 55 4E |.".<3> .ERECHNUN|
00000240: 47 20 45 49 4E 45 52 20 D3 45 49 54 45 4E 48 4F |G EINER .EITENHO|
00000250: 45 48 45 22 00 7D 0A B4 00 99 22 95 3C 34 3E 20 |EHE".}....".<4> |
00000260: C2 45 52 45 43 48 4E 55 4E 47 20 45 49 4E 45 52 |.ERECHNUNG EINER|
00000270: 20 D3 45 49 54 45 4E 4B 41 4E 54 45 22 00 A8 0A | .EITENKANTE"...|
00000280: BE 00 99 22 11 11 11 11 11 11 11 11 11 11 11 11 |..."............|
00000290: 1F 28 43 29 20 31 39 38 38 20 42 59 20 CD 41 52 |.(C) 1988 BY .AR|
000002A0: 4B 55 53 20 D0 41 48 4C 00 BE 0A C8 00 A1 20 41 |KUS .AHL...... A|
000002B0: 24 3A 8B 20 41 24 B2 22 22 A7 20 32 30 30 00 CA |$:. A$."". 200..|
000002C0: 0A D2 00 41 B2 C5 28 41 24 29 00 DC 0A DC 00 8B |...A..(A$)......|
000002D0: 20 41 B3 31 B0 41 B1 34 A7 32 30 30 00 F9 0A E6 | A.1.A.4.200....|
000002E0: 00 91 20 41 20 89 20 33 30 30 2C 31 30 30 30 2C |.. A . 300,1000,|
000002F0: 32 30 30 30 2C 33 30 30 30 00 FF 0A F0 00 3A 00 |2000,3000.....:.|
00000300: 25 0B 2C 01 8F 20 2D 2D 42 45 52 45 43 48 4E 55 |%.,.. --BERECHNU|
00000310: 4E 47 20 44 45 53 20 56 4F 4C 55 4D 45 4E 53 2D |NG DES VOLUMENS-|
00000320: 2D 20 3C 31 3E 00 36 0B 36 01 99 22 93 22 3A 97 |- <1>.6.6..".":.|
00000330: 20 36 34 36 2C 33 00 7D 0B 40 01 99 22 13 C4 49 | 646,3.}.@.."..I|
00000340: 45 20 C6 4F 52 4D 45 4C 20 5A 55 52 20 C2 45 52 |E .ORMEL ZUR .ER|
00000350: 45 43 48 4E 55 4E 47 20 44 45 53 20 D6 4F 4C 55 |ECHNUNG DES .OLU|
00000360: 4D 45 4E 53 20 20 45 49 4E 45 52 20 D0 59 52 41 |MENS EINER .YRA|
00000370: 4D 49 44 45 20 4C 41 55 54 45 54 3A 22 00 8E 0B |MIDE LAUTET:"...|
00000380: 4A 01 99 22 11 D6 3D 31 2F 33 2A C7 2A 48 00 CB |J.."..=1/3*.*H..|
00000390: 0B 54 01 99 22 D5 4D 20 41 4C 53 4F 20 D6 20 5A |.T..".M ALSO . Z|
000003A0: 55 20 42 45 52 45 43 48 4E 45 4E 2C 4D 55 53 53 |U BERECHNEN,MUSS|
000003B0: 20 45 52 53 54 20 C7 20 20 20 20 20 20 42 45 4B | ERST . BEK|
000003C0: 41 4E 4E 54 20 53 45 49 4E 2E 22 00 17 0C 5E 01 |ANNT SEIN."...^.|
000003D0: 99 22 C7 20 49 53 54 20 44 49 45 20 C7 52 55 4E |.". IST DIE .RUN|
000003E0: 44 46 4C 41 45 43 48 45 2E C5 53 20 4B 4F 4D 4D |DFLAECHE..S KOMM|
000003F0: 54 20 41 4C 53 4F 20 41 55 46 44 49 45 20 C1 52 |T ALSO AUFDIE .R|
00000400: 54 20 44 45 52 20 C7 52 55 4E 44 46 4C 41 45 43 |T DER .RUNDFLAEC|
00000410: 48 45 20 41 4E 2E 22 00 1D 0C 68 01 99 00 2A 0C |HE AN."...h...*.|
00000420: 72 01 99 22 C9 53 54 20 C7 3A 00 41 0C 7C 01 99 |r..".ST .:.A.|..|
00000430: 22 3C 31 3E 20 C5 49 4E 20 D1 55 41 44 52 41 54 |"<1> .IN .UADRAT|
00000440: 22 00 59 0C 86 01 99 22 3C 32 3E 20 C5 49 4E 20 |".Y...."<2> .IN |
00000450: D2 45 43 48 54 45 43 4B 22 00 77 0C 90 01 99 22 |.ECHTECK".w...."|
00000460: 3C 33 3E 20 C5 49 4E 20 D0 41 52 41 4C 4C 45 4C |<3> .IN .ARALLEL|
00000470: 4F 47 52 41 4D 4D 22 00 8A 0C 9A 01 A1 41 24 3A |OGRAMM"......A$:|
00000480: 8B 41 24 B2 22 22 A7 34 31 30 00 96 0C A4 01 41 |.A$."".410.....A|
00000490: B2 C5 28 41 24 29 00 A7 0C AE 01 8B 41 B3 31 B0 |..(A$)......A.1.|
000004A0: 41 B1 33 A7 34 31 30 00 BD 0C B8 01 91 20 41 20 |A.3.410...... A |
000004B0: 89 20 34 35 30 2C 34 36 30 2C 34 37 30 00 ED 0C |. 450,460,470...|
000004C0: C2 01 99 22 C9 4E 20 44 49 45 53 45 4D 20 C6 41 |...".N DIESEM .A|
000004D0: 4C 4C 45 20 4C 41 55 54 45 54 20 44 49 45 20 C6 |LLE LAUTET DIE .|
000004E0: 4F 52 4D 45 4C 20 46 55 45 52 20 C7 22 00 FA 0C |ORMEL FUER ."...|
000004F0: C3 01 99 22 C7 3D 41 5E 32 22 00 13 0D C4 01 85 |...".=A^2"......|
00000500: 22 D7 49 45 20 47 52 4F 53 53 20 49 53 54 20 41 |".IE GROSS IST A|
00000510: 22 3B 41 00 24 0D C5 01 47 B2 41 AE 32 3A 99 22 |";A.$...G.A.2:."|
00000520: C7 3D 22 47 00 2E 0D C6 01 89 20 35 30 30 00 5E |.="G...... 500.^|
00000530: 0D CC 01 99 22 C9 4E 20 44 49 45 53 45 4D 20 C6 |....".N DIESEM .|
00000540: 41 4C 4C 45 20 4C 41 55 54 45 54 20 44 49 45 20 |ALLE LAUTET DIE |
00000550: C6 4F 52 4D 45 4C 20 46 55 45 52 20 C7 22 00 6B |.ORMEL FUER .".k|
00000560: 0D CD 01 99 22 C7 3D 41 2A 42 22 00 84 0D CE 01 |....".=A*B".....|
00000570: 85 22 D7 49 45 20 47 52 4F 53 53 20 49 53 54 20 |.".IE GROSS IST |
00000580: 41 22 3B 41 00 9C 0D CF 01 85 22 D7 49 45 20 4C |A";A......".IE L|
00000590: 41 4E 47 20 49 53 54 20 42 22 3B 42 00 AD 0D D0 |ANG IST B";B....|
000005A0: 01 47 B2 41 AC 42 3A 99 22 C7 3D 22 47 00 B7 0D |.G.A.B:.".="G...|
000005B0: D1 01 89 20 35 30 30 00 E7 0D D6 01 99 22 C9 4E |... 500......".N|
000005C0: 20 44 49 45 53 45 4D 20 C6 41 4C 4C 45 20 4C 41 | DIESEM .ALLE LA|
000005D0: 55 54 45 54 20 44 49 45 20 C6 4F 52 4D 45 4C 20 |UTET DIE .ORMEL |
000005E0: 46 55 45 52 20 C7 22 00 F5 0D D7 01 99 22 C7 3D |FUER ."......".=|
000005F0: 41 2A 48 41 22 00 0E 0E D8 01 85 22 D7 49 45 20 |A*HA"......".IE |
00000600: 47 52 4F 53 53 20 49 53 54 20 41 22 3B 41 00 28 |GROSS IST A";A.(|
00000610: 0E D9 01 85 22 D7 49 45 20 4C 41 4E 47 20 49 53 |....".IE LANG IS|
00000620: 54 20 48 41 22 3B 48 41 00 3A 0E DA 01 47 B2 41 |T HA";HA.:...G.A|
00000630: AC 48 41 3A 99 22 C7 3D 22 47 00 44 0E DB 01 89 |.HA:.".="G.D....|
00000640: 20 35 30 30 00 53 0E F4 01 81 58 B2 30 A4 35 30 | 500.S....X.0.50|
00000650: 30 3A 82 00 5C 0E FE 01 99 22 93 22 00 80 0E 08 |0:..\...."."....|
00000660: 02 85 22 CE 55 4E 20 4D 55 53 53 20 49 43 48 20 |..".UN MUSS ICH |
00000670: 4E 4F 43 48 20 48 20 4B 45 4E 4E 45 4E 22 3B 48 |NOCH H KENNEN";H|
00000680: 00 91 0E 12 02 99 22 D6 3D 31 2F 33 2A C7 2A 48 |......".=1/3*.*H|
00000690: 22 00 A4 0E 1C 02 99 22 D6 3D 31 2F 33 2A 22 47 |"......".=1/3*"G|
000006A0: 22 2A 22 48 00 B2 0E 26 02 56 B2 28 47 AC 48 29 |"*"H...&.V.(G.H)|
000006B0: AD 33 00 BD 0E 30 02 99 22 D6 3D 22 56 00 C7 0E |.3...0..".="V...|
000006C0: 3A 02 99 3A 99 3A 99 00 E8 0E 44 02 99 22 C2 49 |:..:.:....D..".I|
000006D0: 54 54 45 20 45 49 4E 45 20 D4 41 53 54 45 20 44 |TTE EINE .ASTE D|
000006E0: 52 55 45 43 4B 45 4E 22 00 FE 0E 4E 02 A1 20 41 |RUECKEN"...N.. A|
000006F0: 24 3A 8B 20 41 24 B2 22 22 A7 20 35 39 30 00 08 |$:. A$."". 590..|
00000700: 0F 58 02 89 20 31 30 30 00 2B 0F E8 03 8F 20 2D |.X.. 100.+.... -|
00000710: 2D 42 45 52 45 43 48 4E 55 4E 47 20 44 45 52 20 |-BERECHNUNG DER |
00000720: 48 4F 45 48 45 2D 2D 20 3C 32 3E 00 3C 0F F2 03 |HOEHE-- <2>.<...|
00000730: 99 22 93 22 3A 97 20 36 34 36 2C 34 00 69 0F FC |.".":. 646,4.i..|
00000740: 03 99 22 C4 49 45 20 C6 4F 52 4D 45 4C 20 46 55 |..".IE .ORMEL FU|
00000750: 45 52 20 45 49 4E 45 20 D0 59 52 41 4D 49 44 45 |ER EINE .YRAMIDE|
00000760: 20 4C 41 55 54 45 54 3A 22 00 7A 0F 06 04 99 22 | LAUTET:".z...."|
00000770: D6 3D 31 2F 33 2A C7 2A 48 22 00 C0 0F 10 04 99 |.=1/3*.*H"......|
00000780: 22 C4 41 20 44 49 45 20 C8 4F 45 48 45 20 47 45 |".A DIE .OEHE GE|
00000790: 53 55 43 48 54 20 49 53 54 2C 4D 55 53 53 20 44 |SUCHT IST,MUSS D|
000007A0: 49 45 20 C6 4F 52 4D 45 4C 4E 55 4E 20 4E 41 43 |IE .ORMELNUN NAC|
000007B0: 48 20 48 20 41 55 46 47 45 4C 4F 45 53 54 22 3B |H H AUFGELOEST";|
000007C0: 00 D2 0F 1A 04 99 22 20 57 45 52 44 45 4E 3A 22 |......" WERDEN:"|
000007D0: 3A 99 00 F5 0F 24 04 99 22 D6 20 20 20 20 20 20 |:....$..". |
000007E0: 3D 20 20 20 31 2F 33 2A C7 2A 48 20 20 20 20 20 |= 1/3*.*H |
000007F0: 20 20 B4 2A 33 00 18 10 2E 04 99 22 D6 2A 33 20 | .*3......".*3 |
00000800: 20 20 20 3D 20 20 20 20 20 20 20 C7 2A 48 20 20 | = .*H |
00000810: 20 20 20 20 20 A5 2F C7 00 31 10 38 04 99 22 28 | ./..1.8.."(|
00000820: D6 2A 33 29 2F C7 3D 20 20 20 20 20 20 20 20 20 |.*3)/.= |
00000830: 48 00 37 10 3D 04 99 00 45 10 42 04 99 22 20 20 |H.7.=...E.B.." |
00000840: 20 20 D6 2A 33 00 53 10 4C 04 99 22 3D 3E 48 3D | .*3.S.L.."=>H=|
00000850: 2D 2D 2D 00 60 10 56 04 99 22 20 20 20 20 20 C7 |---.`.V.." .|
00000860: 00 84 10 60 04 99 22 11 11 11 C2 49 54 54 45 20 |...`.."....ITTE |
00000870: 45 49 4E 45 20 D4 41 53 54 45 20 44 52 55 45 43 |EINE .ASTE DRUEC|
00000880: 4B 45 4E 22 00 98 10 6A 04 A1 41 24 3A 8B 41 24 |KEN"...j..A$:.A$|
00000890: B2 22 22 A7 31 31 33 30 00 A1 10 74 04 99 22 93 |."".1130...t..".|
000008A0: 22 00 C5 10 7E 04 99 22 CE 55 4E 20 49 53 54 20 |"...~..".UN IST |
000008B0: 4E 4F 43 48 20 C7 20 5A 55 20 45 52 4D 49 54 54 |NOCH . ZU ERMITT|
000008C0: 45 4C 4E 3A 22 00 D2 10 88 04 99 22 C9 53 54 20 |ELN:"......".ST |
000008D0: C7 3A 00 E9 10 92 04 99 22 3C 31 3E 20 C5 49 4E |.:......"<1> .IN|
000008E0: 20 D1 55 41 44 52 41 54 22 00 01 11 9C 04 99 22 | .UADRAT"......"|
000008F0: 3C 32 3E 20 C5 49 4E 20 D2 45 43 48 54 45 43 4B |<2> .IN .ECHTECK|
00000900: 22 00 1F 11 A6 04 99 22 3C 33 3E 20 C5 49 4E 20 |"......"<3> .IN |
00000910: D0 41 52 41 4C 4C 45 4C 4F 47 52 41 4D 4D 22 00 |.ARALLELOGRAMM".|
00000920: 33 11 B0 04 A1 41 24 3A 8B 41 24 B2 22 22 A7 31 |3....A$:.A$."".1|
00000930: 32 30 30 00 3F 11 BA 04 41 B2 C5 28 41 24 29 00 |200.?...A..(A$).|
00000940: 51 11 C4 04 8B 41 B3 31 B0 41 B1 33 A7 31 32 30 |Q....A.1.A.3.120|
00000950: 30 00 6A 11 CE 04 91 20 41 20 89 20 31 32 34 30 |0.j.... A . 1240|
00000960: 2C 31 32 35 30 2C 31 32 36 30 00 9A 11 D8 04 99 |,1250,1260......|
00000970: 22 C9 4E 20 44 49 45 53 45 4D 20 C6 41 4C 4C 45 |".N DIESEM .ALLE|
00000980: 20 4C 41 55 54 45 54 20 44 49 45 20 C6 4F 52 4D | LAUTET DIE .ORM|
00000990: 45 4C 20 46 55 45 52 20 C7 22 00 A7 11 D9 04 99 |EL FUER ."......|
000009A0: 22 C7 3D 41 5E 32 22 00 BF 11 DA 04 85 22 D7 49 |".=A^2"......".I|
000009B0: 45 20 4C 41 4E 47 20 49 53 54 20 41 22 3B 41 00 |E LANG IST A";A.|
000009C0: D0 11 DB 04 47 B2 41 AE 32 3A 99 22 C7 3D 22 47 |....G.A.2:.".="G|
000009D0: 00 DB 11 DC 04 89 20 31 32 37 30 00 0B 12 E2 04 |...... 1270.....|
000009E0: 99 22 C9 4E 20 44 49 45 53 45 4D 20 C6 41 4C 4C |.".N DIESEM .ALL|
000009F0: 45 20 4C 41 55 54 45 54 20 44 49 45 20 C6 4F 52 |E LAUTET DIE .OR|
00000A00: 4D 45 4C 20 46 55 45 52 20 C7 22 00 18 12 E3 04 |MEL FUER .".....|
00000A10: 99 22 C7 3D 41 2A 42 22 00 30 12 E4 04 85 22 D7 |.".=A*B".0....".|
00000A20: 49 45 20 4C 41 4E 47 20 49 53 54 20 41 22 3B 41 |IE LANG IST A";A|
00000A30: 00 48 12 E5 04 85 22 D7 49 45 20 4C 41 4E 47 20 |.H....".IE LANG |
00000A40: 49 53 54 20 42 22 3B 42 00 59 12 E6 04 47 B2 41 |IST B";B.Y...G.A|
00000A50: AC 42 3A 99 22 C7 3D 22 47 00 64 12 E7 04 89 20 |.B:.".="G.d.... |
00000A60: 31 32 37 30 00 94 12 EC 04 99 22 C9 4E 20 44 49 |1270......".N DI|
00000A70: 45 53 45 4D 20 C6 41 4C 4C 45 20 4C 41 55 54 45 |ESEM .ALLE LAUTE|
00000A80: 54 20 44 49 45 20 C6 4F 52 4D 45 4C 20 46 55 45 |T DIE .ORMEL FUE|
00000A90: 52 20 C7 22 00 A2 12 ED 04 99 22 C7 3D 41 2A 48 |R ."......".=A*H|
00000AA0: 41 22 00 BA 12 EE 04 85 22 D7 49 45 20 4C 41 4E |A"......".IE LAN|
00000AB0: 47 20 49 53 54 20 41 22 3B 41 00 D4 12 EF 04 85 |G IST A";A......|
00000AC0: 22 D7 49 45 20 4C 41 4E 47 20 49 53 54 20 48 41 |".IE LANG IST HA|
00000AD0: 22 3B 48 41 00 E6 12 F0 04 47 B2 41 AC 48 41 3A |";HA.....G.A.HA:|
00000AE0: 99 22 C7 3D 22 47 00 F1 12 F1 04 89 20 31 32 37 |.".="G...... 127|
00000AF0: 30 00 00 13 F6 04 81 58 B2 30 A4 35 30 30 3A 82 |0......X.0.500:.|
00000B00: 00 09 13 00 05 99 22 93 22 00 2D 13 0A 05 85 22 |......".".-...."|
00000B10: CE 55 4E 20 4D 55 53 53 20 49 43 48 20 4E 4F 43 |.UN MUSS ICH NOC|
00000B20: 48 20 D6 20 4B 45 4E 4E 45 4E 22 3B 56 00 33 13 |H . KENNEN";V.3.|
00000B30: 14 05 99 00 44 13 1E 05 99 22 48 3D 28 33 2A D6 |....D...."H=(3*.|
00000B40: 29 2F C7 22 00 57 13 28 05 99 22 48 3D 28 33 2A |)/.".W.(.."H=(3*|
00000B50: 22 56 22 29 2F 22 47 00 65 13 32 05 48 B2 28 33 |"V")/"G.e.2.H.(3|
00000B60: AC 56 29 AD 47 00 70 13 3C 05 99 22 48 3D 22 48 |.V).G.p.<.."H="H|
00000B70: 00 7B 13 46 05 99 22 11 11 11 22 00 9D 13 50 05 |.{.F.."..."...P.|
00000B80: 99 22 C2 49 54 54 45 20 45 49 4E 45 20 D4 41 53 |.".ITTE EINE .AS|
00000B90: 54 45 20 44 52 55 45 43 4B 45 4E 2E 22 00 B4 13 |TE DRUECKEN."...|
00000BA0: 5A 05 A1 20 41 24 3A 8B 20 41 24 B2 22 22 A7 20 |Z.. A$:. A$."". |
00000BB0: 31 33 37 30 00 BE 13 64 05 89 20 31 30 30 00 E9 |1370...d.. 100..|
00000BC0: 13 D0 07 8F 20 2D 2D 42 45 52 45 43 48 4E 55 4E |.... --BERECHNUN|
00000BD0: 47 20 45 49 4E 45 52 20 53 45 49 54 45 4E 48 4F |G EINER SEITENHO|
00000BE0: 45 48 45 2D 2D 20 3C 33 3E 00 FB 13 DA 07 99 22 |EHE-- <3>......"|
00000BF0: 93 22 3A 97 20 36 34 36 2C 31 30 00 42 14 E4 07 |.":. 646,10.B...|
00000C00: 99 22 D5 4D 20 45 49 4E 45 20 D3 45 49 54 45 4E |.".M EINE .EITEN|
00000C10: 48 4F 45 48 45 20 5A 55 20 42 45 52 45 43 48 4E |HOEHE ZU BERECHN|
00000C20: 45 4E 2C 49 53 54 20 45 53 20 4E 4F 54 57 45 4E |EN,IST ES NOTWEN|
00000C30: 44 49 47 2C 44 49 45 20 C8 4F 45 48 45 20 5A 55 |DIG,DIE .OEHE ZU|
00000C40: 22 3B 00 89 14 EE 07 99 22 20 4B 45 4E 4E 45 4E |";......" KENNEN|
00000C50: 2E D3 4F 4C 4C 54 45 20 20 20 20 44 49 45 53 20 |..OLLTE DIES |
00000C60: 4E 49 43 48 54 20 44 45 52 20 C6 41 4C 4C 20 53 |NICHT DER .ALL S|
00000C70: 45 49 4E 2C 47 45 48 45 4E 20 D3 49 45 20 42 49 |EIN,GEHEN .IE BI|
00000C80: 54 54 45 45 52 53 54 22 3B 00 9E 14 F8 07 99 22 |TTEERST";......"|
00000C90: 20 5A 55 4D 20 D0 55 4E 4B 54 20 3C 32 3E 00 A4 | ZUM .UNKT <2>..|
00000CA0: 14 02 08 99 00 C1 14 0C 08 99 22 CE 41 43 48 20 |..........".ACH |
00000CB0: D0 48 59 54 41 47 4F 52 41 53 20 47 49 4C 54 3A |.HYTAGORAS GILT:|
00000CC0: 22 00 D9 14 16 08 99 22 48 5E 32 2B 28 41 2F 32 |"......"H^2+(A/2|
00000CD0: 29 5E 32 3D 48 53 5E 32 22 00 FB 14 20 08 99 3A |)^2=HS^2"... ..:|
00000CE0: 99 22 C2 45 4D 45 52 4B 55 4E 47 3A 48 53 3D D3 |.".EMERKUNG:HS=.|
00000CF0: 45 49 54 45 4E 48 4F 45 48 45 22 00 2A 15 2A 08 |EITENHOEHE".*.*.|
00000D00: 99 22 11 11 11 C4 41 20 4A 41 20 48 20 42 45 4B |."....A JA H BEK|
00000D10: 41 4E 4E 54 20 49 53 54 2C 46 45 48 4C 54 20 4E |ANNT IST,FEHLT N|
00000D20: 55 52 20 4E 4F 43 48 20 41 22 00 32 15 34 08 85 |UR NOCH A".2.4..|
00000D30: 20 41 00 4B 15 39 08 85 22 D7 49 45 20 47 52 4F | A.K.9..".IE GRO|
00000D40: 53 53 20 49 53 54 20 48 22 3B 48 00 65 15 3E 08 |SS IST H";H.e.>.|
00000D50: 48 53 B2 BA 28 28 48 AE 32 29 AA 28 28 41 AD 32 |HS..((H.2).((A.2|
00000D60: 29 AE 32 29 29 00 72 15 48 08 99 22 48 53 3D 22 |).2)).r.H.."HS="|
00000D70: 48 53 00 7A 15 5C 08 99 3A 99 00 9C 15 66 08 99 |HS.z.\..:....f..|
00000D80: 22 C2 49 54 54 45 20 45 49 4E 45 20 D4 41 53 54 |".ITTE EINE .AST|
00000D90: 45 20 44 52 55 45 43 4B 45 4E 2E 22 00 B3 15 70 |E DRUECKEN."...p|
00000DA0: 08 A1 20 41 24 3A 8B 20 41 24 B2 22 22 A7 20 32 |.. A$:. A$."". 2|
00000DB0: 31 36 30 00 BD 15 7A 08 89 20 31 30 30 00 E8 15 |160...z.. 100...|
00000DC0: B8 0B 8F 20 2D 2D 42 45 52 45 43 48 4E 55 4E 47 |... --BERECHNUNG|
00000DD0: 20 45 49 4E 45 52 20 53 45 49 54 45 4E 4B 41 4E | EINER SEITENKAN|
00000DE0: 54 45 2D 2D 20 3C 34 3E 00 FA 15 C2 0B 99 22 93 |TE-- <4>......".|
00000DF0: 22 3A 97 20 36 34 36 2C 31 34 00 41 16 CC 0B 99 |":. 646,14.A....|
00000E00: 22 D5 4D 20 45 49 4E 45 20 D3 45 49 54 45 4E 4B |".M EINE .EITENK|
00000E10: 41 4E 54 45 20 5A 55 20 42 45 52 45 43 48 4E 45 |ANTE ZU BERECHNE|
00000E20: 4E 2C 49 53 54 20 45 53 20 4E 4F 54 57 45 4E 44 |N,IST ES NOTWEND|
00000E30: 49 47 2C 44 49 45 20 C8 4F 45 48 45 20 5A 55 22 |IG,DIE .OEHE ZU"|
00000E40: 3B 00 88 16 D6 0B 99 22 20 4B 45 4E 4E 45 4E 2E |;......" KENNEN.|
00000E50: D3 4F 4C 4C 54 45 20 20 20 20 44 49 45 53 20 4E |.OLLTE DIES N|
00000E60: 49 43 48 54 20 44 45 52 20 C6 41 4C 4C 20 53 45 |ICHT DER .ALL SE|
00000E70: 49 4E 2C 47 45 48 45 4E 20 D3 49 45 20 42 49 54 |IN,GEHEN .IE BIT|
00000E80: 54 45 45 52 53 54 22 3B 00 9D 16 E0 0B 99 22 20 |TEERST";......" |
00000E90: 5A 55 4D 20 D0 55 4E 4B 54 20 3C 32 3E 00 A3 16 |ZUM .UNKT <2>...|
00000EA0: EA 0B 99 00 C0 16 F4 0B 99 22 CE 41 43 48 20 D0 |.........".ACH .|
00000EB0: 48 59 54 41 47 4F 52 41 53 20 47 49 4C 54 3A 22 |HYTAGORAS GILT:"|
00000EC0: 00 D7 16 FE 0B 99 22 48 53 5E 32 3D 28 44 2F 32 |......"HS^2=(D/2|
00000ED0: 29 5E 32 2B 48 5E 32 00 DF 16 08 0C 99 3A 99 00 |)^2+H^2......:..|
00000EE0: 09 17 12 0C 99 22 C2 45 4D 45 52 4B 55 4E 47 3A |.....".EMERKUNG:|
00000EF0: 48 53 3D C8 4F 45 48 45 20 44 45 52 20 D3 45 49 |HS=.OEHE DER .EI|
00000F00: 54 45 4E 4B 41 4E 54 45 22 00 37 17 1C 0C 99 22 |TENKANTE".7...."|
00000F10: 20 20 20 20 20 20 20 20 20 20 44 3D C4 49 41 47 | D=.IAG|
00000F20: 4F 4E 41 4C 45 20 44 45 52 20 C7 52 55 4E 44 46 |ONALE DER .RUNDF|
00000F30: 4C 41 45 43 48 45 22 00 3D 17 26 0C 99 00 71 17 |LAECHE".=.&...q.|
00000F40: 30 0C 99 22 CE 55 4E 20 4D 55 53 53 20 4C 45 44 |0..".UN MUSS LED|
00000F50: 49 47 4C 49 43 48 20 4E 4F 43 48 20 44 20 42 45 |IGLICH NOCH D BE|
00000F60: 52 45 43 48 4E 45 54 20 57 45 52 2D 44 45 4E 2E |RECHNET WER-DEN.|
00000F70: 22 00 95 17 3A 0C 99 22 11 11 C2 49 54 54 45 20 |"...:.."...ITTE |
00000F80: 45 49 4E 45 20 D4 41 53 54 45 20 44 52 55 45 43 |EINE .ASTE DRUEC|
00000F90: 4B 45 4E 2E 22 00 AC 17 44 0C A1 20 41 24 3A 8B |KEN."...D.. A$:.|
00000FA0: 20 41 24 B2 22 22 A7 20 33 31 34 30 00 B5 17 4E | A$."". 3140...N|
00000FB0: 0C 99 22 93 22 00 DF 17 58 0C 99 22 C9 53 54 20 |.."."...X..".ST |
00000FC0: 44 49 45 20 C7 52 55 4E 44 46 4C 41 45 43 48 45 |DIE .RUNDFLAECHE|
00000FD0: 20 44 45 52 20 D0 59 52 41 4D 49 44 45 3A 22 00 | DER .YRAMIDE:".|
00000FE0: F6 17 62 0C 99 22 3C 31 3E 20 C5 49 4E 20 D1 55 |..b.."<1> .IN .U|
00000FF0: 41 44 52 41 54 22 00 0E 18 6C 0C 99 22 3C 32 3E |ADRAT"...l.."<2>|
00001000: 20 C5 49 4E 20 D2 45 43 48 54 45 43 4B 22 00 25 | .IN .ECHTECK".%|
00001010: 18 76 0C A1 20 41 24 3A 8B 20 41 24 B2 22 22 A7 |.v.. A$:. A$."".|
00001020: 20 33 31 39 30 00 31 18 80 0C 41 B2 C5 28 41 24 | 3190.1...A..(A$|
00001030: 29 00 49 18 8A 0C 8B 20 41 B3 B1 31 AF 41 B3 B1 |).I.... A..1.A..|
00001040: 32 A7 20 89 20 33 31 39 30 00 5B 18 94 0C 8B 20 |2. . 3190.[.... |
00001050: 41 B2 31 A7 20 89 20 33 33 30 30 00 6D 18 9E 0C |A.1. . 3300.m...|
00001060: 8B 20 41 B2 32 A7 20 89 20 33 34 30 30 00 AA 18 |. A.2. . 3400...|
00001070: E4 0C 99 22 C4 49 45 20 C6 4F 52 4D 45 4C 20 46 |...".IE .ORMEL F|
00001080: 55 45 52 20 44 49 45 20 C4 49 41 47 4F 4E 41 4C |UER DIE .IAGONAL|
00001090: 45 20 45 49 4E 45 53 20 D1 55 41 2D 44 52 41 54 |E EINES .UA-DRAT|
000010A0: 53 20 4C 41 55 54 45 54 3A 22 00 BB 18 EE 0C 99 |S LAUTET:"......|
000010B0: 22 44 5E 32 3D 32 2A 41 5E 32 22 00 D4 18 F8 0C |"D^2=2*A^2".....|
000010C0: 85 22 D7 49 45 20 47 52 4F 53 53 20 49 53 54 20 |.".IE GROSS IST |
000010D0: 41 22 3B 41 00 E3 18 02 0D 44 B2 BA 28 41 AE 32 |A";A.....D..(A.2|
000010E0: AC 32 29 00 EE 18 0C 0D 99 22 44 3D 22 44 00 F9 |.2)......"D="D..|
000010F0: 18 16 0D 89 20 33 35 30 30 00 3A 19 48 0D 99 22 |.... 3500.:.H.."|
00001100: C4 49 45 20 C6 4F 52 4D 45 4C 20 46 55 45 52 20 |.IE .ORMEL FUER |
00001110: 44 49 45 20 C4 49 41 47 4F 4E 41 4C 45 20 45 49 |DIE .IAGONALE EI|
00001120: 4E 45 53 20 20 20 20 20 D2 45 43 48 54 45 43 4B |NES .ECHTECK|
00001130: 53 20 4C 41 55 54 45 54 3A 22 00 4D 19 52 0D 99 |S LAUTET:".M.R..|
00001140: 22 44 5E 32 3D 41 5E 32 2B 42 5E 32 22 00 66 19 |"D^2=A^2+B^2".f.|
00001150: 5C 0D 85 22 57 49 45 20 47 52 4F 53 53 20 49 53 |\.."WIE GROSS IS|
00001160: 54 20 41 22 3B 41 00 7F 19 66 0D 85 22 57 49 45 |T A";A...f.."WIE|
00001170: 20 47 52 4F 53 53 20 49 53 54 20 42 22 3B 42 00 | GROSS IST B";B.|
00001180: 90 19 70 0D 44 B2 BA 28 41 AE 32 AA 42 AE 32 29 |..p.D..(A.2.B.2)|
00001190: 00 9B 19 7A 0D 99 22 44 3D 22 44 00 A6 19 84 0D |...z.."D="D.....|
000011A0: 89 20 33 35 30 30 00 AE 19 AC 0D 99 3A 99 00 F8 |. 3500......:...|
000011B0: 19 B6 0D 99 22 C4 41 20 44 20 4E 55 4E 20 42 45 |....".A D NUN BE|
000011C0: 4B 41 4E 4E 54 20 49 53 54 2C 4B 41 4E 4E 20 44 |KANNT IST,KANN D|
000011D0: 49 45 20 45 42 45 4E 47 45 2D 20 20 20 4E 41 4E |IE EBENGE- NAN|
000011E0: 4E 54 45 20 C6 4F 52 4D 45 4C 20 41 4E 47 45 57 |NTE .ORMEL ANGEW|
000011F0: 45 4E 44 45 54 20 22 3B 00 06 1A C0 0D 99 22 57 |ENDET ";......"W|
00001200: 45 52 44 45 4E 3A 00 1D 1A CA 0D 99 22 48 53 5E |ERDEN:......"HS^|
00001210: 32 3D 28 44 2F 32 29 5E 32 2B 48 5E 32 00 37 1A |2=(D/2)^2+H^2.7.|
00001220: D4 0D 48 53 B2 BA 28 28 28 44 AD 32 29 AE 32 29 |..HS..(((D.2).2)|
00001230: AA 28 48 AE 32 29 29 00 44 1A DE 0D 99 22 48 53 |.(H.2)).D...."HS|
00001240: 3D 22 48 53 00 4E 1A E8 0D 99 3A 99 3A 99 00 70 |="HS.N....:.:..p|
00001250: 1A F2 0D 99 22 C2 49 54 54 45 20 45 49 4E 45 20 |....".ITTE EINE |
00001260: D4 41 53 54 45 20 44 52 55 45 43 4B 45 4E 2E 22 |.ASTE DRUECKEN."|
00001270: 00 87 1A FC 0D A1 20 41 24 3A 8B 20 41 24 B2 22 |...... A$:. A$."|
00001280: 22 A7 20 33 35 38 30 00 91 1A 06 0E 89 20 31 30 |". 3580...... 10|
00001290: 30 00 00 00 |0... |
....... 100.4...........................
.............].... PROGRAMM ZUR BERECHNU
NG EINER ....(.. PYRAMIDE
....2.. ...................
.......... ..X.<.. (C) 1988 BY MARKUS
PAHL ....F.. IDEE BY BE. LOSS
..(.P.....................
...................Z.:.J.D.. --MENUEPROG
RAMM-- <0>...N.. 53280,0:. 53281,0:. 646
,5:.".":. G(8):. 53272,23...S.. 808,225.
..X..".. PYRAMIDEN-BERECHNUNG.Z.
..." --------------------"......
:.:.:.......".<1> BERECHNUNG DES VOLUMEN
S".+. ..".<2> BERECHNUNG DER HOEHE".T...
.".<3> BERECHNUNG EINER SEITENHOEHE".}..
..".<4> BERECHNUNG EINER SEITENKANTE"...
...".............(C) 1988 BY MARKUS PAHL
...H.. A$:. A$."". 200.J.R.A.E(A$)......
A.1.A.4.200...... A . 300,1000,2000,300
0.....:.%.,.. --BERECHNUNG DES VOLUMENS-
- <1>.6.6..".":. 646,3.}.@..".DIE FORMEL
ZUR BERECHNUNG DES VOLUMENS EINER PYRA
MIDE LAUTET:"...J..".V=1/3*G*H.K.T.."UM
ALSO V ZU BERECHNEN,MUSS ERST G BEK
ANNT SEIN."...^.."G IST DIE GRUNDFLAECHE
.ES KOMMT ALSO AUFDIE ART DER GRUNDFLAEC
HE AN."...H...*.R.."IST G:.A.|.."<1> EIN
QUADRAT".Y...."<2> EIN RECHTECK".W...."
<3> EIN PARALLELOGRAMM"......A$:.A$."".4
10.....A.E(A$)......A.1.A.3.410...... A
. 450,460,470...B.."IN DIESEM FALLE LAUT
ET DIE FORMEL FUER G"...C.."G=A^2"...D..
"WIE GROSS IST A";A.$.E.G.A.2:."G="G...F
.. 500.^.L.."IN DIESEM FALLE LAUTET DIE
FORMEL FUER G".K.M.."G=A*B"...N.."WIE GR
OSS IST A";A...O.."WIE LANG IST B";B...P
.G.A.B:."G="G...Q.. 500...V.."IN DIESEM
FALLE LAUTET DIE FORMEL FUER G"...W.."G=
A*HA"...X.."WIE GROSS IST A";A.(.Y.."WIE
LANG IST HA";HA.:.Z.G.A.HA:."G="G.D....
500.S....X.0.500:..\...."."......"NUN M
USS ICH NOCH H KENNEN";H......"V=1/3*G*H
"......"V=1/3*"G"*"H...&.V.(G.H).3...0..
"V="V.G.:..:.:....D.."BITTE EINE TASTE D
RUECKEN"...N.. A$:. A$."". 590...X.. 100
.+.... --BERECHNUNG DER HOEHE-- <2>.<...
.".":. 646,4.I...."DIE FORMEL FUER EINE
PYRAMIDE LAUTET:".Z...."V=1/3*G*H"......
"DA DIE HOEHE GESUCHT IST,MUSS DIE FORME
LNUN NACH H AUFGELOEST";.R...." WERDEN:"
:....$.."V = 1/3*G*H .*3...
..."V*3 = G*H ./G.1.8.."(
V*3)/G= H.7.=...E.B.." V*3.S.
L.."=>H=---.`.V.." G...`.."...BITTE
EINE TASTE DRUECKEN"...J..A$:.A$."".1130
...T..".".E.~.."NUN IST NOCH G ZU ERMITT
ELN:".R...."IST G:......"<1> EIN QUADRAT
"......"<2> EIN RECHTECK"......"<3> EIN
PARALLELOGRAMM".3....A$:.A$."".1200.?...
A.E(A$).Q.D..A.1.A.3.1200.J.N.. A . 1240
,1250,1260...X.."IN DIESEM FALLE LAUTET
DIE FORMEL FUER G"...Y.."G=A^2"...Z.."WI
E LANG IST A";A.P...G.A.2:."G="G...... 1
270......"IN DIESEM FALLE LAUTET DIE FOR
MEL FUER G"......"G=A*B".0...."WIE LANG
IST A";A.H...."WIE LANG IST B";B.Y...G.A
.B:."G="G.D.... 1270......"IN DIESEM FAL
LE LAUTET DIE FORMEL FUER G"......"G=A*H
A"......"WIE LANG IST A";A.T...."WIE LAN
G IST HA";HA.....G.A.HA:."G="G...... 127
0......X.0.500:.......".".-...."NUN MUSS
ICH NOCH V KENNEN";V.3.....D...."H=(3*V
)/G".W.(.."H=(3*"V")/"G.E.2.H.(3.V).G.P.
<.."H="H.{.F.."..."...P.."BITTE EINE TAS
TE DRUECKEN."...Z.. A$:. A$."". 1370...D
.. 100...P.. --BERECHNUNG EINER SEITENHO
EHE-- <3>...Z..".":. 646,10.B...."UM EIN
E SEITENHOEHE ZU BERECHNEN,IST ES NOTWEN
DIG,DIE HOEHE ZU";......" KENNEN.SOLLTE
DIES NICHT DER FALL SEIN,GEHEN SIE BI
TTEERST";......" ZUM PUNKT <2>.......A..
.."NACH PHYTAGORAS GILT:".Y...."H^2+(A/2
)^2=HS^2"... ..:."BEMERKUNG:HS=SEITENHOE
HE".*.*.."...DA JA H BEKANNT IST,FEHLT N
UR NOCH A".2.4.. A.K.9.."WIE GROSS IST H
";H.E.>.HS..((H.2).((A.2).2)).R.H.."HS="
HS.Z.\..:....F.."BITTE EINE TASTE DRUECK
EN."...P.. A$:. A$."". 2160...Z.. 100...
... --BERECHNUNG EINER SEITENKANTE-- <4>
...B..".":. 646,14.A.L.."UM EINE SEITENK
ANTE ZU BERECHNEN,IST ES NOTWENDIG,DIE H
OEHE ZU";...V.." KENNEN.SOLLTE DIES N
ICHT DER FALL SEIN,GEHEN SIE BITTEERST";
......" ZUM PUNKT <2>............"NACH P
HYTAGORAS GILT:".W...."HS^2=(D/2)^2+H^2.
.....:......."BEMERKUNG:HS=HOEHE DER SEI
TENKANTE".7...." D=DIAGONALE DE
R GRUNDFLAECHE".=.&...Q.0.."NUN MUSS LED
IGLICH NOCH D BERECHNET WER-DEN."...:.."
..BITTE EINE TASTE DRUECKEN."...D.. A$:.
A$."". 3140...N.."."...X.."IST DIE GRUN
DFLAECHE DER PYRAMIDE:"...B.."<1> EIN QU
ADRAT"...L.."<2> EIN RECHTECK".%.V.. A$:
. A$."". 3190.1...A.E(A$).I.... A..1.A..
2. . 3190.[.... A.1. . 3300.M.... A.2. .
3400......"DIE FORMEL FUER DIE DIAGONAL
E EINES QUA-DRATS LAUTET:"......"D^2=2*A
^2".T...."WIE GROSS IST A";A.....D..(A.2
.2)......"D="D...... 3500.:.H.."DIE FORM
EL FUER DIE DIAGONALE EINES RECHTECK
S LAUTET:".M.R.."D^2=A^2+B^2".F.\.."WIE
GROSS IST A";A..F.."WIE GROSS IST B";B.
..P.D..(A.2.B.2)...Z.."D="D...... 3500..
....:......."DA D NUN BEKANNT IST,KANN D
IE EBENGE- NANNTE FORMEL ANGEWENDET ";
......"WERDEN:...J.."HS^2=(D/2)^2+H^2.7.
T.HS..(((D.2).2).(H.2)).D...."HS="HS.N..
..:.:..P...."BITTE EINE TASTE DRUECKEN."
...... A$:. A$."". 3580...... 100...
> CLICK IMAGE PREVIEW FOR FULL MODAL