void LEM::SetLmLandedMesh() {
ClearMeshes();
VECTOR3 mesh_dir=_V(-0.003,-0.03,0.004);
UINT meshidx = AddMesh (hLMLanded, &mesh_dir);
SetMeshVisibilityMode (meshidx, MESHVIS_VCEXTERNAL);
Landed = true;
}
void InterplanetarySC::clbkSetClassCaps(FILEHANDLE cfg)
{
MESHHANDLE mesh;
mesh = oapiLoadMeshGlobal("ThermalFissionCraft");
UINT idx;
idx = AddMesh(mesh);
SetMeshVisibilityMode(idx,MESHVIS_EXTERNAL);
SetSize(350.0);
SetEmptyMass(400000.0);
createSubSystems();
}
void LEM::SetLmAscentHoverStage()
{
ClearThrusterDefinitions();
agc.SetVesselStats(APS_ISP, APS_THRUST, true);
ShiftCentreOfMass(_V(0.0,3.0,0.0));
SetSize (5);
SetCOG_elev (5);
SetEmptyMass (1920.0);
SetPMI(_V(2.8, 2.29, 2.37));
SetCrossSections (_V(21,23,17));
SetCW (0.1, 0.3, 1.4, 1.4);
SetRotDrag (_V(0.7,0.7,0.7));
SetPitchMomentScale (0);
SetBankMomentScale (0);
SetLiftCoeffFunc (0);
ClearMeshes();
ClearExhaustRefs();
ClearAttExhaustRefs();
double tdph = -5.8;
SetTouchdownPoints (_V(0, tdph, 5), _V(-5, tdph, -5), _V(5, tdph, -5));
VSSetTouchdownPoints(GetHandle(), _V(0, tdph, 5), _V(-5, tdph, -5), _V(5, tdph, -5));
VECTOR3 mesh_dir=_V(-0.191,-0.02,+0.383);
UINT meshidx = AddMesh (hLMAscent, &mesh_dir);
SetMeshVisibilityMode (meshidx, MESHVIS_VCEXTERNAL);
if (!ph_Asc)
ph_Asc = CreatePropellantResource(AscentFuelMassKg); // 2nd stage Propellant
SetDefaultPropellantResource (ph_Asc); // Display 2nd stage propellant level in generic HUD
// orbiter main thrusters
th_hover[0] = CreateThruster (_V( 0.0, -2.5, 0.0), _V( 0,1,0), APS_THRUST, ph_Asc, APS_ISP);
th_hover[1] = CreateThruster (_V( 0.01, -2.0, 0.0), _V( 0,1,0), 0, ph_Asc, 0); // this is a "virtual engine",no thrust and no fuel
// needed for visual gimbaling for corrected engine flames
DelThrusterGroup(THGROUP_HOVER,true);
thg_hover = CreateThrusterGroup (th_hover, 2, THGROUP_HOVER);
AddExhaust (th_hover[1], 6.0, 0.8, exhaustTex);
SetCameraOffset (_V(-1,1.0,0.0));
status = 2;
stage = 2;
SetEngineLevel(ENGINE_HOVER,0);
AddRCS_LMH2(-1.86);
bModeHover=true;
if(ph_Dsc){
DelPropellantResource(ph_Dsc);
ph_Dsc = 0;
}
VECTOR3 dockpos = {0.0 ,0.58, 0.0};
VECTOR3 dockdir = {0,1,0};
VECTOR3 dockrot = { -0.8660254, 0, 0.5 };
SetDockParams(dockpos, dockdir, dockrot);
hattDROGUE = CreateAttachment(true, dockpos, dockdir, dockrot, "PADROGUE");
InitNavRadios (4);
LDGswitch=false;
AFEED1switch=true;
AFEED2switch=true;
AFEED3switch=true;
AFEED4switch=true;
// Descent stage detached.
agc.SetInputChannelBit(030, DescendStageAttached, false);
CheckRCS();
}
void LEM::SetLmVesselHoverStage()
{
ClearThrusterDefinitions();
agc.SetVesselStats(DPS_ISP, DPS_THRUST, true);
SetEmptyMass(AscentFuelMassKg + 4374.0);
SetSize (7);
SetPMI (_V(3.26,2.22,3.26));
SetCrossSections (_V(24.53,21.92,24.40));
// SetPMI (_V(2.8,2.29,2.37));
// SetCrossSections (_V(21,23,17));
SetCW (0.1, 0.3, 1.4, 1.4);
SetRotDrag (_V(0.7,0.7,0.7));
SetPitchMomentScale (0);
SetBankMomentScale (0);
SetLiftCoeffFunc (0);
ClearMeshes();
ClearExhaustRefs();
ClearAttExhaustRefs();
SetTouchdownPoints (_V(0, -3.86, 5), _V(-5, -3.86, -5), _V(5, -3.86, -5));
VSSetTouchdownPoints(GetHandle(), _V(0, -3.86, 5), _V(-5, -3.86, -5), _V(5, -3.86, -5));
VECTOR3 mesh_dir=_V(-0.003,-0.03,0.004);
UINT meshidx;
if (Landed) {
meshidx = AddMesh (hLMLanded, &mesh_dir);
}else{
UINT probeidx;
meshidx = AddMesh (hLMLanded, &mesh_dir);
probeidx = AddMesh (hLemProbes, &mesh_dir);
SetMeshVisibilityMode (probeidx, MESHVIS_VCEXTERNAL);
}
SetMeshVisibilityMode (meshidx, MESHVIS_VCEXTERNAL);
if (!ph_Dsc){
ph_Dsc = CreatePropellantResource(DescentFuelMassKg); //2nd stage Propellant
}
SetDefaultPropellantResource (ph_Dsc); // display 2nd stage propellant level in generic HUD
if (!ph_RCSA){
ph_RCSA = CreatePropellantResource(133.084001);
}
if (!ph_RCSB){
ph_RCSB = CreatePropellantResource(133.084001);
}
// orbiter main thrusters
th_hover[0] = CreateThruster (_V(0.0 , -2.0, 0.0), _V(0,1,0), 46706.3, ph_Dsc, 3107);
th_hover[1] = CreateThruster (_V(0.013, -2.8, -0.034), _V(0,1,0), 0, ph_Dsc, 0); //this is a "virtual engine",no thrust and no fuel
//needed for visual gimbaling for corrected engine flames
DelThrusterGroup(THGROUP_HOVER,true);
thg_hover = CreateThrusterGroup(th_hover, 2, THGROUP_HOVER);
AddExhaust (th_hover[1], 10.0, 1.5, exhaustTex);
SetCameraOffset (_V(-1,1.0,0.0));
status = 1;
stage = 1;
SetEngineLevel(ENGINE_HOVER,0);
AddRCS_LMH(-1.85);
bModeHover=true;
VECTOR3 dockpos = {0.0 ,2.6, 0.0};
VECTOR3 dockdir = {0,1,0};
VECTOR3 dockrot = { -0.8660254, 0, 0.5 };
SetDockParams(dockpos, dockdir, dockrot);
hattDROGUE = CreateAttachment(true, dockpos, dockdir, dockrot, "PADROGUE");
InitNavRadios (4);
LDGswitch=true;
ATT2switch=true;
ATT3switch=true;
ATT1switch=true;
AFEED1switch=false;
AFEED2switch=false;
AFEED3switch=false;
AFEED4switch=false;
// Descent stage attached.
agc.SetInputChannelBit(030, DescendStageAttached, true);
CheckRCS();
}
void LEM::SetLmVesselDockStage()
{
double fuelmass;
int mnumber;
ClearThrusterDefinitions();
agc.SetVesselStats(DPS_ISP, DPS_THRUST, true);
//
// Changed to reflect mission-specific empty and fuel mass
//
// From "Apollo by the Numbers"
//
mnumber=agc.GetApolloNo();
if(mnumber < 15) {
SetEmptyMass(6565);
fuelmass=8375.;
} else {
SetEmptyMass(7334);
fuelmass=8891.;
}
SetSize (6);
// SetPMI (_V(2.8,2.29,2.37));
SetPMI(_V(2.5428, 2.2871, 2.7566));
// SetCrossSections (_V(21,23,17));
//SetPMI(_V(3.26, 2.22, 3.26));
SetCrossSections (_V(24.53,21.92,24.40));
SetCW (0.1, 0.3, 1.4, 1.4);
SetRotDrag (_V(0.7,0.7,0.7));
SetPitchMomentScale (0);
SetBankMomentScale (0);
SetLiftCoeffFunc (0);
ClearMeshes();
ClearExhaustRefs();
ClearAttExhaustRefs();
SetTouchdownPoints (_V(0,0,10), _V(-1,0,-10), _V(1,0,-10));
VECTOR3 mesh_dir=_V(0.0,-0.2,0.03);
UINT meshidx = AddMesh (hLMPKD, &mesh_dir);
SetMeshVisibilityMode (meshidx, MESHVIS_VCEXTERNAL);
if (!ph_Dsc)
ph_Dsc = CreatePropellantResource(fuelmass); //2nd stage Propellant
SetDefaultPropellantResource (ph_Dsc); // display 2nd stage propellant level in generic HUD
// 133.084001 kg is 293.4 pounds, which is the fuel + oxidizer capacity of one RCS tank.
if (!ph_RCSA) {
ph_RCSA = CreatePropellantResource(133.084001);
}
if (!ph_RCSB) {
ph_RCSB = CreatePropellantResource(133.084001);
}
// orbiter main thrusters
th_hover[0] = CreateThruster (_V(0.0 , -3.3, 0.0), _V(0,1,0), 46706.3, ph_Dsc, 3107);
th_hover[1] = CreateThruster (_V(0.013, -3.0, -0.03), _V(0,1,0), 0, ph_Dsc, 0); //this is a "virtual engine",no thrust and no fuel
//needed for visual gimbaling for corrected engine flames
DelThrusterGroup(THGROUP_HOVER,true);
thg_hover = CreateThrusterGroup(th_hover, 2, THGROUP_HOVER);
AddExhaust(th_hover[1], 10.0, 1.2, exhaustTex);
SetCameraOffset (_V(-1,1.0,0.0));
SetEngineLevel(ENGINE_HOVER,0);
AddRCS_LMH(-1.85);
status = 0;
stage = 0;
bModeDocked=true;
VECTOR3 dockpos = {0.0 ,2.6, 0.0};
VECTOR3 dockdir = {0,1,0};
VECTOR3 dockrot = { -0.8660254, 0, 0.5 };
SetDockParams(dockpos, dockdir, dockrot);
hattDROGUE = CreateAttachment(true, dockpos, dockdir, dockrot, "PADROGUE");
InitNavRadios (4);
LDGswitch=false;
ATT2switch=true;
ATT3switch=true;
ATT1switch=true;
AFEED1switch=false;
AFEED2switch=false;
AFEED3switch=false;
AFEED4switch=false;
// Descent stage attached.
agc.SetInputChannelBit(030, DescendStageAttached, true);
CheckRCS();
}
