SIMON'S AXO
FILE INFORMATION
FILENAME(S): SIMON'S AXO
FILE TYPE(S): PRG
FILE SIZE: 5.1K
FIRST SEEN: 2025-12-02 23:09:49
APPEARS ON: 1 disk(s)
FILE HASH
de729a749cf37123cd0f3b527d734d048814a7dad4117702630e389c8480e27e
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| CAPTAIN DATA | SIMON'S AXO | PRG | swasti, chrisbitti1 | 3 | 18 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 0A 00 99 22 93 22 3A 97 35 33 32 38 |.......".":.5328|
00000010: 30 2C 30 3A 97 35 33 32 38 31 2C 30 00 58 08 14 |0,0:.53281,0.X..|
00000020: 00 99 A3 31 30 29 22 96 4E 4F 52 4D 41 4C 45 20 |...10)".NORMALE |
00000030: 41 58 4F 4D 45 54 52 49 45 20 3A 22 3A 99 A3 31 |AXOMETRIE :":..1|
00000040: 30 29 22 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |0)".............|
00000050: C5 C5 C5 C5 C5 C5 1E 22 00 8A 08 19 00 99 22 11 |......."......".|
00000060: 11 1D 1D 1D 1D 44 49 45 53 45 53 20 50 52 4F 47 |.....DIESES PROG|
00000070: 52 41 4D 4D 20 53 54 45 4C 4C 54 20 20 45 42 45 |RAMM STELLT EBE|
00000080: 4E 46 4C 41 45 43 48 49 47 22 00 BB 08 1E 00 99 |NFLAECHIG"......|
00000090: 22 91 42 45 47 52 45 4E 5A 54 45 20 4B 4F 45 52 |".BEGRENZTE KOER|
000000A0: 50 45 52 2C 4E 41 43 48 20 45 49 4E 47 41 42 45 |PER,NACH EINGABE|
000000B0: 20 42 5A 57 20 45 49 4E 4C 45 22 00 EC 08 23 00 | BZW EINLE"...#.|
000000C0: 99 22 91 53 45 4E 20 44 45 52 20 45 43 4B 50 55 |.".SEN DER ECKPU|
000000D0: 4E 4B 54 45 20 55 4E 44 20 44 45 52 20 56 45 52 |NKTE UND DER VER|
000000E0: 42 49 4E 44 55 4E 47 53 56 4F 52 22 00 17 09 28 |BINDUNGSVOR"...(|
000000F0: 00 99 22 91 53 43 48 52 49 46 54 20 49 4E 20 4E |..".SCHRIFT IN N|
00000100: 4F 52 4D 41 4C 45 52 20 41 58 4F 4D 45 54 52 49 |ORMALER AXOMETRI|
00000110: 45 20 44 41 52 2E 22 00 48 09 2D 00 99 22 11 1D |E DAR.".H.-.."..|
00000120: 1D 1D 48 49 45 52 42 45 49 20 4B 41 4E 4E 20 44 |..HIERBEI KANN D|
00000130: 41 53 20 41 43 48 53 45 4E 4B 52 45 55 5A 20 42 |AS ACHSENKREUZ B|
00000140: 45 4C 49 45 42 49 47 22 00 61 09 32 00 99 22 91 |ELIEBIG".a.2..".|
00000150: 47 45 57 41 45 48 4C 54 20 57 45 52 44 45 4E 2E |GEWAEHLT WERDEN.|
00000160: 22 00 90 09 37 00 99 22 41 4C 4C 45 52 44 49 4E |"...7.."ALLERDIN|
00000170: 47 53 20 1D 42 4C 45 49 42 54 20 44 45 52 20 55 |GS .BLEIBT DER U|
00000180: 52 53 50 52 55 4E 47 20 49 4E 20 20 44 45 52 22 |RSPRUNG IN DER"|
00000190: 00 A8 09 3C 00 99 22 42 49 4C 44 53 43 48 49 52 |...<.."BILDSCHIR|
000001A0: 4D 4D 49 54 54 45 2E 22 00 D9 09 41 00 99 22 11 |MMITTE."...A..".|
000001B0: 1D 1D 1D 4E 41 43 48 20 44 45 4D 20 5A 45 49 43 |...NACH DEM ZEIC|
000001C0: 48 4E 45 4E 20 44 45 52 20 46 49 47 55 52 20 45 |HNEN DER FIGUR E|
000001D0: 52 53 43 48 45 49 4E 54 22 00 08 0A 46 00 99 22 |RSCHEINT"...F.."|
000001E0: 91 49 4E 20 44 45 52 20 4C 49 4E 4B 45 4E 20 4F |.IN DER LINKEN O|
000001F0: 42 45 52 45 4E 20 45 43 4B 45 20 3C 46 45 52 54 |BEREN ECKE <FERT|
00000200: 49 47 3E 20 55 4E 44 22 00 3A 0A 4B 00 99 22 4D |IG> UND".:.K.."M|
00000210: 41 4E 20 4B 4F 4D 4D 54 20 44 41 4E 4E 20 4D 49 |AN KOMMT DANN MI|
00000220: 54 20 96 3C 46 31 3E 20 4F 44 45 52 20 3C 52 45 |T .<F1> ODER <RE|
00000230: 54 55 52 4E 3E 20 1E 49 4E 22 00 52 0A 4C 00 99 |TURN> .IN".R.L..|
00000240: 22 91 44 41 53 20 48 41 55 50 54 4D 41 4E 55 45 |".DAS HAUPTMANUE|
00000250: 2E 22 00 81 0A 50 00 99 22 11 1D 1D 1D 44 49 45 |."...P.."....DIE|
00000260: 20 45 52 53 54 45 4C 4C 54 45 4E 20 4B 4F 45 52 | ERSTELLTEN KOER|
00000270: 50 45 52 20 4B 4F 45 4E 4E 45 4E 20 44 41 4E 4E |PER KOENNEN DANN|
00000280: 22 00 AC 0A 55 00 99 22 41 55 43 48 20 41 55 46 |"...U.."AUCH AUF|
00000290: 20 44 49 53 4B 20 41 42 47 45 53 50 45 49 43 48 | DISK ABGESPEICH|
000002A0: 45 52 54 20 57 45 52 44 45 4E 2E 22 00 C6 0A 5A |ERT WERDEN."...Z|
000002B0: 00 99 22 11 11 22 A3 31 31 29 22 3C 20 54 41 53 |.."..".11)"< TAS|
000002C0: 54 45 20 3E 22 3B 00 D8 0A 5F 00 97 31 39 38 2C |TE >";..._..198,|
000002D0: 30 3A 92 31 39 38 2C 31 00 FB 0A 64 00 9C 3A 86 |0:.198,1...d..:.|
000002E0: 50 54 28 31 30 30 2C 33 29 2C 5A 50 28 31 30 30 |PT(100,3),ZP(100|
000002F0: 29 2C 50 41 28 31 30 30 2C 33 29 00 2B 0B 69 00 |),PA(100,3).+.i.|
00000300: 99 22 93 1E 11 11 53 4F 4C 4C 20 44 45 52 20 4B |."....SOLL DER K|
00000310: 4F 45 52 50 45 52 20 56 4F 4E 20 44 49 53 4B 20 |OERPER VON DISK |
00000320: 45 49 4E 47 45 4C 45 53 45 4E 22 00 41 0B 6E 00 |EINGELESEN".A.n.|
00000330: 99 22 57 45 52 44 45 4E 20 3C 4A 2F 4E 3E 20 3F |."WERDEN <J/N> ?|
00000340: 22 00 5C 0B 73 00 A1 41 24 3A 8B 41 24 B2 22 4A |".\.s..A$:.A$."J|
00000350: 22 A7 8D 31 36 30 30 3A 89 33 30 30 00 6D 0B 78 |"..1600:.300.m.x|
00000360: 00 8B 41 24 B3 B1 22 4E 22 A7 31 31 35 00 9B 0B |..A$.."N".115...|
00000370: 7D 00 99 22 93 1D 1D 1D 42 49 54 54 45 20 55 4D |}.."....BITTE UM|
00000380: 20 44 49 45 20 45 49 4E 47 41 42 45 20 44 45 52 | DIE EINGABE DER|
00000390: 20 45 49 4E 5A 45 4C 4E 45 4E 22 00 C9 0B 7E 00 | EINZELNEN"...~.|
000003A0: 99 22 45 43 4B 50 55 4E 4B 54 45 20 4D 49 54 20 |."ECKPUNKTE MIT |
000003B0: 44 52 45 49 20 4B 4F 4F 52 44 49 4E 41 54 45 4E |DREI KOORDINATEN|
000003C0: 20 28 58 2C 59 2C 5A 29 22 00 F8 0B 7F 00 99 22 | (X,Y,Z)"......"|
000003D0: 11 42 45 49 20 58 3D 27 45 4E 44 45 27 20 57 49 |.BEI X='ENDE' WI|
000003E0: 52 44 20 44 49 45 20 45 49 4E 47 41 42 45 20 42 |RD DIE EINGABE B|
000003F0: 45 45 4E 44 45 54 2E 22 00 27 0C 80 00 99 22 11 |EENDET.".'....".|
00000400: 42 45 49 58 3D 27 5C 27 20 4B 41 4E 4E 20 44 45 |BEIX='\' KANN DE|
00000410: 52 20 56 4F 52 49 47 45 20 50 55 4E 4B 54 20 4E |R VORIGE PUNKT N|
00000420: 4F 43 48 45 49 4E 22 00 47 0C 81 00 99 22 4D 41 |OCHEIN".G...."MA|
00000430: 4C 20 45 49 4E 47 45 47 45 42 45 4E 20 57 45 52 |L EINGEGEBEN WER|
00000440: 44 45 4E 2E 11 11 22 00 87 0C 82 00 99 22 28 22 |DEN..."......"("|
00000450: 41 22 29 22 3B 3A 85 20 50 58 24 2C 50 59 2C 50 |A")";:. PX$,PY,P|
00000460: 5A 3A 50 58 B2 C5 28 50 58 24 29 3A 8B 50 58 24 |Z:PX..(PX$):.PX$|
00000470: B2 22 45 4E 44 45 22 A7 41 31 B2 41 3A 41 32 B2 |."ENDE".A1.A:A2.|
00000480: 41 3A 89 20 32 30 30 00 A0 0C 87 00 8B 50 58 24 |A:. 200......PX$|
00000490: B2 22 5C 22 20 A7 41 B2 41 AB 31 3A 89 31 33 30 |."\" .A.A.1:.130|
000004A0: 00 AF 0C 8C 00 50 54 28 41 2C 31 29 B2 50 58 00 |.....PT(A,1).PX.|
000004B0: BE 0C 91 00 50 54 28 41 2C 32 29 B2 50 59 00 CD |....PT(A,2).PY..|
000004C0: 0C 96 00 50 54 28 41 2C 33 29 B2 50 5A 00 E1 0C |...PT(A,3).PZ...|
000004D0: 9B 00 50 41 28 41 2C 31 29 B2 50 54 28 41 2C 31 |..PA(A,1).PT(A,1|
000004E0: 29 00 F5 0C A0 00 50 41 28 41 2C 32 29 B2 50 54 |).....PA(A,2).PT|
000004F0: 28 41 2C 32 29 00 09 0D A5 00 50 41 28 41 2C 33 |(A,2).....PA(A,3|
00000500: 29 B2 50 54 28 41 2C 33 29 00 18 0D AA 00 41 B2 |).PT(A,3).....A.|
00000510: 41 AA 31 3A 89 31 33 30 00 1E 0D C8 00 8F 00 24 |A.1:.130.......$|
00000520: 0D C9 00 8F 00 2A 0D CA 00 8F 00 61 0D CD 00 45 |.....*.....a...E|
00000530: 50 B2 41 AB 31 3A 99 22 93 1D 1D 1D 49 4E 20 57 |P.A.1:."....IN W|
00000540: 45 4C 43 48 45 52 20 52 45 49 48 45 4E 46 4F 4C |ELCHER REIHENFOL|
00000550: 47 45 20 53 4F 4C 4C 45 4E 20 57 45 4C 43 48 45 |GE SOLLEN WELCHE|
00000560: 22 00 82 0D D2 00 99 22 50 55 4E 4B 54 45 20 56 |"......"PUNKTE V|
00000570: 45 52 42 55 4E 44 45 4E 20 57 45 52 44 45 4E 20 |ERBUNDEN WERDEN |
00000580: 3F 22 00 AD 0D D7 00 99 22 11 27 45 4E 44 45 27 |?"......".'ENDE'|
00000590: 20 42 45 45 4E 44 45 54 20 44 49 45 20 45 49 4E | BEENDET DIE EIN|
000005A0: 47 41 42 45 20 57 49 45 44 45 52 2E 22 00 DB 0D |GABE WIEDER."...|
000005B0: DC 00 99 22 11 27 5C 27 20 4C 41 45 53 53 54 20 |...".'\' LAESST |
000005C0: 44 49 45 20 4B 4F 52 52 45 4B 54 55 52 20 44 45 |DIE KORREKTUR DE|
000005D0: 52 20 56 4F 52 49 47 45 4E 20 22 00 EE 0D E1 00 |R VORIGEN ".....|
000005E0: 99 22 45 49 4E 47 41 42 45 20 5A 55 2E 22 00 07 |."EINGABE ZU."..|
000005F0: 0E E6 00 85 22 11 11 41 55 53 47 41 4E 47 53 50 |...."..AUSGANGSP|
00000600: 55 4E 4B 54 22 3B 41 00 13 0E EB 00 5A 50 28 30 |UNKT";A.....ZP(0|
00000610: 29 B2 41 00 20 0E F0 00 42 B2 31 3A 99 22 11 22 |).A. ...B.1:."."|
00000620: 00 4C 0E F5 00 99 22 56 4F 4E 28 22 41 22 29 20 |.L...."VON("A") |
00000630: 4E 41 43 48 20 3A 22 3B 3A 85 20 41 24 3A 8B 41 |NACH :";:. A$:.A|
00000640: 24 B2 22 45 4E 44 45 22 A7 32 37 30 00 68 0E FA |$."ENDE".270.h..|
00000650: 00 8B 41 24 B2 22 5C 22 A7 42 B2 42 AB 31 3A 41 |..A$."\".B.B.1:A|
00000660: B2 41 31 3A 89 32 34 35 00 7A 0E FF 00 41 31 B2 |.A1:.245.z...A1.|
00000670: 41 3A 41 B2 C5 28 41 24 29 3A 00 86 0E 04 01 5A |A:A..(A$):.....Z|
00000680: 50 28 42 29 B2 41 00 95 0E 09 01 42 B2 42 AA 31 |P(B).A.....B.B.1|
00000690: 3A 89 32 34 35 00 AA 0E 0E 01 53 50 B2 42 AB 31 |:.245.....SP.B.1|
000006A0: 3A 42 31 B2 42 3A 46 47 B2 42 00 B0 0E 2C 01 8F |:B1.B:FG.B...,..|
000006B0: 00 B6 0E 2D 01 8F 00 BC 0E 2E 01 8F 00 EC 0E 31 |...-...........1|
000006C0: 01 99 22 93 11 11 1D 1D 1D 42 45 53 54 49 4D 4D |.."......BESTIMM|
000006D0: 45 4E 20 53 49 45 20 4E 55 4E 20 44 41 53 20 41 |EN SIE NUN DAS A|
000006E0: 43 48 53 45 4E 4B 52 45 55 5A 2E 22 00 17 0F 36 |CHSENKREUZ."...6|
000006F0: 01 99 22 11 1D 1D 1D 47 45 42 45 4E 20 53 49 45 |.."....GEBEN SIE|
00000700: 20 44 45 4E 20 57 49 4E 4B 45 4C 20 5A 57 49 53 | DEN WINKEL ZWIS|
00000710: 43 48 45 4E 20 3A 22 00 21 0F 3B 01 99 22 11 11 |CHEN :".!.;.."..|
00000720: 22 00 2E 0F 40 01 99 A3 31 39 29 22 A7 22 00 3B |"...@...19)".".;|
00000730: 0F 45 01 99 A3 31 39 29 22 A7 22 00 70 0F 4A 01 |.E...19)".".p.J.|
00000740: 99 22 20 5A 2D 20 55 4E 44 20 59 2D 41 43 48 53 |." Z- UND Y-ACHS|
00000750: 45 22 3B A3 31 39 29 22 CE CD 22 3B A3 32 34 29 |E";.19)"..";.24)|
00000760: 22 5A 2D 20 55 4E 44 20 58 2D 41 43 48 53 45 22 |"Z- UND X-ACHSE"|
00000770: 00 8F 0F 4F 01 99 A3 31 38 29 22 CE 20 20 CD 22 |...O...18)". ."|
00000780: A3 32 34 29 22 1D 1D 1D 1D 1D 45 49 4E 2E 22 00 |.24)".....EIN.".|
00000790: A1 0F 59 01 99 A3 31 37 29 22 CE 20 20 20 20 CD |..Y...17)". .|
000007A0: 22 00 A7 0F 5E 01 8F 00 E6 0F 63 01 85 22 11 20 |"...^.....c..". |
000007B0: 41 4C 50 48 41 20 3D 20 20 20 31 32 30 9D 9D 9D |ALPHA = 120...|
000007C0: 9D 9D 22 3B 41 4C 3A 99 A3 32 35 29 3B 3A 85 22 |..";AL:..25);:."|
000007D0: 91 20 20 42 45 54 41 20 3D 20 31 32 30 9D 9D 9D |. BETA = 120...|
000007E0: 9D 9D 22 3B 42 54 00 02 10 68 01 41 4C B2 41 4C |..";BT...h.AL.AL|
000007F0: AC FF AD 31 38 30 3A 42 54 B2 42 54 AC FF AD 31 |...180:BT.BT...1|
00000800: 38 30 00 08 10 90 01 8F 00 0E 10 91 01 8F 00 14 |80..............|
00000810: 10 92 01 8F 00 1F 10 95 01 64 01 30 2C 31 35 00 |.........d.0,15.|
00000820: 46 10 9F 01 58 41 B2 31 36 30 AB BF 28 41 4C 29 |F...XA.160..(AL)|
00000830: AC 50 54 28 41 2C 32 29 AA BF 28 42 54 29 AC 50 |.PT(A,2)..(BT).P|
00000840: 54 28 41 2C 31 29 00 75 10 A4 01 59 41 B2 31 30 |T(A,1).u...YA.10|
00000850: 30 AB 50 54 28 41 2C 33 29 AB BE 28 41 4C 29 AC |0.PT(A,3)..(AL).|
00000860: 50 54 28 41 2C 32 29 AB BE 28 42 54 29 AC 50 54 |PT(A,2)..(BT).PT|
00000870: 28 41 2C 31 29 00 81 10 A9 01 81 42 B2 31 A4 53 |(A,1)......B.1.S|
00000880: 50 00 8D 10 AE 01 41 B2 5A 50 28 42 29 00 CE 10 |P.....A.ZP(B)...|
00000890: B3 01 58 53 B2 31 36 30 AB BF 28 41 4C 29 AC 50 |..XS.160..(AL).P|
000008A0: 54 28 41 2C 32 29 AA BF 28 42 54 29 AC 50 54 28 |T(A,2)..(BT).PT(|
000008B0: 41 2C 31 29 3A 8B 58 53 B1 33 31 39 A7 58 53 B2 |A,1):.XS.319.XS.|
000008C0: 33 31 39 3A 8B 58 53 B3 30 A7 58 53 B2 30 00 0C |319:.XS.0.XS.0..|
000008D0: 11 B8 01 59 53 B2 31 30 30 AB 50 54 28 41 2C 33 |...YS.100.PT(A,3|
000008E0: 29 AB BE 28 41 4C 29 AC 50 54 28 41 2C 32 29 AB |)..(AL).PT(A,2).|
000008F0: BE 28 42 54 29 AC 50 54 28 41 2C 31 29 3A 8B 59 |.(BT).PT(A,1):.Y|
00000900: 53 B1 31 39 39 A7 59 53 B2 31 39 39 00 1B 11 B9 |S.199.YS.199....|
00000910: 01 8B 59 53 B3 30 A7 59 53 B2 30 00 2F 11 BD 01 |..YS.0.YS.0./...|
00000920: 64 03 58 41 2C 59 41 2C 58 53 2C 59 53 2C 31 00 |d.XA,YA,XS,YS,1.|
00000930: 3F 11 C2 01 58 41 B2 58 53 3A 59 41 B2 59 53 00 |?...XA.XS:YA.YS.|
00000940: 45 11 C7 01 82 00 54 11 CC 01 8B 4B 4F B2 31 A7 |E.....T....KO.1.|
00000950: 31 34 31 30 00 66 11 E0 01 44 24 B2 22 3C 46 45 |1410.f...D$."<FE|
00000960: 52 54 49 47 3E 22 00 7A 11 E5 01 64 6F 20 35 2C |RTIG>".z...do 5,|
00000970: 35 2C 44 24 2C 31 2C 30 2C 37 00 9C 11 EA 01 A1 |5,D$,1,0,7......|
00000980: 41 24 3A 8B 41 24 B3 B1 C7 28 31 33 33 29 AF 41 |A$:.A$...(133).A|
00000990: 24 B3 B1 C7 28 31 33 29 A7 34 39 30 00 A2 11 F4 |$...(13).490....|
000009A0: 01 8F 00 A8 11 F5 01 8F 00 AE 11 F6 01 8F 00 CB |................|
000009B0: 11 F9 01 64 67 3A 99 22 93 22 A3 31 30 29 22 48 |...dg:.".".10)"H|
000009C0: 41 55 50 54 4D 45 4E 55 20 3A 22 00 E3 11 FE 01 |AUPTMENU :".....|
000009D0: 99 A3 31 30 29 22 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |..10)"..........|
000009E0: C5 C5 22 00 05 12 03 02 99 22 11 1D 1D 1D 28 31 |.."......"....(1|
000009F0: 29 20 3D 20 4E 45 55 45 53 20 41 43 53 45 4E 4B |) = NEUES ACSENK|
00000A00: 52 45 55 5A 22 00 2E 12 08 02 99 22 11 1D 1D 1D |REUZ"......"....|
00000A10: 28 32 29 20 3D 20 44 52 45 48 55 4E 47 20 44 45 |(2) = DREHUNG DE|
00000A20: 52 20 46 49 47 55 52 20 55 4D 20 4F 4F 22 00 5A |R FIGUR UM OO".Z|
00000A30: 12 0D 02 99 22 11 1D 1D 1D 28 33 29 20 3D 20 41 |...."....(3) = A|
00000A40: 55 53 47 41 4E 47 53 5A 55 53 54 41 4E 44 20 48 |USGANGSZUSTAND H|
00000A50: 45 52 53 54 45 4C 4C 45 4E 22 00 82 12 12 02 99 |ERSTELLEN"......|
00000A60: 22 11 1D 1D 1D 28 34 29 20 3D 20 56 45 52 53 43 |"....(4) = VERSC|
00000A70: 48 49 45 42 45 4E 20 44 45 52 20 46 49 47 55 52 |HIEBEN DER FIGUR|
00000A80: 20 22 00 B1 12 17 02 99 22 11 1D 1D 1D 28 35 29 | "......"....(5)|
00000A90: 20 3D 20 4B 4F 4F 52 44 49 4E 41 54 45 4E 41 43 | = KOORDINATENAC|
00000AA0: 48 53 45 4E 20 45 49 4E 5A 45 49 43 48 4E 45 4E |HSEN EINZEICHNEN|
00000AB0: 22 00 DF 12 1C 02 99 22 11 1D 1D 1D 28 36 29 20 |"......"....(6) |
00000AC0: 3D 20 41 42 53 50 45 49 43 48 45 52 4E 20 44 45 |= ABSPEICHERN DE|
00000AD0: 52 20 4B 4F 45 52 50 45 52 44 41 54 45 4E 22 00 |R KOERPERDATEN".|
00000AE0: 05 13 26 02 99 22 11 1D 1D 1D 28 37 29 20 3D 20 |..&.."....(7) = |
00000AF0: 48 41 52 44 43 4F 50 59 20 41 55 46 20 44 52 55 |HARDCOPY AUF DRU|
00000B00: 43 4B 45 52 22 00 22 13 2B 02 99 22 11 1D 1D 1D |CKER".".+.."....|
00000B10: 28 38 29 20 3D 20 4E 45 55 45 52 20 53 54 41 52 |(8) = NEUER STAR|
00000B20: 54 22 00 46 13 30 02 99 22 11 1D 1D 1D 28 39 29 |T".F.0.."....(9)|
00000B30: 20 3D 20 5A 55 52 20 47 52 41 46 49 4B 20 5A 55 | = ZUR GRAFIK ZU|
00000B40: 52 55 45 43 4B 22 00 5D 13 44 02 99 A3 31 30 29 |RUECK".].D...10)|
00000B50: 22 11 28 30 29 20 3D 20 45 4E 44 45 22 00 7E 13 |".(0) = ENDE".~.|
00000B60: 49 02 A1 41 24 3A 8B 41 24 B3 22 30 22 B0 41 24 |I..A$:.A$."0".A$|
00000B70: B1 22 39 22 B0 41 24 B2 22 22 A7 35 38 35 00 B2 |."9".A$."".585..|
00000B80: 13 4E 02 91 C5 28 41 24 29 89 33 30 30 2C 36 30 |.N...(A$).300,60|
00000B90: 30 2C 38 30 30 2C 31 33 30 30 2C 31 34 30 30 2C |0,800,1300,1400,|
00000BA0: 31 31 30 30 2C 31 35 30 30 2C 31 30 30 2C 31 32 |1100,1500,100,12|
00000BB0: 32 30 00 B8 13 53 02 90 00 BE 13 58 02 8F 00 C4 |20...S.....X....|
00000BC0: 13 59 02 8F 00 0E 14 62 02 99 22 93 1E 1D 1D 1D |.Y.....b..".....|
00000BD0: 1D 1D 44 52 45 48 55 4E 47 20 44 45 52 20 46 49 |..DREHUNG DER FI|
00000BE0: 47 55 52 20 55 4D 20 4F 4F 20 3A 22 3A 99 22 1D |GUR UM OO :":.".|
00000BF0: 1D 1D 1D 1D C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................|
00000C00: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 22 00 32 |.............".2|
00000C10: 14 67 02 99 22 11 11 1D 1D 1D 42 49 54 54 45 20 |.g..".....BITTE |
00000C20: 57 41 45 48 4C 45 4E 20 53 49 45 20 41 55 53 20 |WAEHLEN SIE AUS |
00000C30: 3A 22 00 5C 14 6C 02 99 22 11 11 1D 1D 1D 28 31 |:".\.l..".....(1|
00000C40: 29 20 3D 20 44 52 45 48 55 4E 47 20 55 4D 20 44 |) = DREHUNG UM D|
00000C50: 49 45 20 5A 2D 41 43 48 53 45 2E 22 00 85 14 71 |IE Z-ACHSE."...q|
00000C60: 02 99 22 11 1D 1D 1D 28 32 29 20 3D 20 44 52 45 |.."....(2) = DRE|
00000C70: 48 55 4E 47 20 55 4D 20 44 49 45 20 59 2D 41 43 |HUNG UM DIE Y-AC|
00000C80: 48 53 45 2E 22 00 AE 14 76 02 99 22 11 1D 1D 1D |HSE."...v.."....|
00000C90: 28 33 29 20 3D 20 44 52 45 48 55 4E 47 20 55 4D |(3) = DREHUNG UM|
00000CA0: 20 44 49 45 20 58 2D 41 43 48 53 45 2E 22 00 C2 | DIE X-ACHSE."..|
00000CB0: 14 7B 02 A1 41 3A 8B 41 B3 31 B0 41 B1 33 A7 36 |.{..A:.A.1.A.3.6|
00000CC0: 33 35 00 D9 14 7C 02 5A B2 35 AA 32 AC 41 3A 64 |35...|.Z.5.2.A:d|
00000CD0: 0D 5A 2C 33 2C 32 39 2C 31 00 0E 15 80 02 99 A3 |.Z,3,29,1.......|
00000CE0: 37 29 22 11 11 11 42 49 54 54 45 20 44 45 4E 20 |7)"...BITTE DEN |
00000CF0: 44 52 45 48 57 49 4E 4B 45 4C 20 3A 22 3B 3A 85 |DREHWINKEL :";:.|
00000D00: 44 45 3A 44 45 B2 44 45 AC FF AD 31 38 30 00 21 |DE:DE.DE...180.!|
00000D10: 15 85 02 91 41 89 36 35 30 2C 37 30 30 2C 37 35 |....A.650,700,75|
00000D20: 30 00 27 15 8A 02 8F 00 2D 15 8B 02 8F 00 39 15 |0.'.....-.....9.|
00000D30: 8F 02 81 58 B2 30 A4 45 50 00 84 15 94 02 45 4F |...X.0.EP.....EO|
00000D40: B2 C1 28 50 54 28 58 2C 31 29 AD 28 50 54 28 58 |..(PT(X,1).(PT(X|
00000D50: 2C 32 29 AB 31 45 AB 33 32 29 29 AB FF AC 28 50 |,2).1E.32))...(P|
00000D60: 54 28 58 2C 32 29 B3 B2 30 29 AB 32 AC FF AC 28 |T(X,2)..0).2...(|
00000D70: 50 54 28 58 2C 31 29 B3 30 AF 50 54 28 58 2C 32 |PT(X,1).0.PT(X,2|
00000D80: 29 B1 30 29 00 A3 15 99 02 45 4F B2 45 4F AA 44 |).0).....EO.EO.D|
00000D90: 45 3A 8B 45 4F B1 32 AC FF A7 45 4F B2 45 4F AB |E:.EO.2...EO.EO.|
00000DA0: 32 AC FF 00 C0 15 9E 02 52 B2 BA 28 50 54 28 58 |2.......R..(PT(X|
00000DB0: 2C 31 29 AE 32 AA 50 54 28 58 2C 32 29 AE 32 29 |,1).2.PT(X,2).2)|
00000DC0: 00 D4 15 A3 02 50 54 28 58 2C 31 29 B2 BF 28 45 |.....PT(X,1)..(E|
00000DD0: 4F 29 AC 52 00 E8 15 A8 02 50 54 28 58 2C 32 29 |O).R.....PT(X,2)|
00000DE0: B2 BE 28 45 4F 29 AC 52 00 EE 15 AD 02 82 00 F4 |..(EO).R........|
00000DF0: 15 BC 02 8F 00 FA 15 BD 02 8F 00 06 16 C1 02 81 |................|
00000E00: 58 B2 30 A4 45 50 00 51 16 C6 02 45 4F B2 C1 28 |X.0.EP.Q...EO..(|
00000E10: 50 54 28 58 2C 33 29 AD 28 50 54 28 58 2C 31 29 |PT(X,3).(PT(X,1)|
00000E20: AB 31 45 AB 33 32 29 29 AB FF AC 28 50 54 28 58 |.1E.32))...(PT(X|
00000E30: 2C 31 29 B3 B2 30 29 AB 32 AC FF AC 28 50 54 28 |,1)..0).2...(PT(|
00000E40: 58 2C 33 29 B3 30 AF 50 54 28 58 2C 31 29 B1 30 |X,3).0.PT(X,1).0|
00000E50: 29 00 70 16 CB 02 45 4F B2 45 4F AA 44 45 3A 8B |).p...EO.EO.DE:.|
00000E60: 45 4F B1 32 AC FF A7 45 4F B2 45 4F AB 32 AC FF |EO.2...EO.EO.2..|
00000E70: 00 8D 16 D0 02 52 B2 BA 28 50 54 28 58 2C 31 29 |.....R..(PT(X,1)|
00000E80: AE 32 AA 50 54 28 58 2C 33 29 AE 32 29 00 A1 16 |.2.PT(X,3).2)...|
00000E90: D5 02 50 54 28 58 2C 31 29 B2 BE 28 45 4F 29 AC |..PT(X,1)..(EO).|
00000EA0: 52 00 B5 16 DA 02 50 54 28 58 2C 33 29 B2 BF 28 |R.....PT(X,3)..(|
00000EB0: 45 4F 29 AC 52 00 BB 16 DF 02 82 00 C1 16 EE 02 |EO).R...........|
00000EC0: 8F 00 C7 16 EF 02 8F 00 D3 16 F3 02 81 58 B2 30 |.............X.0|
00000ED0: A4 45 50 00 1E 17 F8 02 45 4F B2 C1 28 50 54 28 |.EP.....EO..(PT(|
00000EE0: 58 2C 32 29 AD 28 50 54 28 58 2C 33 29 AB 31 45 |X,2).(PT(X,3).1E|
00000EF0: AB 33 32 29 29 AB FF AC 28 50 54 28 58 2C 33 29 |.32))...(PT(X,3)|
00000F00: B3 B2 30 29 AB 32 AC FF AC 28 50 54 28 58 2C 32 |..0).2...(PT(X,2|
00000F10: 29 B3 30 AF 50 54 28 58 2C 33 29 B1 30 29 00 3D |).0.PT(X,3).0).=|
00000F20: 17 FD 02 45 4F B2 45 4F AA 44 45 3A 8B 45 4F B1 |...EO.EO.DE:.EO.|
00000F30: 32 AC FF A7 45 4F B2 45 4F AB 32 AC FF 00 5A 17 |2...EO.EO.2...Z.|
00000F40: FE 02 52 B2 BA 28 50 54 28 58 2C 32 29 AE 32 AA |..R..(PT(X,2).2.|
00000F50: 50 54 28 58 2C 33 29 AE 32 29 00 6E 17 02 03 50 |PT(X,3).2).n...P|
00000F60: 54 28 58 2C 33 29 B2 BE 28 45 4F 29 AC 52 00 82 |T(X,3)..(EO).R..|
00000F70: 17 07 03 50 54 28 58 2C 32 29 B2 BF 28 45 4F 29 |...PT(X,2)..(EO)|
00000F80: AC 52 00 88 17 0C 03 82 00 95 17 16 03 64 70 32 |.R...........dp2|
00000F90: 3A 89 34 30 30 00 9B 17 20 03 8F 00 A1 17 21 03 |:.400... .....!.|
00000FA0: 8F 00 AD 17 2A 03 81 58 B2 30 A4 45 50 00 B8 17 |....*..X.0.EP...|
00000FB0: 34 03 81 59 B2 31 A4 33 00 CC 17 3E 03 50 54 28 |4..Y.1.3...>.PT(|
00000FC0: 58 2C 59 29 B2 50 41 28 58 2C 59 29 00 D5 17 48 |X,Y).PA(X,Y)...H|
00000FD0: 03 89 34 30 30 00 DB 17 E7 03 8F 00 E4 17 E8 03 |..400...........|
00000FE0: 89 33 30 30 00 EE 17 4C 04 89 31 35 30 30 00 FC |.300...L..1500..|
00000FF0: 17 C4 04 64 70 20 32 3A 89 34 38 30 00 02 18 14 |...dp 2:.480....|
00001000: 05 8F 00 08 18 15 05 8F 00 0E 18 16 05 8F 00 55 |...............U|
00001010: 18 19 05 99 22 93 1D 1D 1D 1D 1D 1D 1D 56 45 52 |...."........VER|
00001020: 53 43 48 49 45 42 45 4E 20 44 45 52 20 46 49 47 |SCHIEBEN DER FIG|
00001030: 55 52 20 3A 22 3A 99 22 1D 1D 1D 1D 1D 1D 1D C5 |UR :":."........|
00001040: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................|
00001050: C5 C5 C5 C5 22 00 87 18 1E 05 99 22 11 11 11 1D |...."......"....|
00001060: 1D 1D 42 49 54 54 45 20 55 4D 20 44 45 4E 20 56 |..BITTE UM DEN V|
00001070: 45 52 53 43 48 49 45 42 45 56 45 4B 54 4F 52 20 |ERSCHIEBEVEKTOR |
00001080: 49 4E 20 44 45 52 22 00 9D 18 23 05 99 22 46 4F |IN DER"...#.."FO|
00001090: 52 4D 20 27 58 2C 59 2C 5A 27 20 21 22 00 B8 18 |RM 'X,Y,Z' !"...|
000010A0: 28 05 85 22 11 11 56 45 4B 54 4F 52 20 3A 22 3B |(.."..VEKTOR :";|
000010B0: 50 58 2C 50 59 2C 50 5A 00 D9 18 2A 05 99 22 11 |PX,PY,PZ...*..".|
000010C0: 11 11 1D 1D 1D 42 49 54 54 45 20 45 54 57 41 53 |.....BITTE ETWAS|
000010D0: 20 47 45 44 55 4C 44 2E 22 00 E5 18 2D 05 81 41 | GEDULD."...-..A|
000010E0: B2 30 A4 45 50 00 FC 18 37 05 50 54 28 41 2C 31 |.0.EP...7.PT(A,1|
000010F0: 29 B2 50 54 28 41 2C 31 29 AA 50 58 00 13 19 3C |).PT(A,1).PX...<|
00001100: 05 50 54 28 41 2C 32 29 B2 50 54 28 41 2C 32 29 |.PT(A,2).PT(A,2)|
00001110: AA 50 59 00 2A 19 41 05 50 54 28 41 2C 33 29 B2 |.PY.*.A.PT(A,3).|
00001120: 50 54 28 41 2C 33 29 AA 50 5A 00 30 19 46 05 82 |PT(A,3).PZ.0.F..|
00001130: 00 39 19 50 05 89 34 30 30 00 3F 19 78 05 8F 00 |.9.P..400.?.x...|
00001140: 45 19 79 05 8F 00 4B 19 7A 05 8F 00 65 19 7D 05 |E.y...K.z...e.}.|
00001150: 8B 4B 4F B2 31 A7 54 59 B2 30 3A 4B 4F B2 30 3A |.KO.1.TY.0:KO.0:|
00001160: 89 31 34 31 35 00 73 19 82 05 4B 4F B2 31 3A 54 |.1415.s...KO.1:T|
00001170: 59 B2 31 00 98 19 87 05 58 53 B2 31 36 30 AB BF |Y.1.....XS.160..|
00001180: 28 41 4C 29 AC 39 35 3A 58 31 B2 31 36 30 AB BF |(AL).95:X1.160..|
00001190: 28 41 4C 29 AC 31 30 35 00 BD 19 8C 05 59 53 B2 |(AL).105.....YS.|
000011A0: 31 30 30 AB BE 28 41 4C 29 AC 39 35 3A 59 31 B2 |100..(AL).95:Y1.|
000011B0: 31 30 30 AB BE 28 41 4C 29 AC 31 30 35 00 D1 19 |100..(AL).105...|
000011C0: 91 05 64 0B 58 31 2C 59 31 2C 32 35 2C 54 59 2C |..d.X1,Y1,25,TY,|
000011D0: 31 00 E8 19 96 05 64 03 31 36 30 2C 31 30 30 2C |1.....d.160,100,|
000011E0: 58 53 2C 59 53 2C 54 59 00 0D 1A 9B 05 58 53 B2 |XS,YS,TY.....XS.|
000011F0: 31 36 30 AA BF 28 42 54 29 AC 39 35 3A 58 31 B2 |160..(BT).95:X1.|
00001200: 31 36 30 AA BF 28 42 54 29 AC 31 30 32 00 32 1A |160..(BT).102.2.|
00001210: A0 05 59 53 B2 31 30 30 AB BE 28 42 54 29 AC 39 |..YS.100..(BT).9|
00001220: 35 3A 59 31 B2 31 30 30 AB BE 28 42 54 29 AC 31 |5:Y1.100..(BT).1|
00001230: 30 35 00 4A 1A A5 05 64 03 20 31 36 30 2C 31 30 |05.J...d. 160,10|
00001240: 30 2C 58 53 2C 59 53 2C 54 59 00 5E 1A AA 05 64 |0,XS,YS,TY.^...d|
00001250: 0B 58 31 2C 59 31 2C 32 34 2C 54 59 2C 31 00 77 |.X1,Y1,24,TY,1.w|
00001260: 1A AF 05 64 03 20 31 36 30 2C 31 30 30 2C 31 36 |...d. 160,100,16|
00001270: 30 2C 31 30 2C 54 59 00 8B 1A B4 05 64 0B 31 35 |0,10,TY.....d.15|
00001280: 35 2C 30 2C 32 36 2C 54 59 2C 31 00 98 1A BE 05 |5,0,26,TY,1.....|
00001290: 64 70 32 3A 89 34 38 30 00 B3 1A DC 05 85 22 93 |dp2:.480......".|
000012A0: 11 11 1D 1D 4B 4F 52 50 45 52 4E 41 4D 45 22 3B |....KORPERNAME";|
000012B0: 4B 4E 24 00 D7 1A E6 05 4B 4E 24 B2 4B 4E 24 AA |KN$.....KN$.KN$.|
000012C0: 22 2E 33 44 22 3A 9F 32 2C 38 2C 32 2C 4B 4E 24 |".3D":.2,8,2,KN$|
000012D0: AA 22 2C 53 2C 57 22 00 FC 1A EB 05 98 32 2C 41 |.",S,W"......2,A|
000012E0: 31 3B C7 28 31 33 29 3B 46 47 3B C7 28 31 33 29 |1;.(13);FG;.(13)|
000012F0: 3B 53 50 3B C7 28 31 33 29 3B 45 50 00 38 1B F0 |;SP;.(13);EP.8..|
00001300: 05 81 54 B2 30 A4 41 31 3A 98 32 2C 50 54 28 54 |..T.0.A1:.2,PT(T|
00001310: 2C 31 29 3B C7 28 31 33 29 3B 50 54 28 54 2C 32 |,1);.(13);PT(T,2|
00001320: 29 3B C7 28 31 33 29 3B 50 54 28 54 2C 33 29 3B |);.(13);PT(T,3);|
00001330: C7 28 31 33 29 3B 3A 82 00 56 1B F5 05 81 54 B2 |.(13);:..V....T.|
00001340: 30 A4 46 47 3A 98 32 2C 5A 50 28 54 29 3B C7 28 |0.FG:.2,ZP(T);.(|
00001350: 31 33 29 3B 3A 82 00 5E 1B FA 05 A0 20 32 00 6C |13);:..^.... 2.l|
00001360: 1B 04 06 64 70 32 20 3A 89 34 38 30 00 A6 1B 40 |...dp2 :.480...@|
00001370: 06 85 22 11 11 1D 1D 4B 4F 52 50 45 52 4E 41 4D |.."....KORPERNAM|
00001380: 45 22 3B 4B 4E 24 3A 4B 4E 24 B2 4B 4E 24 AA 22 |E";KN$:KN$.KN$."|
00001390: 2E 33 44 22 3A 9F 32 2C 38 2C 32 2C 4B 4E 24 AA |.3D":.2,8,2,KN$.|
000013A0: 22 2C 53 2C 52 22 00 B9 1B 4A 06 84 32 2C 41 31 |",S,R"...J..2,A1|
000013B0: 2C 42 31 2C 53 50 2C 45 50 00 E2 1B 54 06 81 54 |,B1,SP,EP...T..T|
000013C0: B2 30 A4 41 31 3A 84 32 2C 50 54 28 54 2C 31 29 |.0.A1:.2,PT(T,1)|
000013D0: 2C 50 54 28 54 2C 32 29 2C 50 54 28 54 2C 33 29 |,PT(T,2),PT(T,3)|
000013E0: 3A 82 00 F9 1B 59 06 81 54 B2 30 A4 42 31 3A 84 |:....Y..T.0.B1:.|
000013F0: 32 2C 5A 50 28 54 29 3A 82 00 02 1C 5E 06 A0 32 |2,ZP(T):....^..2|
00001400: 3A 8E 00 1E 1C 08 07 9F 20 31 2C 38 2C 31 35 3A |:....... 1,8,15:|
00001410: 84 31 2C 41 2C 42 24 2C 43 2C 44 3A A0 31 00 37 |.1,A,B$,C,D:.1.7|
00001420: 1C 6C 07 9F 32 2C 38 2C 32 2C 22 50 59 52 41 4D |.l..2,8,2,"PYRAM|
00001430: 49 44 45 2E 33 44 22 00 49 1C D0 07 84 32 2C 41 |IDE.3D".I....2,A|
00001440: 3A 99 41 3A 89 32 30 30 30 00 00 00 |:.A:.2000... |
.......".":.53280,0:.53281,0.X.....10)".
NORMALE AXOMETRIE :":..10)"EEEEEEEEEEEEE
EEEEEE."......"......DIESES PROGRAMM STE
LLT EBENFLAECHIG"......".BEGRENZTE KOER
PER,NACH EINGABE BZW EINLE"...#..".SEN D
ER ECKPUNKTE UND DER VERBINDUNGSVOR"...(
..".SCHRIFT IN NORMALER AXOMETRIE DAR.".
H.-.."....HIERBEI KANN DAS ACHSENKREUZ B
ELIEBIG".A.2..".GEWAEHLT WERDEN."...7.."
ALLERDINGS .BLEIBT DER URSPRUNG IN DER"
...<.."BILDSCHIRMMITTE.".Y.A.."....NACH
DEM ZEICHNEN DER FIGUR ERSCHEINT"...F.."
.IN DER LINKEN OBEREN ECKE <FERTIG> UND"
.:.K.."MAN KOMMT DANN MIT .<F1> ODER <RE
TURN> .IN".R.L..".DAS HAUPTMANUE."...P..
"....DIE ERSTELLTEN KOERPER KOENNEN DANN
"...U.."AUCH AUF DISK ABGESPEICHERT WERD
EN.".F.Z.."..".11)"< TASTE >";.X._..198,
0:.198,1...D..:.PT(100,3),ZP(100),PA(100
,3).+.I.."....SOLL DER KOERPER VON DISK
EINGELESEN".A.N.."WERDEN <J/N> ?".\.S..A
$:.A$."J"..1600:.300.M.X..A$.."N".115...
}.."....BITTE UM DIE EINGABE DER EINZELN
EN".I.~.."ECKPUNKTE MIT DREI KOORDINATEN
(X,Y,Z)".....".BEI X='ENDE' WIRD DIE E
INGABE BEENDET.".'....".BEIX='\' KANN DE
R VORIGE PUNKT NOCHEIN".G...."MAL EINGEG
EBEN WERDEN..."......"("A")";:. PX$,PY,P
Z:PX.E(PX$):.PX$."ENDE".A1.A:A2.A:. 200.
....PX$."\" .A.A.1:.130.....PT(A,1).PX.
....PT(A,2).PY.M...PT(A,3).PZ.....PA(A,1
).PT(A,1)... .PA(A,2).PT(A,2).....PA(A,3
).PT(A,3).....A.A.1:.130...H...$.I...*.J
...A.M.EP.A.1:."....IN WELCHER REIHENFOL
GE SOLLEN WELCHE"...R.."PUNKTE VERBUNDEN
WERDEN ?"...W..".'ENDE' BEENDET DIE EIN
GABE WIEDER."......".'\' LAESST DIE KORR
EKTUR DER VORIGEN "......"EINGABE ZU."..
...."..AUSGANGSPUNKT";A.....ZP(0).A. ...
B.1:.".".L...."VON("A") NACH :";:. A$:.A
$."ENDE".270.H....A$."\".B.B.1:A.A1:.245
.Z...A1.A:A.E(A$):.....ZP(B).A.....B.B.1
:.245.....SP.B.1:B1.B:FG.B...,.....-....
.......1.."......BESTIMMEN SIE NUN DAS A
CHSENKREUZ."...6.."....GEBEN SIE DEN WIN
KEL ZWISCHEN :".!.;..".."...@...19)".".;
.E...19)".".P.J.." Z- UND Y-ACHSE";.19)"
NM";.24)"Z- UND X-ACHSE"...O...18)"N M"
.24)".....EIN."...Y...17)"N M"...^...
..C..". ALPHA = 120.....";AL:..25);:."
. BETA = 120.....";BT...H.AL.AL...180:B
T.BT...180.......................D.0,15.
F...XA.160..(AL).PT(A,2)..(BT).PT(A,1).U
...YA.100.PT(A,3)..(AL).PT(A,2)..(BT).PT
(A,1)......B.1.SP.....A.ZP(B).N...XS.160
..(AL).PT(A,2)..(BT).PT(A,1):.XS.319.XS.
319:.XS.0.XS.0.....YS.100.PT(A,3)..(AL).
PT(A,2)..(BT).PT(A,1):.YS.199.YS.199....
..YS.0.YS.0./...D.XA,YA,XS,YS,1.?.B.XA.X
S:YA.YS.E.G...T.L..KO.1.1410.F...D$."<FE
RTIG>".Z...DO 5,5,D$,1,0,7......A$:.A$..
G(133).A$..G(13).490...................K
...DG:.".".10)"HAUPTMENU :".......10)"EE
EEEEEEEEEE"......"....(1) = NEUES ACSENK
REUZ"......"....(2) = DREHUNG DER FIGUR
UM OO".Z...."....(3) = AUSGANGSZUSTAND H
ERSTELLEN"......"....(4) = VERSCHIEBEN D
ER FIGUR "......"....(5) = KOORDINATENAC
HSEN EINZEICHNEN"......"....(6) = ABSPEI
CHERN DER KOERPERDATEN"...&.."....(7) =
HARDCOPY AUF DRUCKER".".+.."....(8) = NE
UER START".F.0.."....(9) = ZUR GRAFIK ZU
RUECK".].D...10)".(0) = ENDE".~.I..A$:.A
$."0".A$."9".A$."".585...N..E(A$).300,60
0,800,1300,1400,1100,1500,100,1220...S..
...X...D.Y.....B..".......DREHUNG DER FI
GUR UM OO :":.".....EEEEEEEEEEEEEEEEEEEE
EEEEE".2.G..".....BITTE WAEHLEN SIE AUS
:".\.L..".....(1) = DREHUNG UM DIE Z-ACH
SE."...Q.."....(2) = DREHUNG UM DIE Y-AC
HSE."...V.."....(3) = DREHUNG UM DIE X-A
CHSE.".B.{..A:.A.1.A.3.635.Y.|.Z.5.2.A:D
.Z,3,29,1.......7)"...BITTE DEN DREHWINK
EL :";:.DE:DE.DE...180.!....A.650,700,75
0.'.....-.....9....X.0.EP.....EO.A(PT(X,
1).(PT(X,2).1E.32))...(PT(X,2)..0).2...(
PT(X,1).0.PT(X,2).0).....EO.EO.DE:.EO.2.
..EO.EO.2.......R..(PT(X,1).2.PT(X,2).2)
.T...PT(X,1)..(EO).R.....PT(X,2)..(EO).R
.....................A..X.0.EP.Q.F.EO.A(
PT(X,3).(PT(X,1).1E.32))...(PT(X,1)..0).
2...(PT(X,3).0.PT(X,1).0).P.K.EO.EO.DE:.
EO.2...EO.EO.2.....P.R..(PT(X,1).2.PT(X,
3).2)...U.PT(X,1)..(EO).R...Z.PT(X,3)..(
EO).R.......A.....G.....S....X.0.EP.....
EO.A(PT(X,2).(PT(X,3).1E.32))...(PT(X,3)
..0).2...(PT(X,2).0.PT(X,3).0).=...EO.EO
.DE:.EO.2...EO.EO.2...Z...R..(PT(X,2).2.
PT(X,3).2).N...PT(X,3)..(EO).R.....PT(X,
2)..(EO).R...........DP2:.400... .....!.
....*..X.0.EP...4..Y.1.3.L.>.PT(X,Y).PA(
X,Y).U.H..400............300...L..1500..
.D.DP 2:.480...................U...."...
.....VERSCHIEBEN DER FIGUR :":.".......E
EEEEEEEEEEEEEEEEEEEE"......"......BITTE
UM DEN VERSCHIEBEVEKTOR IN DER"...#.."FO
RM 'X,Y,Z' !"...(.."..VEKTOR :";PX,PY,PZ
.Y.*.."......BITTE ETWAS GEDULD."...-..A
.0.EP...7.PT(A,1).PT(A,1).PX...<.PT(A,2)
.PT(A,2).PY.*.A.PT(A,3).PT(A,3).PZ.0.F..
.9.P..400.?.X...E.Y...K.Z...E.}..KO.1.TY
.0:KO.0:.1415.S...KO.1:TY.1.....XS.160..
(AL).95:X1.160..(AL).105.....YS.100..(AL
).95:Y1.100..(AL).105.Q...D.X1,Y1,25,TY,
1.....D.160,100,XS,YS,TY.....XS.160..(BT
).95:X1.160..(BT).102.2. .YS.100..(BT).9
5:Y1.100..(BT).105.J...D. 160,100,XS,YS,
TY.^...D.X1,Y1,24,TY,1.W...D. 160,100,16
0,10,TY.....D.155,0,26,TY,1.....DP2:.480
......".....KORPERNAME";KN$.W...KN$.KN$.
".3D":.2,8,2,KN$.",S,W"......2,A1;G(13);
FG;G(13);SP;G(13);EP.8....T.0.A1:.2,PT(T
,1);G(13);PT(T,2);G(13);PT(T,3);G(13);:.
.V....T.0.FG:.2,ZP(T);G(13);:..^... 2.L
...DP2 :.480...@.."....KORPERNAME";KN$:K
N$.KN$.".3D":.2,8,2,KN$.",S,R"...J..2,A1
,B1,SP,EP...T..T.0.A1:.2,PT(T,1),PT(T,2)
,PT(T,3):....Y..T.0.B1:.2,ZP(T):....^. 2
:....... 1,8,15:.1,A,B$,C,D: 1.7.L..2,8,
2,"PYRAMIDE.3D".I.P..2,A:.A:.2000...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL