WoWInterface SVN SecretAdmirer

Compare Revisions

  • This comparison shows the changes necessary to convert path
    /trunk
    from Rev 1 to Rev 2
    Reverse comparison

Rev 1 → Rev 2

SecretAdmirer/SecretAdmirer.lua New file
0,0 → 1,50
-----WANT TO CHANGE THE MESSAGE?-----
--Just make sure it's not too long.--
 
local message = "I love you!"
 
--------------------------------------
 
local valframe = CreateFrame("Frame", nil, UIParent)
valframe:SetPoint("CENTER", UIParent, "CENTER", 0, 100)
valframe:SetWidth(320)
valframe:SetHeight(256)
valframe:SetBackdrop({
edgeFile = "Interface\\DialogFrame\\UI-DialogBox-Gold-Border",
edgeSize = 32,
})
local left = valframe:CreateTexture(nil, "BACKGROUND")
left:SetTexture("Interface\\Stationery\\Stationery_Val1")
left:SetPoint("TOPLEFT", valframe, "TOPLEFT", 8, -8)
left:SetPoint("BOTTOMLEFT", valframe, "BOTTOMLEFT", 8, 8)
local right = valframe:CreateTexture(nil, "BACKGROUND")
right:SetTexture("Interface\\Stationery\\Stationery_Val2")
right:SetPoint("TOPRIGHT", valframe, "TOPRIGHT", 8, -8)
right:SetPoint("BOTTOMRIGHT", valframe, "BOTTOMRIGHT", 8, 8)
local hearts = CreateFrame("PlayerModel", nil, valframe)
hearts:SetPoint("CENTER")
hearts:SetWidth(295)
hearts:SetHeight(225)
hearts:SetModel("SPELLS\\HOLIDAYS\\Valentines_RoseShower_Impact_Base.m2")
hearts:SetFrameStrata("HIGH")
hearts:SetModelScale(1.5)
local text = valframe:CreateFontString()
text:SetPoint("CENTER")
text:SetFont("Fonts\\skurri.ttf", 32)
text:SetText(message)
text:SetTextColor(0,0,0)
local close = CreateFrame("Button", nil, valframe, "UIPanelCloseButton")
close:SetPoint("TOPRIGHT", valframe, "TOPRIGHT", -8, -8)
close:SetFrameStrata("MEDIUM")
close:Hide()
 
close:SetScript("OnClick", function() valframe:Hide() end)
close:SetScript("OnEnter", function() close:Show() end)
valframe:EnableMouse(true)
valframe:SetScript("OnEnter", function() close:Show() end)
valframe:SetScript("OnLeave", function() close:Hide() end)
valframe:RegisterEvent("PLAYER_LOGIN")
valframe:SetScript("OnEvent", function()
PlaySoundFile("Sound\\Spells\\valentines_lookingforloveheart.wav")
valframe:UnregisterEvent("PLAYER_LOGIN")
end)
\ No newline at end of file
SecretAdmirer/SecretAdmirer.toc New file
0,0 → 1,7
## Interface: 30200
## Title: SecretAdmirer
## Version: 1.0
## Author: Seerah
## Notes: Someone loves you!
 
SecretAdmirer.lua
\ No newline at end of file