/trunk
-- Options Button |
function btnGenOpt_Click() |
UWBCG_Options:Show(); |
BattleCryGenOptions:Show(); |
end; |
function MakeOneUp(WhatKind) |
local dummy1, dummy2, command, value = string.find(param1, "(%w+) (%w+)"); |
--if $parentComboBox1. |
if string.lower(param1) == "y" then param1 = "yell" end; |
if string.lower(param1) == "s" then param1 = "say" end; |
if string.lower(param1) == "p" then param1 = "party" end; |
if string.lower(param1) == "g" then param1 = "guild" end; |
if string.lower(param1) == "r" then param1 = "raid" end; |
if string.lower(param1) == "bg" then param1 = "battleground" end; |
--if string.lower(param1) == "bg" then param1 = "battleground" end; |
if (string.lower(param1) == "say") or (string.lower(param1) == "yell") then |
if (string.lower(param1) == "say") then |
MakeOneUp("s"); |
SendChatMessage(s_final, param1, self.language); |
SendChatMessage(s_final, param1, frmBCG.language); |
elseif (string.lower(param1) == "yell") then |
MakeOneUp("y"); |
SendChatMessage(s_final, param1, frmBCG.language); |
elseif (string.lower(param1) == "party") then |
MakeOneUp("p"); |
SendChatMessage(s_final, param1, frmBCG.language); |
elseif (string.lower(param1) == "raid") then |
MakeOneUp("r"); |
SendChatMessage(s_final, param1, frmBCG.language); |
elseif (string.lower(param1) == "show") then |
if (self:IsVisible()==false) then |
self:Show(); |
if frmBCG:IsVisible() == true then |
frmBCG:Hide(); |
else |
self:Hide(); |
frmBCG:Show(); |
end; |
-- elseif (string.lower(param1) == "options") then |
-- if (self:IsVisible()==false) then |
-- self:Show(); |
-- end; |
elseif (string.lower(param1) == "hide") then |
if frmBCG:IsVisible() == false then |
frmBCG:Show(); |
else |
frmBCG:Hide(); |
end; |
elseif (string.lower(param1) == "options") then |
if (BattleCryGenOptions:IsVisible() == false) then |
BattleCryGenOptions:Show(); |
end; |
else |
btnUsage_Click(); |
end; |
function btnUsage_Click() |
Show_Msg("|cff6666ff Usage:\n"); |
Show_Msg("|cff999999 /bcg show Open Panel\n"); |
--Show_Msg("|cff999999 /bcg options Open Options Panel\n"); |
Show_Msg("|cff999999 /bcg y (Yell)\n"); |
Show_Msg("|cff999999 /bcg s (Say)\n"); |
Show_Msg("|cff999999 /bcg show Open Panel"); |
Show_Msg("|cff999999 /bcg options Open Options Panel"); |
Show_Msg("|cff999999 /bcg y (Yell)"); |
Show_Msg("|cff999999 /bcg s (Say)"); |
Show_Msg("|cff999999 /bcg p (Party)"); |
Show_Msg("|cff999999 /bcg r (Raid)"); |
Show_Msg("|cff999999 /bcg bg (Battleground)"); |
Show_Msg("|cff6666ff Enjoy the power!\n"); |
end |
function frmBCG_Close() |
self:Hide(); |
frmBCG:Hide(); |
--UWBG_Prefs=1; |
--UWBG_CharPrefs=1; |
end |
function frmBCG_Open() |
self:Show(); |
frmBCG:Show(); |
--UWBG_Prefs=0; |
--UWBG_CharPrefs=0; |
end |
SLASH_BCGEN1 = "/bcg"; |
SlashCmdList["BCGEN"] = cmdBCG; |
self:RegisterEvent("VARIABLES_LOADED") |
self:RegisterEvent("ADDON_LOADED"); -- Fired when saved variables are loaded |
self:RegisterEvent("PLAYER_LOGOUT"); -- Fired when about to log out |
frmBCG:RegisterEvent("VARIABLES_LOADED") |
frmBCG:RegisterEvent("ADDON_LOADED"); -- Fired when saved variables are loaded |
frmBCG:RegisterEvent("PLAYER_LOGOUT"); -- Fired when about to log out |
end |
function cboGen_OnTextChanged() |
local s_num = "" |
DEFAULT_CHAT_FRAME:AddMessage("UWBCG Test: Text Changed."); |
local s_ch = (getglobal("frmBCG".."cboGen".."Edit")):GetText(); |
DEFAULT_CHAT_FRAME:AddMessage("UWBCG Test: Text Changed. ".."Channel:"..s_ch); |
end |
CHANGELOG: |
From 0.10 |
+ Changed from Ace3 back to Ace2, not much was coded so simple transfer ftw! |
+ Redesigned UI |
+ Now should used Saved Variables correctly |
+ New Options Dialog |
+ BugFix: Form not showing or hiding correctly |
- All Ace3 deps have been removed |
From 0.09 |
+ Added more cries |
+ Added slash commands for Party, BG, Guild and Raid channels |
+ Added more macro commands |
+ Added a few minor TOC changes, including one new saved variable |
+ Added Fubar and Ace3 compatability with the latest beta |
+ Changed TOC to 30100 |
From 0.08 |
<Ui xmlns="http://www.blizzard.com/wow/ui" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance"> |
<!--Autogenerated by wowuides, Version=1.0.300.0, Culture=neutral, PublicKeyToken=null--> |
<Script file="BattleCryGenOptions.lua"/> |
<Frame name="BattleCryGenOptions" hidden="true" parent="UIParent" enableMouse="true"> |
<!--<FrameSkin skinid="8309da78-006d-4401-9d4f-cbc448d08261" frameid="047a5294-fa59-460b-83cb-0c19711baeb7" />--> |
<Size> |
</Layer> |
</Layers> |
</Frame> |
<ScrollFrame name="$parentMultilineEditBox1"> |
<ScrollFrame name="mebCustoms"> |
<!--<FrameSkin skinid="dcb143e1-a4ab-4e7c-b934-1efa40101d21" frameid="7f06b3a2-fe45-40e8-9284-4754c6a3c9fb" />--> |
<Size> |
<AbsDimension x="321" y="200" /> |
<AbsDimension x="321" y="200" /> |
</Size> |
<Scripts> |
<OnTextChanged> |
ScrollingEdit_OnTextChanged(null); |
</OnTextChanged> |
<OnUpdate> |
ScrollingEdit_OnUpdate(null); |
</OnUpdate> |
<OnTextChanged> |
ScrollingEdit_OnTextChanged(null); |
</OnTextChanged> |
<OnCursorChanged> |
ScrollingEdit_OnCursorChanged(arg1,arg2,arg3,arg4); |
</OnCursorChanged> |
<OnHide>if ( self.isMoving ) then |
self:StopMovingOrSizing(); |
self.isMoving = false; |
end</OnHide> |
end |
</OnHide> |
<OnMouseDown>if ( ( ( not self.isLocked ) or ( self.isLocked == 0 ) ) and ( arg1 == "LeftButton" ) ) then |
self:StartMoving(); |
self.isMoving = true; |
end</OnMouseDown> |
end |
</OnMouseDown> |
<OnMouseUp>if ( self.isMoving ) then |
self:StopMovingOrSizing(); |
self.isMoving = false; |
end</OnMouseUp> |
end |
</OnMouseUp> |
</Scripts> |
</Frame> |
</Ui> |
The slash commands cover everything. |
/bcg show - will display the panel again if you've closed it. |
/bcg show - will display the main panel again if you've closed it. |
/bcg hide - will hide the main panel. |
/bcg options - will display the options panel again if you've closed it. |
/bcg y - /Yell. Target optional. |
/bcg s - /say. Target optional. |
/bcg p - /Party. Target optional. |
/bcg r - /Raid. Target optional. |
Macro commands. |
Make a new macro with the following: |
-- =========================================== |
function btnSave_Click() |
local editboxtext = (getglobal("BattleCryGenOptions".."mebCustoms".."Edit")):GetText(); |
DEFAULT_CHAT_FRAME:AddMessage("UWBCG Test: Save Button."..editboxtext); |
end; |