Triggers

globals
    framehandle ThrallIcon = null
endglobals

library THRALLUI initializer init

    private function CreateIcon takes nothing returns nothing
        set ThrallIcon = BlzCreateFrameByType("BACKDROP", "ThrallDynamicIcon", BlzGetOriginFrame(ORIGIN_FRAME_GAME_UI, 0), "", 0)
        call BlzFrameSetSize(ThrallIcon, 0.05, 0.05)
        call BlzFrameSetVisible(ThrallIcon, false)
    endfunction

    function ShowThrallUiForPlayer takes player p, string iconCode returns nothing
        local string texturePath
        local real xPos = 0.345
        local real yPos = 0.118

        if iconCode == "air" then
            set texturePath = "UI\\Console\\Thrall\\air"
        elseif iconCode == "fire" then
            set texturePath = "UI\\Console\\Thrall\\fire"
        elseif iconCode == "water" then
            set texturePath = "UI\\Console\\Thrall\\water"
        elseif iconCode == "earth" then
            set texturePath = "UI\\Console\\Thrall\\earth"
        else
            return
        endif

        if GetLocalPlayer() == p then
            call BlzFrameSetTexture(ThrallIcon, texturePath, 0, true)
            call BlzFrameSetVisible(ThrallIcon, true)

            call BlzFrameSetAbsPoint(ThrallIcon, FRAMEPOINT_TOPLEFT, xPos, yPos + 0.065)
            call BlzFrameSetAbsPoint(ThrallIcon, FRAMEPOINT_BOTTOMRIGHT, xPos + 0.115, yPos)
        endif
    endfunction

    private function init takes nothing returns nothing
        call CreateIcon()
    endfunction

endlibrary

globals
    framehandle WhitemaneIcon = null
    framehandle WhitemaneText = null
endglobals

library WHITEMANEUI initializer init

    private function CreateIcon takes nothing returns nothing
        // Создание иконки
        set WhitemaneIcon = BlzCreateFrameByType("BACKDROP", "WhitemaneIcon", BlzGetOriginFrame(ORIGIN_FRAME_GAME_UI, 0), "", 0)
        call BlzFrameSetSize(WhitemaneIcon, 0.05, 0.05)
        call BlzFrameSetVisible(WhitemaneIcon, false)

        // Создание текстового фрейма
        set WhitemaneText = BlzCreateFrameByType("TEXT", "WhitemaneDynamicText", WhitemaneIcon, "", 0)
        call BlzFrameSetPoint(WhitemaneText, FRAMEPOINT_CENTER, WhitemaneIcon, FRAMEPOINT_CENTER, 0, -0.0135)
        call BlzFrameSetSize(WhitemaneText, 0.06, 0.025)
        call BlzFrameSetScale(WhitemaneText, 1.25)
        call BlzFrameSetTextAlignment(WhitemaneText, TEXT_JUSTIFY_CENTER, TEXT_JUSTIFY_MIDDLE)
        call BlzFrameSetText(WhitemaneText, "")
        call BlzFrameSetVisible(WhitemaneText, false)
    endfunction

    function ShowWhitemaneUiForPlayer takes player p, string iconCode returns nothing
        local string texturePath
        local real xPos = 0.345
        local real yPos = 0.118

        if iconCode == "off" then
            set texturePath = "UI\\Console\\Whitemane\\scarlet_crusade_off"
        elseif iconCode == "on" then
            set texturePath = "UI\\Console\\Whitemane\\scarlet_crusade_on"
        elseif iconCode == "on1" then
            set texturePath = "UI\\Console\\Whitemane\\scarlet_crusade_on1"
        elseif iconCode == "on2" then
            set texturePath = "UI\\Console\\Whitemane\\scarlet_crusade_on2"
        elseif iconCode == "on3" then
            set texturePath = "UI\\Console\\Whitemane\\scarlet_crusade_on3"
        elseif iconCode == "on4" then
            set texturePath = "UI\\Console\\Whitemane\\scarlet_crusade_on4"
        elseif iconCode == "on5" then
            set texturePath = "UI\\Console\\Whitemane\\scarlet_crusade_on5"
        else
            return
        endif

        if GetLocalPlayer() == p then
            call BlzFrameSetTexture(WhitemaneIcon, texturePath, 0, true)
            call BlzFrameSetVisible(WhitemaneIcon, true)
            call BlzFrameSetVisible(WhitemaneText, true)

            call BlzFrameSetAbsPoint(WhitemaneIcon, FRAMEPOINT_TOPLEFT, xPos, yPos + 0.065)
            call BlzFrameSetAbsPoint(WhitemaneIcon, FRAMEPOINT_BOTTOMRIGHT, xPos + 0.065, yPos)
        endif
    endfunction

    function UpdateWhitemaneText takes player p, string text returns nothing
        if GetLocalPlayer() == p then
            call BlzFrameSetText(WhitemaneText, "|cFFBF0000" + text + "|r")
        endif
    endfunction

    private function init takes nothing returns nothing
        call CreateIcon()
    endfunction

endlibrary

globals
    framehandle ArthasIcon = null
    framehandle ArthasText = null
endglobals

