function H2Ix takes handle pTarg returns integer
return pTarg
return 0
endfunction

function H2Tx takes handle pTarg returns string
return I2S(H2Ix(pTarg))
endfunction

function FastFlush takes string pTable returns nothing
call FlushStoredMission(udg_gc_DTAX_Core,pTable)
endfunction

function SetHandle takes string pTable,string pKey,handle pData returns nothing
call StoreInteger(udg_gc_DTAX_Core,pTable,pKey,H2Ix(pData))
endfunction

function SetInteger takes string pTable,string pKey,integer pData returns nothing
call StoreInteger(udg_gc_DTAX_Core,pTable,pKey,pData)
endfunction

function SetReal takes string pTable,string pKey,real pData returns nothing
call StoreReal(udg_gc_DTAX_Core,pTable,pKey,pData)
endfunction

function SetBoolean takes string pTable,string pKey,boolean pData returns nothing
call StoreBoolean(udg_gc_DTAX_Core,pTable,pKey,pData)
endfunction

function GetUnit takes string pTable,string pKey returns unit
return GetStoredInteger(udg_gc_DTAX_Core,pTable,pKey)
return null
endfunction

function GetPlayer takes string pTable,string pKey returns player
return GetStoredInteger(udg_gc_DTAX_Core,pTable,pKey)
return null
endfunction

function GetTimer takes string pTable,string pKey returns timer
return GetStoredInteger(udg_gc_DTAX_Core,pTable,pKey)
return null
endfunction

function GetTrigger takes string pTable,string pKey returns trigger
return GetStoredInteger(udg_gc_DTAX_Core,pTable,pKey)
return null
endfunction

function GetGroup takes string pTable,string pKey returns group
return GetStoredInteger(udg_gc_DTAX_Core,pTable,pKey)
return null
endfunction

function GetFX takes string pTable,string pKey returns effect
return GetStoredInteger(udg_gc_DTAX_Core,pTable,pKey)
return null
endfunction

function GetLocation takes string pTable,string pKey returns location
return GetStoredInteger(udg_gc_DTAX_Core,pTable,pKey)
return null
endfunction

function GetInteger takes string pTable,string pKey returns integer
return GetStoredInteger(udg_gc_DTAX_Core,pTable,pKey)
endfunction

function GetReal takes string pTable,string pKey returns real
return GetStoredReal(udg_gc_DTAX_Core,pTable,pKey)
endfunction

function GetBoolean takes string pTable,string pKey returns boolean
return GetStoredBoolean(udg_gc_DTAX_Core,pTable,pKey)
endfunction

Objects used:
'A04E' = Kraken Shell (Tidehunter : Leviathan)

function Trig_Kraken_Shell_Conditions takes nothing returns boolean
return GetLearnedSkill()=='A04E' and IsUnitIllusion(GetTriggerUnit())==false
endfunction

function Kraken_Timer takes nothing returns nothing
call UnitRemoveBuffsBJ(1,GetUnit(H2Tx(GetExpiredTimer()),"UnitVar"))
endfunction

function Trig_Kraken_Shell_Actions takes nothing returns nothing
local unit lfo=GetTriggerUnit()
local integer lmZ=GetUnitAbilityLevel(lfo,'A04E')
local timer ltt
if lmZ==1 then
set ltt=CreateTimer()
call TimerStart(ltt,11,true,function Kraken_Timer)
call SetHandle(H2Tx(ltt),"UnitVar",lfo)
call SetHandle(H2Tx(lfo),"KrakenTimer",ltt)
else
set ltt=GetTimer(H2Tx(lfo),"KrakenTimer")
call TimerStart(ltt,12-lmZ,true,function Kraken_Timer)
endif
endfunction

function InitTrig_Kraken_Shell takes nothing returns nothing
set gg_trg_Kraken_Shell=CreateTrigger()
call TriggerRegisterAnyUnitEventBJ(gg_trg_Kraken_Shell,EVENT_PLAYER_HERO_SKILL)
call TriggerAddCondition(gg_trg_Kraken_Shell,Condition(function Trig_Kraken_Shell_Conditions))
call TriggerAddAction(gg_trg_Kraken_Shell,function Trig_Kraken_Shell_Actions)
endfunction