// load_presets - Load some presets
void main()
{
   object oPC=GetPCSpeaker();
   int nParm=GetLocalInt(oPC,"nParm");
   object oMod=GetModule();
   string sS;
   int nN;
   int nT;
   string sID;
   float fF;
   string sPrefix="HOSPreset"+IntToString(nParm)+"_";
   nN=GetCampaignInt("HOS",sPrefix+"bStored");
   if (!nN)
   { // slot not used
       SendMessageToPC(oPC,"THAT SLOT HAS NOT BEEN SAVED TO YET!");
       return;
   } // slot not used
   nN=GetCampaignInt("HOS",sPrefix+"bNoChampion");
   SetLocalInt(oMod,"bNoChampion",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nGameType");
   SetLocalInt(oMod,"nGameType",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nElimLives");
   SetLocalInt(oMod,"nElimLives",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nMaxSouls");
   SetLocalInt(oMod,"nMaxSouls",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nTimeLimitDays");
   SetLocalInt(oMod,"nTimeLimitDays",nN);
   nN=GetCampaignInt("HOS",sPrefix+"bHolocaustEnabled");
   SetLocalInt(oMod,"bHolocaustEnabled",nN);
   nN=GetCampaignInt("HOS",sPrefix+"bOPTIONPower");
   SetLocalInt(oMod,"bOPTIONPower",nN);
   nN=GetCampaignInt("HOS",sPrefix+"bPlanningMode");
   SetLocalInt(oMod,"bPlanningMode",nN);
   nN=GetCampaignInt("HOS",sPrefix+"bROTOOMode");
   SetLocalInt(oMod,"bROTOOMode",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nRTSDeathMethod");
   SetLocalInt(oMod,"nRTSDeathMethod",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nRTSDeathWho");
   SetLocalInt(oMod,"nRTSDeathWho",nN);
   nN=GetCampaignInt("HOS",sPrefix+"bPlayerBleeding");
   SetLocalInt(oMod,"bPlayerBleeding",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nManaDeath");
   SetLocalInt(oMod,"nManaDeath",nN);
   nN=GetCampaignInt("HOS",sPrefix+"fXPMultiplier");
   fF=IntToFloat(nN);
   SetLocalFloat(oMod,"fXPMultiplier",fF);
   nN=GetCampaignInt("HOS",sPrefix+"nInProgressJoins");
   SetLocalInt(oMod,"nInProgressJoins",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nMaxPlayers");
   SetLocalInt(oMod,"nMaxPlayers",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nManaGoldMultiplier");
   SetLocalInt(oMod,"nManaGoldMultiplier",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nGSAdvEnabled");
   SetLocalInt(oMod,"nGSAdvEnabled",nN);
   nN=GetCampaignInt("HOS",sPrefix+"bNOLEVELUP");
   SetLocalInt(oMod,"bNOLEVELUP",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nGSStartingLevel");
   SetLocalInt(oMod,"nGSStartingLevel",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nTOMEREBIRTH");
   SetLocalInt(oMod,"nTOMEREBIRTH",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nMONGoldDrop");
   SetLocalInt(oMod,"nMONGoldDrop",nN);
   nN=GetCampaignInt("HOS",sPrefix+"norcRaiders");
   SetLocalInt(oMod,"norcRaiders",nN);
   nN=GetCampaignInt("HOS",sPrefix+"ngnollRaiders");
   SetLocalInt(oMod,"ngnollRaiders",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nboggleRaiders");
   SetLocalInt(oMod,"nboggleRaiders",nN);
   nN=GetCampaignInt("HOS",sPrefix+"npygmyRaiders");
   SetLocalInt(oMod,"npygmyRaiders",nN);
   nN=GetCampaignInt("HOS",sPrefix+"ngiantRaiders");
   SetLocalInt(oMod,"npygmyRaiders",nN);
   nN=GetCampaignInt("HOS",sPrefix+"ndbanditRaiders");
   SetLocalInt(oMod,"ndbanditRaiders",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nbarbRaiders");
   SetLocalInt(oMod,"nbarbRaiders",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nduergarRaiders");
   SetLocalInt(oMod,"nduergarRaiders",nN);
   nN=GetCampaignInt("HOS",sPrefix+"bAIPCLeaderType");
   SetLocalInt(oMod,"bAIPCLeaderType",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nAIDelay");
   SetLocalInt(oMod,"nAIDelay",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nAISetting");
   SetLocalInt(oMod,"nAISetting",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nAIUnitCreateSpeed");
   SetLocalInt(oMod,"nAIUnitCreateSpeed",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nAIPauseSetting");
   SetLocalInt(oMod,"nAIPauseSetting",nN);
   nN=GetCampaignInt("HOS",sPrefix+"bBanterDisabled");
   SetLocalInt(oMod,"bBanterDisabled",nN);
   nN=GetCampaignInt("HOS",sPrefix+"bUnitConsolitdationOn");
   SetLocalInt(oMod,"bUnitConsolidationOn",nN);
   nN=GetCampaignInt("HOS",sPrefix+"bVerboseAIMessaging");
   SetLocalInt(oMod,"bVerboseAIMessaging",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nAILevelSpeed");
   SetLocalInt(oMod,"nAILevelSpeed",nN);
   nN=GetCampaignInt("HOS",sPrefix+"nMaxUnits");
   SetLocalInt(oMod,"nMaxUnits",nN);
   nT=1;
   while(nT<5)
   { // process teams
     sID="DWF";
     if (nT==2) sID="UNC";
     else if (nT==3) sID="UND";
     else if (nT==4) sID="SPID";
     sS=GetCampaignString("HOS",sPrefix+"sAICode"+sID);
     SetLocalString(oMod,"sAICode"+sID,sS);
     nN=GetCampaignInt("HOS",sPrefix+"n"+sID+"_nCAIRL");
     SetLocalInt(oMod,"n"+sID+"_nCAIRL",nN);
     nN=GetCampaignInt("HOS",sPrefix+"n"+sID+"_nCAICPL");
     SetLocalInt(oMod,"n"+sID+"_nCAICPL",nN);
     nN=GetCampaignInt("HOS",sPrefix+"n"+sID+"_nCAIPRL");
     SetLocalInt(oMod,"n"+sID+"_nCAIPRL",nN);
     sS=GetCampaignString("HOS",sPrefix+"s"+sID+"_CAI_PE");
     SetLocalString(oMod,"s"+sID+"_CAI_PE",sS);
     nN=GetCampaignInt("HOS",sPrefix+"n"+sID+"_CAI_Setting");
     SetLocalInt(oMod,"n"+sID+"_CAI_Setting",nN);
     sS=GetCampaignString("HOS",sPrefix+"sIsAlliedTo"+sID);
     SetLocalString(oMod,"sIsAlliedTo"+sID,sS);
     nN=GetCampaignInt("HOS",sPrefix+"bIsAllianceLeader"+sID);
     SetLocalInt(oMod,"bIsAllianceLeader"+sID,nN);
     nN=GetCampaignInt("HOS",sPrefix+"n"+sID+"_nCAIMVD");
     SetLocalInt(oMod,"n"+sID+"_nCAIMVD",nN);
     nN=GetCampaignInt("HOS",sPrefix+"n"+sID+"_nCAITRD");
     SetLocalInt(oMod,"n"+sID+"_nCAITRD",nN);
     nN=GetCampaignInt("HOS",sPrefix+"n"+sID+"_nCAILD1");
     SetLocalInt(oMod,"n"+sID+"_nCAILD1",nN);
     nN=GetCampaignInt("HOS",sPrefix+"n"+sID+"_nCAILD2");
     SetLocalInt(oMod,"n"+sID+"_nCAILD2",nN);
     nN=GetCampaignInt("HOS",sPrefix+"n"+sID+"_nCAIRA");
     SetLocalInt(oMod,"n"+sID+"_nCAIRA",nN);
     nN=GetCampaignInt("HOS",sPrefix+"n"+sID+"_nCAIRM");
     SetLocalInt(oMod,"n"+sID+"_nCAIRM",nN);
     nN=GetCampaignInt("HOS",sPrefix+"n"+sID+"_nCAIRG");
     SetLocalInt(oMod,"n"+sID+"_nCAIRG",nN);
     nN=GetCampaignInt("HOS",sPrefix+"n"+sID+"_nCAICPC");
     SetLocalInt(oMod,"n"+sID+"_nCAICPC",nN);
     nN=GetCampaignInt("HOS",sPrefix+"n"+sID+"_nCAIPR");
     SetLocalInt(oMod,"n"+sID+"_nCAIPR",nN);
     nN=GetCampaignInt("HOS",sPrefix+"n"+sID+"_nCAIHU");
     SetLocalInt(oMod,"n"+sID+"_nCAIHU",nN);
     nN=GetCampaignInt("HOS",sPrefix+"n"+sID+"_nCAIIC");
     SetLocalInt(oMod,"n"+sID+"_nCAIIC",nN);
     nN=GetCampaignInt("HOS",sPrefix+"b"+sID+"Locked");
     SetLocalInt(oMod,"b"+sID+"Locked",nN);
     nT++;
   } // process teams
}