XGM Forum - Таймеры

respect_gg,

Код:

1 способ с ForGroup
-----------------------------------------------------------------------------------------------------------------
function D takes nothing returns nothing
local unit u = LoadUnitHandle(udg_Hash, GetHandleId(GetTriggeringTrigger()), 1)
call UnitDamageTarget( )
call FlushChildHashtable(udg_Hash, GetHandleId(GetTriggeringTrigger()))
set u = null
endfunction

function C takes nothing returns boolean
    return ( IsUnitType(GetFilterUnit(), UNIT_TYPE_STRUCTURE) == false )
endfunction

function B takes nothing returns nothing
local timer t=GetExpiredTimer()
local unit u = LoadUnitHandle(udg_Hash, GetHandleId(t), 1)
local group g = CreateGroup()
далее твои координаты
local real x =
local real y =
call SaveUnitHandle(udg_Hash, GetHandleId(GetTriggeringTrigger()), 1, u)
//далее собираешь всех юнитов в группу, исключает только тех юнитов, которые прописаны в условии Condition(function C)
call GroupEnumUnitsInRange(g, x, y, радиус, Condition(function C))
call ForGroup( g, function D )
 call FlushChildHashtable(udg_Hash, GetHandleId(t))
 call DestroyGroup(g)
 call DestroyTimer(t)
set t=null
set u = null
set g = null
endfunction

2 способ - с циклом без вызова лишних функции
-----------------------------------------------------------------------------------------------

function C takes nothing returns boolean
    return ( IsUnitType(GetFilterUnit(), UNIT_TYPE_STRUCTURE) == false )
endfunction

function B takes nothing returns nothing
local timer t=GetExpiredTimer()
local unit u = LoadUnitHandle(udg_Hash, GetHandleId(t), 1)
local unit e
local group g = CreateGroup()
//далее твои координаты
local real x =
local real y =
call SaveUnitHandle(udg_Hash, GetHandleId(GetTriggeringTrigger()), 1, u)
//далее собираешь всех юнитов в группу, исключает только тех юнитов, которые прописаны в условии Condition(function C)
call GroupEnumUnitsInRange(g, x, y, радиус, Condition(function C))
loop  
     set e=FirstOfGroup(g)  
     exitwhen e==null 
     if IsUnitType(e, UNIT_TYPE_STRUCTURE) == false
         call UnitDamageTarget......
     endif
     call GroupRemoveUnit(g,e)
endloop
 call FlushChildHashtable(udg_Hash, GetHandleId(t))
 call DestroyGroup(g)
 call DestroyTimer(t)
set t=null
set u = null
set g = null
endfunction

------------------------------------------------------------------------------

function A takes nothing returns nothing
local timer t=CreateTimer()
local unit u = твой юнит
call SaveUnitHandle(udg_Hash, GetHandleId(t), 1, u)
call TimerStart(t, 2.5, false, function B)
//если это периодический, то меняешь на call TimerStart(t, 2.5, true, function B), и же в этой функции создаешь группу, запоминаешь ее в хэше и по вызову таймера в других функциях наносишь урон
set t=null
endfunction

function GroupEnumCallback takes nothing returns nothing // действия для каждого юнита в группе за тик таймера endfunction function GroupTimerCallback takes nothing returns nothing call ForGroup(LoadGroupHandle(<hashtable>, GetHandleId(GetExpiredTimer()), 0), function GroupEnumCallback) endfunction function GroupDmgFilter takes nothing returns boolean local boolean b = false if (not IsUnitType(GetFilterUnit() UNIT_TYPE_STRUCTURE)) then set b = true call UnitDamageTarget(...) endif return b endfunction local timer t = CreateTimer() local group g = CreateGroup() call SaveGroupHandle(<hashtable>, GetHandleId(t), 0, g) call GroupEnumUitsInRange(g, <x>, <y>, <radius>, Filter(function GroupDmgFilter)) call TimerStart(t, <timeout>, true, function GroupTimerCallback)

Ваши права в разделе

Вы не можете создавать темы

Вы не можете отвечать на сообщения

Вы не можете прикреплять файлы

Вы можете скачивать файлы

BB-коды Вкл.

Смайлики Вкл.

[IMG] код Вкл.

HTML код Выкл.

spellwerk offline Опыт: 4,869 Активность:	выбираешь нужных юнитов, заносишь в группу, наносишь им урон, привязываешь к таймеру группу, запускаешь таймер. при срабатывании таймера делаешь все ,что нужно
13.11.2011, 23:15	#2 +1/−0 Профиль \| Приват \| Поиск \| Цитата \| IP: Записан

Опции темы	Поиск в этой теме
Версия для печати	Поиск в этой теме: Расширенный поиск