Add ablility to select closest creature of entry (dataint), range (x) as target for spell (datalong) SCRIPT_COMMAND_CAST_SPELL.

--HG--
branch : trunk

src/game/Map.cpp

@@ -3509,7 +3509,21 @@ void Map::ScriptsProcess()
                     break;
                 }
 
-                Object* cmdTarget = step.script->datalong2 & 0x01 ? source : target;
+                Object* cmdTarget = NULL;
+                Object* cmdSource = NULL;
+                Unit* spellTarget = NULL;
+
+                if (step.script->datalong2 == 4)
+                {
+                    Unit* pTarget = (Unit*)target;
+                    if (Creature* victim = GetClosestCreatureWithEntry(pTarget,step.script->dataint,step.script->x))
+                        Unit* spellTarget = (Unit*)victim->GetGUID();
+                }
+                else
+                {
+                    Object* cmdTarget = step.script->datalong2 & 0x01 ? source : target;
+                    Unit* spellTarget = (Unit*)cmdTarget;
+                }
 
                 if (cmdTarget && !cmdTarget->isType(TYPEMASK_UNIT))
                 {
@@ -3517,9 +3531,10 @@ void Map::ScriptsProcess()
                     break;
                 }
 
-                Unit* spellTarget = (Unit*)cmdTarget;
+                if (step.script->datalong2 == 4)
-
+                    Object* cmdSource = target;
-                Object* cmdSource = step.script->datalong2 & 0x02 ? target : source;
+                else
+                    Object* cmdSource = step.script->datalong2 & 0x02 ? target : source;
 
                 if (!cmdSource)
                 {