library ARTHASUI initializer init

    private function CreateIcon takes nothing returns nothing
        // Создание иконки
        set ArthasIcon = BlzCreateFrameByType("BACKDROP", "ArthasIcon", BlzGetOriginFrame(ORIGIN_FRAME_GAME_UI, 0), "", 0)
        call BlzFrameSetSize(ArthasIcon, 0.05, 0.05)
        call BlzFrameSetVisible(ArthasIcon, false)

        // Создание текстового фрейма
        set ArthasText = BlzCreateFrameByType("TEXT", "ArthasDynamicText", ArthasIcon, "", 0)
        call BlzFrameSetPoint(ArthasText, FRAMEPOINT_CENTER, ArthasIcon, FRAMEPOINT_CENTER, 0, -0.001)
        call BlzFrameSetSize(ArthasText, 0.06, 0.025)
        call BlzFrameSetScale(ArthasText, 1.3)
        call BlzFrameSetTextAlignment(ArthasText, TEXT_JUSTIFY_CENTER, TEXT_JUSTIFY_MIDDLE)
        call BlzFrameSetText(ArthasText, "")
        call BlzFrameSetVisible(ArthasText, false)
    endfunction

    function ShowArthasUiForPlayer takes player p returns nothing
        local real xPos = 0.168 // лево-право
        local real yPos = 0.125 // верх=вниз

        if GetLocalPlayer() == p then
            call BlzFrameSetTexture(ArthasIcon, "UI\\Console\\Arthas\\arthas_souls", 0, true)
            call BlzFrameSetVisible(ArthasIcon, true)
            call BlzFrameSetVisible(ArthasText, true)

            call BlzFrameSetAbsPoint(ArthasIcon, FRAMEPOINT_TOPLEFT, xPos, yPos + 0.065)
            call BlzFrameSetAbsPoint(ArthasIcon, FRAMEPOINT_BOTTOMRIGHT, xPos + 0.065, yPos)
        endif
    endfunction

    function UpdateArthasText takes player p, string text returns nothing
        if GetLocalPlayer() == p then
            call BlzFrameSetText(ArthasText, text)
        endif
    endfunction

    private function init takes nothing returns nothing
        call CreateIcon()
    endfunction

endlibrary

globals
    integer MYTHIC_INDEX = 0
endglobals

function FrameMythic takes string iconPath, string titleText, string descriptionText returns nothing
    local framehandle buttonMyth
    local framehandle new_Frame
    local framehandle sprite
    local framehandle tooltip
    local real size = 0.025
    local real offsetX = -0.057
    local real offsetY = -0.057
    local real scale = 0.5
    local real pointx = 0.79
    local real array yPositions

    set yPositions[0] = 0.55
    set yPositions[1] = yPositions[0] - 0.031
    set yPositions[2] = yPositions[1] - 0.031
    set yPositions[3] = yPositions[2] - 0.031

    set buttonMyth = BlzCreateFrame("ScriptDialogButton", BlzGetOriginFrame(ORIGIN_FRAME_GAME_UI, 0), 0, 0)
    call BlzFrameSetAbsPoint(buttonMyth, FRAMEPOINT_CENTER, pointx, yPositions[MYTHIC_INDEX])
    call BlzFrameSetSize(buttonMyth, size, size)

    set new_Frame = BlzCreateFrameByType("BACKDROP", "PORTRAIT", buttonMyth, "", 0)
    call BlzFrameClearAllPoints(new_Frame)
    call BlzFrameSetPoint(new_Frame, FRAMEPOINT_CENTER, buttonMyth, FRAMEPOINT_CENTER, 0, 0)
    call BlzFrameSetSize(new_Frame, size, size)
    call BlzFrameSetTexture(new_Frame, iconPath, 0, true)

    set sprite = BlzCreateFrameByType("SPRITE", "justAName", new_Frame, "WarCraftIIILogo", 0)
    call BlzFrameClearAllPoints(sprite)
    call BlzFrameSetPoint(sprite, FRAMEPOINT_TOPRIGHT, new_Frame, FRAMEPOINT_TOPRIGHT, offsetX, offsetY)
    call BlzFrameSetSize(sprite, 0.000025, 0.000025)
    call BlzFrameSetScale(sprite, scale)
    call BlzFrameSetModel(sprite, "UI\\Mythic\\Border\\damned_sprite.mdx", 0)

    set tooltip = BlzCreateFrameByType("TEXT", "TooltipFrame", BlzGetOriginFrame(ORIGIN_FRAME_GAME_UI, 0), "", 0)
    call BlzFrameSetText(tooltip, "|cFFA293FF" + titleText + "|r|n" + descriptionText)
    call BlzFrameSetAbsPoint(tooltip, FRAMEPOINT_CENTER, pointx - 0.1, yPositions[MYTHIC_INDEX])
    call BlzFrameSetVisible(tooltip, false)

    call BlzFrameSetTooltip(buttonMyth, tooltip)
    call BlzFrameSetVisible(buttonMyth, true)

    set MYTHIC_INDEX = MYTHIC_INDEX + 1
endfunction

library FrameLoader initializer init_function
// in 1.31 and upto 1.32.9 PTR (when I wrote this). Frames are not correctly saved and loaded, breaking the game.
// This library runs all functions added to it with a 0s delay after the game was loaded.
// function FrameLoaderAdd takes code func returns nothing
    // func runs when the game is loaded.
    globals
        private trigger eventTrigger = CreateTrigger()
        private trigger actionTrigger = CreateTrigger()
        private timer t = CreateTimer()
    endglobals
    function FrameLoaderAdd takes code func returns nothing
        call TriggerAddAction(actionTrigger, func)
    endfunction

    private function timerAction takes nothing returns nothing
        call TriggerExecute(actionTrigger)
    endfunction
    private function eventAction takes nothing returns nothing
        call TimerStart(t, 0, false, function timerAction)
    endfunction
    private function init_function takes nothing returns nothing
        call TriggerRegisterGameEvent(eventTrigger, EVENT_GAME_LOADED)
        call TriggerAddAction(eventTrigger, function eventAction)        
    endfunction
endlibrary

library CustomConsoleUI initializer init_function requires optional FrameLoader, optional GameStatus

