library temp412 initializer InitTrig_HandleCounter
globals
private leaderboard udg_HandleBoard
endglobals
function HandleCounter_Update takes nothing returns nothing
local integer i = 0
local integer id
local location array P
local real result=0
loop
exitwhen i >= 50
set i = i + 1
set P[i] = Location(0,0)
set id = GetHandleId(P[i])
set result = result + (id-0x100000)
endloop
set result = result/i-i/2
loop
call RemoveLocation(P[i])
set P[i] = null
exitwhen i <= 1
set i = i - 1
endloop
call LeaderboardSetItemValue(udg_HandleBoard,0,R2I(result))
endfunction

function HandleCounter_Actions takes nothing returns nothing
set udg_HandleBoard = CreateLeaderboard()
call LeaderboardSetLabel(udg_HandleBoard, "Handle Counter")
call PlayerSetLeaderboard(GetLocalPlayer(),udg_HandleBoard)
call LeaderboardDisplay(udg_HandleBoard,true)
call LeaderboardAddItem(udg_HandleBoard,"Handles",0,Player(0))
call LeaderboardSetSizeByItemCount(udg_HandleBoard,1)
call HandleCounter_Update()
call TimerStart(GetExpiredTimer(),0.05,true,function HandleCounter_Update)
endfunction

function InitTrig_HandleCounter takes nothing returns nothing
call TimerStart(CreateTimer(),0,false,function HandleCounter_Actions)
endfunction
endlibrary

library HookTest
    private /* Да, функция может быть приватной. */ function test takes unit u /* Функция должна принимать те же параметры. */ returns nothing
        call BJDebugMsg("A unit " + GetUnitName(u) + " " + I2S(GetHandleId(u)) + " is being removed")
    endfunction

    hook RemoveUnit test
endlibrary

define RemoveUnit(u) =FixRemoveUnit

void FixRemoveUnit(unit u)
{
Remove##Unit(u)/*Склеивание строк*/
}

#define RemoveUnit(u) = FixRemoveUnit(u)