function GetUnitDamage takes unit u returns integer
	local integer p = Memory[ConvertHandle(u) / 4 + 0x7A] / 4
	local integer sides1 = Memory[p + 0x25]
	local integer dice1 = Memory[p + 0x22]
	local integer base = Memory[p + 0x28]
	local integer bonus = Memory[p + 0x2C]
	//call BJDebugMsg("DMG: " + I2S(base + dice1) + " - " + I2S(base + sides1 * dice1) + " + " + I2S(bonus))
	return base + dice1
endfunction

function GetHost takes nothing returns player
    local player p
    local gamecache g = InitGameCache("Map.w3v")
    call StoreInteger ( g, "Map", "Host", GetPlayerId(GetLocalPlayer ())+1)
    call TriggerSyncStart ()
    call SyncStoredInteger ( g, "Map", "Host" )
    call TriggerSyncReady ()
    set p = Player( GetStoredInteger ( g, "Map", "Host" )-1)
    call FlushGameCache( g )
    set g = null
    return p
endfunction

function setInt takes integer i returns nothing
    set udg_Int = i
    return //Prevents JassHelper from inlining this function
endfunction

function setStr takes string s returns nothing
    set udg_Str = s
    return //Prevents JassHelper from inlining this function
endfunction

function Typecast2 takes nothing returns nothing
    local integer udg_Str
    local string udg_Int
endfunction

//# +nosemanticerror
function SH2I takes string s returns integer
    call setStr(s)
    return udg_Str
endfunction

//# +nosemanticerror
function I2SH takes integer i returns string
    call setInt(i)
    return udg_Int
endfunction