// CustomConsoleUI by Tasyen
// CustomConsoleUI allows to change the UI during the game, when setuped correctly. This excludes the mouse cursor and the UI sounds.
// In non reforged it can also not change the Idle worker Button nor the no inventory cover.
// How to setup this: First you have to make the default Console Textures be hidden that is done in Game Interface.
//    Set ConsoleTexture01 to ConsoleTexture06 to UI\Widgets\EscMenu\Human\blank-background.blp
//    The Day of Time clock has hardcoded textures therefore you need to swap it out. That also should be done in Gameinterface.
//    TimeOfDayIndicator to the model included in this system.
//    Now export and Import war3mapImported\CustomConsoleUI.toc & war3mapImported\CustomConsoleUI.fdf
//    Finally you have to set the used textures into local data
    globals
    // workerFace = true can only be used when you save the map in 1.32.6+
        private constant boolean workerFace = true
        
        private framehandle idleWorkerButton
        private framehandle idleWorkerButtonOverlay
        private framehandle idleWorkerButtonOverlayParent
        private framehandle customInventoryCover
        private framehandle customInventoryCoverParent
        public string array data
        public integer array dataCount
        private integer dataPageSize = 11
        public real array x
        public real array y        
    endglobals

    function AddCustomConsole takes integer index, string texture returns nothing
        set dataCount[index] = dataCount[index] + 1
        set data[index*dataPageSize + dataCount[index]] = texture
    endfunction

    function UseCustomConsole takes player p, integer index returns nothing
        local integer pageValue
        if GetLocalPlayer() != p then
            return
        endif
        if index < 1 then
            set index = GetHandleId(GetPlayerRace(p))
        endif
        set pageValue = index*dataPageSize
        call BlzFrameSetTexture(BlzGetFrameByName("CustomConsoleUI5T", 0), data[pageValue + 5], 0, false)
        call BlzFrameSetTexture(BlzGetFrameByName("CustomConsoleUI6T", 0), data[pageValue + 6], 0, false)
        call BlzFrameSetTexture(BlzGetFrameByName("CustomConsoleUI4T", 0), data[pageValue + 4], 0, false)
        call BlzFrameSetTexture(BlzGetFrameByName("CustomConsoleUI3T", 0), data[pageValue + 3], 0, false)
        call BlzFrameSetTexture(BlzGetFrameByName("CustomConsoleUI2TL", 0), data[pageValue + 2], 0, false)
        call BlzFrameSetTexture(BlzGetFrameByName("CustomConsoleUI2TR", 0), data[pageValue + 2], 0, false)
        call BlzFrameSetTexture(BlzGetFrameByName("CustomConsoleUI1T", 0), data[pageValue + 1], 0, false)

        call BlzFrameSetTexture(BlzGetFrameByName("CustomConsoleUI1B", 0), data[pageValue + 1], 0, false)
        call BlzFrameSetTexture(BlzGetFrameByName("CustomConsoleUI2B", 0), data[pageValue + 2], 0, false)
        call BlzFrameSetTexture(BlzGetFrameByName("CustomConsoleUI3B", 0), data[pageValue + 3], 0, false)
        call BlzFrameSetTexture(BlzGetFrameByName("CustomConsoleUI4B", 0), data[pageValue + 4], 0, false)
        call BlzFrameSetTexture(BlzGetFrameByName("CustomConsoleUI5B", 0), data[pageValue + 5], 0, false)
        call BlzFrameSetTexture(BlzGetFrameByName("CustomConsoleUI6B", 0), data[pageValue + 6], 0, false)
    
        call BlzFrameSetTexture(BlzGetFrameByName("CustomConsoleUIClock", 0), data[pageValue + 7] ,0, true)
        if GetLocalizedString("REFORGED") != "REFORGED" then
            call BlzFrameSetTexture(BlzGetFrameByName("InventoryCoverTexture", 0), data[pageValue + 8] ,0, true)
            static if workerFace then
                call BlzFrameSetTexture(idleWorkerButtonOverlay, data[pageValue + 9], 0, false)
            endif
        else
            call BlzFrameSetTexture(customInventoryCover, data[pageValue + 8] ,0, true)
        endif
        call BlzFrameSetPoint(BlzGetFrameByName("CustomConsoleUIClock", 0), FRAMEPOINT_TOP, BlzGetFrameByName("ConsoleUI", 0), FRAMEPOINT_TOP, x[index], y[index])       
    endfunction

    function CreateCustomConsole takes nothing returns nothing
        call BlzLoadTOCFile( "war3mapimported\\CustomConsoleUI.toc" )
        
        call BlzCreateSimpleFrame( "CustomConsoleUI", BlzGetFrameByName("ConsoleUI", 0), 0)
        call BlzFrameSetLevel(BlzGetFrameByName("CustomConsoleUI", 0), 0)
        if GetLocalizedString("REFORGED") != "REFORGED" then
            // Requires a native existing only in Reforged
            static if workerFace then
                set idleWorkerButton = BlzFrameGetChild(BlzGetFrameByName("ConsoleBottomBar", 0), 3)
                set idleWorkerButtonOverlayParent = BlzCreateSimpleFrame( "SimpleTextureFrame", idleWorkerButton, 0 )
                set idleWorkerButtonOverlay = BlzGetFrameByName("SimpleTextureFrameValue", 0)
                call BlzFrameSetAllPoints(idleWorkerButtonOverlay, idleWorkerButton)
                call BlzFrameSetLevel(idleWorkerButtonOverlayParent, 4)
                static if LIBRARY_GameStatus then
                    if GetGameStatus() == GAME_STATUS_REPLAY then
                        // call BlzFrameSetVisible(idleWorkerButtonOverlayParent,  false)
                    endif
                endif
            endif
        else
            set customInventoryCoverParent = BlzCreateSimpleFrame( "SimpleTextureFrame", BlzGetFrameByName("ConsoleUI", 0), 0)
            call BlzFrameSetLevel(customInventoryCoverParent, 4)
            set customInventoryCover = BlzGetFrameByName("SimpleTextureFrameValue", 0)
            call BlzFrameSetAbsPoint(customInventoryCover, FRAMEPOINT_BOTTOMRIGHT, 0.6, 0)
            call BlzFrameSetAbsPoint(customInventoryCover, FRAMEPOINT_TOPLEFT, 0.6 - 0.128, 0.2558)
        endif

        // Preload
        call BlzGetOriginFrame(ORIGIN_FRAME_ITEM_BUTTON, 0)
        call BlzGetFrameByName("InventoryCoverTexture", 0)
        call BlzGetFrameByName("CustomConsoleUIClock", 0)
        call BlzGetFrameByName("CustomConsoleUI5T", 0)
        call BlzGetFrameByName("CustomConsoleUI6T", 0)
        call BlzGetFrameByName("CustomConsoleUI4T", 0)
        call BlzGetFrameByName("CustomConsoleUI3T", 0)
        call BlzGetFrameByName("CustomConsoleUI2TL", 0)
        call BlzGetFrameByName("CustomConsoleUI2TR", 0)
        call BlzGetFrameByName("CustomConsoleUI1T", 0)
        call BlzGetFrameByName("CustomConsoleUI1B", 0)
        call BlzGetFrameByName("CustomConsoleUI2B", 0)
        call BlzGetFrameByName("CustomConsoleUI3B", 0)
        call BlzGetFrameByName("CustomConsoleUI4B", 0)
        call BlzGetFrameByName("CustomConsoleUI5B", 0)
        call BlzGetFrameByName("CustomConsoleUI6B", 0)
    endfunction
    private function Init takes nothing returns nothing
        call CreateCustomConsole()
        call UseCustomConsole(GetLocalPlayer(), 0)
    endfunction
    private function at0s takes nothing returns nothing
        call Init()
        call DestroyTimer(GetExpiredTimer())
    endfunction
    private function update takes nothing returns nothing
        call BlzFrameSetVisible(customInventoryCoverParent, not BlzFrameIsVisible(BlzGetOriginFrame(ORIGIN_FRAME_ITEM_BUTTON, 0)))
    endfunction

    private function init_function takes nothing returns nothing
        local integer index = 0
        set index = GetHandleId(RACE_HUMAN)
        call AddCustomConsole(index, "ui\\console\\human\\humanuitile01")
        call AddCustomConsole(index, "ui\\console\\human\\humanuitile02")
        call AddCustomConsole(index, "ui\\console\\human\\humanuitile03")
        call AddCustomConsole(index, "ui\\console\\human\\humanuitile04")
        call AddCustomConsole(index, "ui\\Widgets\\EscMenu\\Human\\blank-background")
        call AddCustomConsole(index, "ui\\Widgets\\EscMenu\\Human\\blank-background")
        call AddCustomConsole(index, "ui\\console\\human\\humanuitile-timeindicatorframe")
        call AddCustomConsole(index, "ui\\console\\human\\humanuitile-inventorycover")
        call AddCustomConsole(index, "ReplaceableTextures\\CommandButtons\\BTNPeasant")
        // offset this mostly is used to fit to the glowing orbs showing the houers
        set x[index] = 0.0009
        set y[index] = 0.0

        set index = GetHandleId(RACE_ORC)
        call AddCustomConsole(index, "ui\\console\\orc\\orcuitile01")
        call AddCustomConsole(index, "ui\\console\\orc\\orcuitile02")
        call AddCustomConsole(index, "ui\\console\\orc\\orcuitile03")
        call AddCustomConsole(index, "ui\\console\\orc\\orcuitile04")
        call AddCustomConsole(index, "ui\\Widgets\\EscMenu\\Human\\blank-background")
        call AddCustomConsole(index, "ui\\Widgets\\EscMenu\\Human\\blank-background")
        call AddCustomConsole(index, "ui\\console\\orc\\orcuitile-timeindicatorframe")
        call AddCustomConsole(index, "ui\\console\\orc\\orcuitile-inventorycover")
        call AddCustomConsole(index, "ReplaceableTextures\\CommandButtons\\BTNPeon")
        set x[index] = 0.0004
        set y[index] = 0.0

        set index = GetHandleId(RACE_UNDEAD)
        call AddCustomConsole(index, "ui\\console\\undead\\undeaduitile01")
        call AddCustomConsole(index, "ui\\console\\undead\\undeaduitile02")
        call AddCustomConsole(index, "ui\\console\\undead\\undeaduitile03")
        call AddCustomConsole(index, "ui\\console\\undead\\undeaduitile04")
        call AddCustomConsole(index, "ui\\Widgets\\EscMenu\\Human\\blank-background")
        call AddCustomConsole(index, "ui\\Widgets\\EscMenu\\Human\\blank-background")
        call AddCustomConsole(index, "ui\\console\\undead\\undeaduitile-timeindicatorframe")
        call AddCustomConsole(index, "ui\\console\\undead\\undeaduitile-inventorycover")
        call AddCustomConsole(index, "ReplaceableTextures\\CommandButtons\\BTNAcolyte")
        set x[index] = 0.0009
        set y[index] = 0.0

        set index = GetHandleId(RACE_NIGHTELF)
        call AddCustomConsole(index, "ui\\console\\nightelf\\nightelfuitile01")
        call AddCustomConsole(index, "ui\\console\\nightelf\\nightelfuitile02")
        call AddCustomConsole(index, "ui\\console\\nightelf\\nightelfuitile03")
        call AddCustomConsole(index, "ui\\console\\nightelf\\nightelfuitile04")
        call AddCustomConsole(index, "ui\\Widgets\\EscMenu\\Human\\blank-background")
        call AddCustomConsole(index, "ui\\Widgets\\EscMenu\\Human\\blank-background")
        call AddCustomConsole(index, "ui\\console\\nightelf\\nightelfuitile-timeindicatorframe")
        call AddCustomConsole(index, "ui\\console\\nightelf\\nightelfuitile-inventorycover")
        call AddCustomConsole(index, "ReplaceableTextures\\CommandButtons\\BTNWisp")
        set x[index] = 0.0009
        set y[index] = 0.0

        set index = GetHandleId(ConvertRace(5))
        call AddCustomConsole(index, "UI\\Console\\Uther\\humanuitile01")
        call AddCustomConsole(index, "UI\\Console\\Uther\\humanuitile02")
        call AddCustomConsole(index, "UI\\Console\\Uther\\humanuitile03")
        call AddCustomConsole(index, "UI\\Console\\Uther\\humanuitile04")
        call AddCustomConsole(index, "UI\\Console\\Uther\\humanuitile05")
        call AddCustomConsole(index, "UI\\Console\\Uther\\humanuitile06")
        call AddCustomConsole(index, "UI\\Console\\Uther\\humanuitile-timeindicatorframe")
        call AddCustomConsole(index, "UI\\Console\\Uther\\humanuitile-inventorycover")
        call AddCustomConsole(index, "Legends\\Uther\\Pilgrim\\BTNPilgrim")
        set x[index] = 0.000
        set y[index] = 0.0

        set index = GetHandleId(ConvertRace(6))
        call AddCustomConsole(index, "UI\\Console\\Tyrande\\nightelfuitile01")
        call AddCustomConsole(index, "UI\\Console\\Tyrande\\nightelfuitile02")
        call AddCustomConsole(index, "UI\\Console\\Tyrande\\nightelfuitile03")
        call AddCustomConsole(index, "UI\\Console\\Tyrande\\nightelfuitile04")
        call AddCustomConsole(index, "UI\\Console\\Tyrande\\nightelfuitile05")
        call AddCustomConsole(index, "UI\\Console\\Tyrande\\nightelfuitile06")
        call AddCustomConsole(index, "UI\\Console\\Tyrande\\nightelfuitile-timeindicatorframe")
        call AddCustomConsole(index, "UI\\Console\\Tyrande\\nightelfuitile-inventorycover")
        call AddCustomConsole(index, "ReplaceableTextures\\CommandButtons\\BTNWisp")
        set x[index] = 0.000
        set y[index] = 0.0

        set index = GetHandleId(ConvertRace(7))
        call AddCustomConsole(index, "UI\\Console\\Wrynn\\humanuitile01")
        call AddCustomConsole(index, "UI\\Console\\Wrynn\\humanuitile02")
        call AddCustomConsole(index, "UI\\Console\\Wrynn\\humanuitile03")
        call AddCustomConsole(index, "UI\\Console\\Wrynn\\humanuitile04")
        call AddCustomConsole(index, "UI\\Console\\Wrynn\\humanuitile05")
        call AddCustomConsole(index, "UI\\Console\\Wrynn\\humanuitile06")
        call AddCustomConsole(index, "UI\\Console\\Wrynn\\humanuitile-timeindicatorframe")
        call AddCustomConsole(index, "UI\\Console\\Wrynn\\humanuitile-inventorycover")
        call AddCustomConsole(index, "ReplaceableTextures\\CommandButtons\\BTNPeasant")
        set x[index] = 0.000
        set y[index] = 0.0

        set index = GetHandleId(ConvertRace(8))
        call AddCustomConsole(index, "UI\\Console\\Arthas\\undeaduitile01")
        call AddCustomConsole(index, "UI\\Console\\Arthas\\undeaduitile02")
        call AddCustomConsole(index, "UI\\Console\\Arthas\\undeaduitile03")
        call AddCustomConsole(index, "UI\\Console\\Arthas\\undeaduitile04")
        call AddCustomConsole(index, "UI\\Console\\Arthas\\undeaduitile05")
        call AddCustomConsole(index, "UI\\Console\\Arthas\\undeaduitile06")
        call AddCustomConsole(index, "UI\\Console\\Arthas\\undeaduitile-timeindicatorframe")
        call AddCustomConsole(index, "UI\\Console\\Arthas\\undeaduitile-inventorycover")
        call AddCustomConsole(index, "ReplaceableTextures\\CommandButtons\\BTNAcolyte")
        set x[index] = 0.000
        set y[index] = 0.0

        set index = GetHandleId(ConvertRace(9))
        call AddCustomConsole(index, "UI\\Console\\Thrall\\orcuitile01")
        call AddCustomConsole(index, "UI\\Console\\Thrall\\orcuitile02")
        call AddCustomConsole(index, "UI\\Console\\Thrall\\orcuitile03")
        call AddCustomConsole(index, "UI\\Console\\Thrall\\orcuitile04")
        call AddCustomConsole(index, "UI\\Console\\Thrall\\orcuitile05")
        call AddCustomConsole(index, "UI\\Console\\Thrall\\orcuitile06")
        call AddCustomConsole(index, "UI\\Console\\Thrall\\orcuitile-timeindicatorframe")
        call AddCustomConsole(index, "UI\\Console\\Thrall\\orcuitile-inventorycover")
        call AddCustomConsole(index, "ReplaceableTextures\\CommandButtons\\BTNPeon")
        set x[index] = 0.0004
        set y[index] = 0.0

        set index = GetHandleId(ConvertRace(10))
        call AddCustomConsole(index, "UI\\Console\\Whitemane\\humanuitile01")
        call AddCustomConsole(index, "UI\\Console\\Whitemane\\humanuitile02")
        call AddCustomConsole(index, "UI\\Console\\Whitemane\\humanuitile03")
        call AddCustomConsole(index, "UI\\Console\\Whitemane\\humanuitile04")
        call AddCustomConsole(index, "UI\\Console\\Whitemane\\humanuitile05")
        call AddCustomConsole(index, "UI\\Console\\Whitemane\\humanuitile06")
        call AddCustomConsole(index, "UI\\Console\\Whitemane\\humanuitile-timeindicatorframe")
        call AddCustomConsole(index, "UI\\Console\\Whitemane\\humanuitile-inventorycover")
        call AddCustomConsole(index, "Legends\\Whitemane\\Houndmaster\\BTNBeastmistress")
        set x[index] = 0.000
        set y[index] = 0.0
        
        if GetLocalizedString("REFORGED") == "REFORGED" then
            call TimerStart(CreateTimer(), 1/32.0, true, function update)
        endif
        call TimerStart(CreateTimer(), 0, false, function at0s)
        static if LIBRARY_FrameLoader then
            call FrameLoaderAdd(function Init)
        endif
    endfunction
