1520 SHUTTLE
FILE INFORMATION
FILENAME(S): 1520 SHUTTLE
FILE TYPE(S): PRG
FILE SIZE: 4.3K
FIRST SEEN: 2025-10-20 14:29:56
APPEARS ON: 1 disk(s)
FILE HASH
3ac7d209ddcf3b780ca037e40a0448bc94fc80d6f9b34110614514c85ba1bbcf
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PB DOMAIN 0054GR | 1520 SHUTTLE | PRG | Treasure Chest - Klaus Der Suhler | 6 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 22 1C 0A 00 99 20 C7 28 31 34 29 20 3A 20 |..".... .(14) : | 00000010: 9F 31 2C 36 2C 31 3A 9F 34 2C 36 3A 9F 37 2C 36 |.1,6,1:.4,6:.7,6| 00000020: 2C 37 00 37 1C 14 00 98 31 2C 22 4D 22 2C 30 2C |,7.7....1,"M",0,| 00000030: AB 33 30 30 3A 98 34 00 66 1C 1E 00 99 20 22 93 |.300:.4.f.... ".| 00000040: 11 11 11 11 11 11 11 11 11 20 20 20 20 20 20 20 |......... | 00000050: 20 20 20 20 20 20 20 20 D3 50 41 43 45 20 D3 48 | .PACE .H| 00000060: 55 54 54 4C 45 22 00 6C 1C 28 00 99 00 97 1C 32 |UTTLE".l.(.....2| 00000070: 00 99 20 22 20 20 20 20 20 20 20 20 20 C4 52 41 |.. " .RA| 00000080: 57 20 41 20 57 49 52 45 20 46 52 41 4D 45 20 53 |W A WIRE FRAME S| 00000090: 48 55 54 54 4C 45 22 00 BE 1C 3C 00 99 20 22 20 |HUTTLE"...<.. " | 000000A0: 20 20 20 20 20 20 20 20 20 20 20 4F 4E 20 41 4E | ON AN| 000000B0: 59 20 D8 2C D9 2C DA 20 50 4C 41 4E 45 22 00 C4 |Y .,.,. PLANE"..| 000000C0: 1C 46 00 99 00 EB 1C 50 00 99 20 22 20 20 20 20 |.F.....P.. " | 000000D0: 20 20 20 20 20 20 20 20 D0 52 4F 47 52 41 4D 20 | .ROGRAM | 000000E0: 53 45 54 54 49 4E 47 20 55 50 22 00 0F 1D 5A 00 |SETTING UP"...Z.| 000000F0: 99 20 22 20 20 20 20 20 20 20 20 20 20 20 20 20 |. " | 00000100: 20 20 20 D0 4C 45 41 53 45 20 57 41 49 54 22 00 | .LEASE WAIT".| 00000110: 83 1D 64 00 58 B2 30 3A 59 B2 30 3A 5A B2 30 3A |..d.X.0:Y.0:Z.0:| 00000120: 58 33 B2 30 3A 59 33 B2 30 3A 5A 33 B2 30 3A 41 |X3.0:Y3.0:Z3.0:A| 00000130: 4D B2 30 3A 42 4D B2 30 3A 43 4D B2 30 3A 44 4D |M.0:BM.0:CM.0:DM| 00000140: B2 30 3A 45 4D B2 30 3A 46 4D B2 30 3A 47 4D B2 |.0:EM.0:FM.0:GM.| 00000150: 30 3A 48 4D B2 30 3A 49 4D B2 30 3A 44 B2 30 3A |0:HM.0:IM.0:D.0:| 00000160: 50 B2 30 3A 42 B2 30 3A 48 B2 30 3A 55 B2 30 3A |P.0:B.0:H.0:U.0:| 00000170: 56 B2 30 3A 55 31 B2 30 3A 56 31 B2 30 3A 46 B2 |V.0:U1.0:V1.0:F.| 00000180: 31 2E 34 00 99 1D 6E 00 86 20 56 28 33 30 30 2C |1.4...n.. V(300,| 00000190: 33 29 2C 45 28 33 30 30 29 00 A2 1D 82 00 87 20 |3),E(300)...... | 000001A0: 4E 56 00 B1 1D 8C 00 81 20 50 B2 31 20 A4 20 4E |NV...... P.1 . N| 000001B0: 56 00 CC 1D 96 00 87 20 56 28 50 2C 31 29 2C 56 |V...... V(P,1),V| 000001C0: 28 50 2C 32 29 2C 56 28 50 2C 33 29 00 E6 1D A0 |(P,2),V(P,3)....| 000001D0: 00 56 28 50 2C 31 29 20 B2 20 2E 31 32 20 AC 20 |.V(P,1) . .12 . | 000001E0: 56 28 50 2C 31 29 00 00 1E AA 00 56 28 50 2C 32 |V(P,1).....V(P,2| 000001F0: 29 20 B2 20 2E 31 32 20 AC 20 56 28 50 2C 32 29 |) . .12 . V(P,2)| 00000200: 00 1A 1E B4 00 56 28 50 2C 33 29 20 B2 20 2E 31 |.....V(P,3) . .1| 00000210: 32 20 AC 20 56 28 50 2C 33 29 00 22 1E BE 00 82 |2 . V(P,3)."....| 00000220: 20 50 00 2B 1E C8 00 87 20 4E 45 00 3A 1E D2 00 | P.+.... NE.:...| 00000230: 81 20 45 B2 31 20 A4 20 4E 45 00 45 1E DC 00 87 |. E.1 . NE.E....| 00000240: 20 45 28 45 29 00 4D 1E E6 00 82 20 45 00 57 1E | E(E).M.... E.W.| 00000250: F0 00 44 B2 31 32 30 00 64 1E FA 00 99 20 C7 28 |..D.120.d.... .(| 00000260: 31 34 37 29 00 A2 1E 04 01 85 22 49 4E 50 55 54 |147)......"INPUT| 00000270: 20 41 4E 59 20 33 20 41 4E 47 4C 45 53 20 28 58 | ANY 3 ANGLES (X| 00000280: 2C 59 2C 5A 29 22 3B 20 50 30 2C 50 31 2C 50 32 |,Y,Z)"; P0,P1,P2| 00000290: 3A 49 30 B2 50 30 3A 49 31 B2 50 31 3A 49 32 B2 |:I0.P0:I1.P1:I2.| 000002A0: 50 32 00 B9 1E 09 01 98 31 2C 22 4D 22 2C 35 30 |P2......1,"M",50| 000002B0: 2C 30 3A 98 31 2C 22 49 22 00 DC 1E 0E 01 50 30 |,0:.1,"I".....P0| 000002C0: B2 B5 28 50 30 AD 46 29 20 3A 20 8B 20 50 30 B1 |..(P0.F) : . P0.| 000002D0: 32 35 35 20 A7 20 50 30 B2 32 35 35 00 FE 1E 18 |255 . P0.255....| 000002E0: 01 50 31 B2 B5 28 50 31 AD 46 29 20 3A 8B 20 50 |.P1..(P1.F) :. P| 000002F0: 31 B1 32 35 35 20 A7 20 50 31 B2 32 35 35 00 21 |1.255 . P1.255.!| 00000300: 1F 22 01 50 32 B2 B5 28 50 32 AD 46 29 20 3A 20 |.".P2..(P2.F) : | 00000310: 8B 20 50 32 B1 32 35 35 20 A7 20 50 32 B2 32 35 |. P2.255 . P2.25| 00000320: 35 00 40 1F 2C 01 50 B2 36 2E 32 38 20 AC 20 50 |5.@.,.P.6.28 . P| 00000330: 30 20 AD 20 32 35 35 20 AB 20 33 2E 31 34 31 36 |0 . 255 . 3.1416| 00000340: 00 56 1F 36 01 42 B2 36 2E 32 38 20 AC 20 50 32 |.V.6.B.6.28 . P2| 00000350: 20 AD 20 32 35 35 00 6C 1F 40 01 48 B2 36 2E 32 | . 255.l.@.H.6.2| 00000360: 38 20 AC 20 50 31 20 AD 20 32 35 35 00 76 1F 4A |8 . P1 . 255.v.J| 00000370: 01 8D 20 35 33 30 00 9E 1F 54 01 58 56 20 B2 20 |.. 530...T.XV . | 00000380: AB 44 20 AC 20 43 50 20 AC 20 53 48 3A 20 8F 20 |.D . CP . SH: . | 00000390: 2D 2D 2D 53 45 45 20 53 55 42 2E 2D 2D 2D 00 B4 |---SEE SUB.---..| 000003A0: 1F 5E 01 59 56 20 B2 20 AB 44 20 AC 20 43 50 20 |.^.YV . .D . CP | 000003B0: AC 20 43 48 00 C5 1F 68 01 5A 56 20 B2 20 AB 44 |. CH...h.ZV . .D| 000003C0: 20 AC 20 53 50 00 E3 1F 72 01 8F 20 2D 2D 2D 50 | . SP...r.. ---P| 000003D0: 52 4F 4A 45 43 54 20 4E 45 20 50 4F 49 4E 54 53 |ROJECT NE POINTS| 000003E0: 2D 2D 2D 00 F2 1F 7C 01 81 20 45 B2 31 20 A4 20 |---...|.. E.1 . | 000003F0: 4E 45 00 10 20 86 01 58 20 B2 20 56 28 20 B6 20 |NE.. ..X . V( . | 00000400: 28 20 45 20 28 20 45 20 29 20 29 2C 20 31 20 29 |( E ( E ) ), 1 )| 00000410: 00 2E 20 90 01 59 20 B2 20 56 28 20 B6 20 28 20 |.. ..Y . V( . ( | 00000420: 45 20 28 20 45 20 29 20 29 2C 20 32 20 29 00 4C |E ( E ) ), 2 ).L| 00000430: 20 9A 01 5A 20 B2 20 56 28 20 B6 20 28 20 45 20 | ..Z . V( . ( E | 00000440: 28 20 45 20 29 20 29 2C 20 33 20 29 00 56 20 A4 |( E ) ), 3 ).V .| 00000450: 01 8D 20 36 36 30 00 89 20 AE 01 8B 20 45 28 45 |.. 660.. ... E(E| 00000460: 29 B1 30 20 A7 20 98 31 2C 22 52 22 2C 55 31 AA |).0 . .1,"R",U1.| 00000470: 37 35 2C 56 31 AA 32 30 3A 98 31 2C 22 4A 22 2C |75,V1.20:.1,"J",| 00000480: 55 AA 37 35 2C 56 AA 32 30 00 CE 20 B8 01 8F 20 |U.75,V.20.. ... | 00000490: 49 42 4D 20 43 4F 44 45 20 2D 20 2D 20 49 46 20 |IBM CODE - - IF | 000004A0: 45 28 45 29 3E 30 20 54 48 45 4E 20 4C 49 4E 45 |E(E)>0 THEN LINE| 000004B0: 20 28 55 31 2A 32 2B 37 35 2C 56 31 2B 32 30 29 | (U1*2+75,V1+20)| 000004C0: 2D 28 55 2A 32 2B 37 35 2C 56 2B 32 30 29 00 E1 |-(U*2+75,V+20)..| 000004D0: 20 C2 01 55 31 20 B2 20 55 3A 20 56 31 20 B2 20 | ..U1 . U: V1 . | 000004E0: 56 00 E9 20 CC 01 82 20 45 00 04 21 D6 01 98 31 |V.. ... E..!...1| 000004F0: 2C 22 48 22 3A 98 31 2C 22 4D 22 2C 30 2C AB 32 |,"H":.1,"M",0,.2| 00000500: 30 3A 98 34 00 13 21 E0 01 98 34 2C 22 58 3D 22 |0:.4..!...4,"X="| 00000510: 3B 49 30 00 22 21 EA 01 98 34 2C 22 59 3D 22 3B |;I0."!...4,"Y=";| 00000520: 49 31 00 31 21 F4 01 98 34 2C 22 5A 3D 22 3B 49 |I1.1!...4,"Z=";I| 00000530: 32 00 46 21 FE 01 98 31 2C 22 4D 22 2C 30 2C AB |2.F!...1,"M",0,.| 00000540: 32 30 30 3A 98 34 00 50 21 08 02 89 20 32 36 30 |200:.4.P!... 260| 00000550: 00 6B 21 12 02 43 48 20 B2 20 BE 20 28 48 29 3A |.k!..CH . . (H):| 00000560: 20 53 48 20 B2 20 BF 20 28 48 29 00 86 21 1C 02 | SH . . (H)..!..| 00000570: 43 50 20 B2 20 BE 20 28 50 29 3A 20 53 50 20 B2 |CP . . (P): SP .| 00000580: 20 BF 20 28 50 29 00 A1 21 26 02 43 42 20 B2 20 | . (P)..!&.CB . | 00000590: BE 20 28 42 29 3A 20 53 42 20 B2 20 BF 20 28 42 |. (B): SB . . (B| 000005A0: 29 00 C1 21 30 02 41 4D 20 B2 20 43 42 20 AC 20 |)..!0.AM . CB . | 000005B0: 43 48 20 AB 20 53 48 20 AC 20 53 50 20 AC 20 53 |CH . SH . SP . S| 000005C0: 42 00 E2 21 3A 02 42 4D 20 B2 20 AB 43 42 20 AC |B..!:.BM . .CB .| 000005D0: 20 53 48 20 AB 20 53 50 20 AC 20 43 48 20 AC 20 | SH . SP . CH . | 000005E0: 53 42 00 F3 21 44 02 43 4D 20 B2 20 43 50 20 AC |SB..!D.CM . CP .| 000005F0: 20 53 42 00 04 22 4E 02 44 4D 20 B2 20 53 48 20 | SB.."N.DM . SH | 00000600: AC 20 43 50 00 15 22 58 02 45 4D 20 B2 20 43 50 |. CP.."X.EM . CP| 00000610: 20 AC 20 43 48 00 21 22 62 02 46 4D 20 B2 20 53 | . CH.!"b.FM . S| 00000620: 50 00 42 22 6C 02 47 4D 20 B2 20 AB 43 48 20 AC |P.B"l.GM . .CH .| 00000630: 20 53 42 20 AB 20 53 48 20 AC 20 53 50 20 AC 20 | SB . SH . SP . | 00000640: 43 42 00 62 22 76 02 48 4D 20 B2 20 53 48 20 AC |CB.b"v.HM . SH .| 00000650: 20 53 42 20 AB 20 53 50 20 AC 20 43 48 20 AC 20 | SB . SP . CH . | 00000660: 43 42 00 73 22 80 02 49 4D 20 B2 20 43 50 20 AC |CB.s"..IM . CP .| 00000670: 20 43 42 00 79 22 8A 02 8E 00 88 22 94 02 58 20 | CB.y"....."..X | 00000680: B2 20 58 20 AB 20 58 56 00 97 22 9E 02 59 20 B2 |. X . XV.."..Y .| 00000690: 20 59 20 AB 20 59 56 00 A6 22 A8 02 5A 20 B2 20 | Y . YV.."..Z . | 000006A0: 5A 20 AB 20 5A 56 00 C8 22 B2 02 58 33 20 B2 20 |Z . ZV.."..X3 . | 000006B0: 41 4D 20 AC 20 58 20 AA 20 42 4D 20 AC 20 59 20 |AM . X . BM . Y | 000006C0: AA 20 43 4D 20 AC 20 5A 00 EA 22 BC 02 59 33 20 |. CM . Z.."..Y3 | 000006D0: B2 20 44 4D 20 AC 20 58 20 AA 20 45 4D 20 AC 20 |. DM . X . EM . | 000006E0: 59 20 AA 20 46 4D 20 AC 20 5A 00 0C 23 C6 02 5A |Y . FM . Z..#..Z| 000006F0: 33 20 B2 20 47 4D 20 AC 20 58 20 AA 20 48 4D 20 |3 . GM . X . HM | 00000700: AC 20 59 20 AA 20 49 4D 20 AC 20 5A 00 2E 23 D0 |. Y . IM . Z..#.| 00000710: 02 8F 20 55 20 3D 20 36 38 20 2B 20 31 33 2E 35 |.. U = 68 + 13.5| 00000720: 20 2A 20 44 20 2A 20 58 33 20 2F 20 59 33 00 4C | * D * X3 / Y3.L| 00000730: 23 DA 02 55 20 B2 20 36 38 20 AA 20 33 30 20 AC |#..U . 68 . 30 .| 00000740: 20 44 20 AC 20 58 33 20 AD 20 59 33 00 6E 23 E4 | D . X3 . Y3.n#.| 00000750: 02 8F 20 56 20 3D 20 38 30 20 2D 20 31 31 2E 35 |.. V = 80 - 11.5| 00000760: 20 2A 20 44 20 2A 20 5A 33 20 2F 20 59 33 00 8C | * D * Z3 / Y3..| 00000770: 23 EE 02 56 20 B2 20 38 30 20 AB 20 33 30 20 AC |#..V . 80 . 30 .| 00000780: 20 44 20 AC 20 5A 33 20 AD 20 59 33 00 92 23 F8 | D . Z3 . Y3..#.| 00000790: 02 8E 00 9C 23 02 03 83 20 31 32 34 00 DA 23 0C |....#... 124..#.| 000007A0: 03 83 20 30 2C 2D 32 2E 32 2C 34 36 2C 31 2E 35 |.. 0,-2.2,46,1.5| 000007B0: 2C 2D 32 2E 36 2C 34 36 2C 32 2E 32 2C 2D 34 2E |,-2.6,46,2.2,-4.| 000007C0: 36 2C 34 36 2C 31 2E 37 2C 2D 36 2E 35 2C 34 36 |6,46,1.7,-6.5,46| 000007D0: 2C 30 2C 2D 36 2E 37 2C 34 36 00 07 24 16 03 83 |,0,-6.7,46..$...| 000007E0: 20 2D 31 2E 37 2C 2D 36 2E 35 2C 34 36 2C 2D 32 | -1.7,-6.5,46,-2| 000007F0: 2E 32 2C 2D 34 2E 36 2C 34 36 2C 2D 31 2E 35 2C |.2,-4.6,46,-1.5,| 00000800: 2D 32 2E 36 2C 34 36 00 49 24 20 03 83 20 30 2C |-2.6,46.I$ .. 0,| 00000810: 2D 2E 38 2C 34 33 2C 32 2E 38 2C 2D 31 2E 35 2C |-.8,43,2.8,-1.5,| 00000820: 34 33 2C 34 2C 2D 34 2E 35 2C 34 33 2C 33 2C 2D |43,4,-4.5,43,3,-| 00000830: 37 2E 32 2C 34 33 2C 30 2C 2D 38 2C 34 33 2C 2D |7.2,43,0,-8,43,-| 00000840: 33 2C 2D 37 2E 32 2C 34 33 00 67 24 2A 03 83 20 |3,-7.2,43.g$*.. | 00000850: 2D 34 2C 2D 34 2E 35 2C 34 33 2C 2D 32 2E 38 2C |-4,-4.5,43,-2.8,| 00000860: 2D 31 2E 35 2C 34 33 00 A8 24 34 03 83 20 30 2C |-1.5,43..$4.. 0,| 00000870: 31 2E 37 2C 33 38 2C 34 2E 36 2C 30 2C 33 38 2C |1.7,38,4.6,0,38,| 00000880: 35 2E 38 2C 2D 34 2E 34 2C 33 38 2C 34 2C 2D 38 |5.8,-4.4,38,4,-8| 00000890: 2E 32 2C 33 38 2C 30 2C 2D 39 2C 33 38 2C 2D 34 |.2,38,0,-9,38,-4| 000008A0: 2C 2D 38 2E 32 2C 33 38 00 C5 24 3E 03 83 20 2D |,-8.2,38..$>.. -| 000008B0: 35 2E 38 2C 2D 34 2E 34 2C 33 38 2C 2D 34 2E 36 |5.8,-4.4,38,-4.6| 000008C0: 2C 30 2C 33 38 00 0E 25 48 03 83 20 30 2C 34 2C |,0,38..%H.. 0,4,| 000008D0: 33 32 2E 35 2C 34 2E 35 2C 31 2C 33 32 2E 35 2C |32.5,4.5,1,32.5,| 000008E0: 35 2E 38 2C 2D 34 2E 36 2C 33 32 2E 35 2C 34 2C |5.8,-4.6,32.5,4,| 000008F0: 2D 39 2C 33 32 2E 35 2C 30 2C 2D 39 2E 35 2C 33 |-9,32.5,0,-9.5,3| 00000900: 32 2E 35 2C 2D 34 2C 2D 39 2C 33 32 2E 35 00 2F |2.5,-4,-9,32.5./| 00000910: 25 52 03 83 20 2D 35 2E 38 2C 2D 34 2E 36 2C 33 |%R.. -5.8,-4.6,3| 00000920: 32 2E 35 2C 2D 34 2E 35 2C 31 2C 33 32 2E 35 00 |2.5,-4.5,1,32.5.| 00000930: 75 25 5C 03 83 20 30 2C 38 2C 32 36 2E 33 2C 33 |u%\.. 0,8,26.3,3| 00000940: 2E 35 2C 37 2C 32 36 2E 33 2C 37 2E 38 2C 32 2C |.5,7,26.3,7.8,2,| 00000950: 32 36 2E 33 2C 38 2C 2D 37 2C 32 36 2E 33 2C 30 |26.3,8,-7,26.3,0| 00000960: 2C 2D 39 2E 38 2C 32 36 2E 33 2C 2D 38 2C 2D 37 |,-9.8,26.3,-8,-7| 00000970: 2C 32 36 2E 33 00 93 25 66 03 83 20 2D 37 2E 38 |,26.3..%f.. -7.8| 00000980: 2C 32 2C 32 36 2E 33 2C 2D 33 2E 35 2C 37 2C 32 |,2,26.3,-3.5,7,2| 00000990: 36 2E 33 00 D9 25 70 03 83 20 30 2C 38 2C 32 31 |6.3..%p.. 0,8,21| 000009A0: 2E 35 2C 33 2E 38 2C 37 2E 35 2C 32 31 2E 35 2C |.5,3.8,7.5,21.5,| 000009B0: 38 2C 33 2C 32 31 2E 35 2C 38 2C 2D 38 2C 32 31 |8,3,21.5,8,-8,21| 000009C0: 2E 35 2C 30 2C 2D 39 2E 38 2C 32 31 2E 35 2C 2D |.5,0,-9.8,21.5,-| 000009D0: 38 2C 2D 38 2C 32 31 2E 35 00 F7 25 7A 03 83 20 |8,-8,21.5..%z.. | 000009E0: 2D 38 2C 33 2C 32 31 2E 35 2C 2D 33 2E 38 2C 37 |-8,3,21.5,-3.8,7| 000009F0: 2E 35 2C 32 31 2E 35 00 3A 26 84 03 83 20 30 2C |.5,21.5.:&... 0,| 00000A00: 38 2C 31 34 2C 34 2E 37 2C 37 2C 31 34 2C 38 2C |8,14,4.7,7,14,8,| 00000A10: 34 2C 31 34 2C 38 2C 2D 38 2E 37 2C 31 34 2C 30 |4,14,8,-8.7,14,0| 00000A20: 2C 2D 31 30 2C 31 34 2C 2D 38 2C 2D 38 2E 37 2C |,-10,14,-8,-8.7,| 00000A30: 31 34 2C 2D 38 2C 34 2C 31 34 00 4A 26 8E 03 83 |14,-8,4,14.J&...| 00000A40: 20 2D 34 2E 37 2C 37 2C 31 34 00 86 26 98 03 83 | -4.7,7,14..&...| 00000A50: 20 30 2C 38 2C 34 2C 34 2E 37 2C 37 2C 34 2C 38 | 0,8,4,4.7,7,4,8| 00000A60: 2C 34 2C 34 2C 38 2C 2D 38 2E 37 2C 34 2C 30 2C |,4,4,8,-8.7,4,0,| 00000A70: 2D 31 30 2C 34 2C 2D 38 2C 2D 38 2E 37 2C 34 2C |-10,4,-8,-8.7,4,| 00000A80: 2D 38 2C 34 2C 34 00 95 26 A2 03 83 20 2D 34 2E |-8,4,4..&... -4.| 00000A90: 37 2C 37 2C 34 00 DF 26 AC 03 83 20 30 2C 38 2C |7,7,4..&... 0,8,| 00000AA0: 2D 31 32 2C 34 2E 37 2C 37 2C 2D 31 32 2C 38 2C |-12,4.7,7,-12,8,| 00000AB0: 34 2C 2D 31 32 2C 38 2C 2D 38 2E 37 2C 2D 31 32 |4,-12,8,-8.7,-12| 00000AC0: 2C 30 2C 2D 31 30 2C 2D 31 32 2C 2D 38 2C 2D 38 |,0,-10,-12,-8,-8| 00000AD0: 2E 37 2C 2D 31 32 2C 2D 38 2C 34 2C 2D 31 32 00 |.7,-12,-8,4,-12.| 00000AE0: F0 26 B6 03 83 20 2D 34 2E 37 2C 37 2C 2D 31 32 |.&... -4.7,7,-12| 00000AF0: 00 3D 27 C0 03 83 20 30 2C 38 2C 2D 32 37 2E 33 |.='... 0,8,-27.3| 00000B00: 2C 34 2E 37 2C 37 2C 2D 32 37 2E 33 2C 38 2C 34 |,4.7,7,-27.3,8,4| 00000B10: 2C 2D 32 37 2E 33 2C 38 2C 2D 38 2E 37 2C 2D 32 |,-27.3,8,-8.7,-2| 00000B20: 37 2E 33 2C 30 2C 2D 31 30 2C 2D 32 37 2E 33 2C |7.3,0,-10,-27.3,| 00000B30: 2D 38 2C 2D 38 2E 37 2C 2D 32 37 2E 33 00 5B 27 |-8,-8.7,-27.3.['| 00000B40: CA 03 83 20 2D 38 2C 34 2C 2D 32 37 2E 33 2C 2D |... -8,4,-27.3,-| 00000B50: 34 2E 37 2C 37 2C 2D 32 37 2E 33 00 A8 27 D4 03 |4.7,7,-27.3..'..| 00000B60: 83 20 30 2C 38 2C 2D 33 35 2E 36 2C 34 2E 37 2C |. 0,8,-35.6,4.7,| 00000B70: 37 2C 2D 33 35 2E 36 2C 38 2C 34 2C 2D 33 35 2E |7,-35.6,8,4,-35.| 00000B80: 36 2C 38 2C 2D 38 2E 37 2C 2D 33 35 2E 36 2C 30 |6,8,-8.7,-35.6,0| 00000B90: 2C 2D 31 30 2C 2D 33 35 2E 36 2C 2D 38 2C 2D 38 |,-10,-35.6,-8,-8| 00000BA0: 2E 37 2C 2D 33 35 2E 36 00 C6 27 DE 03 83 20 2D |.7,-35.6..'... -| 00000BB0: 38 2C 34 2C 2D 33 35 2E 36 2C 2D 34 2E 37 2C 37 |8,4,-35.6,-4.7,7| 00000BC0: 2C 2D 33 35 2E 36 00 0B 28 E8 03 83 20 30 2C 39 |,-35.6..(... 0,9| 00000BD0: 2C 2D 34 33 2C 32 2C 38 2E 35 2C 2D 34 33 2C 38 |,-43,2,8.5,-43,8| 00000BE0: 2E 38 2C 31 2E 35 2C 2D 34 33 2C 39 2C 2D 31 30 |.8,1.5,-43,9,-10| 00000BF0: 2C 2D 34 33 2C 30 2C 2D 31 30 2E 38 2C 2D 34 33 |,-43,0,-10.8,-43| 00000C00: 2C 2D 39 2C 2D 31 30 2C 2D 34 33 00 29 28 F2 03 |,-9,-10,-43.)(..| 00000C10: 83 20 2D 38 2E 38 2C 31 2E 35 2C 2D 34 33 2C 2D |. -8.8,1.5,-43,-| 00000C20: 32 2C 38 2E 35 2C 2D 34 33 00 72 28 FC 03 83 20 |2,8.5,-43.r(... | 00000C30: 30 2C 39 2E 35 2C 2D 34 38 2C 32 2C 39 2E 33 2C |0,9.5,-48,2,9.3,| 00000C40: 2D 34 38 2C 39 2E 32 2C 31 2E 35 2C 2D 34 38 2C |-48,9.2,1.5,-48,| 00000C50: 31 30 2C 2D 31 30 2C 2D 34 38 2C 30 2C 2D 31 30 |10,-10,-48,0,-10| 00000C60: 2E 32 2C 2D 34 38 2C 2D 31 30 2C 2D 31 30 2C 2D |.2,-48,-10,-10,-| 00000C70: 34 38 00 90 28 06 04 83 20 2D 39 2E 32 2C 31 2E |48..(... -9.2,1.| 00000C80: 35 2C 2D 34 38 2C 2D 32 2C 39 2E 33 2C 2D 34 38 |5,-48,-2,9.3,-48| 00000C90: 00 C4 28 10 04 83 20 38 2E 37 2C 2D 38 2E 37 2C |..(... 8.7,-8.7,| 00000CA0: 32 31 2C 31 35 2C 2D 38 2E 37 2C 2D 31 36 2C 33 |21,15,-8.7,-16,3| 00000CB0: 35 2C 2D 31 30 2C 2D 33 36 2C 33 35 2C 2D 31 30 |5,-10,-36,35,-10| 00000CC0: 2C 2D 34 30 00 FC 28 1A 04 83 20 2D 38 2E 37 2C |,-40..(... -8.7,| 00000CD0: 2D 38 2E 37 2C 32 31 2C 2D 31 35 2C 2D 38 2E 37 |-8.7,21,-15,-8.7| 00000CE0: 2C 2D 31 36 2C 2D 33 35 2C 2D 31 30 2C 2D 33 36 |,-16,-35,-10,-36| 00000CF0: 2C 2D 33 35 2C 2D 31 30 2C 2D 34 30 00 26 29 24 |,-35,-10,-40.&)$| 00000D00: 04 83 20 30 2C 31 33 2C 2D 33 37 2C 30 2C 33 33 |.. 0,13,-37,0,33| 00000D10: 2C 2D 36 30 2C 30 2C 33 33 2C 2D 36 39 2C 30 2C |,-60,0,33,-69,0,| 00000D20: 31 34 2C 2D 36 30 00 6E 29 2E 04 83 20 36 2C 31 |14,-60.n)... 6,1| 00000D30: 31 2C 2D 34 33 2C 36 2C 31 31 2C 2D 34 38 2C 31 |1,-43,6,11,-48,1| 00000D40: 31 2C 35 2C 2D 34 33 2C 31 31 2C 35 2C 2D 34 38 |1,5,-43,11,5,-48| 00000D50: 2C 2D 36 2C 31 31 2C 2D 34 33 2C 2D 36 2C 31 31 |,-6,11,-43,-6,11| 00000D60: 2C 2D 34 38 2C 2D 31 31 2C 35 2C 2D 34 33 00 7E |,-48,-11,5,-43.~| 00000D70: 29 38 04 83 20 2D 31 31 2C 35 2C 2D 34 38 00 88 |)8.. -11,5,-48..| 00000D80: 29 42 04 83 20 32 35 39 00 D7 29 4C 04 83 20 2D |)B.. 259..)L.. -| 00000D90: 31 2C 32 2C 33 2C 34 2C 35 2C 36 2C 37 2C 38 2C |1,2,3,4,5,6,7,8,| 00000DA0: 31 2C 2D 39 2C 31 30 2C 31 31 2C 31 32 2C 31 33 |1,-9,10,11,12,13| 00000DB0: 2C 31 34 2C 31 35 2C 31 36 2C 39 2C 2D 31 37 2C |,14,15,16,9,-17,| 00000DC0: 31 38 2C 31 39 2C 32 30 2C 32 31 2C 32 32 2C 32 |18,19,20,21,22,2| 00000DD0: 33 2C 32 34 2C 31 37 00 15 2A 56 04 83 20 2D 32 |3,24,17..*V.. -2| 00000DE0: 35 2C 32 36 2C 32 37 2C 32 38 2C 32 39 2C 33 30 |5,26,27,28,29,30| 00000DF0: 2C 33 31 2C 33 32 2C 32 35 2C 2D 33 33 2C 33 34 |,31,32,25,-33,34| 00000E00: 2C 33 35 2C 33 36 2C 33 37 2C 33 38 2C 33 39 2C |,35,36,37,38,39,| 00000E10: 34 30 2C 33 33 00 53 2A 60 04 83 20 2D 34 31 2C |40,33.S*`.. -41,| 00000E20: 34 32 2C 34 33 2C 34 34 2C 34 35 2C 34 36 2C 34 |42,43,44,45,46,4| 00000E30: 37 2C 34 38 2C 34 31 2C 2D 34 39 2C 35 30 2C 35 |7,48,41,-49,50,5| 00000E40: 31 2C 35 32 2C 35 33 2C 35 34 2C 35 35 2C 35 36 |1,52,53,54,55,56| 00000E50: 2C 34 39 00 91 2A 6A 04 83 20 2D 35 37 2C 35 38 |,49..*j.. -57,58| 00000E60: 2C 35 39 2C 36 30 2C 36 31 2C 36 32 2C 36 33 2C |,59,60,61,62,63,| 00000E70: 36 34 2C 35 37 2C 2D 36 35 2C 36 36 2C 36 37 2C |64,57,-65,66,67,| 00000E80: 36 38 2C 36 39 2C 37 30 2C 37 31 2C 37 32 2C 36 |68,69,70,71,72,6| 00000E90: 35 00 CF 2A 74 04 83 20 2D 37 33 2C 37 34 2C 37 |5..*t.. -73,74,7| 00000EA0: 35 2C 37 36 2C 37 37 2C 37 38 2C 37 39 2C 38 30 |5,76,77,78,79,80| 00000EB0: 2C 37 33 2C 2D 38 31 2C 38 32 2C 38 33 2C 38 34 |,73,-81,82,83,84| 00000EC0: 2C 38 35 2C 38 36 2C 38 37 2C 38 38 2C 38 31 00 |,85,86,87,88,81.| 00000ED0: 12 2B 7E 04 83 20 2D 38 39 2C 39 30 2C 39 31 2C |.+~.. -89,90,91,| 00000EE0: 39 32 2C 39 33 2C 39 34 2C 39 35 2C 39 36 2C 38 |92,93,94,95,96,8| 00000EF0: 39 2C 2D 39 37 2C 39 38 2C 39 39 2C 31 30 30 2C |9,-97,98,99,100,| 00000F00: 31 30 31 2C 31 30 32 2C 31 30 33 2C 31 30 34 2C |101,102,103,104,| 00000F10: 39 37 00 3E 2B 88 04 83 20 2D 31 2C 39 2C 31 37 |97.>+... -1,9,17| 00000F20: 2C 32 35 2C 33 33 2C 34 31 2C 34 39 2C 35 37 2C |,25,33,41,49,57,| 00000F30: 36 35 2C 37 33 2C 38 31 2C 38 39 2C 39 37 00 6B |65,73,81,89,97.k| 00000F40: 2B 92 04 83 20 2D 32 2C 31 30 2C 31 38 2C 32 36 |+... -2,10,18,26| 00000F50: 2C 33 34 2C 34 32 2C 35 30 2C 35 38 2C 36 36 2C |,34,42,50,58,66,| 00000F60: 37 34 2C 38 32 2C 39 30 2C 39 38 00 98 2B 9C 04 |74,82,90,98..+..| 00000F70: 83 20 2D 33 2C 31 31 2C 31 39 2C 32 37 2C 33 35 |. -3,11,19,27,35| 00000F80: 2C 34 33 2C 35 31 2C 35 39 2C 36 37 2C 37 35 2C |,43,51,59,67,75,| 00000F90: 38 33 2C 39 31 2C 39 39 00 C6 2B A6 04 83 20 2D |83,91,99..+... -| 00000FA0: 34 2C 31 32 2C 32 30 2C 32 38 2C 33 36 2C 34 34 |4,12,20,28,36,44| 00000FB0: 2C 35 32 2C 36 30 2C 36 38 2C 37 36 2C 38 34 2C |,52,60,68,76,84,| 00000FC0: 39 32 2C 31 30 30 00 F4 2B B0 04 83 20 2D 35 2C |92,100..+... -5,| 00000FD0: 31 33 2C 32 31 2C 32 39 2C 33 37 2C 34 35 2C 35 |13,21,29,37,45,5| 00000FE0: 33 2C 36 31 2C 36 39 2C 37 37 2C 38 35 2C 39 33 |3,61,69,77,85,93| 00000FF0: 2C 31 30 31 00 22 2C BA 04 83 20 2D 36 2C 31 34 |,101.",... -6,14| 00001000: 2C 32 32 2C 33 30 2C 33 38 2C 34 36 2C 35 34 2C |,22,30,38,46,54,| 00001010: 36 32 2C 37 30 2C 37 38 2C 38 36 2C 39 34 2C 31 |62,70,78,86,94,1| 00001020: 30 32 00 50 2C C4 04 83 20 2D 37 2C 31 35 2C 32 |02.P,... -7,15,2| 00001030: 33 2C 33 31 2C 33 39 2C 34 37 2C 35 35 2C 36 33 |3,31,39,47,55,63| 00001040: 2C 37 31 2C 37 39 2C 38 37 2C 39 35 2C 31 30 33 |,71,79,87,95,103| 00001050: 00 7E 2C CE 04 83 20 2D 38 2C 31 36 2C 32 34 2C |.~,... -8,16,24,| 00001060: 33 32 2C 34 30 2C 34 38 2C 35 36 2C 36 34 2C 37 |32,40,48,56,64,7| 00001070: 32 2C 38 30 2C 38 38 2C 39 36 2C 31 30 34 00 9B |2,80,88,96,104..| 00001080: 2C D8 04 83 20 2D 34 34 2C 31 30 35 2C 31 30 36 |,... -44,105,106| 00001090: 2C 31 30 37 2C 31 30 38 2C 39 32 00 B8 2C E2 04 |,107,108,92..,..| 000010A0: 83 20 2D 34 36 2C 31 30 39 2C 31 31 30 2C 31 31 |. -46,109,110,11| 000010B0: 31 2C 31 31 32 2C 39 34 00 D5 2C EC 04 83 20 2D |1,112,94..,... -| 000010C0: 38 31 2C 31 31 33 2C 31 31 34 2C 31 31 35 2C 31 |81,113,114,115,1| 000010D0: 31 36 2C 38 39 00 F3 2C F6 04 83 20 2D 38 32 2C |16,89..,... -82,| 000010E0: 31 31 37 2C 31 31 38 2C 2D 38 33 2C 31 31 39 2C |117,118,-83,119,| 000010F0: 31 32 30 00 11 2D 00 05 83 20 2D 38 37 2C 31 32 |120..-... -87,12| 00001100: 31 2C 31 32 32 2C 2D 38 38 2C 31 32 33 2C 31 32 |1,122,-88,123,12| 00001110: 34 00 3B 2D 0A 05 83 20 2D 31 31 37 2C 31 31 39 |4.;-... -117,119| 00001120: 2C 2D 31 32 31 2C 31 32 33 2C 2D 31 31 38 2C 31 |,-121,123,-118,1| 00001130: 32 30 2C 2D 31 32 32 2C 31 32 34 00 41 2D 14 05 |20,-122,124.A-..| 00001140: 80 00 00 00 |.... |
..".... G(14) : .1,6,1:.4,6:.7,6,7.7....
1,"M",0,.300:.4.F.... "..........
SPACE SHUTTLE".L.(.....2.. "
DRAW A WIRE FRAME SHUTTLE"...<.. "
ON ANY X,Y,Z PLANE".D.F.....P
.. " PROGRAM SETTING UP"...Z.
. " PLEASE WAIT"...D.X.0:
Y.0:Z.0:X3.0:Y3.0:Z3.0:AM.0:BM.0:CM.0:DM
.0:EM.0:FM.0:GM.0:HM.0:IM.0:D.0:P.0:B.0:
H.0:U.0:V.0:U1.0:V1.0:F.1.4...N.. V(300,
3),E(300)...... NV...... P.1 . NV.L....
V(P,1),V(P,2),V(P,3)... .V(P,1) . .12 .
V(P,1).....V(P,2) . .12 . V(P,2).....V(P
,3) . .12 . V(P,3).".... P.+.H.. NE.:.R.
. E.1 . NE.E.... E(E).M.... E.W...D.120.
D.... G(147)......"INPUT ANY 3 ANGLES (X
,Y,Z)"; P0,P1,P2:I0.P0:I1.P1:I2.P2......
1,"M",50,0:.1,"I".....P0..(P0.F) : . P0.
255 . P0.255.....P1..(P1.F) :. P1.255 .
P1.255.!.".P2..(P2.F) : . P2.255 . P2.25
5.@.,.P.6.28 . P0 . 255 . 3.1416.V.6.B.6
.28 . P2 . 255.L.@.H.6.28 . P1 . 255.V.J
.. 530...T.XV . .D . CP . SH: . ---SEE S
UB.---...^.YV . .D . CP . CH.E.H.ZV . .D
. SP...R.. ---PROJECT NE POINTS---...|.
. E.1 . NE.. ..X . V( . ( E ( E ) ), 1 )
.. ..Y . V( . ( E ( E ) ), 2 ).L ..Z . V
( . ( E ( E ) ), 3 ).V ... 660.. ... E(E
).0 . .1,"R",U1.75,V1.20:.1,"J",U.75,V.2
0.N ... IBM CODE - - IF E(E)>0 THEN LINE
(U1*2+75,V1+20)-(U*2+75,V+20).. B.U1 .
U: V1 . V.. L.. E..!V..1,"H":.1,"M",0,.2
0:.4..!...4,"X=";I0."!...4,"Y=";I1.1!...
4,"Z=";I2.F!...1,"M",0,.200:.4.P!... 260
.K!..CH . . (H): SH . . (H)..!..CP . . (
P): SP . . (P)..!&.CB . . (B): SB . . (B
).A!0.AM . CB . CH . SH . SP . SB..!:.BM
. .CB . SH . SP . CH . SB..!D.CM . CP .
SB.."N.DM . SH . CP.."X.EM . CP . CH.!"
B.FM . SP.B"L.GM . .CH . SB . SH . SP .
CB.B"V.HM . SH . SB . SP . CH . CB.S"..I
M . CP . CB.Y"....."..X . X . XV.."..Y .
Y . YV.."..Z . Z . ZV.H"..X3 . AM . X .
BM . Y . CM . Z.."..Y3 . DM . X . EM .
Y . FM . Z..#F.Z3 . GM . X . HM . Y . IM
. Z..#P.. U = 68 + 13.5 * D * X3 / Y3.L
#Z.U . 68 . 30 . D . X3 . Y3.N#... V = 8
0 - 11.5 * D * Z3 / Y3..#..V . 80 . 30 .
D . Z3 . Y3..#.....#... 124.Z#... 0,-2.
2,46,1.5,-2.6,46,2.2,-4.6,46,1.7,-6.5,46
,0,-6.7,46..$... -1.7,-6.5,46,-2.2,-4.6,
46,-1.5,-2.6,46.I$ .. 0,-.8,43,2.8,-1.5,
43,4,-4.5,43,3,-7.2,43,0,-8,43,-3,-7.2,4
3.G$*.. -4,-4.5,43,-2.8,-1.5,43..$4.. 0,
1.7,38,4.6,0,38,5.8,-4.4,38,4,-8.2,38,0,
-9,38,-4,-8.2,38.E$>.. -5.8,-4.4,38,-4.6
,0,38..%H.. 0,4,32.5,4.5,1,32.5,5.8,-4.6
,32.5,4,-9,32.5,0,-9.5,32.5,-4,-9,32.5./
%R.. -5.8,-4.6,32.5,-4.5,1,32.5.U%\.. 0,
8,26.3,3.5,7,26.3,7.8,2,26.3,8,-7,26.3,0
,-9.8,26.3,-8,-7,26.3..%F.. -7.8,2,26.3,
-3.5,7,26.3.Y%P.. 0,8,21.5,3.8,7.5,21.5,
8,3,21.5,8,-8,21.5,0,-9.8,21.5,-8,-8,21.
5..%Z.. -8,3,21.5,-3.8,7.5,21.5.:&... 0,
8,14,4.7,7,14,8,4,14,8,-8.7,14,0,-10,14,
-8,-8.7,14,-8,4,14.J&... -4.7,7,14..&...
0,8,4,4.7,7,4,8,4,4,8,-8.7,4,0,-10,4,-8
,-8.7,4,-8,4,4..&... -4.7,7,4..&... 0,8,
-12,4.7,7,-12,8,4,-12,8,-8.7,-12,0,-10,-
12,-8,-8.7,-12,-8,4,-12..&... -4.7,7,-12
.='... 0,8,-27.3,4.7,7,-27.3,8,4,-27.3,8
,-8.7,-27.3,0,-10,-27.3,-8,-8.7,-27.3.['
J.. -8,4,-27.3,-4.7,7,-27.3..'T.. 0,8,-3
5.6,4.7,7,-35.6,8,4,-35.6,8,-8.7,-35.6,0
,-10,-35.6,-8,-8.7,-35.6.F'... -8,4,-35.
6,-4.7,7,-35.6..(... 0,9,-43,2,8.5,-43,8
.8,1.5,-43,9,-10,-43,0,-10.8,-43,-9,-10,
-43.)(... -8.8,1.5,-43,-2,8.5,-43.R(...
0,9.5,-48,2,9.3,-48,9.2,1.5,-48,10,-10,-
48,0,-10.2,-48,-10,-10,-48..(... -9.2,1.
5,-48,-2,9.3,-48.D(... 8.7,-8.7,21,15,-8
.7,-16,35,-10,-36,35,-10,-40..(... -8.7,
-8.7,21,-15,-8.7,-16,-35,-10,-36,-35,-10
,-40.&)$.. 0,13,-37,0,33,-60,0,33,-69,0,
14,-60.N)... 6,11,-43,6,11,-48,11,5,-43,
11,5,-48,-6,11,-43,-6,11,-48,-11,5,-43.~
)8.. -11,5,-48..)B.. 259.W)L.. -1,2,3,4,
5,6,7,8,1,-9,10,11,12,13,14,15,16,9,-17,
18,19,20,21,22,23,24,17..*V.. -25,26,27,
28,29,30,31,32,25,-33,34,35,36,37,38,39,
40,33.S*`.. -41,42,43,44,45,46,47,48,41,
-49,50,51,52,53,54,55,56,49..*J.. -57,58
,59,60,61,62,63,64,57,-65,66,67,68,69,70
,71,72,65.O*T.. -73,74,75,76,77,78,79,80
,73,-81,82,83,84,85,86,87,88,81..+~.. -8
9,90,91,92,93,94,95,96,89,-97,98,99,100,
101,102,103,104,97.>+... -1,9,17,25,33,4
1,49,57,65,73,81,89,97.K+... -2,10,18,26
,34,42,50,58,66,74,82,90,98..+... -3,11,
19,27,35,43,51,59,67,75,83,91,99.F+... -
4,12,20,28,36,44,52,60,68,76,84,92,100..
+... -5,13,21,29,37,45,53,61,69,77,85,93
,101.",... -6,14,22,30,38,46,54,62,70,78
,86,94,102.P,D.. -7,15,23,31,39,47,55,63
,71,79,87,95,103.~,N.. -8,16,24,32,40,48
,56,64,72,80,88,96,104..,X.. -44,105,106
,107,108,92..,... -46,109,110,111,112,94
.U,... -81,113,114,115,116,89..,... -82,
117,118,-83,119,120..-... -87,121,122,-8
8,123,124.;-... -117,119,-121,123,-118,1
20,-122,124.A-......
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL