void main()
{
object oPC = GetFirstPC();
object oMod = GetModule();
int iAv1, iAv2, iAv3, iAv4, iAv5, iAv6, iAv7, iAv8, iAv9, iAv10
     , iAv11, iAv12;

float fPerc1, fPerc2, fPerc3, fPerc4, fPerc5, fPerc6, fPerc7, fPerc8,
      fPerc9, fPerc10, fPerc11, fPerc12;

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

if (GetLocalInt(oMod, "notime4_ss")!=0)
{fPerc1 = (IntToFloat(GetLocalInt(oMod, "notime4_hh")) /
IntToFloat(GetLocalInt(oMod, "notime4_ss"))) * 100.0;
iAv1 = FloatToInt(fPerc1);}
else
{iAv1 = 0;}
if (GetLocalInt(oMod, "death_ss")!=0)
{fPerc2 = (IntToFloat(GetLocalInt(oMod, "death_hh")) /
IntToFloat(GetLocalInt(oMod, "death_ss"))) * 100.0;
iAv2 = FloatToInt(fPerc2);}
else
{iAv2 = 0;}
if (GetLocalInt(oMod, "notime3_ss")!=0)
{fPerc3 = (IntToFloat(GetLocalInt(oMod, "notime3_hh")) /
IntToFloat(GetLocalInt(oMod, "notime3_ss"))) * 100.0;
iAv3 = FloatToInt(fPerc3);}
else
{iAv3 = 0;}
if (GetLocalInt(oMod, "mistress2_ss")!=0)
{fPerc4 = (IntToFloat(GetLocalInt(oMod, "mistress2_hh")) /
IntToFloat(GetLocalInt(oMod, "mistress2_ss"))) * 100.0;
iAv4 = FloatToInt(fPerc4);}
else
{iAv4 = 0;}
if (GetLocalInt(oMod, "zep_marilithb001_ss")!=0)
{fPerc5 = (IntToFloat(GetLocalInt(oMod, "zep_marilithb001_hh")) /
IntToFloat(GetLocalInt(oMod, "zep_marilithb001_ss"))) * 100.0;
iAv5 = FloatToInt(fPerc5);}
else
{iAv5 = 0;}
if (GetLocalInt(oMod, "bard2_ss")!=0)
{fPerc6 = (IntToFloat(GetLocalInt(oMod, "bard2_hh")) /
IntToFloat(GetLocalInt(oMod, "bard2_ss"))) * 100.0;
iAv6 = FloatToInt(fPerc6);}
else
{iAv6 = 0;}
if (GetLocalInt(oMod, "zep_halfdrafn001_ss")!=0)
{fPerc7 = (IntToFloat(GetLocalInt(oMod, "zep_halfdrafn001_hh")) /
IntToFloat(GetLocalInt(oMod, "zep_halfdrafn001_ss"))) * 100.0;
iAv7 = FloatToInt(fPerc7);}
else
{iAv7 = 0;}
if (GetLocalInt(oMod, "zep_pitfiend001_ss")!=0)
{fPerc8 = (IntToFloat(GetLocalInt(oMod, "zep_pitfiend001_hh")) /
IntToFloat(GetLocalInt(oMod, "zep_pitfiend001_ss"))) * 100.0;
iAv8 = FloatToInt(fPerc8);}
else
{iAv8 = 0;}
if (GetLocalInt(oMod, "dopple_ss")!=0)
{fPerc9 = (IntToFloat(GetLocalInt(oMod, "dopple_hh")) /
IntToFloat(GetLocalInt(oMod, "dopple_ss"))) * 100.0;
iAv9 = FloatToInt(fPerc9);}
else
{iAv9 = 0;}
if (GetLocalInt(oMod, "zep_balrog001_ss")!=0)
{fPerc10 = (IntToFloat(GetLocalInt(oMod, "zep_balrog001_hh")) /
IntToFloat(GetLocalInt(oMod, "zep_balrog001_ss"))) * 100.0;
iAv10 = FloatToInt(fPerc10);}
else
{iAv10 = 0;}
if (GetLocalInt(oMod, "dragon1_ss")!=0)
{fPerc11 = (IntToFloat(GetLocalInt(oMod, "dragon1_hh")) /
IntToFloat(GetLocalInt(oMod, "dragon1_ss"))) * 100.0;
iAv11 = FloatToInt(fPerc11);}
else
{iAv11 = 0;}
if (GetLocalInt(oMod, "darcher_ss")!=0)
{fPerc12 = (IntToFloat(GetLocalInt(oMod, "darcher_hh")) /
IntToFloat(GetLocalInt(oMod, "darcher_ss"))) * 100.0;
iAv12 = FloatToInt(fPerc12);}
else
{iAv12 = 0;}


string sDam1 = IntToString(GetLocalInt(oMod, "notime4_dd"));
string sTak1 = IntToString(GetLocalInt(oMod, "notime4_dt"))+" / "+IntToString(iAv1)+"% "+IntToString(GetLocalInt(oMod, "notime4_k"))+GetLocalString(oMod, "notime4_x");
string sDam2 = IntToString(GetLocalInt(oMod, "death_dd"));
string sTak2 = IntToString(GetLocalInt(oMod, "death_dt"))+" / "+IntToString(iAv2)+"% "+IntToString(GetLocalInt(oMod, "death_k"))+GetLocalString(oMod, "death_x");
string sDam3 = IntToString(GetLocalInt(oMod, "notime3_dd"));
string sTak3 = IntToString(GetLocalInt(oMod, "notime3_dt"))+" / "+IntToString(iAv3)+"% "+IntToString(GetLocalInt(oMod, "notime3_k"))+GetLocalString(oMod, "notime3_x");
string sDam4 = IntToString(GetLocalInt(oMod, "mistress2_dd"));
string sTak4 = IntToString(GetLocalInt(oMod, "mistress2_dt"))+" / "+IntToString(iAv4)+"% "+IntToString(GetLocalInt(oMod, "mistress2_k"))+GetLocalString(oMod, "mistress2_x");
string sDam5 = IntToString(GetLocalInt(oMod, "zep_marilithb001_dd"));
string sTak5 = IntToString(GetLocalInt(oMod, "zep_marilithb001_dt"))+" / "+IntToString(iAv5)+"% "+IntToString(GetLocalInt(oMod, "zep_marilithb001_k"))+GetLocalString(oMod, "zep_marilithb001_x");
string sDam6 = IntToString(GetLocalInt(oMod, "bard2_dd"));
string sTak6 = IntToString(GetLocalInt(oMod, "bard2_dt"))+" / "+IntToString(iAv6)+"% "+IntToString(GetLocalInt(oMod, "bard2_k"))+GetLocalString(oMod, "bard2_x");
string sDam7 = IntToString(GetLocalInt(oMod, "zep_halfdrafn001_dd"));
string sTak7 = IntToString(GetLocalInt(oMod, "zep_halfdrafn001_dt"))+" / "+IntToString(iAv7)+"% "+" / "+IntToString(GetLocalInt(oMod, "zep_halfdrafn001_k"))+GetLocalString(oMod, "zep_halfdrafn001_x");
string sDam8 = IntToString(GetLocalInt(oMod, "zep_pitfiend001_dd"));
string sTak8 = IntToString(GetLocalInt(oMod, "zep_pitfiend001_dt"))+" / "+IntToString(iAv8)+"% "+" / "+IntToString(GetLocalInt(oMod, "zep_pitfiend001_k"))+GetLocalString(oMod, "zep_pitfiend001_x");
string sDam9 = IntToString(GetLocalInt(oMod, "dopple_dd"));
string sTak9 = IntToString(GetLocalInt(oMod, "dopple_dt"))+" / "+IntToString(iAv9)+"% "+IntToString(GetLocalInt(oMod, "dopple_k"))+GetLocalString(oMod, "dopple_x");
string sDam10 = IntToString(GetLocalInt(oMod, "zep_balrog001_dd"));
string sTak10 = IntToString(GetLocalInt(oMod, "zep_balrog001_dt"))+" / "+IntToString(iAv10)+"% "+" / "+IntToString(GetLocalInt(oMod, "zep_balrog001_k"))+GetLocalString(oMod, "zep_balrog001_x");
string sDam11 = IntToString(GetLocalInt(oMod, "dragon1_dd"));
string sTak11 = IntToString(GetLocalInt(oMod, "dragon1_dt"))+" / "+IntToString(iAv11)+"% "+IntToString(GetLocalInt(oMod, "dragon1_k"))+GetLocalString(oMod, "dragon1_x");
string sDam12 = IntToString(GetLocalInt(oMod, "darcher_dd"));
string sTak12 = IntToString(GetLocalInt(oMod, "darcher_dt"))+" / "+IntToString(iAv12)+"% "+IntToString(GetLocalInt(oMod, "darcher_k"))+GetLocalString(oMod, "darcher_x");
int iTotalDealt;
int iTotalTaken;

PlaySound("gui_select");

iTotalDealt = GetLocalInt(oMod, "dragon1_dd")+
GetLocalInt(oMod, "zep_balrog001_dd")+
GetLocalInt(oMod, "dopple_dd")+
GetLocalInt(oMod, "zep_pitfiend001_dd")+
GetLocalInt(oMod, "zep_halfdrafn001_dd")+
GetLocalInt(oMod, "bard2_dd")+
GetLocalInt(oMod, "zep_marilithb001_dd")+
GetLocalInt(oMod, "mistress2_dd")+
GetLocalInt(oMod, "notime3_dd")+
GetLocalInt(oMod, "death_dd")+
GetLocalInt(oMod, "darcher_dd")+
GetLocalInt(oMod, "notime4_dd");

iTotalTaken = GetLocalInt(oMod, "dragon1_dt")+
GetLocalInt(oMod, "zep_balrog001_dt")+
GetLocalInt(oMod, "dopple_dt")+
GetLocalInt(oMod, "zep_pitfiend001_dt")+
GetLocalInt(oMod, "zep_halfdrafn001_dt")+
GetLocalInt(oMod, "bard2_dt")+
GetLocalInt(oMod, "zep_marilithb001_dt")+
GetLocalInt(oMod, "mistress2_dt")+
GetLocalInt(oMod, "notime3_dt")+
GetLocalInt(oMod, "death_dt")+
GetLocalInt(oMod, "darcher_dt")+
GetLocalInt(oMod, "notime4_dt");

string sTotalDealt = IntToString(iTotalDealt);
string sTotalTaken = IntToString(iTotalTaken);

string SpeakText;
int iSwitch = GetLocalInt(oPC, "luciferdead");

if (iSwitch==1)
   {


    SpeakText = "\nDamage: Dealt/Taken / Accuracy / Kills\n ";
    SpeakText += "---------------------------\n";
    SpeakText += "Lucifer ";
    SpeakText += sDam1;
    SpeakText += " / ";
    SpeakText += sTak1;
    SpeakText += "\n";
    SpeakText += "Fallen Disciple ";
    SpeakText += sDam2;
    SpeakText += " / ";
    SpeakText += sTak2;
    SpeakText += "\n";
    SpeakText += "Baal ";
    SpeakText += sDam3;
    SpeakText += " / ";
    SpeakText += sTak3;
    SpeakText += "\n";
    SpeakText += "Lucifer's Mistress ";
    SpeakText += sDam4;
    SpeakText += " / ";
    SpeakText += sTak4;
    SpeakText += "\n";
    SpeakText += "Kamaji Berserker ";
    SpeakText += sDam5;
    SpeakText += " / ";
    SpeakText += sTak5;
    SpeakText += "\n";
    SpeakText += "Bard Heretic ";
    SpeakText += sDam6;
    SpeakText += " / ";
    SpeakText += sTak6;
    SpeakText += "\n";
    SpeakText += "Valdar Dragoon ";
    SpeakText += sDam7;
    SpeakText += " / ";
    SpeakText += sTak7;
    SpeakText += "\n";
    SpeakText += "WarDemon ";
    SpeakText += sDam8;
    SpeakText += " / ";
    SpeakText += sTak8;
    SpeakText += "\n";
    SpeakText += "Dark Reaver ";
    SpeakText += sDam9;
    SpeakText += " / ";
    SpeakText += sTak9;
    SpeakText += "\n";
    SpeakText += "Dark Archer ";
    SpeakText += sDam12;
    SpeakText += " / ";
    SpeakText += sTak12;
    SpeakText += "\n";
    SpeakText += "Balrog Lord ";
    SpeakText += sDam10;
    SpeakText += " / ";
    SpeakText += sTak10;
    SpeakText += "\n";
    SpeakText += "Death Wurm ";
    SpeakText += sDam11;
    SpeakText += " / ";
    SpeakText += sTak11;
    //SpeakText += "\n---------------------------\n";
    SpeakText += "\nTOTAL DAMAGE: ";
    SpeakText += sTotalDealt;
    SpeakText += " / ";
    SpeakText += sTotalTaken;


    SpeakString(SpeakText);
   }
else
   {
    PlaySound("sim_cntresist");
     FloatingTextStringOnCreature
    ("*** Not activated until [Holy War] feature is unlocked ***", oPC);
   }
}