endlibrary

function Trig_BtnF1_Conditions takes nothing returns boolean
    return GetUnitTypeId(GetOrderedUnit()) == 'H02J'
endfunction

function Trig_BtnF1_UnitFilter_All takes nothing returns boolean
    local unit u = GetFilterUnit()
    return not IsUnitType(u, UNIT_TYPE_STRUCTURE) and not IsUnitType(u, UNIT_TYPE_PEON) and GetUnitTypeId(u) != 'H02J' and GetUnitAbilityLevel(u, 'Aloc') != 1 and GetUnitAbilityLevel(u, 'A09E') != 1
endfunction

function Trig_BtnF1_UnitFilter_NoWalk takes nothing returns boolean
    local unit u = GetFilterUnit()
    return not IsUnitType(u, UNIT_TYPE_STRUCTURE) and not IsUnitType(u, UNIT_TYPE_PEON) and GetUnitTypeId(u) != 'H02J' and GetUnitAbilityLevel(u, 'Aloc') != 1 and GetUnitAbilityLevel(u, 'A09E') != 1 and GetUnitAbilityLevel(u, 'A09D') != 1
endfunction

function Trig_BtnF1_Actions takes nothing returns nothing
    local unit orderedUnit = GetOrderedUnit()
    local player p = GetOwningPlayer(orderedUnit)
    local integer orderId = GetIssuedOrderId()
    local unit targetUnit = GetOrderTargetUnit()
    local location targetLoc = GetOrderPointLoc()
    local group g = null
    local unit u
    local integer unitCount = 0

    if orderId == 0 then
        if targetLoc != null then
            call RemoveLocation(targetLoc)
        endif
        return
    endif

    if GetUnitAbilityLevel(orderedUnit, 'A09F') != 1 then
        set g = GetUnitsOfPlayerMatching(p, Condition(function Trig_BtnF1_UnitFilter_All))
    else
        set g = GetUnitsOfPlayerMatching(p, Condition(function Trig_BtnF1_UnitFilter_NoWalk))
    endif

    if g != null then
        loop
            set u = FirstOfGroup(g)
            exitwhen u == null

            set unitCount = unitCount + 1

            if targetUnit != null then
                call IssueTargetOrderById(u, orderId, targetUnit)
            elseif targetLoc != null then
                call IssuePointOrderByIdLoc(u, orderId, targetLoc)
            else
                call IssueImmediateOrderById(u, orderId)
            endif

            call GroupRemoveUnit(g, u)
        endloop

        call DestroyGroup(g)
    endif

    if targetLoc != null then
        call RemoveLocation(targetLoc)
    endif

    call SetUnitState(orderedUnit, UNIT_STATE_MANA, I2R(unitCount))
