//Set local integer for use in the wild shape radial menu
/*
Secret shapes!
63    POLYMORPH_TYPE_BEHOLDER
30    POLYMORPH_IMP
38    POLYMORPH_TYPE_CELESTIAL_AVENGER
74    POLYMORPH_TYPE_VAMPIRE_MALE
77    POLYMORPH_TYPE_VAMPIRE_FEMALE
28    POLYMORPH_DOOM_KNIGHT
*/
void main()
{
    if(GetGender(GetPCSpeaker()) == GENDER_MALE)
        SetLocalInt(GetPCSpeaker(), "DMEL_DRUIDSHAPES_" + IntToString( GetLocalInt(GetPCSpeaker(), "DMEL_REMAP_WSHAPE" ) ), 74+1);
    else SetLocalInt(GetPCSpeaker(), "DMEL_DRUIDSHAPES_" + IntToString( GetLocalInt(GetPCSpeaker(), "DMEL_REMAP_WSHAPE" ) ), 77+1);
    ExecuteScript("dmel_druidshapes",GetPCSpeaker() );
}