// aero021.inc Gliders, Lifting Bodies, Rotorcraft // Copyright (c) 2016, 2018 Rodney Roberts CONST MenuCmdAssign = 31; MenuCmdRead = 32; MenuCmdWrite = 33; MenuCmdEOF = 34; MenuCmdClose = 36; bgEngPodRec = 12; // Additional Record Types bgBoomRec = 14; rgHdr2Rec = 15; mrLLRec = 17; // Launch Lug record bgWingAuxRec = 22; mrXSBTrec = 44; // External Stabilizing Body Tube Record ModelRocket = 1; PayloadRocket = 30; // Basic Payload Model Rocket ScaleRocket = 50; // Scale Model Rocket MultiStageRckt = 60; // Multi-Stage Rocket ParallelStage = 66; XRocket = 70; // Experimental Model Rocket FlyingSaucer = 71; // -------------------------- BoostGlider = 80; // Basic Boost Glider ParasiteGlider = 81; FrntEngBGeject = 82; // Front Engine Eject B/G FrntEngBGpopPod = 83; FrntEngBGsldPod = 84; // Front Engine Slid Pod B/G FrntEngBGfixPod = 85; FrntEngVarGeom = 86; // Front Engine Variable Geometry // -------------------------- RocketGlider = 87; RearEngPodEject = 88; RearEngCntrlSur = 89; RearEngVarGeom = 90; // -------------------------- FlexWingBG = 92; // -------------------------- LiftingBody = 94; lbLenticular = $94A; // Lifting Body Type/Configuration LiftngBodyConcl = 96; lbTriConical = $96A; // HL-20, X24 Bug // X-24A Odyssey researchgate.pdf FlatTopConvxBottm = $96B; // M2-F2 FlatBottmConvxTop = $96C; // HL-10, X-23, X-24A ModelAirplane = 100; // Basic Model Airplane ModelGlider = 101; PaperAirplane = 102; LightGlider = 105; ChuckGlider = 110; // Hand launch TowLineGlider = 115; RubberBandPower = 120; MdlRotorCopter = 200; // Model Helicopter & Quadrotor ModelHelicopter = 201; // https://spectrum.ieee.org/automaton/robotics/drones/cleo-robotics-demonstrates-uniquely-clever-ducted-fan-drone?utm_source=roboticsnews DuctedFan = 220; // http://spectrum.ieee.org/automaton/robotics/drones/worlds-smallest-cyclocopter-brings-unique-design-to-microdrones/?utm_source=RoboticsNews&utm_medium=Newsletter&utm_campaign=RN11222016 MdlCyclocopters = 240; // airfoils rotating around horizontal axis to generate lift & thrust ModelQuadrotor = 250; ModelOctorotor = 260; // http://spectrum.ieee.org/automaton/robotics/drones/eth-zurich-omnicopter-plays-fetch OmniCopter = 270; // eight motors oriented in all directions ModelBlimp = 300; // shape maintained by gas pressure within envelope ModelDirigible = 350; // rigid airship RocketBoat = 471; // Model Rocket engine powered Model Boat FixedWing = 11; SlideWing = 31; FlopWing = 41; SwingWing = 51; ScissorsWing = 61; // Additional Wing/Stabilizer Shapes CirclrVertStab = 41; // plan-rocket_plane-haase-zaic-44.gif NegCamberAirfoil = 501; // Airfoil Shapes PosCamberAirfoil = 510; // Model Airplane Constants MainWngIndx = 1; // index into lroot, span, etc., arrays HorzTailIndx = 2; // horizontal stabilizer index VertTailIndx = 3; // vertical stabilizer index VtailLindx = 4; // left V tail stabilizer index VtailRindx = 5; // right V tail stabilizer index CanardIndx = 6; // small forewing horizontal stabilizer // https://en.wikipedia.org/wiki/Stabilizer_(aeronautics) Tailless = 10; CnvntnlTail = 20; tTail = 30; VTail = 40; XTail = 50; YTail = 60; HTail = 70; TriFinTail = 80; // Lifting Bodies http://www.456fis.org/LIFTING%20BODIES.htm // Design Rules for Boost and Rocket/Gliders VDihedral = 10; TipDihedral = 20; PolyDihedral = 30; ArcDihedral = 40; GullDihedral = 50;