endfunction

function InitTrig_BtnF1 takes nothing returns nothing
    set gg_trg_BtnF1 = CreateTrigger()
    call TriggerRegisterAnyUnitEventBJ(gg_trg_BtnF1, EVENT_PLAYER_UNIT_ISSUED_ORDER)
    call TriggerRegisterAnyUnitEventBJ(gg_trg_BtnF1, EVENT_PLAYER_UNIT_ISSUED_POINT_ORDER)
    call TriggerRegisterAnyUnitEventBJ(gg_trg_BtnF1, EVENT_PLAYER_UNIT_ISSUED_TARGET_ORDER)
    call TriggerAddCondition(gg_trg_BtnF1, Condition(function Trig_BtnF1_Conditions))
    call TriggerAddAction(gg_trg_BtnF1, function Trig_BtnF1_Actions)
endfunction

function Trig_Untitled_Trigger_001_Actions takes nothing returns nothing
    call SetUnitState(GetEnumUnit(), UNIT_STATE_MANA, 100.00)
    call BlzSetUnitMaxMana( GetEnumUnit(), 300 )
endfunction

//===========================================================================
function InitTrig_Untitled_Trigger_001 takes nothing returns nothing
    set gg_trg_Untitled_Trigger_001 = CreateTrigger(  )
    call TriggerAddAction( gg_trg_Untitled_Trigger_001, function Trig_Untitled_Trigger_001_Actions )
