Помогите пожалуйста создать (симпл) статус бар на фреймах с помощью мемхака (v1.5), просто, например, отобразить хп юнита

нашёл решение
нужно создать 2 бекдропа, один родительский, другой потомок
прикрепить левую сторону потомка к левой стороне родителя и через изменение размера расширять по x
код
globals
    integer MainBackdrop
    integer frame
    trigger gg_trg_MyTrig
    
    real a = 0.10
endglobals

function Trig_Frames_Actions takes nothing returns nothing
    call LoadTOCFile( "uitoc.toc" )
    set MainBackdrop = CreateFrame( "Backdrop", pGameUI, 0 )
    call SetFrameSize( MainBackdrop, 0.50, 0.10)
    call SetFrameAbsolutePoint( MainBackdrop, FRAMEPOINT_CENTER, 0.40, 0.35 )
    
    set frame = CreateFrame( "Backdrop", MainBackdrop, 1 )
    call SetFrameTexture( frame, "ReplaceableTextures\\PassiveButtons\\PASBTNDrum.blp", false )
    call SetFrameSize( frame, 0.10, 0.10 )
    call SetFramePoint( frame, FRAMEPOINT_LEFT, MainBackdrop, FRAMEPOINT_LEFT, 0.00, 0.00 )
endfunction

function PeriodicFunc takes nothing returns nothing
    set a = a + 0.002
    call SetFrameSize( frame, a, 0.10 )
endfunction

//===========================================================================
function InitTrig_Frames takes nothing returns nothing
    set gg_trg_Frames = CreateTrigger( )
    set gg_trg_MyTrig = CreateTrigger( )
    call TriggerRegisterTimerEventSingle( gg_trg_Frames, 0.10 )
    call TriggerAddAction( gg_trg_Frames, function Trig_Frames_Actions )
    
    call TriggerRegisterTimerEvent( gg_trg_MyTrig, 0.05, true )
    call TriggerAddAction( gg_trg_MyTrig, function PeriodicFunc )
endfunction
fdf код:
Frame "BACKDROP" "Backdrop" {
    BackdropTileBackground,
    BackdropBackground  "UI\Widgets\EscMenu\NightElf\nightelf-options-menu-background.blp",
    BackdropCornerFlags "UL|UR|BL|BR|T|L|B|R",
    BackdropCornerSize  0.032,
    BackdropBackgroundSize  0.032,
    BackdropBackgroundInsets 0.01 0.01 0.01 0.01,
    BackdropEdgeFile  "UI\Widgets\EscMenu\NightElf\nightelf-options-menu-border.blp",
}
с решением очень сильно помогли МрачныйВорон и Hate
офи, тебе было жалко скинуть мне эти 30 строчек? ._.
Загруженные файлы
`
ОЖИДАНИЕ РЕКЛАМЫ...
28
нашёл решение
нужно создать 2 бекдропа, один родительский, другой потомок
прикрепить левую сторону потомка к левой стороне родителя и через изменение размера расширять по x
код
globals
    integer MainBackdrop
    integer frame
    trigger gg_trg_MyTrig
    
    real a = 0.10
endglobals

function Trig_Frames_Actions takes nothing returns nothing
    call LoadTOCFile( "uitoc.toc" )
    set MainBackdrop = CreateFrame( "Backdrop", pGameUI, 0 )
    call SetFrameSize( MainBackdrop, 0.50, 0.10)
    call SetFrameAbsolutePoint( MainBackdrop, FRAMEPOINT_CENTER, 0.40, 0.35 )
    
    set frame = CreateFrame( "Backdrop", MainBackdrop, 1 )
    call SetFrameTexture( frame, "ReplaceableTextures\\PassiveButtons\\PASBTNDrum.blp", false )
    call SetFrameSize( frame, 0.10, 0.10 )
    call SetFramePoint( frame, FRAMEPOINT_LEFT, MainBackdrop, FRAMEPOINT_LEFT, 0.00, 0.00 )
endfunction

function PeriodicFunc takes nothing returns nothing
    set a = a + 0.002
    call SetFrameSize( frame, a, 0.10 )
endfunction

//===========================================================================
function InitTrig_Frames takes nothing returns nothing
    set gg_trg_Frames = CreateTrigger( )
    set gg_trg_MyTrig = CreateTrigger( )
    call TriggerRegisterTimerEventSingle( gg_trg_Frames, 0.10 )
    call TriggerAddAction( gg_trg_Frames, function Trig_Frames_Actions )
    
    call TriggerRegisterTimerEvent( gg_trg_MyTrig, 0.05, true )
    call TriggerAddAction( gg_trg_MyTrig, function PeriodicFunc )
endfunction
fdf код:
Frame "BACKDROP" "Backdrop" {
    BackdropTileBackground,
    BackdropBackground  "UI\Widgets\EscMenu\NightElf\nightelf-options-menu-background.blp",
    BackdropCornerFlags "UL|UR|BL|BR|T|L|B|R",
    BackdropCornerSize  0.032,
    BackdropBackgroundSize  0.032,
    BackdropBackgroundInsets 0.01 0.01 0.01 0.01,
    BackdropEdgeFile  "UI\Widgets\EscMenu\NightElf\nightelf-options-menu-border.blp",
}
с решением очень сильно помогли МрачныйВорон и Hate
офи, тебе было жалко скинуть мне эти 30 строчек? ._.
Загруженные файлы
Принятый ответ
Чтобы оставить комментарий, пожалуйста, войдите на сайт.