Приветствуем вас на форуме проекта WoW Circle. Если вы читаете это, значит не зарегистрировались у нас. Для того, чтобы получить доступ к расширенным возможностям нашего форума нажмите сюда и пройди регистрацию, которая не займет у вас много времени. После регистрации будут доступны новые, более расширенные, возможности.
Помогите переделать аддон

Упомянутые в теме пользователи:

Показано с 1 по 12 из 12

Комбинированный просмотр

Предыдущее сообщение Предыдущее сообщение   Следующее сообщение Следующее сообщение
  1. #1
    Инопланетянин
    Регистрация
    20.03.2012
    Сообщений
    4,202
    Поблагодарил(а)
    362
    Получено благодарностей: 1,439 (сообщений: 839).
    Репутация: 2399
    PHP код:
        local backdrop = {
            
    bgFile = [=[Interface\Buttons\WHITE8X8]=],
        }

    local RAID_CLASS_COLORS  PowerBarColor 

    local addon
    ns = ...;
    local unit "player"
    local class = select(2UnitClass(unit))
    local bar CreateFrame("frame"nilUIParent)

    bar:SetSize(15050)
    bar:SetPoint("CENTER"UIParent"CENTER"00)
    bar:SetBackdrop(backdrop)
    bar:SetBackdropColor(000.5)

    local hp CreateFrame("statusbar"nilbar)
    hp:SetPoint("TOPLEFT"bar00)
    hp:SetPoint("BOTTOMRIGHT"bar030)

    hp:SetBackdrop(backdrop)
    hp:SetBackdropColor(0,0,0,1)

    hp:SetStatusBarTexture([=[Interface\Buttons\WHITE8X8]=])
    hp:SetStatusBarColor(01.25)

    hp:SetMinMaxValues(0100)
    hp._cur 0
    hp
    ._max 0
    hp
    :SetScript("OnUpdate", function(selfelspsed)
        
    local _cur UnitHealth(unit)
        
    local _max UnitHealthMax(unit)
        
        if (
    self._max ~= _maxthen
            self
    :SetMinMaxValues(0_max)
            
    self._max _max
        end
        
        
    if (self._cur ~= curthen
            self
    :SetValue(_cur)
            
    self._cur _cur
        end
    end
    )

    local pwr CreateFrame("statusbar"nilbar)
    pwr:SetPoint("BOTTOMLEFT"bar00)
    pwr:SetPoint("TOPRIGHT"bar0, -30)

    pwr:SetBackdrop(backdrop)
    pwr:SetBackdropColor(0001)

    pwr:SetStatusBarTexture([=[Interface\Buttons\WHITE8X8]=])

    pwr:SetMinMaxValues(0100)
    pwr._cur 0
    pwr
    ._max 0
    pwr
    :SetScript("OnUpdate", function(selfelspsed)
        
    local _cur UnitPower(unit)
        
    local _max UnitPowerMax(unit)
        
        if (
    self._max ~= _maxthen
            local powerType
    powerTokenaltRaltGaltB UnitPowerType(unit)
            
    local info PowerBarColor[powerToken]
            if ( 
    info then
                self
    :SetStatusBarColor(info.rinfo.ginfo.b)
            
    end
            
            self
    :SetMinMaxValues(0_max)
            
    self._max _max
        end
        
        
    if (self._cur ~= curthen
            self
    :SetValue(_cur)
            
    self._cur _cur
        end
    end

    https://www.twitch.tv/videos/635559662

    PS нужно милиард либ

  2. 2 пользователей сказали cпасибо DreamlØlz за это полезное сообщение:

    chudo_228 (29.05.2020),Екзорцист (29.05.2020)

  3. #2
    Старожил
    Регистрация
    07.02.2014
    Сообщений
    257
    Поблагодарил(а)
    45
    Получено благодарностей: 5 (сообщений: 5).
    Репутация: 5
    Цитата Сообщение от DreamlØlz Посмотреть сообщение
    PHP код:
        local backdrop = {
            
    bgFile = [=[Interface\Buttons\WHITE8X8]=],
        }

    local RAID_CLASS_COLORS  PowerBarColor 

    local addon
    ns = ...;
    local unit "player"
    local class = select(2UnitClass(unit))
    local bar CreateFrame("frame"nilUIParent)

    bar:SetSize(15050)
    bar:SetPoint("CENTER"UIParent"CENTER"00)
    bar:SetBackdrop(backdrop)
    bar:SetBackdropColor(000.5)

    local hp CreateFrame("statusbar"nilbar)
    hp:SetPoint("TOPLEFT"bar00)
    hp:SetPoint("BOTTOMRIGHT"bar030)

    hp:SetBackdrop(backdrop)
    hp:SetBackdropColor(0,0,0,1)

    hp:SetStatusBarTexture([=[Interface\Buttons\WHITE8X8]=])
    hp:SetStatusBarColor(01.25)

    hp:SetMinMaxValues(0100)
    hp._cur 0
    hp
    ._max 0
    hp
    :SetScript("OnUpdate", function(selfelspsed)
        
    local _cur UnitHealth(unit)
        
    local _max UnitHealthMax(unit)
        
        if (
    self._max ~= _maxthen
            self
    :SetMinMaxValues(0_max)
            
    self._max _max
        end
        
        
    if (self._cur ~= curthen
            self
    :SetValue(_cur)
            
    self._cur _cur
        end
    end
    )

    local pwr CreateFrame("statusbar"nilbar)
    pwr:SetPoint("BOTTOMLEFT"bar00)
    pwr:SetPoint("TOPRIGHT"bar0, -30)

    pwr:SetBackdrop(backdrop)
    pwr:SetBackdropColor(0001)

    pwr:SetStatusBarTexture([=[Interface\Buttons\WHITE8X8]=])

    pwr:SetMinMaxValues(0100)
    pwr._cur 0
    pwr
    ._max 0
    pwr
    :SetScript("OnUpdate", function(selfelspsed)
        
    local _cur UnitPower(unit)
        
    local _max UnitPowerMax(unit)
        
        if (
    self._max ~= _maxthen
            local powerType
    powerTokenaltRaltGaltB UnitPowerType(unit)
            
    local info PowerBarColor[powerToken]
            if ( 
    info then
                self
    :SetStatusBarColor(info.rinfo.ginfo.b)
            
    end
            
            self
    :SetMinMaxValues(0_max)
            
    self._max _max
        end
        
        
    if (self._cur ~= curthen
            self
    :SetValue(_cur)
            
    self._cur _cur
        end
    end

    https://www.twitch.tv/videos/635559662

    PS нужно милиард либ
    Не много не то, спасибо.

Похожие темы

  1. Ответов: 5
    Последнее сообщение: 02.02.2017, 19:09
  2. Помогите найти аддон
    от erisxoxo в разделе Аддоны
    Ответов: 14
    Последнее сообщение: 12.10.2014, 02:49
  3. Помогите найти аддон
    от 13-th в разделе Аддоны
    Ответов: 9
    Последнее сообщение: 19.01.2013, 23:44
  4. Помогите найти адон!
    от Loit в разделе Корзина
    Ответов: 3
    Последнее сообщение: 18.03.2012, 12:44

Ваши права

  • Вы не можете создавать новые темы
  • Вы не можете отвечать в темах
  • Вы не можете прикреплять вложения
  • Вы не можете редактировать свои сообщения
  •