Да не плохо задэфались)
Для общего развития:
PS Изначально подпорчено -работать не будет (кому интересно завести ищите хитрую скважину я в вас верю).
Скрытый текст
PHP код:
local function isTotemFrame(frame)
if frame:GetName() then return end
if frame:GetID() ~= 0 then return end
if frame:GetObjectType() ~= "Frame" then return end
if frame:GetNumChildren() == 0 then return end
if frame:GetNumRegions() == 0 then return end
return true
end
local utype
if GetLocale()=="ruRU" then
utype="Тотем"
else
utype="Totem"
end
local function KillTotems(frame)
local name = select(7, frame:GetRegions()):GetText()
if name and (name:find("Totem ") or name:find("Тотем ")) and (UnitCreatureType("target")~=utype) then
InteractUnit(name)
PetAttack()
TargetLastTarget()
end
end
local function ScanWorldFrame(n, ...)
for i = 1, n do
local frame = select(i, ...)
if frame:IsShown() and isTotemFrame(frame) then
KillTotems(frame)
end
end
end
local function FindTotems()
if not UnitExists("pet") then return end
if UnitExists("pettarget") and UnitCreatureType("pettarget")==utype then return end
local n = WorldFrame:GetNumChildren()
ScanWorldFrame(n, WorldFrame:GetChildren())
end
local function ScriptHandler(msg)
if msg=="totemkill" then
FindTotems()
end
end
SLASH_SCRIPT_RUN1 ="/script_run"
SlashCmdList["SCRIPT_RUN"] = ScriptHandler
[свернуть]