#include "spawner"

void main()
{
object oPC = GetLastUsedBy();
object oMod = GetModule();
int iMode = GetLocalInt(oMod, "gamemode");
int iDice;
string sMessage;
string sHost;
int iSwitch = GetLocalInt(oMod, "score_switch");
int iStatus = GetLocalInt(oPC, "luciferdead");

if (GetLocalInt(oMod, "mod_mode")==1)
{
PlaySound("sim_cntresist");
     FloatingTextStringOnCreature
    ("*** Not used in campaign manager mode ***", oPC);
    return;
}


if (iStatus==1)
   {
    if (iSwitch==0)
       {
        SetLocalInt(oMod, "score_switch", 1);
        Message(0.2, "Scoremode: Holy War Standings* SET *", oPC);
        PlaySound("gui_select");
        PlaySound("sce_positive");
       }
    else if (iSwitch==1)
       {
        SetLocalInt(oMod, "score_switch", 2);
        Message(0.2, "Scoremode: Holy War PC Stats * SET *", oPC);
        PlaySound("gui_select");
        PlaySound("sce_positive");
       }
       else if (iSwitch==2)
       {
        SetLocalInt(oMod, "score_switch", 0);
        Message(0.2, "Scoremode: Arena PC Stats * SET *", oPC);
        PlaySound("gui_select");
        PlaySound("sce_positive");
       }
   }
else
   {
    if (iMode==1)
       {sHost = "Arch Angel Tyriel";}
    else
       {sHost = "Lord Lucifer";}

    PlaySound("sim_cntresist");
    iDice = d3();
        switch (iDice)
         {
          case 1: {sMessage = "*** No alternate score mode availible yet ***";}break;
          case 2: {sMessage = "*** Defeat "+sHost+" to unlock this feature***";}break;
          case 3: {sMessage = "*** This wil become availible when you unlock the Holy War feature ***";}break;
         }

     FloatingTextStringOnCreature(sMessage, oPC);
   }
}