DREHEN
FILE INFORMATION
FILENAME(S): DREHEN
FILE TYPE(S): PRG
FILE SIZE: 5.2K
FIRST SEEN: 2025-10-20 14:37:13
APPEARS ON: 1 disk(s)
FILE HASH
e51da0a38a76462515222662f3a0a538be1c75bbcfaa4bd3b934e795012e403f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ET | DREHEN | PRG | Treasure Chest - LehrerMIL | 25 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 31 08 0A 00 20 8F 20 20 50 52 4F 47 52 41 |..1... . PROGRA| 00000010: 4D 4D 45 20 46 55 45 52 20 44 45 4E 20 4D 41 54 |MME FUER DEN MAT| 00000020: 48 45 4D 41 54 49 4B 55 4E 54 45 52 52 49 43 48 |HEMATIKUNTERRICH| 00000030: 54 00 58 08 14 00 20 8F 20 20 44 52 45 48 45 4E |T.X... . DREHEN| 00000040: 20 20 20 28 44 52 45 48 45 4E 20 56 4F 4E 20 4B | (DREHEN VON K| 00000050: 4F 45 52 50 45 52 4E 29 00 5E 08 1E 00 3A 00 90 |OERPERN).^...:..| 00000060: 08 28 00 20 8F 20 20 50 52 4F 47 52 41 4D 4D 41 |.(. . PROGRAMMA| 00000070: 55 54 4F 52 45 4E 3A 20 20 49 4E 47 4F 20 57 45 |UTOREN: INGO WE| 00000080: 49 44 49 47 2C 20 50 41 55 4C 20 53 41 4E 44 20 |IDIG, PAUL SAND | 00000090: 00 C8 08 32 00 20 8F 20 20 43 4F 50 59 52 49 47 |...2. . COPYRIG| 000000A0: 48 54 20 28 43 29 20 20 45 52 4E 53 54 20 4B 4C |HT (C) ERNST KL| 000000B0: 45 54 54 20 56 45 52 4C 41 47 45 20 47 4D 42 48 |ETT VERLAGE GMBH| 000000C0: 20 26 20 43 4F 20 4B 47 00 DF 08 3C 00 20 8F 20 | & CO KG...<. . | 000000D0: 20 53 54 55 54 54 47 41 52 54 20 31 39 38 36 00 | STUTTGART 1986.| 000000E0: E5 08 46 00 3A 00 19 09 50 00 20 8F 20 46 45 4C |..F.:...P. . FEL| 000000F0: 44 45 52 20 55 4E 44 20 4B 4F 4E 53 54 41 4E 54 |DER UND KONSTANT| 00000100: 45 4E 20 28 50 55 4E 4B 54 45 29 20 44 45 46 49 |EN (PUNKTE) DEFI| 00000110: 4E 49 45 52 45 4E 20 20 20 00 3A 09 5A 00 9C 3A |NIEREN .:.Z..:| 00000120: 86 20 58 28 38 29 2C 59 28 38 29 2C 5A 28 38 29 |. X(8),Y(8),Z(8)| 00000130: 2C 57 28 38 29 2C 53 28 38 29 00 77 09 64 00 20 |,W(8),S(8).w.d. | 00000140: 86 20 51 58 28 38 29 2C 51 59 28 38 29 2C 51 5A |. QX(8),QY(8),QZ| 00000150: 28 38 29 2C 50 58 28 34 29 2C 50 59 28 34 29 2C |(8),PX(4),PY(4),| 00000160: 50 5A 28 34 29 2C 5A 58 28 38 29 2C 5A 59 28 38 |PZ(4),ZX(8),ZY(8| 00000170: 29 2C 5A 5A 28 38 29 00 A9 09 6E 00 83 20 20 32 |),ZZ(8)...n.. 2| 00000180: 30 2C 34 30 2C 35 30 2C 20 2D 32 30 2C 34 30 2C |0,40,50, -20,40,| 00000190: 35 30 2C 20 2D 32 30 2C 2D 34 30 2C 35 30 2C 20 |50, -20,-40,50, | 000001A0: 32 30 2C 2D 34 30 2C 35 30 00 DF 09 78 00 83 20 |20,-40,50...x.. | 000001B0: 20 32 30 2C 34 30 2C 2D 35 30 2C 20 2D 32 30 2C | 20,40,-50, -20,| 000001C0: 34 30 2C 2D 35 30 2C 20 2D 32 30 2C 2D 34 30 2C |40,-50, -20,-40,| 000001D0: 2D 35 30 2C 20 32 30 2C 2D 34 30 2C 2D 35 30 00 |-50, 20,-40,-50.| 000001E0: 09 0A 82 00 81 20 49 20 B2 20 31 20 A4 20 38 3A |..... I . 1 . 8:| 000001F0: 20 87 20 51 58 28 49 29 2C 51 59 28 49 29 2C 51 | . QX(I),QY(I),Q| 00000200: 5A 28 49 29 3A 20 82 20 49 00 39 0A 8C 00 83 20 |Z(I): . I.9.... | 00000210: 20 32 36 2C 2D 34 35 2C 2D 32 34 2C 20 32 36 2C | 26,-45,-24, 26,| 00000220: 34 35 2C 2D 32 34 2C 20 2D 35 32 2C 30 2C 2D 32 |45,-24, -52,0,-2| 00000230: 34 2C 20 30 2C 30 2C 37 32 00 64 0A 96 00 20 81 |4, 0,0,72.d... .| 00000240: 20 49 20 B2 20 31 20 A4 20 34 3A 20 87 20 50 58 | I . 1 . 4: . PX| 00000250: 28 49 29 2C 50 59 28 49 29 2C 50 5A 28 49 29 3A |(I),PY(I),PZ(I):| 00000260: 20 82 20 49 00 92 0A A0 00 83 20 20 30 2C 30 2C | . I...... 0,0,| 00000270: 2D 35 30 2C 20 30 2C 2D 35 30 2C 2D 35 30 2C 20 |-50, 0,-50,-50, | 00000280: 35 30 2C 30 2C 2D 35 30 2C 20 30 2C 35 30 2C 2D |50,0,-50, 0,50,-| 00000290: 35 30 00 BC 0A AA 00 83 20 20 30 2C 30 2C 35 30 |50...... 0,0,50| 000002A0: 2C 20 30 2C 2D 35 30 2C 35 30 2C 20 35 30 2C 30 |, 0,-50,50, 50,0| 000002B0: 2C 35 30 2C 20 30 2C 35 30 2C 35 30 00 E7 0A B4 |,50, 0,50,50....| 000002C0: 00 20 81 20 49 20 B2 20 31 20 A4 20 38 3A 20 87 |. . I . 1 . 8: .| 000002D0: 20 5A 58 28 49 29 2C 5A 59 28 49 29 2C 5A 5A 28 | ZX(I),ZY(I),ZZ(| 000002E0: 49 29 3A 20 82 20 49 00 F8 0A BE 00 50 49 20 B2 |I): . I.....PI .| 000002F0: 20 33 2E 31 34 31 35 39 00 FE 0A C8 00 3A 00 1A | 3.14159.....:..| 00000300: 0B D2 00 20 8F 20 41 55 53 57 41 48 4C 20 44 45 |... . AUSWAHL DE| 00000310: 53 20 4B 4F 45 52 50 45 52 53 00 26 0B DC 00 20 |S KOERPERS.&... | 00000320: 99 22 93 22 3B 20 00 4B 0B E6 00 20 99 20 22 44 |."."; .K... . "D| 00000330: 52 45 48 45 4E 20 56 4F 4E 20 4B 4F 45 52 50 45 |REHEN VON KOERPE| 00000340: 52 4E 22 3A 20 99 20 3A 20 99 20 00 66 0B F0 00 |RN": . : . .f...| 00000350: 20 8B 20 46 45 20 B2 20 30 20 A7 20 20 99 20 3A | . FE . 0 . . :| 00000360: 20 89 20 32 36 30 00 AF 0B FA 00 20 99 22 12 22 | . 260..... ."."| 00000370: 3B 20 3A 20 99 20 22 44 55 20 4D 55 53 53 54 20 |; : . "DU MUSST | 00000380: 45 49 4E 45 20 5A 41 48 4C 20 56 4F 4E 20 30 20 |EINE ZAHL VON 0 | 00000390: 42 49 53 20 33 20 45 49 4E 47 45 42 45 4E 21 22 |BIS 3 EINGEBEN!"| 000003A0: 3A 20 99 22 92 22 3B 20 3A 46 45 20 B2 20 30 00 |: ."."; :FE . 0.| 000003B0: D5 0B 04 01 99 20 3A 20 99 20 22 57 41 45 48 4C |..... : . "WAEHL| 000003C0: 45 20 45 49 4E 45 4E 20 4B 4F 45 52 50 45 52 20 |E EINEN KOERPER | 000003D0: 41 55 53 2C 22 00 FF 0B 0E 01 20 99 20 22 44 45 |AUS,"..... . "DE| 000003E0: 52 20 47 45 44 52 45 48 54 20 57 45 52 44 45 4E |R GEDREHT WERDEN| 000003F0: 20 53 4F 4C 4C 3A 22 3A 20 99 20 3A 20 99 20 00 | SOLL:": . : . .| 00000400: 17 0C 18 01 20 99 20 22 31 20 20 20 51 55 41 44 |.... . "1 QUAD| 00000410: 45 52 22 3A 20 99 20 00 31 0C 22 01 20 99 20 22 |ER": . .1.". . "| 00000420: 32 20 20 20 50 59 52 41 4D 49 44 45 22 3A 20 99 |2 PYRAMIDE": .| 00000430: 20 00 53 0C 2C 01 20 99 20 22 33 20 20 20 5A 59 | .S.,. . "3 ZY| 00000440: 4C 49 4E 44 45 52 22 3A 20 99 20 3A 20 99 20 3A |LINDER": . : . :| 00000450: 20 99 20 00 8B 0C 36 01 20 99 20 22 30 20 20 20 | . ...6. . "0 | 00000460: 49 43 48 20 57 49 4C 4C 20 5A 55 52 55 45 43 4B |ICH WILL ZURUECK| 00000470: 20 5A 55 52 20 48 41 55 50 54 41 55 53 57 41 48 | ZUR HAUPTAUSWAH| 00000480: 4C 2E 22 3A 20 99 20 3A 20 99 20 00 B8 0C 40 01 |L.": . : . ...@.| 00000490: 20 99 20 22 47 49 42 20 44 49 45 20 45 4E 54 53 | . "GIB DIE ENTS| 000004A0: 50 52 45 43 48 45 4E 44 45 20 5A 49 46 46 45 52 |PRECHENDE ZIFFER| 000004B0: 20 45 49 4E 20 20 22 3B 00 C2 0C 4A 01 20 85 20 | EIN ";...J. . | 000004C0: 46 24 00 DF 0C 54 01 8B 20 46 24 20 B2 20 22 30 |F$...T.. F$ . "0| 000004D0: 22 20 A7 20 20 93 22 4D 45 4E 55 45 22 2C 38 00 |" . ."MENUE",8.| 000004E0: 19 0D 5E 01 46 20 B2 20 20 C5 20 28 46 24 29 3A |..^.F . . (F$):| 000004F0: 20 8B 20 46 20 B2 20 31 20 A7 20 4E 20 B2 20 38 | . F . 1 . N . 8| 00000500: 3A 52 57 20 B2 20 2E 33 35 3A 52 53 20 B2 20 2E |:RW . .35:RS . .| 00000510: 33 35 3A 20 89 20 37 37 30 00 47 0D 68 01 20 8B |35: . 770.G.h. .| 00000520: 20 46 20 B2 20 32 20 A7 20 4E 20 B2 20 34 3A 52 | F . 2 . N . 4:R| 00000530: 57 20 B2 20 2E 33 35 3A 52 53 20 B2 20 2E 33 35 |W . .35:RS . .35| 00000540: 3A 20 89 20 37 37 30 00 72 0D 72 01 20 8B 20 46 |: . 770.r.r. . F| 00000550: 20 B2 20 33 20 A7 20 4E 20 B2 20 38 3A 52 57 20 | . 3 . N . 8:RW | 00000560: B2 20 30 3A 52 53 20 B2 20 2E 35 3A 20 89 20 37 |. 0:RS . .5: . 7| 00000570: 37 30 00 84 0D 7C 01 46 45 20 B2 20 31 3A 20 89 |70...|.FE . 1: .| 00000580: 20 32 32 30 00 8A 0D 86 01 3A 00 90 0D 90 01 3A | 220.....:.....:| 00000590: 00 B2 0D 9A 01 20 8F 20 20 2A 20 47 52 41 46 49 |..... . * GRAFI| 000005A0: 4B 2D 55 4E 54 45 52 50 52 4F 47 52 41 4D 4D 45 |K-UNTERPROGRAMME| 000005B0: 20 2A 00 B8 0D A4 01 3A 00 E0 0D AE 01 9E 33 36 | *.....:......36| 000005C0: 38 37 33 2C 20 31 31 32 2C 39 38 20 2C 20 31 34 |873, 112,98 , 14| 000005D0: 38 2C 36 32 3A 20 8F 20 20 58 2D 41 43 48 53 45 |8,62: . X-ACHSE| 000005E0: 00 18 0E B8 01 9E 33 36 38 37 33 2C 20 31 31 30 |......36873, 110| 000005F0: 2C 38 37 20 2C 20 31 30 32 2C 39 35 3A 20 9E 33 |,87 , 102,95: .3| 00000600: 36 38 37 33 2C 20 31 30 32 2C 38 37 20 2C 20 31 |6873, 102,87 , 1| 00000610: 31 30 2C 39 35 3A 20 8E 00 3F 0E C2 01 9E 33 36 |10,95: ..?....36| 00000620: 38 37 33 2C 20 36 30 2C 38 30 20 2C 20 32 30 30 |873, 60,80 , 200| 00000630: 2C 38 30 3A 20 8F 20 20 59 2D 41 43 48 53 45 00 |,80: . Y-ACHSE.| 00000640: 81 0E CC 01 9E 33 36 38 37 33 2C 20 32 30 36 2C |.....36873, 206,| 00000650: 37 36 20 2C 20 32 31 30 2C 38 30 3A 20 9E 33 36 |76 , 210,80: .36| 00000660: 38 37 33 2C 20 32 31 34 2C 37 36 2C 32 31 30 2C |873, 214,76,210,| 00000670: 38 30 3A 9E 33 36 38 37 39 2C 20 32 31 30 2C 38 |80:.36879, 210,8| 00000680: 34 00 89 0E D6 01 20 8E 20 00 B1 0E E0 01 9E 33 |4..... . ......3| 00000690: 36 38 37 33 2C 20 31 32 39 2C 35 20 2C 20 31 32 |6873, 129,5 , 12| 000006A0: 39 2C 31 35 30 3A 20 8F 20 20 5A 2D 41 43 48 53 |9,150: . Z-ACHS| 000006B0: 45 00 E7 0E EA 01 9E 33 36 38 37 33 2C 31 33 35 |E......36873,135| 000006C0: 2C 32 2C 31 34 33 2C 32 3A 9E 33 36 38 37 39 2C |,2,143,2:.36879,| 000006D0: 31 33 35 2C 31 30 3A 9E 33 36 38 37 39 2C 31 34 |135,10:.36879,14| 000006E0: 33 2C 31 30 3A 20 8E 00 ED 0E F4 01 3A 00 FB 0E |3,10: ......:...| 000006F0: FE 01 8F 20 20 51 55 41 44 45 52 00 10 0F 08 02 |... QUADER.....| 00000700: 20 81 20 49 20 B2 20 30 20 A4 20 34 20 A9 20 34 | . I . 0 . 4 . 4| 00000710: 00 2F 0F 12 02 20 9E 33 36 38 37 36 2C 20 57 28 |./... .36876, W(| 00000720: 49 20 AA 20 34 29 2C 53 28 49 20 AA 20 34 29 00 |I . 4),S(I . 4).| 00000730: 5E 0F 1C 02 81 20 4A 20 B2 20 31 20 A4 20 34 3A |^.... J . 1 . 4:| 00000740: 20 9E 33 36 38 37 39 2C 57 28 49 20 AA 20 4A 29 | .36879,W(I . J)| 00000750: 2C 53 28 49 20 AA 20 4A 29 3A 20 82 20 4A 00 67 |,S(I . J): . J.g| 00000760: 0F 26 02 20 82 20 49 00 A4 0F 30 02 20 81 20 49 |.&. . I...0. . I| 00000770: 20 B2 20 31 20 A4 20 34 3A 20 9E 33 36 38 37 33 | . 1 . 4: .36873| 00000780: 2C 20 57 28 49 29 2C 53 28 49 29 20 2C 20 57 28 |, W(I),S(I) , W(| 00000790: 49 20 AA 20 34 29 2C 53 28 49 20 AA 20 34 29 3A |I . 4),S(I . 4):| 000007A0: 20 82 20 49 00 AC 0F 3A 02 20 8E 20 00 B2 0F 44 | . I...:. . ...D| 000007B0: 02 3A 00 C2 0F 4E 02 8F 20 20 50 59 52 41 4D 49 |.:...N.. PYRAMI| 000007C0: 44 45 00 FC 0F 58 02 9E 33 36 38 37 36 2C 20 57 |DE...X..36876, W| 000007D0: 28 33 29 2C 53 28 33 29 3A 20 81 20 49 20 B2 20 |(3),S(3): . I . | 000007E0: 31 20 A4 20 33 3A 20 9E 33 36 38 37 39 2C 57 28 |1 . 3: .36879,W(| 000007F0: 49 29 2C 53 28 49 29 3A 20 82 20 49 00 31 10 62 |I),S(I): . I.1.b| 00000800: 02 20 81 20 49 20 B2 20 31 20 A4 20 33 3A 20 9E |. . I . 1 . 3: .| 00000810: 33 36 38 37 33 2C 20 57 28 34 29 2C 53 28 34 29 |36873, W(4),S(4)| 00000820: 20 2C 20 57 28 49 29 2C 53 28 49 29 3A 20 82 20 | , W(I),S(I): . | 00000830: 49 00 39 10 6C 02 20 8E 20 00 3F 10 76 02 3A 00 |I.9.l. . .?.v.:.| 00000840: 4F 10 80 02 8F 20 20 5A 59 4C 49 4E 44 45 52 00 |O.... ZYLINDER.| 00000850: 90 10 8A 02 20 81 20 49 20 B2 20 32 20 A4 20 34 |.... . I . 2 . 4| 00000860: 20 A9 20 32 3A 20 9E 33 36 38 37 33 2C 20 57 28 | . 2: .36873, W(| 00000870: 49 29 2C 53 28 49 29 20 2C 20 57 28 49 20 AA 20 |I),S(I) , W(I . | 00000880: 34 29 2C 53 28 49 20 AA 20 34 29 3A 20 82 20 49 |4),S(I . 4): . I| 00000890: 00 C0 10 94 02 20 81 20 49 20 B2 20 30 20 A4 20 |..... . I . 0 . | 000008A0: 34 20 A9 20 34 3A 20 9E 33 36 38 37 36 2C 20 57 |4 . 4: .36876, W| 000008B0: 28 34 20 AA 20 49 29 2C 53 28 34 20 AA 20 49 29 |(4 . I),S(4 . I)| 000008C0: 00 F1 10 9E 02 20 81 20 57 20 B2 20 30 2E 31 20 |..... . W . 0.1 | 000008D0: A4 20 36 2E 34 20 A9 20 30 2E 31 3A 43 20 B2 20 |. 6.4 . 0.1:C . | 000008E0: 20 BE 20 28 57 29 3A 53 20 B2 20 20 BF 20 28 57 | . (W):S . . (W| 000008F0: 29 00 3B 11 A8 02 57 48 20 B2 20 57 28 31 20 AA |).;...WH . W(1 .| 00000900: 20 49 29 20 AA 20 28 57 28 31 20 AA 20 49 29 20 | I) . (W(1 . I) | 00000910: AB 20 57 28 32 20 AA 20 49 29 29 20 AC 20 43 20 |. W(2 . I)) . C | 00000920: AA 20 28 57 28 31 20 AA 20 49 29 20 AB 20 57 28 |. (W(1 . I) . W(| 00000930: 33 20 AA 20 49 29 29 20 AC 20 53 00 85 11 B2 02 |3 . I)) . S.....| 00000940: 53 48 20 B2 20 53 28 31 20 AA 20 49 29 20 AA 20 |SH . S(1 . I) . | 00000950: 28 53 28 31 20 AA 20 49 29 20 AB 20 53 28 32 20 |(S(1 . I) . S(2 | 00000960: AA 20 49 29 29 20 AC 20 43 20 AA 20 28 53 28 31 |. I)) . C . (S(1| 00000970: 20 AA 20 49 29 20 AB 20 53 28 33 20 AA 20 49 29 | . I) . S(3 . I)| 00000980: 29 20 AC 20 53 00 A3 11 BC 02 9E 33 36 38 37 39 |) . S......36879| 00000990: 2C 57 48 2C 53 48 3A 20 82 20 57 3A 20 82 20 49 |,WH,SH: . W: . I| 000009A0: 3A 20 8E 00 A9 11 C6 02 3A 00 AF 11 D0 02 3A 00 |: ......:.....:.| 000009B0: B5 11 DA 02 3A 00 DD 11 E4 02 20 8F 20 20 2A 2A |....:..... . **| 000009C0: 20 46 4F 52 54 53 45 54 5A 55 4E 47 20 48 41 55 | FORTSETZUNG HAU| 000009D0: 50 54 50 52 4F 47 52 41 4D 4D 20 2A 2A 00 E3 11 |PTPROGRAMM **...| 000009E0: EE 02 3A 00 17 12 F8 02 20 8F 20 4B 4F 45 52 50 |..:..... . KOERP| 000009F0: 45 52 20 49 4E 20 41 55 53 47 41 4E 47 53 4C 41 |ER IN AUSGANGSLA| 00000A00: 47 45 20 4D 49 54 20 41 4C 4C 45 4E 20 44 52 45 |GE MIT ALLEN DRE| 00000A10: 48 41 43 48 53 45 4E 00 28 12 02 03 20 81 20 49 |HACHSEN.(... . I| 00000A20: 20 B2 20 31 20 A4 20 4E 00 5E 12 0C 03 20 8B 20 | . 1 . N.^... . | 00000A30: 46 20 B2 20 31 20 A7 20 58 28 49 29 20 B2 20 51 |F . 1 . X(I) . Q| 00000A40: 58 28 49 29 3A 59 28 49 29 20 B2 20 51 59 28 49 |X(I):Y(I) . QY(I| 00000A50: 29 3A 5A 28 49 29 20 B2 20 51 5A 28 49 29 00 94 |):Z(I) . QZ(I)..| 00000A60: 12 16 03 20 8B 20 46 20 B2 20 32 20 A7 20 58 28 |... . F . 2 . X(| 00000A70: 49 29 20 B2 20 50 58 28 49 29 3A 59 28 49 29 20 |I) . PX(I):Y(I) | 00000A80: B2 20 50 59 28 49 29 3A 5A 28 49 29 20 B2 20 50 |. PY(I):Z(I) . P| 00000A90: 5A 28 49 29 00 CA 12 20 03 20 8B 20 46 20 B2 20 |Z(I)... . . F . | 00000AA0: 33 20 A7 20 58 28 49 29 20 B2 20 5A 58 28 49 29 |3 . X(I) . ZX(I)| 00000AB0: 3A 59 28 49 29 20 B2 20 5A 59 28 49 29 3A 5A 28 |:Y(I) . ZY(I):Z(| 00000AC0: 49 29 20 B2 20 5A 5A 28 49 29 00 0E 13 2A 03 57 |I) . ZZ(I)...*.W| 00000AD0: 28 49 29 20 B2 20 31 33 30 20 AA 20 59 28 49 29 |(I) . 130 . Y(I)| 00000AE0: 20 AB 20 52 57 20 AC 20 58 28 49 29 3A 53 28 49 | . RW . X(I):S(I| 00000AF0: 29 20 B2 20 38 30 20 AB 20 5A 28 49 29 20 AA 20 |) . 80 . Z(I) . | 00000B00: 52 53 20 AC 20 58 28 49 29 3A 20 82 20 49 00 1A |RS . X(I): . I..| 00000B10: 13 2F 03 9E 20 33 36 38 36 34 00 47 13 34 03 20 |./.. 36864.G.4. | 00000B20: 8B 20 46 20 B2 20 33 20 A7 20 41 24 20 B2 20 22 |. F . 3 . A$ . "| 00000B30: 59 22 3A 41 20 B2 20 32 3A 20 99 22 93 22 3B 20 |Y":A . 2: ."."; | 00000B40: 3A 20 89 20 39 37 30 00 4D 13 3E 03 3A 00 57 13 |: . 970.M.>.:.W.| 00000B50: 48 03 99 22 93 22 3B 00 8E 13 52 03 20 9E 33 36 |H..".";...R. .36| 00000B60: 38 38 32 2C 20 32 31 3A 20 99 20 22 55 4D 20 57 |882, 21: . "UM W| 00000B70: 45 4C 43 48 45 20 41 43 48 53 45 20 57 49 4C 4C |ELCHE ACHSE WILL| 00000B80: 53 54 20 44 55 20 44 52 45 48 45 4E 3F 22 00 C3 |ST DU DREHEN?"..| 00000B90: 13 5C 03 20 99 20 22 47 49 42 20 44 45 4E 20 45 |.\. . "GIB DEN E| 00000BA0: 4E 54 53 50 52 45 43 48 45 4E 44 45 4E 20 42 55 |NTSPRECHENDEN BU| 00000BB0: 43 48 53 54 41 42 45 4E 20 45 49 4E 2E 20 22 3A |CHSTABEN EIN. ":| 00000BC0: 20 99 20 00 F3 13 66 03 20 99 20 22 45 49 4E 47 | . ...f. . "EING| 00000BD0: 41 42 45 20 56 4F 4E 20 30 3A 20 20 5A 55 52 55 |ABE VON 0: ZURU| 00000BE0: 45 43 4B 20 5A 55 52 20 41 55 53 57 41 48 4C 20 |ECK ZUR AUSWAHL | 00000BF0: 20 22 3B 00 F9 13 70 03 3A 00 2F 14 7A 03 20 8D | ";...p.:./.z. .| 00000C00: 20 34 33 30 3A 20 8D 20 34 35 30 3A 20 8D 20 34 | 430: . 450: . 4| 00000C10: 38 30 3A 20 91 20 46 20 8D 20 35 31 30 2C 35 39 |80: . F . 510,59| 00000C20: 30 3A 20 8F 20 47 52 41 46 49 4B 2D 55 50 52 00 |0: . GRAFIK-UPR.| 00000C30: 57 14 84 03 20 85 20 41 24 3A 20 8B 20 41 24 20 |W... . A$: . A$ | 00000C40: B2 20 22 30 22 20 A7 20 20 9E 33 36 38 36 37 20 |. "0" . .36867 | 00000C50: 3A 20 89 20 32 32 30 00 97 14 8E 03 20 8B 20 41 |: . 220..... . A| 00000C60: 24 20 B3 20 20 B1 20 22 58 22 20 AF 20 41 24 20 |$ . . "X" . A$ | 00000C70: B3 20 20 B1 20 22 59 22 20 AF 20 41 24 20 B3 20 |. . "Y" . A$ . | 00000C80: 20 B1 20 22 5A 22 20 A7 20 20 99 22 93 22 3B 20 | . "Z" . ."."; | 00000C90: 3A 20 89 20 38 35 30 00 AF 14 98 03 20 8B 20 41 |: . 850..... . A| 00000CA0: 24 20 B2 20 22 58 22 20 A7 20 41 20 B2 20 31 00 |$ . "X" . A . 1.| 00000CB0: C7 14 A2 03 20 8B 20 41 24 20 B2 20 22 59 22 20 |.... . A$ . "Y" | 00000CC0: A7 20 41 20 B2 20 32 00 DF 14 AC 03 20 8B 20 41 |. A . 2..... . A| 00000CD0: 24 20 B2 20 22 5A 22 20 A7 20 41 20 B2 20 33 00 |$ . "Z" . A . 3.| 00000CE0: E5 14 B6 03 3A 00 14 15 C0 03 20 8F 20 4B 4F 45 |....:..... . KOE| 00000CF0: 52 50 45 52 20 4D 49 54 20 41 55 53 47 45 57 41 |RPER MIT AUSGEWA| 00000D00: 45 48 4C 54 45 52 20 44 52 45 48 41 43 48 53 45 |EHLTER DREHACHSE| 00000D10: 20 20 20 20 00 54 15 CA 03 9E 33 36 38 37 30 20 | .T....36870 | 00000D20: 3A 20 91 20 46 20 8D 20 35 31 30 2C 35 39 30 2C |: . F . 510,590,| 00000D30: 36 34 30 3A 20 91 20 41 20 8D 20 34 33 30 2C 34 |640: . A . 430,4| 00000D40: 35 30 2C 34 38 30 3A 20 8F 20 47 52 41 46 49 4B |50,480: . GRAFIK| 00000D50: 2D 55 50 52 00 83 15 D4 03 20 99 22 93 22 3B 20 |-UPR..... ."."; | 00000D60: 3A 20 9E 33 36 38 38 32 2C 20 32 34 3A 20 99 20 |: .36882, 24: . | 00000D70: 22 45 49 4E 47 41 42 45 20 56 4F 4E 20 30 3A 20 |"EINGABE VON 0: | 00000D80: 20 22 3B 00 AC 15 DE 03 20 8B 20 46 20 B3 20 33 | ";..... . F . 3| 00000D90: 20 A7 20 20 99 20 22 4E 45 55 45 20 57 41 48 4C | . . "NEUE WAHL| 00000DA0: 20 44 45 52 20 41 43 48 53 45 22 3B 00 D5 15 E8 | DER ACHSE";....| 00000DB0: 03 20 8B 20 46 20 B2 20 33 20 A7 20 20 99 20 22 |. . F . 3 . . "| 00000DC0: 5A 55 52 55 45 43 4B 20 5A 55 52 20 41 55 53 57 |ZURUECK ZUR AUSW| 00000DD0: 41 48 4C 22 3B 00 04 16 F2 03 20 9E 33 36 38 38 |AHL";..... .3688| 00000DE0: 32 2C 20 32 31 3A 20 9E 33 36 38 38 35 2C 20 31 |2, 21: .36885, 1| 00000DF0: 3A 20 99 20 22 47 49 42 20 4A 45 54 5A 54 20 45 |: . "GIB JETZT E| 00000E00: 49 4E 3A 22 00 26 16 FC 03 20 99 20 22 44 52 45 |IN:".&... . "DRE| 00000E10: 48 57 49 4E 4B 45 4C 20 55 4D 20 22 3B 41 24 3B |HWINKEL UM ";A$;| 00000E20: 22 3A 20 20 22 3B 00 56 16 06 04 20 85 20 57 24 |": ";.V... . W$| 00000E30: 3A 20 8B 20 57 24 20 B2 20 22 30 22 20 AF 20 46 |: . W$ . "0" . F| 00000E40: 20 B2 20 33 20 A7 20 20 9E 33 36 38 36 37 20 3A | . 3 . .36867 :| 00000E50: 20 89 20 32 32 30 00 6C 16 10 04 20 8B 20 57 24 | . 220.l... . W$| 00000E60: 20 B2 20 22 30 22 20 A7 20 38 34 30 00 8B 16 1A | . "0" . 840....| 00000E70: 04 57 20 B2 20 20 C5 20 28 57 24 29 3A 20 8B 20 |.W . . (W$): . | 00000E80: 57 20 B2 20 30 20 A7 20 39 38 30 00 AB 16 24 04 |W . 0 . 980...$.| 00000E90: 20 8B 20 20 B6 20 28 57 29 20 B3 20 31 30 30 30 | . . (W) . 1000| 00000EA0: 30 30 30 30 20 A7 20 31 30 39 30 00 DE 16 2E 04 |0000 . 1090.....| 00000EB0: 20 99 20 20 A6 31 38 29 3B 3A 20 99 22 12 22 3B | . .18);: .".";| 00000EC0: 20 3A 20 99 20 22 57 49 4E 4B 45 4C 20 5A 55 20 | : . "WINKEL ZU | 00000ED0: 47 52 4F 53 53 22 3A 20 99 22 92 22 3B 20 00 FE |GROSS": ."."; ..| 00000EE0: 16 38 04 20 81 20 49 20 B2 20 31 20 A4 20 32 32 |.8. . I . 1 . 22| 00000EF0: 32 32 3A 20 82 20 49 3A 20 89 20 39 38 30 00 2D |22: . I: . 980.-| 00000F00: 17 42 04 20 9E 33 36 38 38 32 2C 20 32 31 3A 20 |.B. .36882, 21: | 00000F10: 99 20 20 A6 34 30 29 3A 20 9E 33 36 38 38 32 2C |. .40): .36882,| 00000F20: 20 32 34 3A 20 99 20 20 A6 34 30 29 3B 00 33 17 | 24: . .40);.3.| 00000F30: 4C 04 3A 00 4A 17 56 04 20 8F 20 20 44 52 45 48 |L.:.J.V. . DREH| 00000F40: 45 4E 20 55 4D 20 57 20 20 20 00 82 17 60 04 57 |EN UM W ...`.W| 00000F50: 20 B2 20 57 20 AC 20 50 49 20 AD 20 31 38 30 3A | . W . PI . 180:| 00000F60: 53 20 B2 20 20 BF 20 28 57 29 3A 43 20 B2 20 20 |S . . (W):C . | 00000F70: BE 20 28 57 29 3A 20 81 20 49 20 B2 20 31 20 A4 |. (W): . I . 1 .| 00000F80: 20 4E 00 CA 17 6A 04 20 8B 20 41 20 B2 20 31 20 | N...j. . A . 1 | 00000F90: A7 20 58 20 B2 20 58 28 49 29 3A 59 20 B2 20 43 |. X . X(I):Y . C| 00000FA0: 20 AC 20 59 28 49 29 20 AB 20 53 20 AC 20 5A 28 | . Y(I) . S . Z(| 00000FB0: 49 29 3A 5A 20 B2 20 53 20 AC 20 59 28 49 29 20 |I):Z . S . Y(I) | 00000FC0: AA 20 43 20 AC 20 5A 28 49 29 00 15 18 74 04 20 |. C . Z(I)...t. | 00000FD0: 8B 20 41 20 B2 20 32 20 A7 20 58 20 B2 20 43 20 |. A . 2 . X . C | 00000FE0: AC 20 58 28 49 29 20 AA 20 53 20 AC 20 5A 28 49 |. X(I) . S . Z(I| 00000FF0: 29 3A 59 20 B2 20 59 28 49 29 3A 5A 20 B2 20 20 |):Y . Y(I):Z . | 00001000: AB 20 53 20 AC 20 58 28 49 29 20 AA 20 43 20 AC |. S . X(I) . C .| 00001010: 20 5A 28 49 29 00 5D 18 7E 04 20 8B 20 41 20 B2 | Z(I).].~. . A .| 00001020: 20 33 20 A7 20 58 20 B2 20 43 20 AC 20 58 28 49 | 3 . X . C . X(I| 00001030: 29 20 AB 20 53 20 AC 20 59 28 49 29 3A 59 20 B2 |) . S . Y(I):Y .| 00001040: 20 53 20 AC 20 58 28 49 29 20 AA 20 43 20 AC 20 | S . X(I) . C . | 00001050: 59 28 49 29 3A 5A 20 B2 20 5A 28 49 29 00 90 18 |Y(I):Z . Z(I)...| 00001060: 88 04 57 28 49 29 20 B2 20 31 33 30 20 AA 20 59 |..W(I) . 130 . Y| 00001070: 20 AB 20 52 57 20 AC 20 58 3A 53 28 49 29 20 B2 | . RW . X:S(I) .| 00001080: 20 38 30 20 AB 20 5A 20 AA 20 52 53 20 AC 20 58 | 80 . Z . RS . X| 00001090: 00 BB 18 92 04 58 28 49 29 20 B2 20 58 3A 59 28 |.....X(I) . X:Y(| 000010A0: 49 29 20 B2 20 59 3A 5A 28 49 29 20 B2 20 5A 3A |I) . Y:Z(I) . Z:| 000010B0: 20 82 20 49 3A 20 89 20 39 37 30 00 C1 18 9C 04 | . I: . 970.....| 000010C0: 3A 00 C7 18 A6 04 3A 00 E6 18 B0 04 20 8F 20 42 |:.....:..... . B| 000010D0: 45 44 45 55 54 55 4E 47 20 44 45 52 20 56 41 52 |EDEUTUNG DER VAR| 000010E0: 49 41 42 4C 45 4E 00 22 19 BA 04 20 8F 20 41 20 |IABLEN."... . A | 000010F0: 20 20 4E 55 4D 4D 45 52 20 44 45 52 20 44 52 45 | NUMMER DER DRE| 00001100: 48 41 43 48 53 45 3A 20 31 2C 32 2C 33 20 46 55 |HACHSE: 1,2,3 FU| 00001110: 45 52 20 58 2D 2E 20 59 2D 2C 20 5A 2D 41 43 48 |ER X-. Y-, Z-ACH| 00001120: 53 45 00 47 19 C4 04 20 8F 20 41 24 20 20 42 45 |SE.G... . A$ BE| 00001130: 5A 45 49 43 48 4E 55 4E 47 20 44 45 52 20 44 52 |ZEICHNUNG DER DR| 00001140: 45 48 41 43 48 53 45 00 59 19 CE 04 20 8F 20 43 |EHACHSE.Y... . C| 00001150: 20 20 20 43 4F 53 28 57 29 00 9A 19 D8 04 20 8F | COS(W)..... .| 00001160: 20 46 20 20 20 4E 55 4D 4D 45 52 20 44 45 53 20 | F NUMMER DES | 00001170: 4B 4F 45 52 50 45 52 53 3A 20 31 20 51 55 41 44 |KOERPERS: 1 QUAD| 00001180: 45 52 2C 20 32 20 50 59 52 41 4D 49 44 45 2C 20 |ER, 2 PYRAMIDE, | 00001190: 33 20 5A 59 4C 49 4E 44 45 52 00 B8 19 E2 04 20 |3 ZYLINDER..... | 000011A0: 8F 20 46 24 20 20 49 4E 50 55 54 56 41 52 49 41 |. F$ INPUTVARIA| 000011B0: 42 4C 45 20 5A 55 20 46 00 ED 19 EC 04 20 8F 20 |BLE ZU F..... . | 000011C0: 46 45 20 20 48 49 4C 46 53 56 41 52 49 41 42 4C |FE HILFSVARIABL| 000011D0: 45 20 42 45 49 20 41 42 46 52 41 47 45 20 46 41 |E BEI ABFRAGE FA| 000011E0: 4C 53 43 48 45 20 45 49 4E 47 41 42 45 00 05 1A |LSCHE EINGABE...| 000011F0: F6 04 20 8F 20 49 20 20 20 4C 41 55 46 56 41 52 |.. . I LAUFVAR| 00001200: 49 41 42 4C 45 00 20 1A 00 05 20 8F 20 4A 20 20 |IABLE. ... . J | 00001210: 20 32 2E 20 4C 41 55 46 56 41 52 49 41 42 4C 45 | 2. LAUFVARIABLE| 00001220: 00 56 1A 0A 05 20 8F 20 4E 20 20 20 5A 41 48 4C |.V... . N ZAHL| 00001230: 20 44 45 52 20 45 43 4B 45 4E 20 42 5A 57 2E 20 | DER ECKEN BZW. | 00001240: 41 55 53 47 45 5A 45 49 43 48 4E 45 54 45 4E 20 |AUSGEZEICHNETEN | 00001250: 50 55 4E 4B 54 45 00 6E 1A 14 05 20 8F 20 50 49 |PUNKTE.n... . PI| 00001260: 20 20 4B 52 45 49 53 5A 41 48 4C 20 50 49 00 A0 | KREISZAHL PI..| 00001270: 1A 1E 05 20 8F 20 50 58 28 2C 50 59 28 2C 50 5A |... . PX(,PY(,PZ| 00001280: 28 20 4B 4F 4F 52 44 49 4E 41 54 45 4E 20 44 45 |( KOORDINATEN DE| 00001290: 52 20 50 59 52 41 4D 49 44 45 4E 45 43 4B 45 4E |R PYRAMIDENECKEN| 000012A0: 00 D2 1A 28 05 20 8F 20 51 58 28 2C 51 59 28 2C |...(. . QX(,QY(,| 000012B0: 51 5A 28 20 4B 4F 4F 52 44 49 4E 41 54 45 4E 20 |QZ( KOORDINATEN | 000012C0: 44 45 52 20 51 55 41 44 45 52 45 43 4B 45 4E 20 |DER QUADERECKEN | 000012D0: 20 20 00 04 1B 32 05 20 8F 20 52 53 20 20 56 45 | ...2. . RS VE| 000012E0: 52 5A 45 52 52 55 4E 47 53 4D 41 53 53 54 41 42 |RZERRUNGSMASSTAB| 000012F0: 2C 20 53 45 4E 4B 52 45 43 48 54 45 52 20 41 4E |, SENKRECHTER AN| 00001300: 54 45 49 4C 00 37 1B 3C 05 20 8F 20 52 57 20 20 |TEIL.7.<. . RW | 00001310: 56 45 52 5A 45 52 52 55 4E 47 53 4D 41 53 53 54 |VERZERRUNGSMASST| 00001320: 41 42 2C 20 57 41 41 47 45 52 45 43 48 54 45 52 |AB, WAAGERECHTER| 00001330: 20 41 4E 54 45 49 4C 00 49 1B 46 05 20 8F 20 53 | ANTEIL.I.F. . S| 00001340: 20 20 20 53 49 4E 28 57 29 00 7A 1B 50 05 20 8F | SIN(W).z.P. .| 00001350: 20 53 28 20 20 53 45 4E 4B 52 45 43 48 54 45 20 | S( SENKRECHTE | 00001360: 4B 4F 4F 52 44 49 4E 41 54 45 20 44 45 53 20 42 |KOORDINATE DES B| 00001370: 49 4C 44 53 43 48 49 52 4D 53 00 99 1B 5A 05 20 |ILDSCHIRMS...Z. | 00001380: 8F 20 53 48 20 20 48 49 4C 46 53 56 41 52 49 41 |. SH HILFSVARIA| 00001390: 42 4C 45 20 5A 55 20 53 28 00 BA 1B 64 05 20 8F |BLE ZU S(...d. .| 000013A0: 20 57 20 20 20 47 52 4F 45 53 53 45 20 45 49 4E | W GROESSE EIN| 000013B0: 45 53 20 57 49 4E 4B 45 4C 53 00 DB 1B 6E 05 20 |ES WINKELS...n. | 000013C0: 8F 20 57 24 20 20 45 49 4E 47 41 42 45 56 41 52 |. W$ EINGABEVAR| 000013D0: 49 41 42 4C 45 20 56 4F 4E 20 57 00 10 1C 78 05 |IABLE VON W...x.| 000013E0: 20 8F 20 57 28 20 20 57 41 41 47 45 52 45 43 48 | . W( WAAGERECH| 000013F0: 54 45 20 4B 4F 4F 52 44 49 4E 41 54 45 20 44 45 |TE KOORDINATE DE| 00001400: 53 20 42 49 4C 44 53 43 48 49 52 4D 53 20 20 20 |S BILDSCHIRMS | 00001410: 00 31 1C 82 05 20 8F 20 57 48 20 20 48 49 4C 46 |.1... . WH HILF| 00001420: 53 56 41 52 49 41 42 4C 45 20 5A 55 20 57 28 20 |SVARIABLE ZU W( | 00001430: 20 00 65 1C 8C 05 20 8F 20 58 2C 59 2C 5A 20 42 | .e... . X,Y,Z B| 00001440: 5A 57 20 58 28 2C 59 28 2C 5A 28 20 4B 4F 4F 52 |ZW X(,Y(,Z( KOOR| 00001450: 44 49 4E 41 54 45 4E 20 45 49 4E 45 53 20 50 55 |DINATEN EINES PU| 00001460: 4E 4B 54 45 53 00 A9 1C 96 05 20 8F 20 5A 58 28 |NKTES..... . ZX(| 00001470: 2C 5A 59 28 2C 5A 5A 28 20 4B 4F 4F 52 44 49 4E |,ZY(,ZZ( KOORDIN| 00001480: 41 54 45 4E 20 41 55 53 47 45 5A 45 49 43 48 4E |ATEN AUSGEZEICHN| 00001490: 45 54 45 52 20 50 55 4E 4B 54 45 20 44 45 53 20 |ETER PUNKTE DES | 000014A0: 5A 59 4C 49 4E 44 45 52 53 00 00 00 00 20 |ZYLINDERS.... |
..1... . PROGRAMME FUER DEN MATHEMATIKU NTERRICHT.X... . DREHEN (DREHEN VON K OERPERN).^...:...(. . PROGRAMMAUTOREN: INGO WEIDIG, PAUL SAND .H.2. . COPYRIG HT (C) ERNST KLETT VERLAGE GMBH & CO KG ...<. . STUTTGART 1986...F.:...P. . FEL DER UND KONSTANTEN (PUNKTE) DEFINIEREN .:.Z..:. X(8),Y(8),Z(8),W(8),S(8).W.D. . QX(8),QY(8),QZ(8),PX(4),PY(4),PZ(4),ZX (8),ZY(8),ZZ(8)...N.. 20,40,50, -20,40, 50, -20,-40,50, 20,-40,50...X.. 20,40,- 50, -20,40,-50, -20,-40,-50, 20,-40,-50. ..... I . 1 . 8: . QX(I),QY(I),QZ(I): . I.9.... 26,-45,-24, 26,45,-24, -52,0,-2 4, 0,0,72.D... . I . 1 . 4: . PX(I),PY(I ),PZ(I): . I... .. 0,0,-50, 0,-50,-50, 50,0,-50, 0,50,-50...... 0,0,50, 0,-50, 50, 50,0,50, 0,50,50..... . I . 1 . 8: . ZX(I),ZY(I),ZZ(I): . I.....PI . 3.14159 ...H.:...R. . AUSWAHL DES KOERPERS.&... ."."; .K... . "DREHEN VON KOERPERN": . : . .F... . FE . 0 . . : . 260..... ."." ; : . "DU MUSST EINE ZAHL VON 0 BIS 3 EI NGEBEN!": ."."; :FE . 0.U.... : . "WAEHL E EINEN KOERPER AUS,"..... . "DER GEDREH T WERDEN SOLL:": . : . ..... . "1 QUAD ER": . .1.". . "2 PYRAMIDE": . .S.,. . "3 ZYLINDER": . : . : . ...6. . "0 ICH WILL ZURUECK ZUR HAUPTAUSWAHL.": . : . ...@. . "GIB DIE ENTSPRECHENDE ZIFFER EIN ";.B.J. . F$...T.. F$ . "0" . ."M ENUE",8...^.F . E (F$): . F . 1 . N . 8 :RW . .35:RS . .35: . 770.G.H. . F . 2 . N . 4:RW . .35:RS . .35: . 770.R.R. . F . 3 . N . 8:RW . 0:RS . .5: . 770...|.F E . 1: . 220.....:.....:..... . * GRAFI K-UNTERPROGRAMME *.....:......36873, 112 ,98 , 148,62: . X-ACHSE......36873, 110 ,87 , 102,95: .36873, 102,87 , 110,95: . .?.B..36873, 60,80 , 200,80: . Y-ACHSE. ..L..36873, 206,76 , 210,80: .36873, 214 ,76,210,80:.36879, 210,84...V. . ......3 6873, 129,5 , 129,150: . Z-ACHSE......3 6873,135,2,143,2:.36879,135,10:.36879,14 3,10: ......:...... QUADER..... . I . 0 . 4 . 4./... .36876, W(I . 4),S(I . 4). ^.... J . 1 . 4: .36879,W(I . J),S(I . J ): . J.G.&. . I...0. . I . 1 . 4: .36873 , W(I),S(I) , W(I . 4),S(I . 4): . I...: . . ...D.:.B.N.. PYRAMIDE...X..36876, W (3),S(3): . I . 1 . 3: .36879,W(I),S(I): . I.1.B. . I . 1 . 3: .36873, W(4),S(4) , W(I),S(I): . I.9.L. . .?.V.:.O.... Z YLINDER..... . I . 2 . 4 . 2: .36873, W( I),S(I) , W(I . 4),S(I . 4): . I..... . I . 0 . 4 . 4: .36876, W(4 . I),S(4 . I) ..... . W . 0.1 . 6.4 . 0.1:C . . (W):S . . (W).;...WH . W(1 . I) . (W(1 . I) . W(2 . I)) . C . (W(1 . I) . W(3 . I)) . S.....SH . S(1 . I) . (S(1 . I) . S(2 . I)) . C . (S(1 . I) . S(3 . I)) . S... ...36879,WH,SH: . W: . I: ....F.:...P.:. ..Z.:..... . ** FORTSETZUNG HAUPTPROGRA MM **.....:..... . KOERPER IN AUSGANGSLA GE MIT ALLEN DREHACHSEN.(... . I . 1 . N .^... . F . 1 . X(I) . QX(I):Y(I) . QY(I ):Z(I) . QZ(I)..... . F . 2 . X(I) . PX( I):Y(I) . PY(I):Z(I) . PZ(I).J. . . F . 3 . X(I) . ZX(I):Y(I) . ZY(I):Z(I) . ZZ( I)...*.W(I) . 130 . Y(I) . RW . X(I):S(I ) . 80 . Z(I) . RS . X(I): . I.../.. 368 64.G.4. . F . 3 . A$ . "Y":A . 2: ."."; : . 970.M.>.:.W.H..".";...R. .36882, 21: . "UM WELCHE ACHSE WILLST DU DREHEN?".C .\. . "GIB DEN ENTSPRECHENDEN BUCHSTABEN EIN. ": . ...F. . "EINGABE VON 0: ZURU ECK ZUR AUSWAHL ";...P.:./.Z. . 430: . 450: . 480: . F . 510,590: . GRAFIK-UPR. W... . A$: . A$ . "0" . .36867 : . 220. .... . A$ . . "X" . A$ . . "Y" . A$ . . "Z" . ."."; : . 850..... . A$ . "X" . A . 1.G... . A$ . "Y" . A . 2..... . A $ . "Z" . A . 3.....:..... . KOERPER MIT AUSGEWAEHLTER DREHACHSE .T.J..36870 : . F . 510,590,640: . A . 430,450,480: . GRAFIK-UPR...T. ."."; : .36882, 24: . "EINGABE VON 0: ";..... . F . 3 . . "N EUE WAHL DER ACHSE";.U... . F . 3 . . " ZURUECK ZUR AUSWAHL";..... .36882, 21: . 36885, 1: . "GIB JETZT EIN:".&... . "DRE HWINKEL UM ";A$;": ";.V... . W$: . W$ . "0" . F . 3 . .36867 : . 220.L... . W$ . "0" . 840.....W . E (W$): . W . 0 . 980...$. . . (W) . 10000000 . 1090..... . .18);: ."."; : . "WINKEL ZU GROSS": ."."; ...8. . I . 1 . 2222: . I: . 980.- .B. .36882, 21: . .40): .36882, 24: . .40);.3.L.:.J.V. . DREHEN UM W ...`.W . W . PI . 180:S . . (W):C . . (W): . I . 1 . N.J.J. . A . 1 . X . X(I):Y . C . Y(I) . S . Z(I):Z . S . Y(I) . C . Z( I)...T. . A . 2 . X . C . X(I) . S . Z(I ):Y . Y(I):Z . . S . X(I) . C . Z(I).]. ~. . A . 3 . X . C . X(I) . S . Y(I):Y . S . X(I) . C . Y(I):Z . Z(I).....W(I) . 130 . Y . RW . X:S(I) . 80 . Z . RS . X .....X(I) . X:Y(I) . Y:Z(I) . Z: . I: . 970.A...:.G...:..... . BEDEUTUNG DER VAR IABLEN."... . A NUMMER DER DREHACHSE: 1,2,3 FUER X-. Y-, Z-ACHSE.G.D. . A$ BE ZEICHNUNG DER DREHACHSE.Y.N. . C COS(W )...X. . F NUMMER DES KOERPERS: 1 QUAD ER, 2 PYRAMIDE, 3 ZYLINDER..... . F$ IN PUTVARIABLE ZU F..... . FE HILFSVARIABL E BEI ABFRAGE FALSCHE EINGABE..... . I LAUFVARIABLE. ... . J 2. LAUFVARIABLE .V... . N ZAHL DER ECKEN BZW. AUSGEZEI CHNETEN PUNKTE.N... . PI KREISZAHL PI. ... . PX(,PY(,PZ( KOORDINATEN DER PYRAMI DENECKEN.R.(. . QX(,QY(,QZ( KOORDINATEN DER QUADERECKEN ...2. . RS VERZERRUNG SMASSTAB, SENKRECHTER ANTEIL.7.<. . RW VERZERRUNGSMASSTAB, WAAGERECHTER ANTEIL. I.F. . S SIN(W).Z.P. . S( SENKRECHTE KOORDINATE DES BILDSCHIRMS...Z. . SH HI LFSVARIABLE ZU S(...D. . W GROESSE EIN ES WINKELS...N. . W$ EINGABEVARIABLE VO N W...X. . W( WAAGERECHTE KOORDINATE DE S BILDSCHIRMS .1... . WH HILFSVARIABL E ZU W( .E... . X,Y,Z BZW X(,Y(,Z( KOOR DINATEN EINES PUNKTES..... . ZX(,ZY(,ZZ( KOORDINATEN AUSGEZEICHNETER PUNKTE DES ZYLINDERS....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL