globals
    leaderboard udg_HandleBoard
endglobals

function HandleCounter_L2I takes location P returns integer
    return GetHandleId(P)
endfunction

function HandleCounter_Update takes nothing returns nothing
        local integer i = 0
        local integer j = 1
        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 = HandleCounter_L2I(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, "System Debug")
        call PlayerSetLeaderboard(GetLocalPlayer(),udg_HandleBoard)
        call LeaderboardDisplay(udg_HandleBoard, true)
        call LeaderboardAddItem(udg_HandleBoard, "Handles: ", 0, GetLocalPlayer())
        call LeaderboardSetSizeByItemCount(udg_HandleBoard, 1)
        call TimerStart(GetExpiredTimer(),0.05,true,function HandleCounter_Update)
endfunction

//===========================================================================
function InitTrig_Debug_Board takes nothing returns nothing
        call TimerStart(CreateTimer(),0,false,function HandleCounter_Actions)
endfunction

struct A
endstruct

struct B extends A
endstruct

local A owner = new B

if(A instanceof B) {

}