WoWInterface SVN mikma

Compare Revisions

  • This comparison shows the changes necessary to convert path 
    /mikma
    from Rev 673 to Rev 692
    ↔ Reverse comparison
  •

Rev 673 → Rev 692

mikma.lua
1,25 → 1,30
local f = CreateFrame("Frame")
f:RegisterEvent("MERCHANT_SHOW")
f:RegisterEvent("PLAYER_ENTERING_WORLD")
f:RegisterEvent("PLAYER_REGEN_ENABLED")
f:RegisterEvent("PLAYER_REGEN_DISABLED")
f:SetScript("OnEvent", function(self, event, ...)
debug = true
 
local mikma = CreateFrame("Frame")
 
mikma:RegisterEvent("MERCHANT_SHOW")
mikma:RegisterEvent("PLAYER_ENTERING_WORLD")
mikma:RegisterEvent("PLAYER_REGEN_ENABLED")
mikma:RegisterEvent("PLAYER_REGEN_DISABLED")
mikma:SetScript("OnEvent", function(self, event, ...)
if self[event] then return self[event](self, event, ...) end
end)
 
function f:PLAYER_REGEN_ENABLED()
f:RegisterEvent("SKILL_LINES_CHANGED")
function mikma:PLAYER_REGEN_ENABLED()
mikma:RegisterEvent("SKILL_LINES_CHANGED")
end
 
function f:PLAYER_REGEN_DISABLED()
f:UnregisterEvent("SKILL_LINES_CHANGED")
function mikma:PLAYER_REGEN_DISABLED()
mikma:UnregisterEvent("SKILL_LINES_CHANGED")
end
function f:PLAYER_ENTERING_WORLD()
f:RegisterEvent("SKILL_LINES_CHANGED")
f:SKILL_LINES_CHANGED()
function mikma:PLAYER_ENTERING_WORLD()
if not mikmaDB then mikmaDB = {} end
mikma:RegisterEvent("SKILL_LINES_CHANGED")
mikma:SKILL_LINES_CHANGED()
mikma:ChatFrameMods()
end
 
function f:MERCHANT_SHOW()
function mikma:MERCHANT_SHOW()
-- autorepair levels over 40
if UnitLevel("player") > 39 then
RepairAllItems()
36,21 → 41,25
end
end
 
local mikmaTooltip = CreateFrame("MessageFrame", nil, UIParent)
mikmaTooltip:SetSize(250, 35)
mikmaTooltip:SetPoint("BOTTOMLEFT",ChatFrame1,"BOTTOMRIGHT", 10, 0)
mikmaTooltip:SetInsertMode("TOP")
mikmaTooltip:SetJustifyH("LEFT")
mikmaTooltip:SetFrameStrata("HIGH")
mikmaTooltip:SetTimeVisible(60)
mikmaTooltip:SetFadeDuration(10)
mikmaTooltip:SetFont(STANDARD_TEXT_FONT, 15, "OUTLINE")
--local background = mikmaTooltip:CreateTexture(nil,"BACKGROUND")
--background:SetAllPoints()
--background:SetTexture(0,0,0,0.5)
mikma:RegisterEvent("CHAT_MSG_SYSTEM")
function mikma:CHAT_MSG_SYSTEM(arg1)
if ( arg1 and arg1 == IDLE_MESSAGE ) then
ForceQuit()
end
end
 
function f:SKILL_LINES_CHANGED()
mikmaTooltip:Clear()
local skillBox = CreateFrame("MessageFrame", nil, UIParent)
skillBox:SetSize(250, 35)
skillBox:SetPoint("BOTTOMLEFT",ChatFrame1,"BOTTOMRIGHT", 10, 0)
skillBox:SetInsertMode("TOP")
skillBox:SetJustifyH("LEFT")
skillBox:SetFrameStrata("HIGH")
skillBox:SetTimeVisible(60)
skillBox:SetFadeDuration(10)
skillBox:SetFont(STANDARD_TEXT_FONT, 15, "OUTLINE")
 
function mikma:SKILL_LINES_CHANGED()
skillBox:Clear()
local prof1, prof2, archaeology, fishing, cooking, firstAid = GetProfessions()
 
local race,fromMax,extra,upgrade = UnitRace("player"),25,0
72,7 → 81,7
else
upgrade = ""
end
mikmaTooltip:AddMessage("|T"..texture..":0|t "..rank.."/"..maxRank..upgrade)
skillBox:AddMessage("|T"..texture..":0|t "..rank.."/"..maxRank..upgrade)
end
 
if prof2 ~= nil then
92,6 → 101,122
else
upgrade = ""
end
mikmaTooltip:AddMessage("|T"..texture..":0|t "..rank.."/"..maxRank..upgrade)
skillBox:AddMessage("|T"..texture..":0|t "..rank.."/"..maxRank..upgrade)
end
end
\ No newline at end of file +end + +function mikma:ChatFrameMods() + if not mikmaDB.ChatMods then + FCF_ResetChatWindows() + FCFDock_AddChatFrame(GENERAL_CHAT_DOCK,ChatFrame3,3) + FCFDock_AddChatFrame(GENERAL_CHAT_DOCK,ChatFrame4,4) + FCF_SetLocked(ChatFrame3, false) + FCF_SetLocked(ChatFrame4, false) + FCF_UnDockFrame(ChatFrame3) + FCF_UnDockFrame(ChatFrame4) + FCF_SetTabPosition(ChatFrame3,0) + FCF_SetTabPosition(ChatFrame4,0) + FCF_SetChatWindowFontSize(nil, ChatFrame1, 12) + FCF_SetChatWindowFontSize(nil, ChatFrame2, 12) + FCF_SetChatWindowFontSize(nil, ChatFrame3, 12) + FCF_SetChatWindowFontSize(nil, ChatFrame4, 12) + ChatFrame_RemoveAllChannels(ChatFrame3) + ChatFrame_RemoveAllChannels(ChatFrame4) + ChatFrame_RemoveAllMessageGroups(ChatFrame3) + ChatFrame_RemoveAllMessageGroups(ChatFrame4); + FCF_SetWindowAlpha(ChatFrame1, DEFAULT_CHATFRAME_ALPHA) + FCF_SetWindowAlpha(ChatFrame3, DEFAULT_CHATFRAME_ALPHA) + FCF_SetWindowAlpha(ChatFrame4, DEFAULT_CHATFRAME_ALPHA) + FCF_SetLocked(ChatFrame3, true) + FCF_SetLocked(ChatFrame3, true) + ChatFrame1:AddMessage("Creating ChatFrame3 and ChatFrame4.") + mikmaDB.ChatMods = { alpha = 0.3, height = 10, ChatFrame3 = false, ChatFrame4 = false, } + end + ChatFrame3:ClearAllPoints() + ChatFrame4:ClearAllPoints() + local width = ChatFrame1:GetWidth() + ChatFrame3:SetWidth(width) + ChatFrame4:SetWidth(width) + local x,y = 0,10 + ChatFrame3:SetPoint("BOTTOMLEFT",ChatFrame1,"TOPLEFT",x,y) + ChatFrame4:SetPoint("BOTTOMLEFT",ChatFrame3,"TOPLEFT",x,y) + if mikmaDB.ChatMods.ChatFrame3 then + ChatFrame3:SetHeight(mikmaDB.ChatMods.height) + else + local height = ChatFrame1:GetHeight() + ChatFrame3:SetHeight(height) + end + + if mikmaDB.ChatMods.ChatFrame4 then + ChatFrame4:SetHeight(mikmaDB.ChatMods.height) + else + local height = ChatFrame1:GetHeight() + ChatFrame4:SetHeight(height) + end + FCF_SavePositionAndDimensions(ChatFrame3) + FCF_SavePositionAndDimensions(ChatFrame4) + + + local showbg1 = CreateFrame("CheckButton", nil, parent) + showbg1:SetPoint("BOTTOMRIGHT", ChatFrame3, "BOTTOMLEFT", -2, -3) + showbg1:SetWidth(12) + showbg1:SetHeight(12) + showbg1:SetAlpha(mikmaDB.ChatMods.alpha) + showbg1:SetScript("OnClick", function(self) + if mikmaDB.ChatMods.ChatFrame3 then + local height = ChatFrame1:GetHeight() + ChatFrame3:SetHeight(height) + showbg1:SetNormalTexture("INTERFACE\\Icons\\Spell_ChargeNegative") + mikmaDB.ChatMods.ChatFrame3 = false + else + ChatFrame3:SetHeight(mikmaDB.ChatMods.height) + showbg1:SetNormalTexture("INTERFACE\\Icons\\Spell_ChargePositive") + mikmaDB.ChatMods.ChatFrame3 = true + end + FCF_SavePositionAndDimensions(ChatFrame3) + end) + showbg1:SetScript("OnEnter", function(self) + showbg1:SetAlpha(1) + end) + showbg1:SetScript("OnLeave", function(self) + showbg1:SetAlpha(mikmaDB.ChatMods.alpha) + end) + if mikmaDB.ChatMods.ChatFrame3 then + showbg1:SetNormalTexture("INTERFACE\\Icons\\Spell_ChargePositive") + else + showbg1:SetNormalTexture("INTERFACE\\Icons\\Spell_ChargeNegative") + end + + local showbg2 = CreateFrame("Button", nil, parent) + showbg2:SetPoint("BOTTOMRIGHT", ChatFrame4, "BOTTOMLEFT", -2, -3) + showbg2:SetWidth(12) + showbg2:SetHeight(12) + showbg2:SetAlpha(mikmaDB.ChatMods.alpha) + showbg2:SetScript("OnClick", function(self) + if mikmaDB.ChatMods.ChatFrame4 then + local height = ChatFrame1:GetHeight() + ChatFrame4:SetHeight(height) + showbg2:SetNormalTexture("INTERFACE\\Icons\\Spell_ChargeNegative") + mikmaDB.ChatMods.ChatFrame4 = false + else + ChatFrame4:SetHeight(mikmaDB.ChatMods.height) + showbg2:SetNormalTexture("INTERFACE\\Icons\\Spell_ChargePositive") + mikmaDB.ChatMods.ChatFrame4 = true + end + FCF_SavePositionAndDimensions(ChatFrame4) + end) + showbg2:SetScript("OnEnter", function(self) + showbg2:SetAlpha(1) + end) + showbg2:SetScript("OnLeave", function(self) + showbg2:SetAlpha(mikmaDB.ChatMods.alpha) + end) + if mikmaDB.ChatMods.ChatFrame4 then + showbg2:SetNormalTexture("INTERFACE\\Icons\\Spell_ChargePositive") + else + showbg2:SetNormalTexture("INTERFACE\\Icons\\Spell_ChargeNegative") + end +end + +-- INTERFACE\\Icons\\Spell_ChargeNegative +-- INTERFACE\\Icons\\Spell_ChargePositive
mikma.toc
1,6 → 1,7
## Interface: 50400
## Interface: 60000
## Title: mikma
## Notes: Just the way I like my WoW
## Author: mikma
## SavedVariablesPerCharacter: mikmaDB
 
mikma.lua