endfunction

function Trig_PreviewLegend takes nothing returns nothing
    local integer abilityId = GetSpellAbilityId()
    local integer unitType
    local integer i
    local force allPlayers = bj_FORCE_ALL_PLAYERS
    local player p
    local unit unitU = GetSpellAbilityUnit()

    if abilityId == 'A01C' or abilityId == 'A01J' or abilityId == 'A031' or abilityId == 'A054' or abilityId == 'A06B' or abilityId == 'A071' then
        if abilityId == 'A01C' then
            set unitType = 'h00T'
        elseif abilityId == 'A01J' then
            set unitType = 'h00U'
        elseif abilityId == 'A031' then
            set unitType = 'h012'
        elseif abilityId == 'A054' then
            set unitType = 'h01L'
        elseif abilityId == 'A06B' then
            set unitType = 'h01M'
        elseif abilityId == 'A071' then
            set unitType = 'h01V'
        else
            return
        endif

        call ShowUnit(unitU, false)
        set bj_lastCreatedUnit = CreateUnitAtLoc(GetOwningPlayer(unitU), unitType, GetUnitLoc(unitU), 275.00)
        call SelectUnitForPlayerSingle(bj_lastCreatedUnit, GetOwningPlayer(unitU))
        call RemoveUnit(unitU)

        loop
            set p = Player(0)
            exitwhen p == null
            if (p != null) then
                if abilityId == 'A031' then
                    call SetPlayerAbilityAvailable(p, 'A031', false)
                elseif abilityId == 'A01J' then
                    call SetPlayerAbilityAvailable(p, 'A01J', false)
                elseif abilityId == 'A01C' then
                    call SetPlayerAbilityAvailable(p, 'A01C', false)
                elseif abilityId == 'A054' then
                    call SetPlayerAbilityAvailable(p, 'A054', false)
                elseif abilityId == 'A06B' then
                    call SetPlayerAbilityAvailable(p, 'A06B', false)
                elseif abilityId == 'A071' then
                    call SetPlayerAbilityAvailable(p, 'A071', false)
                endif
            endif
            set p = Player(23)
        endloop
    endif
