function Trig_ggg_Actions takes nothing returns nothing
local integer i
    SaveInteger(udg_hash, 1, 0, 10)
    set i = LoadInteger(udg_hash, 1, 0)
    if not (i == 10) then
        call BJDebugMsg("Not work: "+I2S(i))
    endif
endfunction

//===========================================================================
function InitTrig_ggg takes nothing returns nothing
    set gg_trg_ggg = CreateTrigger(  )
    call TriggerRegisterUnitEvent( gg_trg_ggg, gg_unit_hpea_0001, EVENT_UNIT_SELECTED )
    call TriggerAddAction( gg_trg_ggg, function Trig_ggg_Actions )
endfunction

set udg_hash=InitHashtable()