FBOLT INST
FILE INFORMATION
FILENAME(S): FBOLT INST
FILE TYPE(S): PRG
FILE SIZE: 7K
FIRST SEEN: 2025-10-20 14:30:37
APPEARS ON: 1 disk(s)
FILE HASH
8a8e27eb7537f8f0ec9ae720f05e65439b00ccf1326a903dcbcd4cc7572a70bb
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| PB DOMAIN 0001UT | FBOLT INST | PRG | Treasure Chest - Klaus Der Suhler | 15 | 4 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0A 08 01 00 9F 34 2C 34 00 22 08 02 00 45 |.......4,4."...E|
00000010: 4E 24 B2 C7 28 31 34 29 3A 44 45 24 B2 C7 28 31 |N$..(14):DE$..(1|
00000020: 35 29 00 4A 08 03 00 98 34 2C 45 4E 24 3B 22 20 |5).J....4,EN$;" |
00000030: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 46 42 | FB|
00000040: 4F 4C 54 20 49 4E 53 54 22 3B 00 55 08 04 00 98 |OLT INST";.U....|
00000050: 34 2C 44 45 24 00 62 08 05 00 9F 20 31 2C 34 3A |4,DE$.b.... 1,4:|
00000060: 98 31 00 6D 08 06 00 98 31 3A A0 20 31 00 74 08 |.1.m....1:. 1.t.|
00000070: 07 00 A0 34 00 82 08 0A 00 99 20 22 49 4E 50 55 |...4...... "INPU|
00000080: 54 22 00 C6 08 14 00 99 20 22 28 4C 49 4E 45 53 |T"...... "(LINES|
00000090: 20 39 30 20 54 4F 20 35 33 30 29 2E 20 49 4E 20 | 90 TO 530). IN |
000000A0: 4F 52 44 45 52 20 54 4F 20 52 55 4E 20 54 48 49 |ORDER TO RUN THI|
000000B0: 53 20 50 52 4F 47 52 41 4D 20 41 4E 44 20 47 45 |S PROGRAM AND GE|
000000C0: 54 20 54 48 45 22 00 D0 08 17 00 9F 20 31 2C 34 |T THE"...... 1,4|
000000D0: 00 14 09 19 00 98 31 2C 22 28 4C 49 4E 45 53 20 |......1,"(LINES |
000000E0: 39 30 20 54 4F 20 35 33 30 29 20 49 4E 20 4F 52 |90 TO 530) IN OR|
000000F0: 44 45 52 20 54 4F 20 52 55 4E 20 54 48 49 53 20 |DER TO RUN THIS |
00000100: 50 52 4F 47 52 41 4D 20 41 4E 44 20 47 45 54 20 |PROGRAM AND GET |
00000110: 54 48 45 22 00 57 09 1E 00 99 20 22 52 45 53 55 |THE".W.... "RESU|
00000120: 4C 54 53 2C 20 59 4F 55 20 57 49 4C 4C 20 4E 45 |LTS, YOU WILL NE|
00000130: 45 44 20 31 39 20 50 49 45 43 45 53 20 4F 46 20 |ED 19 PIECES OF |
00000140: 49 4E 46 4F 52 4D 41 54 49 4F 4E 2C 20 45 58 50 |INFORMATION, EXP|
00000150: 4C 41 49 4E 45 44 22 00 9B 09 23 00 98 31 2C 22 |LAINED"...#..1,"|
00000160: 52 45 53 55 4C 54 53 2C 20 59 4F 55 20 57 49 4C |RESULTS, YOU WIL|
00000170: 4C 20 4E 45 45 44 20 31 39 20 50 49 45 43 45 53 |L NEED 19 PIECES|
00000180: 20 4F 46 20 49 4E 46 4F 52 4D 41 54 49 4F 4E 2C | OF INFORMATION,|
00000190: 20 45 58 50 4C 41 49 4E 45 44 22 00 AF 09 28 00 | EXPLAINED"...(.|
000001A0: 99 20 22 41 53 20 46 4F 4C 4C 4F 57 53 2E 22 00 |. "AS FOLLOWS.".|
000001B0: C4 09 2D 00 98 31 2C 22 41 53 20 46 4F 4C 4C 4F |..-..1,"AS FOLLO|
000001C0: 57 53 2E 22 00 CA 09 2E 00 99 00 D1 09 2F 00 98 |WS."........./..|
000001D0: 31 00 12 0A 32 00 99 22 31 2E 20 28 43 24 29 20 |1...2.."1. (C$) |
000001E0: 4D 4F 44 45 4C 20 44 45 53 49 47 4E 41 54 49 4F |MODEL DESIGNATIO|
000001F0: 4E 2E 20 41 20 33 30 2D 43 48 41 52 41 43 54 45 |N. A 30-CHARACTE|
00000200: 52 20 20 46 49 45 4C 44 20 48 41 53 20 42 45 45 |R FIELD HAS BEE|
00000210: 4E 22 00 54 0A 37 00 98 31 2C 22 31 2E 20 28 43 |N".T.7..1,"1. (C|
00000220: 24 29 20 4D 4F 44 45 4C 20 44 45 53 49 47 4E 41 |$) MODEL DESIGNA|
00000230: 54 49 4F 4E 2E 20 41 20 33 30 2D 43 48 41 52 41 |TION. A 30-CHARA|
00000240: 43 54 45 52 20 46 49 45 4C 44 20 48 41 53 20 42 |CTER FIELD HAS B|
00000250: 45 45 4E 22 00 96 0A 3C 00 99 22 50 52 4F 56 49 |EEN"...<.."PROVI|
00000260: 44 45 44 20 54 4F 20 49 44 45 4E 54 49 46 59 20 |DED TO IDENTIFY |
00000270: 54 48 45 20 44 45 53 49 47 4E 20 42 45 49 4E 47 |THE DESIGN BEING|
00000280: 20 41 4E 41 4C 59 5A 45 44 2E 20 54 48 49 53 20 | ANALYZED. THIS |
00000290: 46 49 45 4C 44 22 00 DA 0A 41 00 98 31 2C 22 50 |FIELD"...A..1,"P|
000002A0: 52 4F 56 49 44 45 44 20 54 4F 20 49 44 45 4E 54 |ROVIDED TO IDENT|
000002B0: 49 46 59 20 54 48 45 20 44 45 53 49 47 4E 20 42 |IFY THE DESIGN B|
000002C0: 45 49 4E 47 20 41 4E 41 4C 59 5A 45 44 2E 20 54 |EING ANALYZED. T|
000002D0: 48 49 53 20 46 49 45 4C 44 22 00 22 0B 46 00 99 |HIS FIELD".".F..|
000002E0: 22 49 4E 43 4C 55 44 45 53 20 42 4C 41 4E 4B 53 |"INCLUDES BLANKS|
000002F0: 20 41 4E 44 20 43 41 4E 20 42 45 20 4F 43 43 55 | AND CAN BE OCCU|
00000300: 50 49 45 44 20 42 59 20 4C 45 54 54 45 52 53 2C |PIED BY LETTERS,|
00000310: 4E 55 4D 45 52 41 4C 53 2C 53 59 4D 42 4F 4C 53 |NUMERALS,SYMBOLS|
00000320: 2C 22 00 6E 0B 4B 00 98 31 2C 22 49 4E 43 4C 55 |,".n.K..1,"INCLU|
00000330: 44 45 53 20 42 4C 41 4E 4B 53 20 41 4E 44 20 43 |DES BLANKS AND C|
00000340: 41 4E 20 42 45 20 4F 43 43 55 50 49 45 44 20 42 |AN BE OCCUPIED B|
00000350: 59 20 4C 45 54 54 45 52 53 2C 20 4E 55 4D 45 52 |Y LETTERS, NUMER|
00000360: 41 4C 53 2C 20 53 59 4D 42 4F 4C 53 2C 22 00 B4 |ALS, SYMBOLS,"..|
00000370: 0B 50 00 99 22 4F 52 20 41 20 43 4F 4D 42 49 4E |.P.."OR A COMBIN|
00000380: 41 54 49 4F 4E 20 4F 46 20 41 4C 4C 20 54 48 52 |ATION OF ALL THR|
00000390: 45 45 2E 20 53 48 4F 55 4C 44 20 59 4F 55 20 4E |EE. SHOULD YOU N|
000003A0: 45 45 44 20 41 20 4C 41 52 47 45 52 20 46 49 45 |EED A LARGER FIE|
000003B0: 4C 44 2C 22 00 FC 0B 55 00 98 31 2C 22 4F 52 20 |LD,"...U..1,"OR |
000003C0: 41 20 43 4F 4D 42 49 4E 41 54 49 4F 4E 20 4F 46 |A COMBINATION OF|
000003D0: 20 41 4C 4C 20 54 48 52 45 45 2E 20 53 48 4F 55 | ALL THREE. SHOU|
000003E0: 4C 44 20 59 4F 55 20 4E 45 45 44 20 41 20 4C 41 |LD YOU NEED A LA|
000003F0: 52 47 45 52 20 46 49 45 4C 44 2C 22 00 29 0C 5A |RGER FIELD,".).Z|
00000400: 00 99 22 42 45 20 53 55 52 45 20 54 4F 20 52 45 |.."BE SURE TO RE|
00000410: 44 49 4D 45 4E 53 49 4F 4E 20 43 24 20 20 49 4E |DIMENSION C$ IN|
00000420: 20 4C 49 4E 20 31 30 2E 22 00 57 0C 5F 00 98 31 | LIN 10.".W._..1|
00000430: 2C 22 42 45 20 53 55 52 45 20 54 4F 20 52 45 44 |,"BE SURE TO RED|
00000440: 49 4D 45 4E 53 49 4F 4E 20 43 24 20 49 4E 20 4C |IMENSION C$ IN L|
00000450: 49 4E 20 31 30 2E 22 00 5D 0C 60 00 99 00 64 0C |IN 10.".].`...d.|
00000460: 61 00 98 31 00 8D 0C 64 00 99 22 32 2E 20 28 42 |a..1...d.."2. (B|
00000470: 34 29 20 54 4F 54 41 4C 20 57 49 4E 47 53 50 41 |4) TOTAL WINGSPA|
00000480: 4E 2C 20 49 4E 20 49 4E 43 48 45 53 22 00 B8 0C |N, IN INCHES"...|
00000490: 69 00 98 31 2C 22 32 2E 20 28 42 34 29 20 54 4F |i..1,"2. (B4) TO|
000004A0: 54 41 4C 20 57 49 4E 47 53 50 41 4E 2C 20 49 4E |TAL WINGSPAN, IN|
000004B0: 20 49 4E 43 48 45 53 22 00 BE 0C 6A 00 99 00 C5 | INCHES"...j....|
000004C0: 0C 6B 00 98 31 00 0E 0D 6E 00 99 22 33 2E 20 28 |.k..1...n.."3. (|
000004D0: 52 31 29 20 57 49 4E 47 20 52 4F 4F 54 20 43 48 |R1) WING ROOT CH|
000004E0: 4F 52 44 2C 20 49 4E 20 49 4E 43 48 45 53 2E 20 |ORD, IN INCHES. |
000004F0: 44 49 53 54 41 4E 43 45 20 42 45 54 57 45 45 4E |DISTANCE BETWEEN|
00000500: 20 4C 45 41 44 49 4E 47 20 45 44 47 45 22 00 59 | LEADING EDGE".Y|
00000510: 0D 73 00 98 31 2C 22 33 2E 20 28 52 31 29 20 57 |.s..1,"3. (R1) W|
00000520: 49 4E 47 20 52 4F 4F 54 20 43 48 4F 52 44 2C 20 |ING ROOT CHORD, |
00000530: 49 4E 20 49 4E 43 48 45 53 2E 20 44 49 53 54 41 |IN INCHES. DISTA|
00000540: 4E 43 45 20 42 45 54 57 45 45 4E 20 4C 45 41 44 |NCE BETWEEN LEAD|
00000550: 49 4E 47 20 45 44 47 45 22 00 8F 0D 78 00 99 22 |ING EDGE"...x.."|
00000560: 41 4E 44 20 54 52 41 49 4C 49 4E 47 20 45 44 47 |AND TRAILING EDG|
00000570: 45 2C 4D 45 41 53 55 52 45 44 20 41 54 20 54 48 |E,MEASURED AT TH|
00000580: 45 20 57 49 4E 47 20 43 45 4E 54 45 52 2E 22 00 |E WING CENTER.".|
00000590: C7 0D 7D 00 98 31 2C 22 41 4E 44 20 54 52 41 49 |..}..1,"AND TRAI|
000005A0: 4C 49 4E 47 20 45 44 47 45 2C 20 4D 45 41 53 55 |LING EDGE, MEASU|
000005B0: 52 45 44 20 41 54 20 54 48 45 20 57 49 4E 47 20 |RED AT THE WING |
000005C0: 43 45 4E 54 45 52 22 00 CD 0D 7E 00 99 00 D4 0D |CENTER"...~.....|
000005D0: 7F 00 98 31 00 FE 0D 82 00 99 22 34 2E 20 28 54 |...1......"4. (T|
000005E0: 31 29 20 57 49 4E 47 20 54 49 50 20 43 48 4F 52 |1) WING TIP CHOR|
000005F0: 44 2C 20 49 4E 20 49 4E 43 48 45 53 2E 22 00 2A |D, IN INCHES.".*|
00000600: 0E 87 00 98 31 2C 22 34 2E 20 28 54 31 29 20 57 |....1,"4. (T1) W|
00000610: 49 4E 47 20 54 49 50 20 43 48 4F 52 44 2C 20 49 |ING TIP CHORD, I|
00000620: 4E 20 49 4E 43 48 45 53 2E 22 00 30 0E 88 00 99 |N INCHES.".0....|
00000630: 00 37 0E 89 00 98 31 00 7E 0E 8C 00 99 22 35 2E |.7....1.~...."5.|
00000640: 20 28 44 31 29 20 4C 45 41 44 49 4E 47 20 45 44 | (D1) LEADING ED|
00000650: 47 45 20 53 57 45 45 50 2C 20 49 4E 20 49 4E 43 |GE SWEEP, IN INC|
00000660: 48 45 53 2E 20 44 49 53 54 41 4E 43 45 20 4F 46 |HES. DISTANCE OF|
00000670: 20 54 49 50 20 52 45 4C 41 54 49 56 45 22 00 C7 | TIP RELATIVE"..|
00000680: 0E 91 00 98 31 2C 22 35 2E 20 28 44 31 29 20 4C |....1,"5. (D1) L|
00000690: 45 41 44 49 4E 47 20 45 44 47 45 20 53 57 45 45 |EADING EDGE SWEE|
000006A0: 50 2C 20 49 4E 20 49 4E 43 48 45 53 2E 20 44 49 |P, IN INCHES. DI|
000006B0: 53 54 41 4E 43 45 20 4F 46 20 54 49 50 20 52 45 |STANCE OF TIP RE|
000006C0: 4C 41 54 49 56 45 22 00 0D 0F 96 00 99 22 54 4F |LATIVE"......"TO|
000006D0: 20 52 4F 4F 54 20 41 4E 44 20 52 45 53 55 4C 54 | ROOT AND RESULT|
000006E0: 49 4E 47 20 46 52 4F 4D 20 4C 45 41 44 49 4E 47 |ING FROM LEADING|
000006F0: 20 45 44 47 45 20 53 57 45 45 50 2E 20 49 46 20 | EDGE SWEEP. IF |
00000700: 4C 45 41 44 49 4E 47 20 45 44 47 45 22 00 55 0F |LEADING EDGE".U.|
00000710: 9B 00 98 31 2C 22 54 4F 20 52 4F 4F 54 20 41 4E |...1,"TO ROOT AN|
00000720: 44 20 52 45 53 55 4C 54 49 4E 47 20 46 52 4F 4D |D RESULTING FROM|
00000730: 20 4C 45 41 44 49 4E 47 20 45 44 47 45 20 53 57 | LEADING EDGE SW|
00000740: 45 45 50 2E 20 49 46 20 4C 45 41 44 49 4E 47 20 |EEP. IF LEADING |
00000750: 45 44 47 45 22 00 9D 0F A0 00 99 22 49 53 20 53 |EDGE"......"IS S|
00000760: 57 45 50 54 20 2D 42 41 43 4B 2C 20 54 48 45 20 |WEPT -BACK, THE |
00000770: 56 41 4C 55 45 20 49 53 20 50 4F 53 49 54 49 56 |VALUE IS POSITIV|
00000780: 45 2E 20 49 46 20 4C 45 41 44 49 4E 47 20 45 44 |E. IF LEADING ED|
00000790: 47 45 20 49 53 20 53 57 45 50 54 2D 22 00 E6 0F |GE IS SWEPT-"...|
000007A0: A5 00 98 31 2C 22 49 53 20 53 57 45 50 54 2D 42 |...1,"IS SWEPT-B|
000007B0: 41 43 4B 2C 20 54 48 45 20 56 41 4C 55 45 20 49 |ACK, THE VALUE I|
000007C0: 53 20 50 4F 53 49 54 49 56 45 2E 20 49 46 20 4C |S POSITIVE. IF L|
000007D0: 45 41 44 49 4E 47 20 45 44 47 45 20 49 53 20 53 |EADING EDGE IS S|
000007E0: 57 45 50 54 2D 22 00 0D 10 AA 00 99 22 46 4F 52 |WEPT-"......"FOR|
000007F0: 57 41 52 44 2C 20 54 48 45 20 56 41 4C 55 45 20 |WARD, THE VALUE |
00000800: 49 53 20 4E 45 47 41 54 49 56 45 2E 22 00 36 10 |IS NEGATIVE.".6.|
00000810: AF 00 98 31 2C 22 46 4F 52 57 41 52 44 2C 20 54 |...1,"FORWARD, T|
00000820: 48 45 20 56 41 4C 55 45 20 49 53 20 4E 45 47 41 |HE VALUE IS NEGA|
00000830: 54 49 56 45 2E 22 00 3C 10 B0 00 99 00 43 10 B1 |TIVE.".<.....C..|
00000840: 00 98 31 00 86 10 B4 00 99 22 36 2E 20 28 42 35 |..1......"6. (B5|
00000850: 29 20 54 4F 54 41 4C 20 53 50 41 4E 20 4F 46 20 |) TOTAL SPAN OF |
00000860: 54 48 45 20 48 4F 52 49 5A 4F 4E 54 41 4C 20 53 |THE HORIZONTAL S|
00000870: 54 41 42 49 4C 49 5A 45 52 2C 20 49 4E 20 49 4E |TABILIZER, IN IN|
00000880: 43 48 45 53 2E 22 00 CB 10 B9 00 98 31 2C 22 36 |CHES."......1,"6|
00000890: 2E 20 28 42 35 29 20 54 4F 54 41 4C 20 53 50 41 |. (B5) TOTAL SPA|
000008A0: 4E 20 4F 46 20 54 48 45 20 48 4F 52 49 5A 4F 4E |N OF THE HORIZON|
000008B0: 54 41 4C 20 53 54 41 42 49 4C 49 5A 45 52 2C 20 |TAL STABILIZER, |
000008C0: 49 4E 20 49 4E 43 48 45 53 2E 22 00 D1 10 BA 00 |IN INCHES.".....|
000008D0: 99 00 D8 10 BB 00 98 31 00 0B 11 BE 00 99 22 37 |.......1......"7|
000008E0: 2E 20 28 52 32 29 20 53 54 41 42 49 4C 49 5A 45 |. (R2) STABILIZE|
000008F0: 52 20 52 4F 4F 54 20 43 48 4F 52 44 2C 20 53 49 |R ROOT CHORD, SI|
00000900: 4D 49 4C 41 52 20 54 4F 20 33 22 00 41 11 C3 00 |MILAR TO 3".A...|
00000910: 98 31 2C 22 37 2E 20 28 52 32 29 20 53 54 41 42 |.1,"7. (R2) STAB|
00000920: 49 4C 49 5A 45 52 20 52 4F 4F 54 20 43 48 4F 52 |ILIZER ROOT CHOR|
00000930: 44 2C 20 53 49 4D 49 4C 41 52 20 54 4F 20 33 2E |D, SIMILAR TO 3.|
00000940: 22 00 47 11 C4 00 99 00 4E 11 C5 00 98 31 00 81 |".G.....N....1..|
00000950: 11 C8 00 99 22 38 2E 20 28 54 32 29 20 53 54 41 |...."8. (T2) STA|
00000960: 42 49 4C 49 5A 45 52 20 54 49 50 20 43 48 4F 52 |BILIZER TIP CHOR|
00000970: 44 2C 20 53 49 4D 49 4C 41 52 20 54 4F 20 34 2E |D, SIMILAR TO 4.|
00000980: 22 00 B6 11 CD 00 98 31 2C 22 38 2E 20 28 54 32 |"......1,"8. (T2|
00000990: 29 20 53 54 41 42 49 4C 49 5A 45 52 20 54 49 50 |) STABILIZER TIP|
000009A0: 20 43 48 4F 52 44 2C 20 53 49 4D 49 4C 41 52 20 | CHORD, SIMILAR |
000009B0: 54 4F 20 34 2E 22 00 BC 11 CE 00 99 00 C3 11 CF |TO 4."..........|
000009C0: 00 98 31 00 FF 11 D2 00 99 22 39 2E 20 28 44 32 |..1......"9. (D2|
000009D0: 29 20 53 54 41 42 49 4C 49 5A 45 52 20 4C 45 41 |) STABILIZER LEA|
000009E0: 44 49 4E 47 20 45 44 47 45 20 53 57 45 45 50 2C |DING EDGE SWEEP,|
000009F0: 20 53 49 4D 49 4C 41 52 20 54 4F 20 35 2E 22 00 | SIMILAR TO 5.".|
00000A00: 3D 12 D7 00 98 31 2C 22 39 2E 20 28 44 32 29 20 |=....1,"9. (D2) |
00000A10: 53 54 41 42 49 4C 49 5A 45 52 20 4C 45 41 44 49 |STABILIZER LEADI|
00000A20: 4E 47 20 45 44 47 45 20 53 57 45 45 50 2C 20 53 |NG EDGE SWEEP, S|
00000A30: 49 4D 49 4C 41 52 20 54 4F 20 35 2E 22 00 43 12 |IMILAR TO 5.".C.|
00000A40: D8 00 99 00 4A 12 D9 00 98 31 00 8F 12 DC 00 99 |....J....1......|
00000A50: 22 31 30 2E 20 28 56 32 29 20 4E 55 4D 42 45 52 |"10. (V2) NUMBER|
00000A60: 20 4F 46 20 56 45 52 54 49 43 41 4C 20 46 49 4E | OF VERTICAL FIN|
00000A70: 53 2E 20 54 48 45 20 56 45 52 54 49 43 41 4C 20 |S. THE VERTICAL |
00000A80: 46 49 4E 53 20 41 4E 44 20 54 48 45 49 52 22 00 |FINS AND THEIR".|
00000A90: D6 12 E1 00 98 31 2C 22 31 30 2E 20 28 56 32 29 |.....1,"10. (V2)|
00000AA0: 20 4E 55 4D 42 45 52 20 4F 46 20 56 45 52 54 49 | NUMBER OF VERTI|
00000AB0: 43 41 4C 20 46 49 4E 53 2E 20 54 48 45 20 56 45 |CAL FINS. THE VE|
00000AC0: 52 54 49 43 41 4C 20 46 49 4E 53 20 41 4E 44 20 |RTICAL FINS AND |
00000AD0: 54 48 45 49 52 22 00 1C 13 E6 00 99 22 50 4F 53 |THEIR"......"POS|
00000AE0: 49 54 49 4F 4E 49 4E 47 20 48 41 56 45 20 4E 4F |ITIONING HAVE NO|
00000AF0: 20 45 46 46 45 43 54 20 4F 4E 20 54 48 45 20 42 | EFFECT ON THE B|
00000B00: 41 4C 41 4E 43 45 20 50 4F 49 4E 54 20 4C 4F 43 |ALANCE POINT LOC|
00000B10: 41 54 49 4F 4E 2E 20 54 48 49 53 22 00 64 13 EB |ATION. THIS".d..|
00000B20: 00 98 31 2C 22 50 4F 53 49 54 49 4F 4E 49 4E 47 |..1,"POSITIONING|
00000B30: 20 48 41 56 45 20 4E 4F 20 45 46 46 45 43 54 20 | HAVE NO EFFECT |
00000B40: 4F 4E 20 54 48 45 20 42 41 4C 41 4E 43 45 20 50 |ON THE BALANCE P|
00000B50: 4F 49 4E 54 20 4C 4F 43 41 54 49 4F 4E 2E 20 54 |OINT LOCATION. T|
00000B60: 48 49 53 22 00 AA 13 F0 00 99 22 49 4E 50 55 54 |HIS"......"INPUT|
00000B70: 20 49 53 20 55 53 45 46 55 4C 20 4F 4E 4C 59 20 | IS USEFUL ONLY |
00000B80: 46 4F 52 20 43 41 4E 41 52 44 20 44 45 53 49 47 |FOR CANARD DESIG|
00000B90: 4E 53 20 46 4F 52 20 57 48 49 43 48 20 53 54 41 |NS FOR WHICH STA|
00000BA0: 42 49 4C 49 54 59 20 49 53 22 00 F2 13 F5 00 98 |BILITY IS"......|
00000BB0: 31 2C 22 49 4E 50 55 54 20 49 53 20 55 53 45 46 |1,"INPUT IS USEF|
00000BC0: 55 4C 20 4F 4E 4C 59 20 46 4F 52 20 43 41 4E 41 |UL ONLY FOR CANA|
00000BD0: 52 44 20 44 45 53 49 47 4E 53 20 46 4F 52 20 57 |RD DESIGNS FOR W|
00000BE0: 48 49 43 48 20 53 54 41 42 49 4C 49 54 59 20 49 |HICH STABILITY I|
00000BF0: 53 22 00 37 14 FA 00 99 22 41 46 46 45 43 54 45 |S".7...."AFFECTE|
00000C00: 44 20 42 59 20 46 49 4E 20 43 48 41 52 41 43 54 |D BY FIN CHARACT|
00000C10: 45 52 49 53 54 49 43 53 2E 20 54 48 45 52 45 46 |ERISTICS. THEREF|
00000C20: 4F 52 45 2C 20 49 46 20 44 45 41 4C 49 4E 47 20 |ORE, IF DEALING |
00000C30: 57 49 54 48 20 41 22 00 7E 14 FF 00 98 31 2C 22 |WITH A".~....1,"|
00000C40: 41 46 46 45 43 54 45 44 20 42 59 20 46 49 4E 20 |AFFECTED BY FIN |
00000C50: 43 48 41 52 41 43 54 45 52 49 53 54 49 43 53 2E |CHARACTERISTICS.|
00000C60: 20 54 48 45 52 45 46 4F 52 45 2C 20 49 46 20 44 | THEREFORE, IF D|
00000C70: 45 41 4C 49 4E 47 20 57 49 54 48 20 41 22 00 C2 |EALING WITH A"..|
00000C80: 14 04 01 99 22 43 4F 4E 56 45 4E 54 49 4F 4E 41 |...."CONVENTIONA|
00000C90: 4C 20 44 45 53 49 47 4E 20 28 57 49 4E 47 20 41 |L DESIGN (WING A|
00000CA0: 48 45 41 44 20 4F 46 20 53 54 41 42 29 20 41 53 |HEAD OF STAB) AS|
00000CB0: 53 49 47 4E 20 5A 45 52 4F 20 54 4F 20 54 48 49 |SIGN ZERO TO THI|
00000CC0: 53 22 00 08 15 09 01 98 31 2C 22 43 4F 4E 56 45 |S"......1,"CONVE|
00000CD0: 4E 54 49 4F 4E 41 4C 20 44 45 53 49 47 4E 20 28 |NTIONAL DESIGN (|
00000CE0: 57 49 4E 47 20 41 48 45 41 44 20 4F 46 20 53 54 |WING AHEAD OF ST|
00000CF0: 41 42 29 20 41 53 53 49 47 4E 20 5A 45 52 4F 20 |AB) ASSIGN ZERO |
00000D00: 54 4F 20 54 48 49 53 22 00 41 15 0E 01 99 22 56 |TO THIS".A...."V|
00000D10: 41 4C 55 45 2C 20 41 4E 44 20 54 48 45 20 50 52 |ALUE, AND THE PR|
00000D20: 4F 47 52 41 4D 20 57 49 4C 4C 20 53 4B 49 50 20 |OGRAM WILL SKIP |
00000D30: 49 4E 50 55 54 53 20 31 31 20 54 4F 20 31 35 2E |INPUTS 11 TO 15.|
00000D40: 22 00 7C 15 13 01 98 31 2C 22 56 41 4C 55 45 2C |".|....1,"VALUE,|
00000D50: 20 41 4E 44 20 54 48 45 20 50 52 4F 47 52 41 4D | AND THE PROGRAM|
00000D60: 20 57 49 4C 4C 20 53 4B 49 50 20 49 4E 50 55 54 | WILL SKIP INPUT|
00000D70: 53 20 31 31 20 54 4F 20 31 35 2E 22 00 82 15 14 |S 11 TO 15."....|
00000D80: 01 99 00 89 15 15 01 98 31 00 B9 15 18 01 99 22 |........1......"|
00000D90: 31 31 2E 20 28 42 33 29 20 56 45 52 54 49 43 41 |11. (B3) VERTICA|
00000DA0: 4C 20 46 49 4E 20 48 45 49 47 48 54 2C 20 49 4E |L FIN HEIGHT, IN|
00000DB0: 20 49 4E 43 48 45 53 2E 22 00 EB 15 1D 01 98 31 | INCHES."......1|
00000DC0: 2C 22 31 31 2E 20 28 42 33 29 20 56 45 52 54 49 |,"11. (B3) VERTI|
00000DD0: 43 41 4C 20 46 49 4E 20 48 45 49 47 48 54 2C 20 |CAL FIN HEIGHT, |
00000DE0: 49 4E 20 49 4E 43 48 45 53 2E 22 00 F1 15 1E 01 |IN INCHES.".....|
00000DF0: 99 00 F8 15 1F 01 98 31 00 2C 16 22 01 99 22 31 |.......1.,.".."1|
00000E00: 32 2E 20 28 52 33 29 20 46 49 4E 20 52 4F 4F 54 |2. (R3) FIN ROOT|
00000E10: 20 43 48 4F 52 44 2C 20 53 49 4D 49 4C 41 52 20 | CHORD, SIMILAR |
00000E20: 54 4F 20 33 20 41 4E 44 20 37 2E 22 00 62 16 27 |TO 3 AND 7.".b.'|
00000E30: 01 98 31 2C 22 31 32 2E 20 28 52 33 29 20 46 49 |..1,"12. (R3) FI|
00000E40: 4E 20 52 4F 4F 54 20 43 48 4F 52 44 2C 20 53 49 |N ROOT CHORD, SI|
00000E50: 4D 49 4C 41 52 20 54 4F 20 33 20 41 4E 44 20 37 |MILAR TO 3 AND 7|
00000E60: 2E 22 00 68 16 28 01 99 00 6F 16 29 01 98 31 00 |.".h.(...o.)..1.|
00000E70: A2 16 2C 01 99 22 31 33 2E 20 28 54 33 29 20 46 |..,.."13. (T3) F|
00000E80: 49 4E 20 54 49 50 20 43 48 4F 52 44 2C 20 53 49 |IN TIP CHORD, SI|
00000E90: 4D 49 4C 41 52 20 54 4F 20 34 20 41 4E 44 20 38 |MILAR TO 4 AND 8|
00000EA0: 2E 22 00 D7 16 31 01 98 31 2C 22 31 33 2E 20 28 |."...1..1,"13. (|
00000EB0: 54 33 29 20 46 49 4E 20 54 49 50 20 43 48 4F 52 |T3) FIN TIP CHOR|
00000EC0: 44 2C 20 53 49 4D 49 4C 41 52 20 54 4F 20 34 20 |D, SIMILAR TO 4 |
00000ED0: 41 4E 44 20 38 2E 22 00 DD 16 32 01 99 00 E4 16 |AND 8."...2.....|
00000EE0: 33 01 98 31 00 20 17 36 01 99 22 31 34 2E 20 28 |3..1. .6.."14. (|
00000EF0: 44 33 29 20 46 49 4E 20 4C 45 41 44 49 4E 47 20 |D3) FIN LEADING |
00000F00: 45 44 47 45 20 53 57 45 45 50 2C 20 53 49 4D 49 |EDGE SWEEP, SIMI|
00000F10: 4C 41 52 20 54 4F 20 35 20 41 4E 44 20 39 2E 22 |LAR TO 5 AND 9."|
00000F20: 00 5E 17 3B 01 98 31 2C 22 31 34 2E 20 28 44 33 |.^.;..1,"14. (D3|
00000F30: 29 20 46 49 4E 20 4C 45 41 44 49 4E 47 20 45 44 |) FIN LEADING ED|
00000F40: 47 45 20 53 57 45 45 50 2C 20 53 49 4D 49 4C 41 |GE SWEEP, SIMILA|
00000F50: 52 20 54 4F 20 35 20 41 4E 44 20 39 2E 22 00 64 |R TO 5 AND 9.".d|
00000F60: 17 3C 01 99 00 6B 17 3D 01 98 31 00 AE 17 40 01 |.<...k.=..1...@.|
00000F70: 99 22 31 35 2E 20 28 4C 33 29 20 46 49 4E 20 4F |."15. (L3) FIN O|
00000F80: 46 46 53 45 54 20 46 52 4F 4D 20 57 49 4E 47 20 |FFSET FROM WING |
00000F90: 4C 45 41 44 49 4E 47 20 45 44 47 45 2C 20 49 4E |LEADING EDGE, IN|
00000FA0: 20 49 4E 43 48 45 53 2E 20 54 48 49 53 22 00 F3 | INCHES. THIS"..|
00000FB0: 17 45 01 98 31 2C 22 31 35 2E 20 28 4C 33 29 20 |.E..1,"15. (L3) |
00000FC0: 46 49 4E 20 4F 46 46 53 45 54 20 46 52 4F 4D 20 |FIN OFFSET FROM |
00000FD0: 57 49 4E 47 20 4C 45 41 44 49 4E 47 20 45 44 47 |WING LEADING EDG|
00000FE0: 45 2C 20 49 4E 20 49 4E 43 48 45 53 2E 20 54 48 |E, IN INCHES. TH|
00000FF0: 49 53 22 00 36 18 4A 01 99 22 44 49 4D 45 4E 53 |IS".6.J.."DIMENS|
00001000: 49 4F 4E 20 4C 4F 43 41 54 45 53 20 54 48 45 20 |ION LOCATES THE |
00001010: 4C 45 41 44 49 4E 47 20 45 44 47 45 20 4F 46 20 |LEADING EDGE OF |
00001020: 54 48 45 20 56 45 52 54 49 43 41 4C 20 46 49 4E |THE VERTICAL FIN|
00001030: 20 57 49 54 48 22 00 7B 18 4F 01 98 31 2C 22 44 | WITH".{.O..1,"D|
00001040: 49 4D 45 4E 53 49 4F 4E 20 4C 4F 43 41 54 45 53 |IMENSION LOCATES|
00001050: 20 54 48 45 20 4C 45 41 44 49 4E 47 20 45 44 47 | THE LEADING EDG|
00001060: 45 20 4F 46 20 54 48 45 20 56 45 52 54 49 43 41 |E OF THE VERTICA|
00001070: 4C 20 46 49 4E 20 57 49 54 48 22 00 B0 18 54 01 |L FIN WITH"...T.|
00001080: 99 22 52 45 53 50 45 43 54 20 54 4F 20 54 48 45 |."RESPECT TO THE|
00001090: 20 57 49 4E 47 20 4C 45 41 44 49 4E 47 20 45 44 | WING LEADING ED|
000010A0: 47 45 20 41 54 20 54 48 45 20 52 4F 4F 54 2E 22 |GE AT THE ROOT."|
000010B0: 00 E7 18 59 01 98 31 2C 22 52 45 53 50 45 43 54 |...Y..1,"RESPECT|
000010C0: 20 54 4F 20 54 48 45 20 57 49 4E 47 20 4C 45 41 | TO THE WING LEA|
000010D0: 44 49 4E 47 20 45 44 47 45 20 41 54 20 54 48 45 |DING EDGE AT THE|
000010E0: 20 52 4F 4F 54 2E 22 00 ED 18 5A 01 99 00 F4 18 | ROOT."...Z.....|
000010F0: 5B 01 98 31 00 39 19 5E 01 99 22 31 36 2E 20 28 |[..1.9.^.."16. (|
00001100: 43 29 20 45 4E 54 45 52 20 32 20 46 4F 52 20 43 |C) ENTER 2 FOR C|
00001110: 41 4E 41 52 44 2C 20 31 20 46 4F 52 20 43 4F 4E |ANARD, 1 FOR CON|
00001120: 56 45 4E 54 49 4F 4E 41 4C 20 43 4F 4E 46 49 47 |VENTIONAL CONFIG|
00001130: 55 52 41 54 49 4F 4E 2E 22 00 80 19 63 01 98 31 |URATION."...c..1|
00001140: 2C 22 31 36 2E 20 28 43 29 20 45 4E 54 45 52 20 |,"16. (C) ENTER |
00001150: 32 20 46 4F 52 20 43 41 4E 41 52 44 2C 20 31 20 |2 FOR CANARD, 1 |
00001160: 46 4F 52 20 43 4F 4E 56 45 4E 54 49 4F 4E 41 4C |FOR CONVENTIONAL|
00001170: 20 43 4F 4E 46 49 47 55 52 41 54 49 4F 4E 2E 22 | CONFIGURATION."|
00001180: 00 86 19 64 01 99 00 8D 19 65 01 98 31 00 D3 19 |...d.....e..1...|
00001190: 68 01 99 22 31 37 2E 20 28 4C 31 29 20 44 49 53 |h.."17. (L1) DIS|
000011A0: 54 41 4E 43 45 20 42 45 54 57 45 45 4E 20 53 54 |TANCE BETWEEN ST|
000011B0: 41 42 49 4C 49 5A 45 52 20 41 4E 44 20 57 49 4E |ABILIZER AND WIN|
000011C0: 47 20 52 4F 4F 54 2C 20 49 4E 20 49 4E 43 48 45 |G ROOT, IN INCHE|
000011D0: 53 2E 22 00 1B 1A 6D 01 98 31 2C 22 31 37 2E 20 |S."...m..1,"17. |
000011E0: 28 4C 31 29 20 44 49 53 54 41 4E 43 45 20 42 45 |(L1) DISTANCE BE|
000011F0: 54 57 45 45 4E 20 53 54 41 42 49 4C 49 5A 45 52 |TWEEN STABILIZER|
00001200: 20 41 4E 44 20 57 49 4E 47 20 52 4F 4F 54 2C 20 | AND WING ROOT, |
00001210: 49 4E 20 49 4E 43 48 45 53 2E 22 00 62 1A 72 01 |IN INCHES.".b.r.|
00001220: 99 22 54 48 49 53 20 49 53 20 54 48 45 20 4C 45 |."THIS IS THE LE|
00001230: 4E 47 54 48 20 4F 46 20 46 55 53 45 4C 41 47 45 |NGTH OF FUSELAGE|
00001240: 20 42 45 54 57 45 45 4E 20 54 48 45 20 57 49 4E | BETWEEN THE WIN|
00001250: 47 20 41 4E 44 20 53 54 41 42 49 4C 49 5A 45 52 |G AND STABILIZER|
00001260: 2E 22 00 AB 1A 77 01 98 31 2C 22 54 48 49 53 20 |."...w..1,"THIS |
00001270: 49 53 20 54 48 45 20 4C 45 4E 47 54 48 20 4F 46 |IS THE LENGTH OF|
00001280: 20 46 55 53 45 4C 41 47 45 20 42 45 54 57 45 45 | FUSELAGE BETWEE|
00001290: 4E 20 54 48 45 20 57 49 4E 47 20 41 4E 44 20 53 |N THE WING AND S|
000012A0: 54 41 42 49 4C 49 5A 45 52 2E 22 00 B1 1A 78 01 |TABILIZER."...x.|
000012B0: 99 00 B8 1A 79 01 98 31 00 E1 1A 7C 01 99 22 31 |....y..1...|.."1|
000012C0: 38 2E 20 28 57 31 29 20 54 4F 54 41 4C 20 57 45 |8. (W1) TOTAL WE|
000012D0: 49 47 48 54 2C 20 49 4E 20 4F 55 4E 43 45 53 2E |IGHT, IN OUNCES.|
000012E0: 22 00 0C 1B 81 01 98 31 2C 22 31 38 2E 20 28 57 |"......1,"18. (W|
000012F0: 31 29 20 54 4F 54 41 4C 20 57 45 49 47 48 54 2C |1) TOTAL WEIGHT,|
00001300: 20 49 4E 20 4F 55 4E 43 45 53 2E 22 00 12 1B 82 | IN OUNCES."....|
00001310: 01 99 00 19 1B 83 01 98 31 00 47 1B 86 01 99 22 |........1.G...."|
00001320: 31 39 2E 20 28 45 39 29 20 45 4E 47 49 4E 45 20 |19. (E9) ENGINE |
00001330: 53 49 5A 45 2C 20 49 4E 20 43 55 42 49 43 20 49 |SIZE, IN CUBIC I|
00001340: 4E 43 48 45 53 2E 22 00 77 1B 8B 01 98 31 2C 22 |NCHES.".w....1,"|
00001350: 31 39 2E 20 28 45 39 29 20 45 4E 47 49 4E 45 20 |19. (E9) ENGINE |
00001360: 53 49 5A 45 2C 20 49 4E 20 43 55 42 49 43 20 49 |SIZE, IN CUBIC I|
00001370: 4E 43 48 45 53 2E 22 00 7D 1B 8C 01 99 00 84 1B |NCHES.".}.......|
00001380: 8D 01 98 31 00 CE 1B 90 01 99 22 20 20 20 20 20 |...1......" |
00001390: 54 48 45 20 53 54 52 55 43 54 55 52 45 20 4F 46 |THE STRUCTURE OF|
000013A0: 20 54 48 45 20 50 52 4F 47 52 41 4D 20 49 53 20 | THE PROGRAM IS |
000013B0: 53 55 43 48 20 41 53 20 54 4F 20 50 52 4F 4D 50 |SUCH AS TO PROMP|
000013C0: 54 20 59 4F 55 20 46 4F 52 20 54 48 45 22 00 16 |T YOU FOR THE"..|
000013D0: 1C 9A 01 99 22 56 41 4C 55 45 20 4F 46 20 45 41 |...."VALUE OF EA|
000013E0: 43 48 20 4F 46 20 54 48 45 20 50 41 52 41 4D 45 |CH OF THE PARAME|
000013F0: 54 45 52 53 20 4C 49 53 54 45 44 20 41 42 4F 56 |TERS LISTED ABOV|
00001400: 45 2E 20 41 4C 4C 20 59 4F 55 20 48 41 56 45 20 |E. ALL YOU HAVE |
00001410: 54 4F 20 44 4F 22 00 60 1C 9F 01 98 31 2C 22 56 |TO DO".`....1,"V|
00001420: 41 4C 55 45 20 4F 46 20 45 41 43 48 20 4F 46 20 |ALUE OF EACH OF |
00001430: 54 48 45 20 50 41 52 41 4D 45 54 45 52 53 20 4C |THE PARAMETERS L|
00001440: 49 53 54 45 44 20 41 42 4F 56 45 2E 20 41 4C 4C |ISTED ABOVE. ALL|
00001450: 20 59 4F 55 20 48 41 56 45 20 54 4F 20 44 4F 22 | YOU HAVE TO DO"|
00001460: 00 A8 1C A4 01 99 22 49 53 20 45 4E 54 45 52 20 |......"IS ENTER |
00001470: 54 48 45 20 50 41 52 54 49 43 55 4C 41 52 20 56 |THE PARTICULAR V|
00001480: 41 4C 55 45 2C 20 57 48 49 43 48 20 47 45 54 53 |ALUE, WHICH GETS|
00001490: 20 53 54 4F 52 45 44 20 49 4E 20 4D 45 4D 4F 52 | STORED IN MEMOR|
000014A0: 59 20 55 4E 54 49 4C 22 00 F2 1C A9 01 98 31 2C |Y UNTIL"......1,|
000014B0: 22 49 53 20 45 4E 54 45 52 20 54 48 45 20 50 41 |"IS ENTER THE PA|
000014C0: 52 54 49 43 55 4C 41 52 20 56 41 4C 55 45 2C 20 |RTICULAR VALUE, |
000014D0: 57 48 49 43 48 20 47 45 54 53 20 53 54 4F 52 45 |WHICH GETS STORE|
000014E0: 44 20 49 4E 20 4D 45 4D 4F 52 59 20 55 4E 54 49 |D IN MEMORY UNTI|
000014F0: 4C 22 00 12 1D AE 01 99 22 49 54 20 49 53 20 55 |L"......"IT IS U|
00001500: 53 45 44 20 53 55 42 53 45 51 55 45 4E 54 4C 59 |SED SUBSEQUENTLY|
00001510: 2E 22 00 34 1D B3 01 98 31 2C 22 49 54 20 49 53 |.".4....1,"IT IS|
00001520: 20 55 53 45 44 20 53 55 42 53 45 51 55 45 4E 54 | USED SUBSEQUENT|
00001530: 4C 59 2E 22 00 3A 1D B4 01 99 00 41 1D B5 01 98 |LY.".:.....A....|
00001540: 31 00 89 1D B8 01 99 22 43 4F 4D 50 55 54 45 20 |1......"COMPUTE |
00001550: 28 4C 49 4E 45 53 20 35 34 30 20 54 4F 20 38 35 |(LINES 540 TO 85|
00001560: 30 29 2E 20 41 53 53 55 4D 49 4E 47 20 54 48 41 |0). ASSUMING THA|
00001570: 54 20 54 48 45 20 49 4E 50 55 54 20 53 45 51 55 |T THE INPUT SEQU|
00001580: 45 4E 43 45 20 57 41 53 22 00 D3 1D BD 01 98 31 |ENCE WAS"......1|
00001590: 2C 22 43 4F 4D 50 55 54 45 20 28 4C 49 4E 45 53 |,"COMPUTE (LINES|
000015A0: 20 35 34 30 20 54 4F 20 38 35 30 29 2E 20 41 53 | 540 TO 850). AS|
000015B0: 53 55 4D 49 4E 47 20 54 48 41 54 20 54 48 45 20 |SUMING THAT THE |
000015C0: 49 4E 50 55 54 20 53 45 51 55 45 4E 43 45 20 57 |INPUT SEQUENCE W|
000015D0: 41 53 22 00 15 1E C2 01 99 22 50 45 52 46 4F 52 |AS"......"PERFOR|
000015E0: 4D 45 44 20 43 4F 52 52 45 43 54 4C 59 2C 20 54 |MED CORRECTLY, T|
000015F0: 48 45 20 50 52 4F 47 52 41 4D 20 54 48 45 4E 20 |HE PROGRAM THEN |
00001600: 50 45 52 46 4F 52 4D 53 20 4D 4F 53 54 20 4F 46 |PERFORMS MOST OF|
00001610: 20 54 48 45 22 00 59 1E C7 01 98 31 2C 22 50 45 | THE".Y....1,"PE|
00001620: 52 46 4F 52 4D 45 44 20 43 4F 52 52 45 43 54 4C |RFORMED CORRECTL|
00001630: 59 2C 20 54 48 45 20 50 52 4F 47 52 41 4D 20 54 |Y, THE PROGRAM T|
00001640: 48 45 4E 20 50 45 52 46 4F 52 4D 53 20 4D 4F 53 |HEN PERFORMS MOS|
00001650: 54 20 4F 46 20 54 48 45 22 00 A2 1E CC 01 99 22 |T OF THE"......"|
00001660: 43 4F 4D 50 55 54 41 54 49 4F 4E 53 20 4E 45 45 |COMPUTATIONS NEE|
00001670: 44 45 44 20 42 45 54 57 45 45 4E 20 4C 49 4E 45 |DED BETWEEN LINE|
00001680: 53 20 35 34 30 20 41 4E 44 20 38 35 30 2E 20 54 |S 540 AND 850. T|
00001690: 48 45 53 45 20 43 4F 4D 50 55 54 41 54 49 4F 4E |HESE COMPUTATION|
000016A0: 53 22 00 ED 1E D1 01 98 31 2C 22 43 4F 4D 50 55 |S"......1,"COMPU|
000016B0: 54 41 54 49 4F 4E 53 20 4E 45 45 44 45 44 20 42 |TATIONS NEEDED B|
000016C0: 45 54 57 45 45 4E 20 4C 49 4E 45 53 20 35 34 30 |ETWEEN LINES 540|
000016D0: 20 41 4E 44 20 38 35 30 2E 20 54 48 45 53 45 20 | AND 850. THESE |
000016E0: 43 4F 4D 50 55 54 41 54 49 4F 4E 53 22 00 31 1F |COMPUTATIONS".1.|
000016F0: D6 01 99 22 49 4E 56 4F 4C 56 45 20 46 49 4E 44 |..."INVOLVE FIND|
00001700: 49 4E 47 20 41 45 52 4F 44 59 4E 41 4D 49 43 20 |ING AERODYNAMIC |
00001710: 43 45 4E 54 45 52 53 20 4F 46 20 54 48 45 20 53 |CENTERS OF THE S|
00001720: 55 52 46 41 43 45 53 2C 20 53 55 52 46 41 43 45 |URFACES, SURFACE|
00001730: 22 00 77 1F DB 01 98 31 2C 22 49 4E 56 4F 4C 56 |".w....1,"INVOLV|
00001740: 45 20 46 49 4E 44 49 4E 47 20 41 45 52 4F 44 59 |E FINDING AERODY|
00001750: 4E 41 4D 49 43 20 43 45 4E 54 45 52 53 20 4F 46 |NAMIC CENTERS OF|
00001760: 20 54 48 45 20 53 55 52 46 41 43 45 53 2C 20 53 | THE SURFACES, S|
00001770: 55 52 46 41 43 45 22 00 BE 1F E0 01 99 22 41 52 |URFACE"......"AR|
00001780: 45 41 53 2C 20 41 52 45 41 20 4D 4F 4D 45 4E 54 |EAS, AREA MOMENT|
00001790: 53 2C 42 41 4C 41 4E 43 45 20 50 4F 49 4E 54 20 |S,BALANCE POINT |
000017A0: 4F 52 20 43 45 4E 54 45 52 20 4F 46 20 47 52 41 |OR CENTER OF GRA|
000017B0: 56 49 54 59 20 4C 4F 43 41 54 49 4F 4E 22 00 09 |VITY LOCATION"..|
000017C0: 20 E5 01 98 31 2C 22 41 52 45 41 53 2C 20 41 52 | ...1,"AREAS, AR|
000017D0: 45 41 20 4D 4F 4D 45 4E 54 53 2C 20 42 41 4C 41 |EA MOMENTS, BALA|
000017E0: 4E 43 45 20 50 4F 49 4E 54 20 4F 52 20 43 45 4E |NCE POINT OR CEN|
000017F0: 54 45 52 20 4F 46 20 47 52 41 56 49 54 59 20 4C |TER OF GRAVITY L|
00001800: 4F 43 41 54 49 4F 4E 2C 22 00 32 20 EA 01 99 22 |OCATION,".2 ..."|
00001810: 57 49 4E 47 20 4C 4F 41 44 49 4E 47 2C 20 41 4E |WING LOADING, AN|
00001820: 44 20 45 4E 47 49 4E 45 20 4C 4F 41 44 49 4E 47 |D ENGINE LOADING|
00001830: 2E 22 00 5D 20 EF 01 98 31 2C 22 57 49 4E 47 20 |.".] ...1,"WING |
00001840: 4C 4F 41 44 49 4E 47 2C 20 41 4E 44 20 45 4E 47 |LOADING, AND ENG|
00001850: 49 4E 45 20 4C 4F 41 44 49 4E 47 2E 22 00 63 20 |INE LOADING.".c |
00001860: F0 01 99 00 6A 20 F1 01 98 31 00 B1 20 F4 01 99 |....j ...1.. ...|
00001870: 22 4F 55 54 50 55 54 20 28 4C 49 4E 45 53 20 38 |"OUTPUT (LINES 8|
00001880: 36 30 20 54 4F 20 31 37 36 30 29 2E 20 4C 49 4E |60 TO 1760). LIN|
00001890: 45 53 20 38 36 30 20 54 4F 20 31 37 36 30 20 4D |ES 860 TO 1760 M|
000018A0: 4F 53 54 4C 59 20 43 4F 4D 50 52 49 53 45 20 41 |OSTLY COMPRISE A|
000018B0: 22 00 FA 20 F9 01 98 31 2C 22 4F 55 54 50 55 54 |".. ...1,"OUTPUT|
000018C0: 20 28 4C 49 4E 45 53 20 38 36 30 20 54 4F 20 31 | (LINES 860 TO 1|
000018D0: 37 36 30 29 2E 20 4C 49 4E 45 53 20 38 36 30 20 |760). LINES 860 |
000018E0: 54 4F 20 31 37 36 30 20 4D 4F 53 54 4C 59 20 43 |TO 1760 MOSTLY C|
000018F0: 4F 4D 50 52 49 53 45 20 41 22 00 3B 21 FE 01 99 |OMPRISE A".;!...|
00001900: 22 50 52 49 4E 54 20 52 4F 55 54 49 4E 45 2E 20 |"PRINT ROUTINE. |
00001910: 54 48 45 20 4F 55 54 50 55 54 20 49 53 20 53 55 |THE OUTPUT IS SU|
00001920: 42 44 49 56 49 44 45 44 20 49 4E 54 4F 20 54 48 |BDIVIDED INTO TH|
00001930: 52 45 45 20 50 41 52 54 53 2E 22 00 7E 21 03 02 |REE PARTS.".~!..|
00001940: 98 31 2C 22 50 52 49 4E 54 20 52 4F 55 54 49 4E |.1,"PRINT ROUTIN|
00001950: 45 2E 20 54 48 45 20 4F 55 54 50 55 54 20 49 53 |E. THE OUTPUT IS|
00001960: 20 53 55 42 44 49 56 49 44 45 44 20 49 4E 54 4F | SUBDIVIDED INTO|
00001970: 20 54 48 52 45 45 20 50 41 52 54 53 2E 22 00 84 | THREE PARTS."..|
00001980: 21 04 02 99 00 8B 21 05 02 98 31 00 C4 21 08 02 |!.....!...1..!..|
00001990: 99 22 50 41 52 54 20 49 20 2D 20 49 44 45 4E 54 |."PART I - IDENT|
000019A0: 49 46 49 45 53 20 54 48 45 20 50 52 4F 47 52 41 |IFIES THE PROGRA|
000019B0: 4D 20 41 4E 44 20 49 54 53 20 46 55 4E 43 54 49 |M AND ITS FUNCTI|
000019C0: 4F 4E 2E 22 00 FF 21 0D 02 98 31 2C 22 50 41 52 |ON."..!...1,"PAR|
000019D0: 54 20 49 20 2D 20 49 44 45 4E 54 49 46 49 45 53 |T I - IDENTIFIES|
000019E0: 20 54 48 45 20 50 52 4F 47 52 41 4D 20 41 4E 44 | THE PROGRAM AND|
000019F0: 20 49 54 53 20 46 55 4E 43 54 49 4F 4E 2E 22 00 | ITS FUNCTION.".|
00001A00: 05 22 0E 02 99 00 0C 22 0F 02 98 31 00 52 22 12 |."....."...1.R".|
00001A10: 02 99 22 50 41 52 54 20 49 49 20 2D 20 50 52 49 |.."PART II - PRI|
00001A20: 4E 54 53 20 4F 55 54 20 4D 4F 53 54 20 49 4E 50 |NTS OUT MOST INP|
00001A30: 55 54 20 50 41 52 41 4D 45 54 45 52 53 2E 20 54 |UT PARAMETERS. T|
00001A40: 48 49 53 20 41 4C 4C 4F 57 53 20 59 4F 55 20 54 |HIS ALLOWS YOU T|
00001A50: 4F 22 00 9A 22 17 02 98 31 2C 22 50 41 52 54 20 |O".."...1,"PART |
00001A60: 49 49 20 2D 20 50 52 49 4E 54 53 20 4F 55 54 20 |II - PRINTS OUT |
00001A70: 4D 4F 53 54 20 49 4E 50 55 54 20 50 41 52 41 4D |MOST INPUT PARAM|
00001A80: 45 54 45 52 53 2E 20 54 48 49 53 20 41 4C 4C 4F |ETERS. THIS ALLO|
00001A90: 57 53 20 59 4F 55 20 54 4F 22 00 BF 22 1C 02 99 |WS YOU TO".."...|
00001AA0: 22 44 4F 55 42 4C 45 2D 43 48 45 43 4B 20 59 4F |"DOUBLE-CHECK YO|
00001AB0: 55 52 20 49 4E 50 55 54 20 44 41 54 41 2E 22 00 |UR INPUT DATA.".|
00001AC0: E6 22 21 02 98 31 2C 22 44 4F 55 42 4C 45 2D 43 |."!..1,"DOUBLE-C|
00001AD0: 48 45 43 4B 20 59 4F 55 52 20 49 4E 50 55 54 20 |HECK YOUR INPUT |
00001AE0: 44 41 54 41 2E 22 00 EC 22 22 02 99 00 F3 22 23 |DATA."..""...."#|
00001AF0: 02 98 31 00 36 23 26 02 99 22 50 41 52 54 20 49 |..1.6#&.."PART I|
00001B00: 49 49 20 2D 20 50 52 49 4E 54 53 20 4F 55 54 20 |II - PRINTS OUT |
00001B10: 54 48 45 20 46 49 4E 44 49 4E 47 53 20 4F 46 20 |THE FINDINGS OF |
00001B20: 54 48 45 20 50 52 4F 47 52 41 4D 20 49 4E 20 41 |THE PROGRAM IN A|
00001B30: 20 4E 45 41 54 22 00 7B 23 2B 02 98 31 2C 22 50 | NEAT".{#+..1,"P|
00001B40: 41 52 54 20 49 49 49 20 2D 20 50 52 49 4E 54 53 |ART III - PRINTS|
00001B50: 20 4F 55 54 20 54 48 45 20 46 49 4E 44 49 4E 47 | OUT THE FINDING|
00001B60: 53 20 4F 46 20 54 48 45 20 50 52 4F 47 52 41 4D |S OF THE PROGRAM|
00001B70: 20 49 4E 20 41 20 4E 45 41 54 22 00 AC 23 30 02 | IN A NEAT"..#0.|
00001B80: 99 22 46 4F 52 4D 41 54 2E 20 54 48 49 53 20 50 |."FORMAT. THIS P|
00001B90: 41 52 54 20 49 53 20 4C 41 42 45 4C 45 44 20 4F |ART IS LABELED O|
00001BA0: 55 54 50 55 54 20 44 41 54 41 2E 22 00 DF 23 35 |UTPUT DATA."..#5|
00001BB0: 02 98 31 2C 22 46 4F 52 4D 41 54 2E 20 54 48 49 |..1,"FORMAT. THI|
00001BC0: 53 20 50 41 52 54 20 49 53 20 4C 41 42 45 4C 45 |S PART IS LABELE|
00001BD0: 44 20 4F 55 54 50 55 54 20 44 41 54 41 2E 22 00 |D OUTPUT DATA.".|
00001BE0: 00 00 |.. |
.......4,4."...EN$.G(14):DE$.G(15).J....
4,EN$;" FBOLT INST";.U....
4,DE$.B.... 1,4:.1.M....1: 1.T... 4....
.. "INPUT".F.... "(LINES 90 TO 530). IN
ORDER TO RUN THIS PROGRAM AND GET THE".P
.... 1,4......1,"(LINES 90 TO 530) IN OR
DER TO RUN THIS PROGRAM AND GET THE".W..
.. "RESULTS, YOU WILL NEED 19 PIECES OF
INFORMATION, EXPLAINED"...#..1,"RESULTS,
YOU WILL NEED 19 PIECES OF INFORMATION,
EXPLAINED"...(.. "AS FOLLOWS.".D.-..1,"
AS FOLLOWS.".J.....Q./..1...2.."1. (C$)
MODEL DESIGNATION. A 30-CHARACTER FIELD
HAS BEEN".T.7..1,"1. (C$) MODEL DESIGNA
TION. A 30-CHARACTER FIELD HAS BEEN"...<
.."PROVIDED TO IDENTIFY THE DESIGN BEING
ANALYZED. THIS FIELD".Z.A..1,"PROVIDED
TO IDENTIFY THE DESIGN BEING ANALYZED. T
HIS FIELD".".F.."INCLUDES BLANKS AND CAN
BE OCCUPIED BY LETTERS,NUMERALS,SYMBOLS
,".N.K..1,"INCLUDES BLANKS AND CAN BE OC
CUPIED BY LETTERS, NUMERALS, SYMBOLS,"..
.P.."OR A COMBINATION OF ALL THREE. SHOU
LD YOU NEED A LARGER FIELD,"...U..1,"OR
A COMBINATION OF ALL THREE. SHOULD YOU N
EED A LARGER FIELD,".).Z.."BE SURE TO RE
DIMENSION C$ IN LIN 10.".W._..1,"BE SUR
E TO REDIMENSION C$ IN LIN 10.".].`...D.
A..1...D.."2. (B4) TOTAL WINGSPAN, IN IN
CHES"...I..1,"2. (B4) TOTAL WINGSPAN, IN
INCHES"...J...E.K..1...N.."3. (R1) WING
ROOT CHORD, IN INCHES. DISTANCE BETWEEN
LEADING EDGE".Y.S..1,"3. (R1) WING ROOT
CHORD, IN INCHES. DISTANCE BETWEEN LEAD
ING EDGE"...X.."AND TRAILING EDGE,MEASUR
ED AT THE WING CENTER.".G.}..1,"AND TRAI
LING EDGE, MEASURED AT THE WING CENTER".
M.~...T...1......"4. (T1) WING TIP CHOR
D, IN INCHES.".*....1,"4. (T1) WING TIP
CHORD, IN INCHES.".0.....7....1.~...."5.
(D1) LEADING EDGE SWEEP, IN INCHES. DIS
TANCE OF TIP RELATIVE".G....1,"5. (D1) L
EADING EDGE SWEEP, IN INCHES. DISTANCE O
F TIP RELATIVE"......"TO ROOT AND RESULT
ING FROM LEADING EDGE SWEEP. IF LEADING
EDGE".U....1,"TO ROOT AND RESULTING FROM
LEADING EDGE SWEEP. IF LEADING EDGE"...
.."IS SWEPT -BACK, THE VALUE IS POSITIV
E. IF LEADING EDGE IS SWEPT-"......1,"IS
SWEPT-BACK, THE VALUE IS POSITIVE. IF L
EADING EDGE IS SWEPT-"......"FORWARD, TH
E VALUE IS NEGATIVE.".6....1,"FORWARD, T
HE VALUE IS NEGATIVE.".<.....C....1.....
."6. (B5) TOTAL SPAN OF THE HORIZONTAL S
TABILIZER, IN INCHES.".K....1,"6. (B5) T
OTAL SPAN OF THE HORIZONTAL STABILIZER,
IN INCHES.".Q.....X....1......"7. (R2) S
TABILIZER ROOT CHORD, SIMILAR TO 3".A.C.
.1,"7. (R2) STABILIZER ROOT CHORD, SIMIL
AR TO 3.".G.D...N.E..1...H.."8. (T2) STA
BILIZER TIP CHORD, SIMILAR TO 4."...M..1
,"8. (T2) STABILIZER TIP CHORD, SIMILAR
TO 4."...N...C.O..1...R.."9. (D2) STABIL
IZER LEADING EDGE SWEEP, SIMILAR TO 5.".
=.W..1,"9. (D2) STABILIZER LEADING EDGE
SWEEP, SIMILAR TO 5.".C.X...J.Y..1......
"10. (V2) NUMBER OF VERTICAL FINS. THE V
ERTICAL FINS AND THEIR".V....1,"10. (V2)
NUMBER OF VERTICAL FINS. THE VERTICAL F
INS AND THEIR"......"POSITIONING HAVE NO
EFFECT ON THE BALANCE POINT LOCATION. T
HIS".D....1,"POSITIONING HAVE NO EFFECT
ON THE BALANCE POINT LOCATION. THIS"....
.."INPUT IS USEFUL ONLY FOR CANARD DESIG
NS FOR WHICH STABILITY IS"......1,"INPUT
IS USEFUL ONLY FOR CANARD DESIGNS FOR W
HICH STABILITY IS".7...."AFFECTED BY FIN
CHARACTERISTICS. THEREFORE, IF DEALING
WITH A".~....1,"AFFECTED BY FIN CHARACTE
RISTICS. THEREFORE, IF DEALING WITH A".B
...."CONVENTIONAL DESIGN (WING AHEAD OF
STAB) ASSIGN ZERO TO THIS"......1,"CONVE
NTIONAL DESIGN (WING AHEAD OF STAB) ASSI
GN ZERO TO THIS".A...."VALUE, AND THE PR
OGRAM WILL SKIP INPUTS 11 TO 15.".|....1
,"VALUE, AND THE PROGRAM WILL SKIP INPUT
S 11 TO 15."............1......"11. (B3)
VERTICAL FIN HEIGHT, IN INCHES."......1
,"11. (B3) VERTICAL FIN HEIGHT, IN INCHE
S."............1.,.".."12. (R3) FIN ROOT
CHORD, SIMILAR TO 3 AND 7.".B.'..1,"12.
(R3) FIN ROOT CHORD, SIMILAR TO 3 AND 7
.".H.(...O.)..1...,.."13. (T3) FIN TIP C
HORD, SIMILAR TO 4 AND 8.".W.1..1,"13. (
T3) FIN TIP CHORD, SIMILAR TO 4 AND 8.".
..2.....3..1. .6.."14. (D3) FIN LEADING
EDGE SWEEP, SIMILAR TO 5 AND 9.".^.;..1,
"14. (D3) FIN LEADING EDGE SWEEP, SIMILA
R TO 5 AND 9.".D.<...K.=..1...@.."15. (L
3) FIN OFFSET FROM WING LEADING EDGE, IN
INCHES. THIS"...E..1,"15. (L3) FIN OFFS
ET FROM WING LEADING EDGE, IN INCHES. TH
IS".6.J.."DIMENSION LOCATES THE LEADING
EDGE OF THE VERTICAL FIN WITH".{.O..1,"D
IMENSION LOCATES THE LEADING EDGE OF THE
VERTICAL FIN WITH"...T.."RESPECT TO THE
WING LEADING EDGE AT THE ROOT."...Y..1,
"RESPECT TO THE WING LEADING EDGE AT THE
ROOT."...Z.....[..1.9.^.."16. (C) ENTER
2 FOR CANARD, 1 FOR CONVENTIONAL CONFIG
URATION."...C..1,"16. (C) ENTER 2 FOR CA
NARD, 1 FOR CONVENTIONAL CONFIGURATION."
...D.....E..1.S.H.."17. (L1) DISTANCE BE
TWEEN STABILIZER AND WING ROOT, IN INCHE
S."...M..1,"17. (L1) DISTANCE BETWEEN ST
ABILIZER AND WING ROOT, IN INCHES.".B.R.
."THIS IS THE LENGTH OF FUSELAGE BETWEEN
THE WING AND STABILIZER."...W..1,"THIS
IS THE LENGTH OF FUSELAGE BETWEEN THE WI
NG AND STABILIZER."...X.....Y..1...|.."1
8. (W1) TOTAL WEIGHT, IN OUNCES."......1
,"18. (W1) TOTAL WEIGHT, IN OUNCES."....
........1.G...."19. (E9) ENGINE SIZE, IN
CUBIC INCHES.".W....1,"19. (E9) ENGINE
SIZE, IN CUBIC INCHES.".}..........1.N..
.." THE STRUCTURE OF THE PROGRAM IS
SUCH AS TO PROMPT YOU FOR THE"......"VAL
UE OF EACH OF THE PARAMETERS LISTED ABOV
E. ALL YOU HAVE TO DO".`....1,"VALUE OF
EACH OF THE PARAMETERS LISTED ABOVE. ALL
YOU HAVE TO DO"......"IS ENTER THE PART
ICULAR VALUE, WHICH GETS STORED IN MEMOR
Y UNTIL"......1,"IS ENTER THE PARTICULAR
VALUE, WHICH GETS STORED IN MEMORY UNTI
L"......"IT IS USED SUBSEQUENTLY.".4....
1,"IT IS USED SUBSEQUENTLY.".:.....A....
1......"COMPUTE (LINES 540 TO 850). ASSU
MING THAT THE INPUT SEQUENCE WAS".S....1
,"COMPUTE (LINES 540 TO 850). ASSUMING T
HAT THE INPUT SEQUENCE WAS"...B.."PERFOR
MED CORRECTLY, THE PROGRAM THEN PERFORMS
MOST OF THE".Y.G..1,"PERFORMED CORRECTL
Y, THE PROGRAM THEN PERFORMS MOST OF THE
"...L.."COMPUTATIONS NEEDED BETWEEN LINE
S 540 AND 850. THESE COMPUTATIONS"...Q..
1,"COMPUTATIONS NEEDED BETWEEN LINES 540
AND 850. THESE COMPUTATIONS".1.V.."INVO
LVE FINDING AERODYNAMIC CENTERS OF THE S
URFACES, SURFACE".W....1,"INVOLVE FINDIN
G AERODYNAMIC CENTERS OF THE SURFACES, S
URFACE"......"AREAS, AREA MOMENTS,BALANC
E POINT OR CENTER OF GRAVITY LOCATION"..
...1,"AREAS, AREA MOMENTS, BALANCE POIN
T OR CENTER OF GRAVITY LOCATION,".2 ..."
WING LOADING, AND ENGINE LOADING.".] ...
1,"WING LOADING, AND ENGINE LOADING.".C
....J ...1.. ..."OUTPUT (LINES 860 TO 17
60). LINES 860 TO 1760 MOSTLY COMPRISE A
".. ...1,"OUTPUT (LINES 860 TO 1760). LI
NES 860 TO 1760 MOSTLY COMPRISE A".;!...
"PRINT ROUTINE. THE OUTPUT IS SUBDIVIDED
INTO THREE PARTS.".~!...1,"PRINT ROUTIN
E. THE OUTPUT IS SUBDIVIDED INTO THREE P
ARTS."..!.....!...1.D!..."PART I - IDENT
IFIES THE PROGRAM AND ITS FUNCTION."..!.
..1,"PART I - IDENTIFIES THE PROGRAM AND
ITS FUNCTION.".."....."...1.R"..."PART
II - PRINTS OUT MOST INPUT PARAMETERS. T
HIS ALLOWS YOU TO".."...1,"PART II - PRI
NTS OUT MOST INPUT PARAMETERS. THIS ALLO
WS YOU TO".."..."DOUBLE-CHECK YOUR INPUT
DATA.".."!..1,"DOUBLE-CHECK YOUR INPUT
DATA."..""...."#..1.6#&.."PART III - PRI
NTS OUT THE FINDINGS OF THE PROGRAM IN A
NEAT".{#+..1,"PART III - PRINTS OUT THE
FINDINGS OF THE PROGRAM IN A NEAT"..#0.
."FORMAT. THIS PART IS LABELED OUTPUT DA
TA."..#5..1,"FORMAT. THIS PART IS LABELE
D OUTPUT DATA."...
> CLICK IMAGE PREVIEW FOR FULL MODAL