endfunction

function InitTrig_PreviewLegend takes nothing returns nothing
    set gg_trg_PreviewLegend = CreateTrigger()
    call TriggerRegisterAnyUnitEventBJ(gg_trg_PreviewLegend, EVENT_PLAYER_UNIT_SPELL_CAST)
    call TriggerAddAction(gg_trg_PreviewLegend, function Trig_PreviewLegend)
endfunction

function InitTrig_ArthasFrostmourne takes nothing returns nothing
    set gg_trg_ArthasFrostmourne = CreateTrigger(  )
    call DisableTrigger( gg_trg_ArthasFrostmourne )
    
    call TriggerRegisterAnyUnitEventBJ( gg_trg_ArthasFrostmourne, EVENT_PLAYER_HERO_SKILL )
    if (GetLearnedSkill() == 'A02R') then
        call SetPlayerTechResearched( GetOwningPlayer(GetLearningUnit()), 'R00S', GetUnitAbilityLevel(GetLearningUnit(), 'A02R'))
    endif
endfunction

globals
    framehandle Icon01 = null
    framehandle Icon02 = null
    framehandle Icon03 = null
    integer currentIconIndex = 0
endglobals

library REFORGEDUIMAKER initializer init

    private function CreateIcons takes nothing returns nothing
        set Icon01 = BlzCreateFrameByType("BACKDROP", "Icon01", BlzGetOriginFrame(ORIGIN_FRAME_GAME_UI, 0), "", 0)
        call BlzFrameSetSize(Icon01, 0.03, 0.03)
        call BlzFrameSetVisible(Icon01, false)

        set Icon02 = BlzCreateFrameByType("BACKDROP", "Icon02", BlzGetOriginFrame(ORIGIN_FRAME_GAME_UI, 0), "", 0)
        call BlzFrameSetSize(Icon02, 0.03, 0.03)
        call BlzFrameSetVisible(Icon02, false)

        set Icon03 = BlzCreateFrameByType("BACKDROP", "Icon03", BlzGetOriginFrame(ORIGIN_FRAME_GAME_UI, 0), "", 0)
        call BlzFrameSetSize(Icon03, 0.03, 0.03)
        call BlzFrameSetVisible(Icon03, false)
    endfunction

    function ShowIconForPlayer takes player p, string iconCode returns nothing
        local framehandle icon
        local real xPos = 0.0
        local real yPos = 0.0
        local string texturePath

        if currentIconIndex == 0 then
            set icon = Icon01
        elseif currentIconIndex == 1 then
            set icon = Icon02
        elseif currentIconIndex == 2 then
            set icon = Icon03
        else
            return
        endif

        if iconCode == "frost" then
            set texturePath = "Legends\\Arthas\\Mechanics\\Frost"
        elseif iconCode == "blood" then
            set texturePath = "Legends\\Arthas\\Mechanics\\Blood"
        elseif iconCode == "unholy" then
            set texturePath = "Legends\\Arthas\\Mechanics\\Unholy"
        endif

        call BlzFrameSetTexture(icon, texturePath, 0, true)

        if GetLocalPlayer() == p then
            if currentIconIndex == 0 then
                set xPos = 0.355000
                set yPos = 0.145000
            elseif currentIconIndex == 1 then
                set xPos = 0.385000
                set yPos = 0.145000
            elseif currentIconIndex == 2 then
                set xPos = 0.415000
                set yPos = 0.145000
            endif

            call BlzFrameSetAbsPoint(icon, FRAMEPOINT_TOPLEFT, xPos, yPos)
            call BlzFrameSetAbsPoint(icon, FRAMEPOINT_BOTTOMRIGHT, xPos + 0.03, yPos - 0.03) // Размер области иконки
            call BlzFrameSetVisible(icon, true)
        endif

        set currentIconIndex = currentIconIndex + 1
    endfunction

    private function init takes nothing returns nothing
        call CreateIcons()
    endfunction

