void main()
{
   object oPC = GetLastUsedBy();
   string sSubrace = GetName(OBJECT_SELF);
   // don't allow multiple selection
   if (GetLocalInt(oPC, "SubraceSelected") == TRUE)
   {
      SendMessageToPC(oPC, "You alread selected a Subrace.");
      return;
   }

   // check for alignment
   if ((GetAlignmentGoodEvil(oPC) != ALIGNMENT_EVIL) &&
       (sSubrace == "Drow" || sSubrace == "Duergar")
      )
   {
      SendMessageToPC(oPC, "Only evil " + sSubrace + " are allowed.");
   }
   SetSubRace(oPC, sSubrace);
   SendMessageToPC(oPC, "Your subrace is now defined as " + GetName(OBJECT_SELF) + ".");
   SetLocalInt(oPC, "SubraceSelected", TRUE);
}