FreeBuffSlots fix

--- a/MQ2Main/MQ2DataTypes.cpp  Wed Apr 09 13:09:54 2014
+++ b/MQ2Main/MQ2DataTypes.cpp  Fri May 02 16:29:28 2014
@@ -2272,21 +2272,7 @@
         Dest.Type=pStringType;
         return true;
     case FreeBuffSlots:
-        Dest.DWord=GetAAIndexByName("mystical attuning");
-        if (PlayerHasAAAbility(Dest.DWord))
-        {
-            for (unsigned int j=0; j < AA_CHAR_MAX_REAL; j++)
-            {
-                if ( pPCData->GetAltAbilityIndex(j) == Dest.DWord)
-                {
-                   PCHARINFO2 pChar2 = GetCharInfo2();
-                    Dest.DWord=15+(pChar2->AAList[j].PointsSpent/5);
-                    break;
-                }
-            }
-        } else Dest.DWord = 15;
-        if(GetAAIndexByName("Embrace of the Dark Reign")) Dest.DWord++;
-        if(GetAAIndexByName("Embrace of the Keepers")) Dest.DWord++;
+        Dest.DWord = 15 + pCharData1->TotalEffect(327, 1, 0, 1, 1);
         if(GetCharInfo()->pSpawn->Level > 71) Dest.DWord++;
         if(GetCharInfo()->pSpawn->Level > 74) Dest.DWord++;