endlibrary

function Trig_ArthasSoulReforge_CheckUnitType takes nothing returns integer
    local integer unitType = GetUnitTypeId(GetSpellTargetUnit())
    local integer array unitTypes
    local integer i = 0
    
    set unitTypes[0] = 'u010' // Ghoul
    set unitTypes[1] = 'u011' // Crypt
    set unitTypes[2] = 'u014' // Abomination
    set unitTypes[3] = 'u015' // Wagon
    set unitTypes[4] = 'u012' // Garg
    set unitTypes[5] = 'u016' // Wyrm
    
    loop
        exitwhen i >= 6
        if unitType == unitTypes[i] then
            return i
        endif
        set i = i + 1
    endloop

    return -1
endfunction

function Trig_ArthasSoulReforge_Actions takes nothing returns nothing
    local integer index
    local string effectUnit
    local integer array unitReplacements

    if GetSpellAbilityId() == 'A01Y' then
        // Unholy
        set effectUnit = "Abilities\\Spells\\Items\\RitualDagger\\RitualDaggerTarget.mdl"
        set unitReplacements[0] = 'u01H' // Ghoul
        set unitReplacements[1] = 'u01K' // Crypt
        set unitReplacements[2] = 'u01Q' // Abomination
        set unitReplacements[3] = 'u01T' // Wagon
        set unitReplacements[4] = 'u01N' // Garg
        set unitReplacements[5] = 'u01W' // Wyrm
    elseif GetSpellAbilityId() == 'A01W' then
        // Blood
        set effectUnit = "Abilities\\Spells\\NightElf\\BattleRoar\\RoarCaster.mdl"
        set unitReplacements[0] = 'u00Y' // Ghoul
        set unitReplacements[1] = 'u01I' // Crypt
        set unitReplacements[2] = 'u01O' // Abomination
        set unitReplacements[3] = 'u01R' // Wagon
        set unitReplacements[4] = 'u01L' // Garg
        set unitReplacements[5] = 'u01U' // Wyrm
    elseif GetSpellAbilityId() == 'A01X' then
        // Frost
        set effectUnit = "Abilities\\Spells\\Other\\Charm\\CharmTarget.mdl"
        set unitReplacements[0] = 'u01F' // Ghoul
        set unitReplacements[1] = 'u01J' // Crypt
        set unitReplacements[2] = 'u01P' // Abomination
        set unitReplacements[3] = 'u01S' // Wagon
        set unitReplacements[4] = 'u01M' // Garg
        set unitReplacements[5] = 'u01V' // Wyrm
    else
        return
    endif

    set index = Trig_ArthasSoulReforge_CheckUnitType()

    if ( index != -1 and I2R(udg_ArthasSouls) >= I2R(GetUnitLevel(GetSpellTargetUnit())) * 10.00 ) then
        call ReplaceUnitBJ( GetSpellTargetUnit(), unitReplacements[index], bj_UNIT_STATE_METHOD_RELATIVE )
        call AddSpecialEffectLoc( effectUnit, GetUnitLoc(bj_lastReplacedUnit) )
        set udg_ArthasSouls = udg_ArthasSouls - ( GetUnitLevel(GetSpellTargetUnit()) * 10 )
        call UpdateArthasText(GetOwningPlayer(GetSpellAbilityUnit()), I2S(udg_ArthasSouls))
    else
        call DisplayTextToPlayer(GetOwningPlayer(GetSpellAbilityUnit()), 0, 0, "TRIGSTR_2372")
    endif
endfunction

function InitTrig_ArthasSoulReforge takes nothing returns nothing
    set gg_trg_ArthasSoulReforge = CreateTrigger()
    call DisableTrigger (gg_trg_ArthasSoulReforge)
    call TriggerRegisterAnyUnitEventBJ( gg_trg_ArthasSoulReforge, EVENT_PLAYER_UNIT_SPELL_CAST )
    call TriggerAddAction( gg_trg_ArthasSoulReforge, function Trig_ArthasSoulReforge_Actions )
endfunction

function Trig_ArthasSurfeit_Conditions takes nothing returns boolean
    return (GetSpellAbilityId() == 'A02J')
endfunction

function Trig_ArthasSurfeit_Actions takes nothing returns nothing
    local integer AbominationSize = 0
    local unit caster = GetSpellAbilityUnit()
    local integer level = GetUnitAbilityLevelSwapped('A02L', caster)
    
    if (level < 6) then
        call SetUnitAbilityLevelSwapped('A02L', caster, level + 1)
        call BlzSetUnitMaxHP(caster, BlzGetUnitMaxHP(caster) + 100)
        set AbominationSize = 100 + (level + 1) * 7
        call SetUnitScalePercent(caster, I2R(AbominationSize), I2R(AbominationSize), I2R(AbominationSize))
    endif
endfunction

function InitTrig_ArthasSurfeit takes nothing returns nothing
    set gg_trg_ArthasSurfeit = CreateTrigger()
    call TriggerRegisterAnyUnitEventBJ(gg_trg_ArthasSurfeit, EVENT_PLAYER_UNIT_SPELL_FINISH)
    call TriggerAddCondition(gg_trg_ArthasSurfeit, Condition(function Trig_ArthasSurfeit_Conditions))
    call TriggerAddAction(gg_trg_ArthasSurfeit, function Trig_ArthasSurfeit_Actions)
endfunction