// mai_c_ysally - enable alliance
void main()
{
    object oPC=GetPCSpeaker();
    object oMod=GetModule();
    string sTID=GetLocalString(oPC,"sMAI_TID");
    int nParm=GetLocalInt(oPC,"nParm");
    string sAID="DWF";
    string sAAID; // allies ally
    if (nParm==2) sAID="UNC";
    else if (nParm==3) sAID="UND";
    else if (nParm==4) sAID="SPID";
    sAAID=GetLocalString(oMod,"sIsAlliedTo"+sAID);
    if (GetStringLength(sAAID)>0) sAID=sAAID;
    SetLocalString(oMod,"sIsAlliedTo"+sTID,sAID);
    SetLocalInt(oMod,"bIsAllianceLeader"+sAID,TRUE);
}