////////////////////////////////////////////////////////////////////////////////
// RTS - Harvest of Souls - Choose Death Method
// By Deva Bryson Winblood/  08/20/2004
////////////////////////////////////////////////////////////////////////////////
// rts_deathmeth
// variable: nRTSDeathMeth
// 0 = Default
// 1 = 50% gold
// 2 = 50% random artifact
// 3 = both 1 and 2
// 4 = 50% gold, 10%/50%/90% to drop artifacts, and all non-artifact
// 5 = 50% gold, and all items including non-artifacts
void main()
{
    int nParm=GetLocalInt(GetPCSpeaker(),"nParm");
    object oMod=GetModule();
    if (nParm<7)
    {
      nParm--;
      SetLocalInt(oMod,"nRTSDeathMeth",nParm);
    }
    else if (nParm==7)
    { // 100% gold drop
      SetLocalInt(oMod,"nRTSGoldDrop",100);
    } // 100% gold drop
    else if (nParm==8)
    { // 25% gold drop
      SetLocalInt(oMod,"nRTSGoldDrop",25);
    } // 25% gold drop
}