Register for your free account! | Forgot your password?

Go Back   elitepvpers > World of Warcraft > WoW Addons
You last visited: Today at 09:55

  • Please register to post and access all features, it's quick, easy and FREE!

 

[Suche:] LUA-Programmierer [Biete:] Geld

Closed Thread
 
Old   #1
 
elite*gold: 0
Join Date: Jul 2010
Posts: 56
Received Thanks: 68
Post [Suche:] LUA-Programmierer [Biete:] Geld

Da ich ein Addon benötige, und selbst noch nicht viel Ehrfahrung mit LUA oder WoW-Addons habe, suche ich jetzt einen LUA-Programmierer für ein eigentlich ziemlich simples WoW-Addon.
Es geht darum mit einem Bot zu kommunizieren, das soll über Pixel-Farben geschehen. (Ja sry da war ich mir nicht sicher ob das jetzt in die WoW-Addon oder Bot-Sektion gehört^^)

Beispiel: Je nachdem wie hoch z.b. die momentane gesundheit ist verändert ein pixel seine farbe.

An die Bezahlung hätte ich so im unteren 2-stelligen Eurobereich gedacht, dass aber nach Absprache.

Auf die weiteren Details gehe ich in der Excell Tabelle im Anhang ein.
Attached Files
File Type: rar Pixelbelegung-Addon.rar (9.5 KB, 13 views)



SF-Bot-Support is offline  
Old   #2
 
elite*gold: 0
Join Date: Jun 2008
Posts: 96
Received Thanks: 218
Quote:
Originally Posted by SF-Bot-Support View Post
Da ich ein Addon benötige, und selbst noch nicht viel Ehrfahrung mit LUA oder WoW-Addons habe, suche ich jetzt einen LUA-Programmierer für ein eigentlich ziemlich simples WoW-Addon.
Es geht darum mit einem Bot zu kommunizieren, das soll über Pixel-Farben geschehen. (Ja sry da war ich mir nicht sicher ob das jetzt in die WoW-Addon oder Bot-Sektion gehört^^)

Beispiel: Je nachdem wie hoch z.b. die momentane gesundheit ist verändert ein pixel seine farbe.

An die Bezahlung hätte ich so im unteren 2-stelligen Eurobereich gedacht, dass aber nach Absprache.

Auf die weiteren Details gehe ich in der Excell Tabelle im Anhang ein.
English translation?


vabatta is offline  
Old   #3
 
elite*gold: 0
Join Date: Jul 2010
Posts: 56
Received Thanks: 68
Quote:
Originally Posted by vabatta View Post
English translation?

Sry my english is not very good^^

I`m looking for a lua coder for a wow-addon.

I need a (or an?) addon wich changes the color of some pixels on the wow window. I have got a bot wich reads this pixel colors to get some data from the wow character, eg: the player health: if the color of the pixel x:1,y:1 is rgb: 0 0 0 the player health is 0%, but if the color is rgb: 0 0 50 the player health would be 50%.

And that with all impotant data like player coordinates, the gold of the player and so on.
Do you understand?

If you are interested i will try to translate the uploaded document.

edit: I would pay a double digit amount for it. (??€) But about the price we should talk via pm.
SF-Bot-Support is offline  
Old   #4
 
elite*gold: 0
Join Date: Jun 2008
Posts: 96
Received Thanks: 218
Quote:
Originally Posted by SF-Bot-Support View Post
Sry my english is not very good^^

I`m looking for a lua coder for a wow-addon.

I need a (or an?) addon wich changes the color of some pixels on the wow window. I have got a bot wich reads this pixel colors to get some data from the wow character, eg: the player health: if the color of the pixel x:1,y:1 is rgb: 0 0 0 the player health is 0%, but if the color is rgb: 0 0 50 the player health would be 50%.

And that with all impotant data like player coordinates, the gold of the player and so on.
Do you understand?

If you are interested i will try to translate the uploaded document.

edit: I would pay a double digit amount for it. (??€) But about the price we should talk via pm.
Okay, an addon that change pixels of wow is very hard to make, because you must use an external UI (.TGA files that change every time health go down )


vabatta is offline  
Old   #5
 
elite*gold: 0
Join Date: Jul 2010
Posts: 56
Received Thanks: 68
Quote:
Originally Posted by vabatta View Post
Okay, an addon that change pixels of wow is very hard to make, because you must use an external UI (.TGA files that change every time health go down )
Sorry, i dont know what you mean.
Do you know the old Pirox bot? He also had a field of pixel (but i need some more fields). But the addon of pirox does a lot of other things so i cant understand the code, also because the names for varibles und user defined functions are random letters. (omg sry bad grammar Oo)

Here Pirox addon:

Code:
local EsfdhSiMcDg = 0;
local HlOCozDMaCIQ = nil;
local QEJlbdyHvD = nil;
local qUFxdFacm = 0;
local cdMNDSOLRtd = 0;
local lAceBokVoP = 0;
local IVmtRFhvnf = 0;
local zFlcnapKLkk = 0;
local dMThWACsMroUR = 0;
local lfdLvtqIrm = 0;
local heXwrHwpBFyJj = 0;
local MTHAcvQTurxjOhn = 0;
local IcqJPfnUUGxuFjz = 0;
local TlFOubnqAhyGnTx = 0;
local bWTtcGBlIcar = 1;
local biRNUrXyOCOWq;
local rQXWppCFlLiiEvIK = 0;
local IsInBg = 0;
local xpajkIokFQpae = -1;
local SKorVapBNEND = 0;
local sQBuzftNskxBetcC = 0;
local cHEKFlJUuSOi = 0;
TESTTESTTEST.BgBegun = 0;
local zoneNr = 0;
local VypJITllwlEGJj = 0;

local iMUKujykIFz = nil;
local UwAawNsiT = nil;

if (oegmuUVMLv == nil) then
	oegmuUVMLv = 0;
	cSlmeSVKHyBMQT = 0;
	StiSHFbIlB = 0;
	GFdrGmUOUUODLC = 0;
	BHvwhmydVHCwcM = 0;
	fnmodWiR = 0;
	SSPKaXLJcN = 0;
	JoTxPnsrTAocfbX = 0;
	PEPenLcwIIpejXx = 0;
	cikSHPodDqdGvGwA = 0;
	PjzyWaHATuTfp = 0;
	zkvjSRIQlOvIXU = 0;
	slCNuSGOAA = 0;
	jFcLlzuezzautoLootDefault = GetCVar("autoLootDefault");
	jFcLlzuezzautoSelfCast = GetCVar("autoSelfCast");
end
if (eTJvTAvkapxXOoD == nil) then
	eTJvTAvkapxXOoD = 0;
end
function TESTTESTTEST_OnLoad(self)

	self:RegisterEvent("VARIABLES_LOADED");
	self:RegisterEvent("CHAT_MSG_YELL");
	self:RegisterEvent("CHAT_MSG_RAID");
	self:RegisterEvent("CHAT_MSG_PARTY");
	self:RegisterEvent("GMSURVEY_DISPLAY");
	self:RegisterEvent("PARTY_INVITE_REQUEST");
	self:RegisterEvent("MERCHANT_SHOW");
	self:RegisterEvent("DUEL_REQUESTED");
	self:RegisterEvent("CHAT_MSG_GUILD");
	self:RegisterEvent("CHAT_MSG_BATTLEGROUND");
	self:RegisterEvent("CHAT_MSG_CHANNEL");
	self:RegisterEvent("CHAT_MSG_SAY");
	self:RegisterEvent("CHAT_MSG_WHISPER");
	self:RegisterEvent("CHAT_MSG_EMOTE");
	self:RegisterEvent("CHAT_MSG_TEXT_EMOTE");
	self:RegisterEvent("UNIT_AURA");
	self:RegisterEvent("ZONE_CHANGED_NEW_AREA");
	self:RegisterEvent("BATTLEFIELDS_SHOW");
	self:RegisterEvent("PLAYER_DEAD");
	self:RegisterEvent("PLAYER_UNGHOST");
	self:RegisterEvent("PLAYER_ALIVE");
	self:RegisterEvent("UPDATE_BATTLEFIELD_STATUS");
	self:RegisterEvent("LOOT_BIND_CONFIRM");
	self:RegisterEvent("LOOT_CLOSED");
	self:RegisterEvent("PLAYER_ENTERING_BATTLEGROUND");
	self:RegisterEvent("PLAYER_LEAVING_WORLD");
	self:RegisterEvent("CHAT_MSG_BN_WHISPER");
	self:RegisterEvent("CHAT_MSG_BATTLEGROUND_LEADER");
	mrxrsrXrBN();
end


function TBbuCMFrCUQ(arg1)
	local _, _, BsNXuuhO, args = string.find(arg1, "(%w+)%s?(.*)");
	if(BsNXuuhO) then
		biRNUrXyOCOWq = arg1;
		BsNXuuhO = strlower(BsNXuuhO);
	else
		BsNXuuhO = "";
	end


	if(BsNXuuhO == "autosignup" or BsNXuuhO == "signup") then
		if (StiSHFbIlB == 0) then 
			StiSHFbIlB =1;
			DEFAULT_CHAT_FRAME:AddMessage("<Auto signup now ON>", 0, 0.7, 1);
		elseif (StiSHFbIlB == 1) then 
			StiSHFbIlB =0;
			DEFAULT_CHAT_FRAME:AddMessage("<Auto signup now OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "autojoin" or BsNXuuhO == "join") then
		if (oegmuUVMLv == 0) then 
			oegmuUVMLv = 1;
			DEFAULT_CHAT_FRAME:AddMessage("<Auto join bg now ON>", 0, 0.7, 1);
		elseif (oegmuUVMLv == 1) then 
			oegmuUVMLv = 0;
			DEFAULT_CHAT_FRAME:AddMessage("<Auto join bg now OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "forcejoin") then
		if (cSlmeSVKHyBMQT == 0) then 
			cSlmeSVKHyBMQT = 1;
			DEFAULT_CHAT_FRAME:AddMessage("<Force bg join now ON>", 0, 0.7, 1);
		elseif (cSlmeSVKHyBMQT == 1) then 
			cSlmeSVKHyBMQT = 0;
			DEFAULT_CHAT_FRAME:AddMessage("<Force bg join now OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "autorelease" or BsNXuuhO == "release") then
		if (GFdrGmUOUUODLC == 0) then 
			GFdrGmUOUUODLC =1;
			DEFAULT_CHAT_FRAME:AddMessage("<Auto release spirit now ON>", 0, 0.7, 1);
		elseif (GFdrGmUOUUODLC == 1) then 
			GFdrGmUOUUODLC =0;
			DEFAULT_CHAT_FRAME:AddMessage("<Auto release spirit now OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "autoleave" or BsNXuuhO == "leave") then
		if (BHvwhmydVHCwcM == 0) then 
			BHvwhmydVHCwcM =1;
			DEFAULT_CHAT_FRAME:AddMessage("<Auto leave bg now ON>", 0, 0.7, 1);
		elseif (BHvwhmydVHCwcM == 1) then 
			BHvwhmydVHCwcM =0;
			DEFAULT_CHAT_FRAME:AddMessage("<Auto leave bg now OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "sound" or BsNXuuhO == "sounds") then
		if (JoTxPnsrTAocfbX == 0) then 
			JoTxPnsrTAocfbX =1;
			DEFAULT_CHAT_FRAME:AddMessage("<Sounds ON>", 0, 0.7, 1);
		elseif (JoTxPnsrTAocfbX == 1) then 
			JoTxPnsrTAocfbX =0;
			DEFAULT_CHAT_FRAME:AddMessage("<Sounds OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "soundonemote") then
		if (eTJvTAvkapxXOoD == 0) then 
			eTJvTAvkapxXOoD = 1;
			DEFAULT_CHAT_FRAME:AddMessage("<Sound on emotes to you ON>", 0, 0.7, 1);
		elseif (eTJvTAvkapxXOoD == 1) then 
			eTJvTAvkapxXOoD = 0;
			DEFAULT_CHAT_FRAME:AddMessage("<Sound on emotes to you OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "soundonhighlight") then
		if (zkvjSRIQlOvIXU == 0) then 
			zkvjSRIQlOvIXU = 1;
			DEFAULT_CHAT_FRAME:AddMessage("<Sound on player highlight ON>", 0, 0.7, 1);
		elseif (zkvjSRIQlOvIXU == 1) then 
			zkvjSRIQlOvIXU = 0;
			DEFAULT_CHAT_FRAME:AddMessage("<Sound on player highlight OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "screenshot" or BsNXuuhO == "screenshots") then
		if (PEPenLcwIIpejXx == 0) then 
			PEPenLcwIIpejXx =1;
			DEFAULT_CHAT_FRAME:AddMessage("<Take screenshot on whisper/afk debuff/highlight ON>", 0, 0.7, 1);
		elseif (PEPenLcwIIpejXx == 1) then 
			PEPenLcwIIpejXx =0;
			DEFAULT_CHAT_FRAME:AddMessage("<Take screenshot on whisper/afk debuff/highlight OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "tell") then
		if (fnmodWiR == 0) then 
			fnmodWiR =1;
			DEFAULT_CHAT_FRAME:AddMessage("<Tell an other char info now ON>", 0, 0.7, 1);
			DEFAULT_CHAT_FRAME:AddMessage("Set the Playername who u want to whisper. Use /pala nickname e.g /pala Pirox", 0, 0.7, 1);
		    if (SSPKaXLJcN ~= 0) then 
			    DEFAULT_CHAT_FRAME:AddMessage("WhisperName is at the moment: " .. SSPKaXLJcN, 0, 0.7, 1);
		    end
		elseif (fnmodWiR == 1) then 
			fnmodWiR =0;
			DEFAULT_CHAT_FRAME:AddMessage("<Tell an other char info now OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "help") then
		DEFAULT_CHAT_FRAME:AddMessage("<TESTTESTTEST v7.3>", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala  (status)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala on/off  (show/hide squares)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala ontop  (show squares on top of wow)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("  - - - - - - - ", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala release  (auto release corpse)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala leave  (auto leave the bg if finished)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala quests  (list all quests and get the quest id", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala sound  (play sound on whisper/bgover/afkdebuff)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala soundonhighlight  (play sound on player highlight)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala soundonemote  (play sound on emotes to you)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala screenshot  (take screen on whisper/afkdebuff/highlight)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala tell  (whisper another player your incoming whisper)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala signup  (auto signup for rated arena only)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala honor (show total honor and honor made this login)", 0, 0.7, 1);

	elseif(BsNXuuhO == "ontop") then
		if (MJhVVmDbaJi:IsVisible() and bebXPmDn2:IsVisible()) then
			DEFAULT_CHAT_FRAME:AddMessage("<Squares onTop are already on>", 0, 0.7, 1);
		else
			MJhVVmDbaJi:Show();
			KHUssekIRT2:Show();
			bebXPmDn2:Show();
			bebXPmDn:Hide();
			KHUssekIRT:Hide();

			if cikSHPodDqdGvGwA == 0 then
				DEFAULT_CHAT_FRAME:AddMessage("<Squares onTop shown - Vars set>", 0, 0.7, 1);
			elseif cikSHPodDqdGvGwA == 1 then
				DEFAULT_CHAT_FRAME:AddMessage("<Squares moved to Top>", 0, 0.7, 1);
			end

			SetCVar("autoLootDefault", 1);
			SetCVar("autoSelfCast", 1);
			cikSHPodDqdGvGwA = 2;
			PjzyWaHATuTfp = 0;
		end
		mrxrsrXrBN();
	elseif(BsNXuuhO == "on") then
		if (MJhVVmDbaJi:IsVisible() and bebXPmDn:IsVisible()) then
			DEFAULT_CHAT_FRAME:AddMessage("<Squares onBottom are already on>", 0, 0.7, 1);
		else
			MJhVVmDbaJi:Show();
			KHUssekIRT:Show();
			bebXPmDn:Show();
			bebXPmDn2:Hide();
			KHUssekIRT2:Hide();

			if cikSHPodDqdGvGwA == 0 then
				DEFAULT_CHAT_FRAME:AddMessage("<Squares onBottom shown - Vars set>", 0, 0.7, 1);
			elseif cikSHPodDqdGvGwA == 2 then
				DEFAULT_CHAT_FRAME:AddMessage("<Squares moved to Bottom>", 0, 0.7, 1);
			end

			SetCVar("autoLootDefault", 1);
			SetCVar("autoSelfCast", 1);
			cikSHPodDqdGvGwA = 1;
			PjzyWaHATuTfp = 0;
		end
		mrxrsrXrBN();
	elseif(BsNXuuhO == "off") then
		if (MJhVVmDbaJi:IsVisible()) then
			MJhVVmDbaJi:Hide();
			DEFAULT_CHAT_FRAME:AddMessage("<Squares hidden>", 0, 0.7, 1);
	
			cikSHPodDqdGvGwA = 0;
		else
			DEFAULT_CHAT_FRAME:AddMessage("<Squares are already off>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "honor") then
		if xpajkIokFQpae == -1 then
			xpajkIokFQpae = select(2,GetCurrencyInfo(392))
		end
		DEFAULT_CHAT_FRAME:AddMessage("Honor made - Session: " .. (select(2,GetCurrencyInfo(392))-xpajkIokFQpae) .. "  Total: " .. slCNuSGOAA, 0, 0.7, 1);

	elseif(BsNXuuhO == "quests" or BsNXuuhO == "quest") then

		local i=1
		while (GetQuestLogTitle(i) ~= nil) do
		   local questTitle, level, questTag, suggestedGroup, isHeader, isCollapsed, isComplete, isDaily = GetQuestLogTitle(i)
		   if isHeader ~= 1 then
		      local questLink = GetQuestLink(i)
		      local quest, questId, questRest = strsplit(":", questLink, 3)
		      DEFAULT_CHAT_FRAME:AddMessage("[".. questId .."] ".. questTitle,0,0.7,1)
		   end
		   i = i + 1
		end

	elseif(BsNXuuhO == "") then

		DEFAULT_CHAT_FRAME:AddMessage("<TESTTESTTEST v7.3>", 0, 0.7, 1);

		if (StiSHFbIlB == 1) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Auto arena signup : ON", 0, 0.7, 1);
		elseif (StiSHFbIlB == 0) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Auto Arena signup : OFF", 0, 0.7, 1);
		end

		if (GFdrGmUOUUODLC == 1) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Auto release spirit : ON", 0, 0.7, 1);
		elseif (GFdrGmUOUUODLC == 0) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Auto release spirit : OFF", 0, 0.7, 1);
		end

		if (BHvwhmydVHCwcM == 1) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Auto leave bg : ON", 0, 0.7, 1);
		elseif (BHvwhmydVHCwcM == 0) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Auto leave bg : OFF ", 0, 0.7, 1);
		end

		if (JoTxPnsrTAocfbX == 1) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Sound on whisper/bgover/afkdebuff : ON", 0, 0.7, 1);
		elseif (JoTxPnsrTAocfbX == 0) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Sound on whisper/bgover/afkdebuff : OFF", 0, 0.7, 1);
		end

		if (zkvjSRIQlOvIXU == 1) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Sound on player highlight : ON", 0, 0.7, 1);
		elseif (zkvjSRIQlOvIXU == 0) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Sound on player highlight : OFF", 0, 0.7, 1);
		end

		if (eTJvTAvkapxXOoD == 1) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Sound on emotes to you : ON", 0, 0.7, 1);
		elseif (eTJvTAvkapxXOoD == 0) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Sound on emotes to you : OFF", 0, 0.7, 1);
		end

		if (PEPenLcwIIpejXx == 1) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Take screenshot on whisper/afkdebuff : ON", 0, 0.7, 1);
		elseif (PEPenLcwIIpejXx == 0) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Take screenshot on whisper/afkdebuff : OFF", 0, 0.7, 1);
		end

		if (fnmodWiR == 1) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Tell other char infos : ON", 0, 0.7, 1);
		elseif (fnmodWiR == 0) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Tell other char infos : OFF", 0, 0.7, 1);
		end

	else
	    if (fnmodWiR == 1) then
	        SSPKaXLJcN = strlower(biRNUrXyOCOWq);
	        DEFAULT_CHAT_FRAME:AddMessage("<TESTTESTTEST> ".. SSPKaXLJcN .." set as response name", 0, 0.7, 1);
	    end
		DEFAULT_CHAT_FRAME:AddMessage("<TESTTESTTEST> Type '/pala help' for a commandlist and '/pala' for status.", 0, 0.7, 1);
	end


end


function TESTTESTTEST_OnEvent(self,event,arg1,arg2,arg3,arg4,arg5,arg6)

      if (event == "VARIABLES_LOADED") then
			SlashCmdList["TESTTESTTEST"]=TBbuCMFrCUQ;
			SLASH_TESTTESTTEST1="/pala";
			if cikSHPodDqdGvGwA == 1 then
				MJhVVmDbaJi:Show();
				KHUssekIRT:Show();
				bebXPmDn:Show();
				bebXPmDn2:Hide();
				KHUssekIRT2:Hide();
				PjzyWaHATuTfp = 0;
			elseif cikSHPodDqdGvGwA == 2 then
				MJhVVmDbaJi:Show();
				KHUssekIRT2:Show();
				bebXPmDn2:Show();
				bebXPmDn:Hide();
				KHUssekIRT:Hide();
				PjzyWaHATuTfp = 0;
			else
				if PjzyWaHATuTfp == 1 then
					MJhVVmDbaJi:Show();
					bebXPmDn2:Hide();
					KHUssekIRT2:Hide();
					bebXPmDn:Hide();
					KHUssekIRT:Show();
				else
					if(MJhVVmDbaJi:IsVisible()) then
						MJhVVmDbaJi:Hide();
					end
				end
			end
			KHUssekIRT:SetTexture(1,1,1); --white
			KHUssekIRT2:SetTexture(1,1,1); --white

      elseif (event == "MERCHANT_SHOW") then
        if MJhVVmDbaJi:IsVisible() then
      	   if CanMerchantRepair() == 1 then
      	      WrcPByqaruE, eiIWEpzVJEm = GetRepairAllCost();
      	      if WrcPByqaruE > 0 then
      	         if eiIWEpzVJEm == 1 then
      	            RepairAllItems();
      	            valC = WrcPByqaruE%100;
      	            valS = math.floor((WrcPByqaruE%10000)/100);
      	            valG = math.floor(WrcPByqaruE/10000);
      	            DEFAULT_CHAT_FRAME:AddMessage("Your items have been repaired for "..valG.."g "..valS.."s "..valC.."c", 0, 0.7, 1);
      	         else
      	            DEFAULT_CHAT_FRAME:AddMessage("You don't have enough money for repair!", 0, 0.7, 1);
      	         end
      	      end
      	   end
           for i=0,4 do 
              if GetContainerNumSlots(i) ~= 0 then
                 for j=1,GetContainerNumSlots(i) do 
                    local itemLink = GetContainerItemLink(i,j);
                    if itemLink then
                       local _, _, itemRarity = GetItemInfo(itemLink);
                       if itemRarity == 0 then
                          UseContainerItem(i,j); 
                       end
                    end 
                 end
              end
           end
        end


      elseif (event == "PLAYER_LEAVING_WORLD") then
	      IsInBg = 0;

      elseif (event == "PLAYER_ENTERING_BATTLEGROUND") then
	      IsInBg = 1;


      elseif (event == "GMSURVEY_DISPLAY") then
	      DEFAULT_CHAT_FRAME:AddMessage("GM Chat Request", 0, 0.7, 1);
	      GMSurveySubmit();
			if(JoTxPnsrTAocfbX== 1 or MJhVVmDbaJi:IsVisible()) then
			   PlaySoundFile("Interface\\AddOns\\TESTTESTTEST\\QrbgnDCAKjx.wav");
			end
			if(MJhVVmDbaJi:IsVisible()) then
			   KHUssekIRT:SetTexture(1,0,1); --pink
			   KHUssekIRT2:SetTexture(1,0,1); --pink
			   dMThWACsMroUR = GetTime()+5;
			   lfdLvtqIrm = 1;
			end
			if(PEPenLcwIIpejXx == 1) then
				TakeScreenshot();
			end

      elseif (event == "CHAT_MSG_SAY" or event == "CHAT_MSG_CHANNEL" or event == "CHAT_MSG_BATTLEGROUND" or event == "CHAT_MSG_GUILD" or event == "CHAT_MSG_YELL" or event == "CHAT_MSG_RAID" or event == "CHAT_MSG_PARTY" or event == "CHAT_MSG_BATTLEGROUND_LEADER") then
		if arg1 and string.find(strlower(arg1), strlower(UnitName("player"))) then
		 if (not arg4) or (arg4 and not string.find(strlower(arg4), "crbz")) then
			if zkvjSRIQlOvIXU == 1 then
				PlaySoundFile("Interface\\AddOns\\TESTTESTTEST\\QJWeaOFox.wav");
			end
			if(MJhVVmDbaJi:IsVisible()) then
				KHUssekIRT:SetTexture(0,0,0.5); --darkblue
				KHUssekIRT2:SetTexture(0,0,0.5); --darkblue
				IcqJPfnUUGxuFjz = GetTime()+5;
				TlFOubnqAhyGnTx = 1;
			end
			if(PEPenLcwIIpejXx == 1) then
				TakeScreenshot();
			end
		 end
		end

	    elseif (event == "LOOT_CLOSED") then
	      if not self:IsEventRegistered("LOOT_BIND_CONFIRM") then
	         self:RegisterEvent("LOOT_BIND_CONFIRM");
			end

      elseif (event == "CHAT_MSG_EMOTE" or event == "CHAT_MSG_TEXT_EMOTE") then
        if arg1 and arg2 and arg2 ~= UnitName("player") and string.find(strlower(arg1), " ".. TESTTESTTEST.Localization[2]) then
			   if eTJvTAvkapxXOoD == 1 then
				   PlaySoundFile("Interface\\AddOns\\TESTTESTTEST\\QJWeaOFox.wav");
			   end
			   if(MJhVVmDbaJi:IsVisible()) then
				   KHUssekIRT:SetTexture(0,0,0.5); --darkblue
				   KHUssekIRT2:SetTexture(0,0,0.5); --darkblue
				   IcqJPfnUUGxuFjz = GetTime()+5;
				   TlFOubnqAhyGnTx = 1;
			   end
		   end

	    elseif (event == "LOOT_BIND_CONFIRM") then
			if ( (GetNumPartyMembers() == 0 and GetNumRaidMembers() == 0) or IsFishingLoot() ) then
			  if VypJITllwlEGJj == 0 and arg1 then
				LootSlot(arg1);
				ConfirmLootSlot(arg1);
				DEFAULT_CHAT_FRAME:AddMessage("Looting BoP Item", 0, 0.7, 1);
				VypJITllwlEGJj = GetTime()+10;
			  end
			end

		elseif (event == "UNIT_AURA") then
			foundDebuff = 0;
 			for i=1,40 do
				local n = UnitDebuff("player",i);
				if n == TESTTESTTEST.Localization[0] or n == TESTTESTTEST.Localization[1] then
					foundDebuff = 1;
				end
			end
			if foundDebuff == 1 then
				if heXwrHwpBFyJj == 0 then
				    if(PEPenLcwIIpejXx == 1) then
			    	    TakeScreenshot();
			        end
					if(JoTxPnsrTAocfbX == 1) then 
						PlaySoundFile("Interface\\Addons\\TESTTESTTEST\\CvbTktvon.wav");
					end
					KHUssekIRT:SetTexture(0,0.5,0); --darkgreen 0x008000
					KHUssekIRT2:SetTexture(0,0.5,0); --darkgreen 0x008000
					heXwrHwpBFyJj = 1;
					MTHAcvQTurxjOhn = GetTime()+5;
					sQBuzftNskxBetcC = sQBuzftNskxBetcC+1;
				end
			else
				heXwrHwpBFyJj=0;
			end

		elseif (event == "PLAYER_UNGHOST") then
	      if (IsInBg == 0) then
			   bebXPmDn:SetTexture(1,1,1); --white
			   bebXPmDn2:SetTexture(1,1,1); --white
			   UwAawNsiT = "white";
	      else
			   bebXPmDn:SetTexture(0,0,1); --blau
			   bebXPmDn2:SetTexture(0,0,1); --blau
			   UwAawNsiT = "blau";
	      end
			cHEKFlJUuSOi = 0;

	    elseif (event == "PLAYER_DEAD") then
	      zoneNr = GetCurrentMapZone();
			bebXPmDn:SetTexture(1,1,0); --gelb
			bebXPmDn2:SetTexture(1,1,0); --gelb
			UwAawNsiT = "gelb";
			if (cHEKFlJUuSOi == 0) then
			   if IsInBg == 1 or zoneNr == 11 or (IsInBg == 0 and (GetNumPartyMembers() < 4 and GetNumRaidMembers() == 0)) then
			      if (GFdrGmUOUUODLC == 1) then
				      DEFAULT_CHAT_FRAME:AddMessage("Release Corpse in 5 sec", 0, 0.7, 1);
			         lAceBokVoP = 1;
			         cdMNDSOLRtd = GetTime()+5;
			      elseif (MJhVVmDbaJi:IsVisible()) then
				      DEFAULT_CHAT_FRAME:AddMessage("Release Corpse in 5 sec", 0, 0.7, 1);
			         lAceBokVoP = 1;
			         cdMNDSOLRtd = GetTime()+5;
			      end
			   elseif GetNumRaidMembers() ~= 0 then
				   DEFAULT_CHAT_FRAME:AddMessage("No Corpse Release - Not in BG and in Raid", 0, 0.7, 1);
			   else
				   DEFAULT_CHAT_FRAME:AddMessage("No Corpse Release - Not in BG and in Group with more than 4 people", 0, 0.7, 1);
			   end
		   end
			cHEKFlJUuSOi = 1;

	    elseif (event == "PLAYER_ALIVE") then
			cHEKFlJUuSOi = 0;
			if lAceBokVoP == 1 then
				lAceBokVoP = 2;
			else
				mrxrsrXrBN();
			end

	    elseif (event == "PARTY_INVITE_REQUEST") then

	    elseif (event == "PARTY_MEMBERS_CHANGED") then
        StaticPopup_Hide("PARTY_INVITE");
        self:UnregisterEvent("PARTY_MEMBERS_CHANGED");

	    elseif (event == "DUEL_REQUESTED") then
        if(MJhVVmDbaJi:IsVisible()) then
           CancelDuel();
				DEFAULT_CHAT_FRAME:AddMessage("Canceled Duel (to accept, enter /pala off)", 0, 0.7, 1);
			end

	    elseif (event == "CHAT_MSG_WHISPER" or event == "CHAT_MSG_BN_WHISPER" ) then
			if ((arg2) and (strlower(arg2) ~= SSPKaXLJcN)) then
		  	  	if (arg1 and not string.find(strlower(arg1), "lvbm") and not string.find(strlower(arg1), "lvpn")) then
			   	if (fnmodWiR == 1) then
				    	if (arg6) then
					    	SendChatMessage("<" .. arg6 .. ">[" .. arg2 .. "]: " .. arg1,"WHISPER", GetDefaultLanguage("player"), SSPKaXLJcN);
				    	else
					   		SendChatMessage("[" .. arg2 .. "]: " .. arg1,"WHISPER", GetDefaultLanguage("player"), SSPKaXLJcN);
				    	end
			    	end
			    	if (JoTxPnsrTAocfbX== 1 or MJhVVmDbaJi:IsVisible())  then
						if (arg6 and string.find(arg6, "GM") or string.find(arg6, "Master")) then
							PlaySoundFile("Interface\\AddOns\\TESTTESTTEST\\QrbgnDCAKjx.wav");
						else
							PlaySoundFile("Interface\\AddOns\\TESTTESTTEST\\idlPhwuvT.mp3");
						end
			    	end
			    	if(PEPenLcwIIpejXx== 1) then
			    		TakeScreenshot();
			    	end
			    	if(MJhVVmDbaJi:IsVisible()) then
			    		if (arg6 and string.find(arg6, "GM")) then
			    			KHUssekIRT:SetTexture(1,0,1); --pink
			    			KHUssekIRT2:SetTexture(1,0,1); --pink
				    	else
				    		KHUssekIRT:SetTexture(0,1,0); --green
				    		KHUssekIRT2:SetTexture(0,1,0); --green
			        	end
				    	dMThWACsMroUR = GetTime()+5;
				    	lfdLvtqIrm = 1;
			    	end
		    	end
			elseif arg2 and (strlower(arg2) == SSPKaXLJcN) then
		    	local startPos, endPos = string.find( arg1, "==");
		    	local startPos2, endPos2 = string.find( arg1, "!honor");
		    	local startPos3, endPos3 = string.find( arg1, "!afkdebuff");

				if (startPos2 ~= nil) then
					if xpajkIokFQpae == -1 then
						xpajkIokFQpae = select(2,GetCurrencyInfo(392));
					end	
					SendChatMessage("Current Honor: ".. select(2,GetCurrencyInfo(392))-xpajkIokFQpae,"WHISPER", GetDefaultLanguage("player"), SSPKaXLJcN);
		   	 	end
		    	if (startPos3 ~= nil) then
		       		SendChatMessage("Afk Debuffs: ".. sQBuzftNskxBetcC,"WHISPER", GetDefaultLanguage("player"), SSPKaXLJcN);
		    	end
		    	if (startPos ~= nil) then
		        	SendChatMessage(strsub(arg1,endPos+1,strlen(arg1)),"WHISPER", GetDefaultLanguage("player"), strsub(arg1,0,startPos-1));
		    	end
			end

		elseif (event == "ZONE_CHANGED_NEW_AREA") then
		mrxrsrXrBN();

			if bebXPmDn:IsVisible() or bebXPmDn2:IsVisible() then
				local pTCurrentHonor = select(2,GetCurrencyInfo(392));
				if xpajkIokFQpae == -1 then
					xpajkIokFQpae = pTCurrentHonor
				end

				slCNuSGOAA = slCNuSGOAA + (pTCurrentHonor - xpajkIokFQpae)-SKorVapBNEND;
				SKorVapBNEND = pTCurrentHonor - xpajkIokFQpae;
			end
		elseif (event == "BATTLEFIELDS_SHOW") then
			if bebXPmDn:IsVisible() or bebXPmDn2:IsVisible() then
				if( CanJoinBattlefieldAsGroup() and GetNumPartyMembers() > 0) then
					if IsBattlefieldArena() then
						if GetNumPartyMembers() == 1 then
							JoinBattlefield(1, 1, 1);
						elseif GetNumPartyMembers() == 2 then
							JoinBattlefield(2, 1, 1);
						elseif GetNumPartyMembers() == 4 then
							JoinBattlefield(3, 1, 1);
						end
						HideUIPanel(ArenaFrame);
					end
				end
			end
			if(MJhVVmDbaJi:IsVisible() or StiSHFbIlB == 1) then
				if( CanJoinBattlefieldAsGroup() and GetNumPartyMembers() > 0) then
					JoinBattlefield(0, 1);
				else
					JoinBattlefield(0);
				end
				HideUIPanel(BattlefieldFrame);
			end

		elseif (event == "UPDATE_BATTLEFIELD_STATUS") then
			local index = nil;
			local inQueue = nil;
			for i=1, MAX_BATTLEFIELD_QUEUES, 1 do
				local status,mapname,instanceID = GetBattlefieldStatus(i);

				if (status == "confirm") then
					index = i;
					inQueue = 2;
				elseif (status == "queued" and IsInBg == 0) then
				bebXPmDn:SetTexture(1,0,0); --red queued
				bebXPmDn2:SetTexture(1,0,0); --red queued
				UwAawNsiT = "rot";
					inQueue = 1;
				elseif (status == "active") then
					inQueue = 1;
				end

			end
			if (inQueue == nil) then
		      bebXPmDn:SetTexture(1,1,1); --white
		      bebXPmDn2:SetTexture(1,1,1); --white
		      UwAawNsiT = "white";
			end
			if ( index ~= nil and ((qUFxdFacm == 0 and IsInBg == 0) or (cSlmeSVKHyBMQT == 1 and IsInBg == 1))) then
				if (MJhVVmDbaJi:IsVisible() or oegmuUVMLv == 1) then
					bebXPmDn:SetTexture(1,0,1); --pink joining in 15sec
					bebXPmDn2:SetTexture(1,0,1); --pink joining in 15sec
					UwAawNsiT = "pink";
					EsfdhSiMcDg = GetTime()+15;
					qUFxdFacm = 1;
					iMUKujykIFz = index;
				end
			end
		end
end


function TESTTESTTEST_OnUpdate()
	local IPsxSHqksHtgikSQ = GetBattlefieldInstanceRunTime();
	local EIkkfuiua = GetTime();
	local isArena, isRegistered = IsActiveBattlefieldArena();
	local zone = GetRealZoneText();

	if (MJhVVmDbaJi:IsVisible()) then
		if bWTtcGBlIcar == 0 and not UnitIsGhost("player") and lAceBokVoP ~= 1 then
			if ((fnmodWiR == 1) and (QEJlbdyHvD ~= nil)) then
				if (QEJlbdyHvD < IPsxSHqksHtgikSQ) then
					SendChatMessage("Joining " .. zone,"WHISPER", GetDefaultLanguage("player"), SSPKaXLJcN);
					QEJlbdyHvD = nil;
				end
			end
			if isArena == 1 then
				HlOCozDMaCIQ = "arena";
			end

			if HlOCozDMaCIQ == "arena" then
				if IPsxSHqksHtgikSQ > 0 and IPsxSHqksHtgikSQ < 75000 then
					bebXPmDn:SetTexture(0,0.5,0); --darkgreen 0x008000
					bebXPmDn2:SetTexture(0,0.5,0); --darkgreen 0x008000
					UwAawNsiT = "darkgreen";
					TESTTESTTEST.BgBegun = 0;
				else
					if TESTTESTTEST.BgBegun == 0 then
						bebXPmDn:SetTexture(0,0,1); --blau
						bebXPmDn2:SetTexture(0,0,1); --blau
						UwAawNsiT = "blau";
						TESTTESTTEST.BgBegun = 1;
					end
				end
			else
				if IPsxSHqksHtgikSQ > 0 and IPsxSHqksHtgikSQ < 121500 then
					bebXPmDn:SetTexture(0,0.5,0); --darkgreen 0x008000
					bebXPmDn2:SetTexture(0,0.5,0); --darkgreen 0x008000
					UwAawNsiT = "darkgreen";
					TESTTESTTEST.BgBegun = 0;
				else
					if TESTTESTTEST.BgBegun == 0 then
						bebXPmDn:SetTexture(0,0,0.5); --darkblue
						bebXPmDn2:SetTexture(0,0,0.5); --darkblue
						UwAawNsiT = "darkblue";
						TESTTESTTEST.BgBegun = 1;
					end
				end
			end
		end
	end

		if (IcqJPfnUUGxuFjz <= EIkkfuiua and TlFOubnqAhyGnTx == 1) then
			IcqJPfnUUGxuFjz = 0;
			TlFOubnqAhyGnTx = 0;
			KHUssekIRT:SetTexture(1,1,1); --white
			KHUssekIRT2:SetTexture(1,1,1); --white
		end


		if (MTHAcvQTurxjOhn <= EIkkfuiua and heXwrHwpBFyJj == 1) then
			heXwrHwpBFyJj = 2;
			MTHAcvQTurxjOhn = 0;
			KHUssekIRT:SetTexture(1,1,1); --white
			KHUssekIRT2:SetTexture(1,1,1); --white
		end

		if (dMThWACsMroUR <= EIkkfuiua and lfdLvtqIrm == 1) then
			dMThWACsMroUR = 0;
			lfdLvtqIrm = 0;
			KHUssekIRT:SetTexture(1,1,1); --white
			KHUssekIRT2:SetTexture(1,1,1); --white
		end

		if (UnitIsGhost("player")) then
			if lfdLvtqIrm ~= 1 then
				KHUssekIRT:SetTexture(1,1,0); --gelb
				KHUssekIRT2:SetTexture(1,1,0); --gelb
				lAceBokVoP = 2;
			end
		elseif (lAceBokVoP == 2) then
			if lfdLvtqIrm ~= 1 then
				KHUssekIRT:SetTexture(1,1,1); --white
				KHUssekIRT2:SetTexture(1,1,1); --white
				lAceBokVoP = 0;
			end
		end


	if (VypJITllwlEGJj < EIkkfuiua and VypJITllwlEGJj ~= 0) then
		VypJITllwlEGJj = 0;
	end

	if (not StaticPopup_Visible("CONFIRM_BATTLEFIELD_ENTRY") and qUFxdFacm == 1) then
		EsfdhSiMcDg = 0;
		qUFxdFacm = 0;	
		if (IsInBg == 1) then
	   bebXPmDn:SetTexture(0,0,1); --blau
		bebXPmDn2:SetTexture(0,0,1); --blau
		UwAawNsiT = "blau";
		else
		bebXPmDn:SetTexture(1,1,1); --white
		bebXPmDn2:SetTexture(1,1,1); --white
		UwAawNsiT = "white";
		end
	end	

	if (IsInBg == 0) then
		zFlcnapKLkk = 0;
		if (oegmuUVMLv == 1 or MJhVVmDbaJi:IsVisible()) then
			if (EsfdhSiMcDg <= EIkkfuiua and qUFxdFacm == 1 and iMUKujykIFz ~= nil and UnitAffectingCombat("player") == nil) then
				DEFAULT_CHAT_FRAME:AddMessage("Can Join Battleground now.", 0, 0.7, 1);
				EsfdhSiMcDg = 0;
				qUFxdFacm = 0;
				iMUKujykIFz = nil;
			end	
		end
	else

		if (cSlmeSVKHyBMQT == 1 and (oegmuUVMLv == 1 or MJhVVmDbaJi:IsVisible())) then
			if (EsfdhSiMcDg <= EIkkfuiua and qUFxdFacm == 1 and iMUKujykIFz ~= nil and UnitAffectingCombat("player") == nil ) then
				bebXPmDn:SetTexture(0,0.5,0); --darkgreen 0x008000
				bebXPmDn2:SetTexture(0,0.5,0); --darkgreen 0x008000
				UwAawNsiT = "darkgreen";
				EsfdhSiMcDg = 0;
				qUFxdFacm = 0;
				iMUKujykIFz = nil;
			end	
		end
		if (BHvwhmydVHCwcM == 1 or MJhVVmDbaJi:IsVisible()) then
			local TxoGzsMbb = GetBattlefieldWinner();
			if (TxoGzsMbb ~= nil) then
      		bebXPmDn:SetTexture(1,0,1); --pink leaving in 15sec
				bebXPmDn2:SetTexture(1,0,1); --pink leaving in 15sec
				UwAawNsiT = "pink";
				if (zFlcnapKLkk == 0) then
					DEFAULT_CHAT_FRAME:AddMessage("AutoLeave BG in 15 sec", 0, 0.7, 1);
					IVmtRFhvnf = GetTime()+15;
					zFlcnapKLkk = 1;
				end
			end

			if (IVmtRFhvnf <= EIkkfuiua and zFlcnapKLkk == 1) then
				LeaveBattlefield();
				IVmtRFhvnf = 0;
			end
		end
	end
	if (GFdrGmUOUUODLC == 1 or MJhVVmDbaJi:IsVisible()) then
			if (cdMNDSOLRtd <= EIkkfuiua and lAceBokVoP == 1) then
				StaticPopup_Hide("DEATH");
				RepopMe();
				lAceBokVoP = 0;
				cdMNDSOLRtd = 0;
			end
		end
end


function mrxrsrXrBN()
	local zone = GetRealZoneText();
	local zoneNr2 = GetCurrentMapZone();

	if IsInBg == 1 then
		HlOCozDMaCIQ = zone;
		QEJlbdyHvD = GetTime()+1;
		bWTtcGBlIcar = 0;
		if (UwAawNsiT == "white" or UwAawNsiT == nil) then
			bebXPmDn:SetTexture(0,0,1); --blau
			bebXPmDn2:SetTexture(0,0,1); --blau
			UwAawNsiT = "blau";
		end
	else
		HlOCozDMaCIQ = nil;
		if ((JoTxPnsrTAocfbX == 1) and (bWTtcGBlIcar == 0)) then
			PlaySoundFile("Interface\\AddOns\\TESTTESTTEST\\hHyogfiGJ.wav");
		end
		if ((fnmodWiR == 1) and (bWTtcGBlIcar == 0)) then
			SendChatMessage("BG over","WHISPER", GetDefaultLanguage("player"), SSPKaXLJcN);
		end
		TESTTESTTEST.BgBegun = 0;
		zFlcnapKLkk = 0;
		bebXPmDn:SetTexture(1,1,1); --white
		bebXPmDn2:SetTexture(1,1,1); --white
		UwAawNsiT = "white";
		bWTtcGBlIcar = 1;
		IVmtRFhvnf = 0;
		lAceBokVoP = 0;
		heXwrHwpBFyJj = 0;
	end
	if zoneNr == 11 and zoneNr2 ~= 11 then
	   DeclineGroup();
	   zoneNr = 0;
	end
end
SF-Bot-Support is offline  
Old   #6
 
elite*gold: 0
Join Date: Jun 2008
Posts: 96
Received Thanks: 218
Quote:
Originally Posted by SF-Bot-Support View Post
Sorry, i dont know what you mean.
Do you know the old Pirox bot? He also had a field of pixel (but i need some more fields). But the addon of pirox does a lot of other things so i cant understand the code, also because the names for varibles und user defined functions are random letters. (omg sry bad grammar Oo)

Here Pirox addon:

Code:
local EsfdhSiMcDg = 0;
local HlOCozDMaCIQ = nil;
local QEJlbdyHvD = nil;
local qUFxdFacm = 0;
local cdMNDSOLRtd = 0;
local lAceBokVoP = 0;
local IVmtRFhvnf = 0;
local zFlcnapKLkk = 0;
local dMThWACsMroUR = 0;
local lfdLvtqIrm = 0;
local heXwrHwpBFyJj = 0;
local MTHAcvQTurxjOhn = 0;
local IcqJPfnUUGxuFjz = 0;
local TlFOubnqAhyGnTx = 0;
local bWTtcGBlIcar = 1;
local biRNUrXyOCOWq;
local rQXWppCFlLiiEvIK = 0;
local IsInBg = 0;
local xpajkIokFQpae = -1;
local SKorVapBNEND = 0;
local sQBuzftNskxBetcC = 0;
local cHEKFlJUuSOi = 0;
TESTTESTTEST.BgBegun = 0;
local zoneNr = 0;
local VypJITllwlEGJj = 0;

local iMUKujykIFz = nil;
local UwAawNsiT = nil;

if (oegmuUVMLv == nil) then
	oegmuUVMLv = 0;
	cSlmeSVKHyBMQT = 0;
	StiSHFbIlB = 0;
	GFdrGmUOUUODLC = 0;
	BHvwhmydVHCwcM = 0;
	fnmodWiR = 0;
	SSPKaXLJcN = 0;
	JoTxPnsrTAocfbX = 0;
	PEPenLcwIIpejXx = 0;
	cikSHPodDqdGvGwA = 0;
	PjzyWaHATuTfp = 0;
	zkvjSRIQlOvIXU = 0;
	slCNuSGOAA = 0;
	jFcLlzuezzautoLootDefault = GetCVar("autoLootDefault");
	jFcLlzuezzautoSelfCast = GetCVar("autoSelfCast");
end
if (eTJvTAvkapxXOoD == nil) then
	eTJvTAvkapxXOoD = 0;
end
function TESTTESTTEST_OnLoad(self)

	self:RegisterEvent("VARIABLES_LOADED");
	self:RegisterEvent("CHAT_MSG_YELL");
	self:RegisterEvent("CHAT_MSG_RAID");
	self:RegisterEvent("CHAT_MSG_PARTY");
	self:RegisterEvent("GMSURVEY_DISPLAY");
	self:RegisterEvent("PARTY_INVITE_REQUEST");
	self:RegisterEvent("MERCHANT_SHOW");
	self:RegisterEvent("DUEL_REQUESTED");
	self:RegisterEvent("CHAT_MSG_GUILD");
	self:RegisterEvent("CHAT_MSG_BATTLEGROUND");
	self:RegisterEvent("CHAT_MSG_CHANNEL");
	self:RegisterEvent("CHAT_MSG_SAY");
	self:RegisterEvent("CHAT_MSG_WHISPER");
	self:RegisterEvent("CHAT_MSG_EMOTE");
	self:RegisterEvent("CHAT_MSG_TEXT_EMOTE");
	self:RegisterEvent("UNIT_AURA");
	self:RegisterEvent("ZONE_CHANGED_NEW_AREA");
	self:RegisterEvent("BATTLEFIELDS_SHOW");
	self:RegisterEvent("PLAYER_DEAD");
	self:RegisterEvent("PLAYER_UNGHOST");
	self:RegisterEvent("PLAYER_ALIVE");
	self:RegisterEvent("UPDATE_BATTLEFIELD_STATUS");
	self:RegisterEvent("LOOT_BIND_CONFIRM");
	self:RegisterEvent("LOOT_CLOSED");
	self:RegisterEvent("PLAYER_ENTERING_BATTLEGROUND");
	self:RegisterEvent("PLAYER_LEAVING_WORLD");
	self:RegisterEvent("CHAT_MSG_BN_WHISPER");
	self:RegisterEvent("CHAT_MSG_BATTLEGROUND_LEADER");
	mrxrsrXrBN();
end


function TBbuCMFrCUQ(arg1)
	local _, _, BsNXuuhO, args = string.find(arg1, "(%w+)%s?(.*)");
	if(BsNXuuhO) then
		biRNUrXyOCOWq = arg1;
		BsNXuuhO = strlower(BsNXuuhO);
	else
		BsNXuuhO = "";
	end


	if(BsNXuuhO == "autosignup" or BsNXuuhO == "signup") then
		if (StiSHFbIlB == 0) then 
			StiSHFbIlB =1;
			DEFAULT_CHAT_FRAME:AddMessage("<Auto signup now ON>", 0, 0.7, 1);
		elseif (StiSHFbIlB == 1) then 
			StiSHFbIlB =0;
			DEFAULT_CHAT_FRAME:AddMessage("<Auto signup now OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "autojoin" or BsNXuuhO == "join") then
		if (oegmuUVMLv == 0) then 
			oegmuUVMLv = 1;
			DEFAULT_CHAT_FRAME:AddMessage("<Auto join bg now ON>", 0, 0.7, 1);
		elseif (oegmuUVMLv == 1) then 
			oegmuUVMLv = 0;
			DEFAULT_CHAT_FRAME:AddMessage("<Auto join bg now OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "forcejoin") then
		if (cSlmeSVKHyBMQT == 0) then 
			cSlmeSVKHyBMQT = 1;
			DEFAULT_CHAT_FRAME:AddMessage("<Force bg join now ON>", 0, 0.7, 1);
		elseif (cSlmeSVKHyBMQT == 1) then 
			cSlmeSVKHyBMQT = 0;
			DEFAULT_CHAT_FRAME:AddMessage("<Force bg join now OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "autorelease" or BsNXuuhO == "release") then
		if (GFdrGmUOUUODLC == 0) then 
			GFdrGmUOUUODLC =1;
			DEFAULT_CHAT_FRAME:AddMessage("<Auto release spirit now ON>", 0, 0.7, 1);
		elseif (GFdrGmUOUUODLC == 1) then 
			GFdrGmUOUUODLC =0;
			DEFAULT_CHAT_FRAME:AddMessage("<Auto release spirit now OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "autoleave" or BsNXuuhO == "leave") then
		if (BHvwhmydVHCwcM == 0) then 
			BHvwhmydVHCwcM =1;
			DEFAULT_CHAT_FRAME:AddMessage("<Auto leave bg now ON>", 0, 0.7, 1);
		elseif (BHvwhmydVHCwcM == 1) then 
			BHvwhmydVHCwcM =0;
			DEFAULT_CHAT_FRAME:AddMessage("<Auto leave bg now OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "sound" or BsNXuuhO == "sounds") then
		if (JoTxPnsrTAocfbX == 0) then 
			JoTxPnsrTAocfbX =1;
			DEFAULT_CHAT_FRAME:AddMessage("<Sounds ON>", 0, 0.7, 1);
		elseif (JoTxPnsrTAocfbX == 1) then 
			JoTxPnsrTAocfbX =0;
			DEFAULT_CHAT_FRAME:AddMessage("<Sounds OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "soundonemote") then
		if (eTJvTAvkapxXOoD == 0) then 
			eTJvTAvkapxXOoD = 1;
			DEFAULT_CHAT_FRAME:AddMessage("<Sound on emotes to you ON>", 0, 0.7, 1);
		elseif (eTJvTAvkapxXOoD == 1) then 
			eTJvTAvkapxXOoD = 0;
			DEFAULT_CHAT_FRAME:AddMessage("<Sound on emotes to you OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "soundonhighlight") then
		if (zkvjSRIQlOvIXU == 0) then 
			zkvjSRIQlOvIXU = 1;
			DEFAULT_CHAT_FRAME:AddMessage("<Sound on player highlight ON>", 0, 0.7, 1);
		elseif (zkvjSRIQlOvIXU == 1) then 
			zkvjSRIQlOvIXU = 0;
			DEFAULT_CHAT_FRAME:AddMessage("<Sound on player highlight OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "screenshot" or BsNXuuhO == "screenshots") then
		if (PEPenLcwIIpejXx == 0) then 
			PEPenLcwIIpejXx =1;
			DEFAULT_CHAT_FRAME:AddMessage("<Take screenshot on whisper/afk debuff/highlight ON>", 0, 0.7, 1);
		elseif (PEPenLcwIIpejXx == 1) then 
			PEPenLcwIIpejXx =0;
			DEFAULT_CHAT_FRAME:AddMessage("<Take screenshot on whisper/afk debuff/highlight OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "tell") then
		if (fnmodWiR == 0) then 
			fnmodWiR =1;
			DEFAULT_CHAT_FRAME:AddMessage("<Tell an other char info now ON>", 0, 0.7, 1);
			DEFAULT_CHAT_FRAME:AddMessage("Set the Playername who u want to whisper. Use /pala nickname e.g /pala Pirox", 0, 0.7, 1);
		    if (SSPKaXLJcN ~= 0) then 
			    DEFAULT_CHAT_FRAME:AddMessage("WhisperName is at the moment: " .. SSPKaXLJcN, 0, 0.7, 1);
		    end
		elseif (fnmodWiR == 1) then 
			fnmodWiR =0;
			DEFAULT_CHAT_FRAME:AddMessage("<Tell an other char info now OFF>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "help") then
		DEFAULT_CHAT_FRAME:AddMessage("<TESTTESTTEST v7.3>", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala  (status)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala on/off  (show/hide squares)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala ontop  (show squares on top of wow)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("  - - - - - - - ", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala release  (auto release corpse)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala leave  (auto leave the bg if finished)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala quests  (list all quests and get the quest id", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala sound  (play sound on whisper/bgover/afkdebuff)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala soundonhighlight  (play sound on player highlight)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala soundonemote  (play sound on emotes to you)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala screenshot  (take screen on whisper/afkdebuff/highlight)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala tell  (whisper another player your incoming whisper)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala signup  (auto signup for rated arena only)", 0, 0.7, 1);
		DEFAULT_CHAT_FRAME:AddMessage("    /pala honor (show total honor and honor made this login)", 0, 0.7, 1);

	elseif(BsNXuuhO == "ontop") then
		if (MJhVVmDbaJi:IsVisible() and bebXPmDn2:IsVisible()) then
			DEFAULT_CHAT_FRAME:AddMessage("<Squares onTop are already on>", 0, 0.7, 1);
		else
			MJhVVmDbaJi:Show();
			KHUssekIRT2:Show();
			bebXPmDn2:Show();
			bebXPmDn:Hide();
			KHUssekIRT:Hide();

			if cikSHPodDqdGvGwA == 0 then
				DEFAULT_CHAT_FRAME:AddMessage("<Squares onTop shown - Vars set>", 0, 0.7, 1);
			elseif cikSHPodDqdGvGwA == 1 then
				DEFAULT_CHAT_FRAME:AddMessage("<Squares moved to Top>", 0, 0.7, 1);
			end

			SetCVar("autoLootDefault", 1);
			SetCVar("autoSelfCast", 1);
			cikSHPodDqdGvGwA = 2;
			PjzyWaHATuTfp = 0;
		end
		mrxrsrXrBN();
	elseif(BsNXuuhO == "on") then
		if (MJhVVmDbaJi:IsVisible() and bebXPmDn:IsVisible()) then
			DEFAULT_CHAT_FRAME:AddMessage("<Squares onBottom are already on>", 0, 0.7, 1);
		else
			MJhVVmDbaJi:Show();
			KHUssekIRT:Show();
			bebXPmDn:Show();
			bebXPmDn2:Hide();
			KHUssekIRT2:Hide();

			if cikSHPodDqdGvGwA == 0 then
				DEFAULT_CHAT_FRAME:AddMessage("<Squares onBottom shown - Vars set>", 0, 0.7, 1);
			elseif cikSHPodDqdGvGwA == 2 then
				DEFAULT_CHAT_FRAME:AddMessage("<Squares moved to Bottom>", 0, 0.7, 1);
			end

			SetCVar("autoLootDefault", 1);
			SetCVar("autoSelfCast", 1);
			cikSHPodDqdGvGwA = 1;
			PjzyWaHATuTfp = 0;
		end
		mrxrsrXrBN();
	elseif(BsNXuuhO == "off") then
		if (MJhVVmDbaJi:IsVisible()) then
			MJhVVmDbaJi:Hide();
			DEFAULT_CHAT_FRAME:AddMessage("<Squares hidden>", 0, 0.7, 1);
	
			cikSHPodDqdGvGwA = 0;
		else
			DEFAULT_CHAT_FRAME:AddMessage("<Squares are already off>", 0, 0.7, 1);
		end

	elseif(BsNXuuhO == "honor") then
		if xpajkIokFQpae == -1 then
			xpajkIokFQpae = select(2,GetCurrencyInfo(392))
		end
		DEFAULT_CHAT_FRAME:AddMessage("Honor made - Session: " .. (select(2,GetCurrencyInfo(392))-xpajkIokFQpae) .. "  Total: " .. slCNuSGOAA, 0, 0.7, 1);

	elseif(BsNXuuhO == "quests" or BsNXuuhO == "quest") then

		local i=1
		while (GetQuestLogTitle(i) ~= nil) do
		   local questTitle, level, questTag, suggestedGroup, isHeader, isCollapsed, isComplete, isDaily = GetQuestLogTitle(i)
		   if isHeader ~= 1 then
		      local questLink = GetQuestLink(i)
		      local quest, questId, questRest = strsplit(":", questLink, 3)
		      DEFAULT_CHAT_FRAME:AddMessage("[".. questId .."] ".. questTitle,0,0.7,1)
		   end
		   i = i + 1
		end

	elseif(BsNXuuhO == "") then

		DEFAULT_CHAT_FRAME:AddMessage("<TESTTESTTEST v7.3>", 0, 0.7, 1);

		if (StiSHFbIlB == 1) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Auto arena signup : ON", 0, 0.7, 1);
		elseif (StiSHFbIlB == 0) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Auto Arena signup : OFF", 0, 0.7, 1);
		end

		if (GFdrGmUOUUODLC == 1) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Auto release spirit : ON", 0, 0.7, 1);
		elseif (GFdrGmUOUUODLC == 0) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Auto release spirit : OFF", 0, 0.7, 1);
		end

		if (BHvwhmydVHCwcM == 1) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Auto leave bg : ON", 0, 0.7, 1);
		elseif (BHvwhmydVHCwcM == 0) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Auto leave bg : OFF ", 0, 0.7, 1);
		end

		if (JoTxPnsrTAocfbX == 1) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Sound on whisper/bgover/afkdebuff : ON", 0, 0.7, 1);
		elseif (JoTxPnsrTAocfbX == 0) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Sound on whisper/bgover/afkdebuff : OFF", 0, 0.7, 1);
		end

		if (zkvjSRIQlOvIXU == 1) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Sound on player highlight : ON", 0, 0.7, 1);
		elseif (zkvjSRIQlOvIXU == 0) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Sound on player highlight : OFF", 0, 0.7, 1);
		end

		if (eTJvTAvkapxXOoD == 1) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Sound on emotes to you : ON", 0, 0.7, 1);
		elseif (eTJvTAvkapxXOoD == 0) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Sound on emotes to you : OFF", 0, 0.7, 1);
		end

		if (PEPenLcwIIpejXx == 1) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Take screenshot on whisper/afkdebuff : ON", 0, 0.7, 1);
		elseif (PEPenLcwIIpejXx == 0) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Take screenshot on whisper/afkdebuff : OFF", 0, 0.7, 1);
		end

		if (fnmodWiR == 1) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Tell other char infos : ON", 0, 0.7, 1);
		elseif (fnmodWiR == 0) then 
			DEFAULT_CHAT_FRAME:AddMessage(" - Tell other char infos : OFF", 0, 0.7, 1);
		end

	else
	    if (fnmodWiR == 1) then
	        SSPKaXLJcN = strlower(biRNUrXyOCOWq);
	        DEFAULT_CHAT_FRAME:AddMessage("<TESTTESTTEST> ".. SSPKaXLJcN .." set as response name", 0, 0.7, 1);
	    end
		DEFAULT_CHAT_FRAME:AddMessage("<TESTTESTTEST> Type '/pala help' for a commandlist and '/pala' for status.", 0, 0.7, 1);
	end


end


function TESTTESTTEST_OnEvent(self,event,arg1,arg2,arg3,arg4,arg5,arg6)

      if (event == "VARIABLES_LOADED") then
			SlashCmdList["TESTTESTTEST"]=TBbuCMFrCUQ;
			SLASH_TESTTESTTEST1="/pala";
			if cikSHPodDqdGvGwA == 1 then
				MJhVVmDbaJi:Show();
				KHUssekIRT:Show();
				bebXPmDn:Show();
				bebXPmDn2:Hide();
				KHUssekIRT2:Hide();
				PjzyWaHATuTfp = 0;
			elseif cikSHPodDqdGvGwA == 2 then
				MJhVVmDbaJi:Show();
				KHUssekIRT2:Show();
				bebXPmDn2:Show();
				bebXPmDn:Hide();
				KHUssekIRT:Hide();
				PjzyWaHATuTfp = 0;
			else
				if PjzyWaHATuTfp == 1 then
					MJhVVmDbaJi:Show();
					bebXPmDn2:Hide();
					KHUssekIRT2:Hide();
					bebXPmDn:Hide();
					KHUssekIRT:Show();
				else
					if(MJhVVmDbaJi:IsVisible()) then
						MJhVVmDbaJi:Hide();
					end
				end
			end
			KHUssekIRT:SetTexture(1,1,1); --white
			KHUssekIRT2:SetTexture(1,1,1); --white

      elseif (event == "MERCHANT_SHOW") then
        if MJhVVmDbaJi:IsVisible() then
      	   if CanMerchantRepair() == 1 then
      	      WrcPByqaruE, eiIWEpzVJEm = GetRepairAllCost();
      	      if WrcPByqaruE > 0 then
      	         if eiIWEpzVJEm == 1 then
      	            RepairAllItems();
      	            valC = WrcPByqaruE%100;
      	            valS = math.floor((WrcPByqaruE%10000)/100);
      	            valG = math.floor(WrcPByqaruE/10000);
      	            DEFAULT_CHAT_FRAME:AddMessage("Your items have been repaired for "..valG.."g "..valS.."s "..valC.."c", 0, 0.7, 1);
      	         else
      	            DEFAULT_CHAT_FRAME:AddMessage("You don't have enough money for repair!", 0, 0.7, 1);
      	         end
      	      end
      	   end
           for i=0,4 do 
              if GetContainerNumSlots(i) ~= 0 then
                 for j=1,GetContainerNumSlots(i) do 
                    local itemLink = GetContainerItemLink(i,j);
                    if itemLink then
                       local _, _, itemRarity = GetItemInfo(itemLink);
                       if itemRarity == 0 then
                          UseContainerItem(i,j); 
                       end
                    end 
                 end
              end
           end
        end


      elseif (event == "PLAYER_LEAVING_WORLD") then
	      IsInBg = 0;

      elseif (event == "PLAYER_ENTERING_BATTLEGROUND") then
	      IsInBg = 1;


      elseif (event == "GMSURVEY_DISPLAY") then
	      DEFAULT_CHAT_FRAME:AddMessage("GM Chat Request", 0, 0.7, 1);
	      GMSurveySubmit();
			if(JoTxPnsrTAocfbX== 1 or MJhVVmDbaJi:IsVisible()) then
			   PlaySoundFile("Interface\\AddOns\\TESTTESTTEST\\QrbgnDCAKjx.wav");
			end
			if(MJhVVmDbaJi:IsVisible()) then
			   KHUssekIRT:SetTexture(1,0,1); --pink
			   KHUssekIRT2:SetTexture(1,0,1); --pink
			   dMThWACsMroUR = GetTime()+5;
			   lfdLvtqIrm = 1;
			end
			if(PEPenLcwIIpejXx == 1) then
				TakeScreenshot();
			end

      elseif (event == "CHAT_MSG_SAY" or event == "CHAT_MSG_CHANNEL" or event == "CHAT_MSG_BATTLEGROUND" or event == "CHAT_MSG_GUILD" or event == "CHAT_MSG_YELL" or event == "CHAT_MSG_RAID" or event == "CHAT_MSG_PARTY" or event == "CHAT_MSG_BATTLEGROUND_LEADER") then
		if arg1 and string.find(strlower(arg1), strlower(UnitName("player"))) then
		 if (not arg4) or (arg4 and not string.find(strlower(arg4), "crbz")) then
			if zkvjSRIQlOvIXU == 1 then
				PlaySoundFile("Interface\\AddOns\\TESTTESTTEST\\QJWeaOFox.wav");
			end
			if(MJhVVmDbaJi:IsVisible()) then
				KHUssekIRT:SetTexture(0,0,0.5); --darkblue
				KHUssekIRT2:SetTexture(0,0,0.5); --darkblue
				IcqJPfnUUGxuFjz = GetTime()+5;
				TlFOubnqAhyGnTx = 1;
			end
			if(PEPenLcwIIpejXx == 1) then
				TakeScreenshot();
			end
		 end
		end

	    elseif (event == "LOOT_CLOSED") then
	      if not self:IsEventRegistered("LOOT_BIND_CONFIRM") then
	         self:RegisterEvent("LOOT_BIND_CONFIRM");
			end

      elseif (event == "CHAT_MSG_EMOTE" or event == "CHAT_MSG_TEXT_EMOTE") then
        if arg1 and arg2 and arg2 ~= UnitName("player") and string.find(strlower(arg1), " ".. TESTTESTTEST.Localization[2]) then
			   if eTJvTAvkapxXOoD == 1 then
				   PlaySoundFile("Interface\\AddOns\\TESTTESTTEST\\QJWeaOFox.wav");
			   end
			   if(MJhVVmDbaJi:IsVisible()) then
				   KHUssekIRT:SetTexture(0,0,0.5); --darkblue
				   KHUssekIRT2:SetTexture(0,0,0.5); --darkblue
				   IcqJPfnUUGxuFjz = GetTime()+5;
				   TlFOubnqAhyGnTx = 1;
			   end
		   end

	    elseif (event == "LOOT_BIND_CONFIRM") then
			if ( (GetNumPartyMembers() == 0 and GetNumRaidMembers() == 0) or IsFishingLoot() ) then
			  if VypJITllwlEGJj == 0 and arg1 then
				LootSlot(arg1);
				ConfirmLootSlot(arg1);
				DEFAULT_CHAT_FRAME:AddMessage("Looting BoP Item", 0, 0.7, 1);
				VypJITllwlEGJj = GetTime()+10;
			  end
			end

		elseif (event == "UNIT_AURA") then
			foundDebuff = 0;
 			for i=1,40 do
				local n = UnitDebuff("player",i);
				if n == TESTTESTTEST.Localization[0] or n == TESTTESTTEST.Localization[1] then
					foundDebuff = 1;
				end
			end
			if foundDebuff == 1 then
				if heXwrHwpBFyJj == 0 then
				    if(PEPenLcwIIpejXx == 1) then
			    	    TakeScreenshot();
			        end
					if(JoTxPnsrTAocfbX == 1) then 
						PlaySoundFile("Interface\\Addons\\TESTTESTTEST\\CvbTktvon.wav");
					end
					KHUssekIRT:SetTexture(0,0.5,0); --darkgreen 0x008000
					KHUssekIRT2:SetTexture(0,0.5,0); --darkgreen 0x008000
					heXwrHwpBFyJj = 1;
					MTHAcvQTurxjOhn = GetTime()+5;
					sQBuzftNskxBetcC = sQBuzftNskxBetcC+1;
				end
			else
				heXwrHwpBFyJj=0;
			end

		elseif (event == "PLAYER_UNGHOST") then
	      if (IsInBg == 0) then
			   bebXPmDn:SetTexture(1,1,1); --white
			   bebXPmDn2:SetTexture(1,1,1); --white
			   UwAawNsiT = "white";
	      else
			   bebXPmDn:SetTexture(0,0,1); --blau
			   bebXPmDn2:SetTexture(0,0,1); --blau
			   UwAawNsiT = "blau";
	      end
			cHEKFlJUuSOi = 0;

	    elseif (event == "PLAYER_DEAD") then
	      zoneNr = GetCurrentMapZone();
			bebXPmDn:SetTexture(1,1,0); --gelb
			bebXPmDn2:SetTexture(1,1,0); --gelb
			UwAawNsiT = "gelb";
			if (cHEKFlJUuSOi == 0) then
			   if IsInBg == 1 or zoneNr == 11 or (IsInBg == 0 and (GetNumPartyMembers() < 4 and GetNumRaidMembers() == 0)) then
			      if (GFdrGmUOUUODLC == 1) then
				      DEFAULT_CHAT_FRAME:AddMessage("Release Corpse in 5 sec", 0, 0.7, 1);
			         lAceBokVoP = 1;
			         cdMNDSOLRtd = GetTime()+5;
			      elseif (MJhVVmDbaJi:IsVisible()) then
				      DEFAULT_CHAT_FRAME:AddMessage("Release Corpse in 5 sec", 0, 0.7, 1);
			         lAceBokVoP = 1;
			         cdMNDSOLRtd = GetTime()+5;
			      end
			   elseif GetNumRaidMembers() ~= 0 then
				   DEFAULT_CHAT_FRAME:AddMessage("No Corpse Release - Not in BG and in Raid", 0, 0.7, 1);
			   else
				   DEFAULT_CHAT_FRAME:AddMessage("No Corpse Release - Not in BG and in Group with more than 4 people", 0, 0.7, 1);
			   end
		   end
			cHEKFlJUuSOi = 1;

	    elseif (event == "PLAYER_ALIVE") then
			cHEKFlJUuSOi = 0;
			if lAceBokVoP == 1 then
				lAceBokVoP = 2;
			else
				mrxrsrXrBN();
			end

	    elseif (event == "PARTY_INVITE_REQUEST") then

	    elseif (event == "PARTY_MEMBERS_CHANGED") then
        StaticPopup_Hide("PARTY_INVITE");
        self:UnregisterEvent("PARTY_MEMBERS_CHANGED");

	    elseif (event == "DUEL_REQUESTED") then
        if(MJhVVmDbaJi:IsVisible()) then
           CancelDuel();
				DEFAULT_CHAT_FRAME:AddMessage("Canceled Duel (to accept, enter /pala off)", 0, 0.7, 1);
			end

	    elseif (event == "CHAT_MSG_WHISPER" or event == "CHAT_MSG_BN_WHISPER" ) then
			if ((arg2) and (strlower(arg2) ~= SSPKaXLJcN)) then
		  	  	if (arg1 and not string.find(strlower(arg1), "lvbm") and not string.find(strlower(arg1), "lvpn")) then
			   	if (fnmodWiR == 1) then
				    	if (arg6) then
					    	SendChatMessage("<" .. arg6 .. ">[" .. arg2 .. "]: " .. arg1,"WHISPER", GetDefaultLanguage("player"), SSPKaXLJcN);
				    	else
					   		SendChatMessage("[" .. arg2 .. "]: " .. arg1,"WHISPER", GetDefaultLanguage("player"), SSPKaXLJcN);
				    	end
			    	end
			    	if (JoTxPnsrTAocfbX== 1 or MJhVVmDbaJi:IsVisible())  then
						if (arg6 and string.find(arg6, "GM") or string.find(arg6, "Master")) then
							PlaySoundFile("Interface\\AddOns\\TESTTESTTEST\\QrbgnDCAKjx.wav");
						else
							PlaySoundFile("Interface\\AddOns\\TESTTESTTEST\\idlPhwuvT.mp3");
						end
			    	end
			    	if(PEPenLcwIIpejXx== 1) then
			    		TakeScreenshot();
			    	end
			    	if(MJhVVmDbaJi:IsVisible()) then
			    		if (arg6 and string.find(arg6, "GM")) then
			    			KHUssekIRT:SetTexture(1,0,1); --pink
			    			KHUssekIRT2:SetTexture(1,0,1); --pink
				    	else
				    		KHUssekIRT:SetTexture(0,1,0); --green
				    		KHUssekIRT2:SetTexture(0,1,0); --green
			        	end
				    	dMThWACsMroUR = GetTime()+5;
				    	lfdLvtqIrm = 1;
			    	end
		    	end
			elseif arg2 and (strlower(arg2) == SSPKaXLJcN) then
		    	local startPos, endPos = string.find( arg1, "==");
		    	local startPos2, endPos2 = string.find( arg1, "!honor");
		    	local startPos3, endPos3 = string.find( arg1, "!afkdebuff");

				if (startPos2 ~= nil) then
					if xpajkIokFQpae == -1 then
						xpajkIokFQpae = select(2,GetCurrencyInfo(392));
					end	
					SendChatMessage("Current Honor: ".. select(2,GetCurrencyInfo(392))-xpajkIokFQpae,"WHISPER", GetDefaultLanguage("player"), SSPKaXLJcN);
		   	 	end
		    	if (startPos3 ~= nil) then
		       		SendChatMessage("Afk Debuffs: ".. sQBuzftNskxBetcC,"WHISPER", GetDefaultLanguage("player"), SSPKaXLJcN);
		    	end
		    	if (startPos ~= nil) then
		        	SendChatMessage(strsub(arg1,endPos+1,strlen(arg1)),"WHISPER", GetDefaultLanguage("player"), strsub(arg1,0,startPos-1));
		    	end
			end

		elseif (event == "ZONE_CHANGED_NEW_AREA") then
		mrxrsrXrBN();

			if bebXPmDn:IsVisible() or bebXPmDn2:IsVisible() then
				local pTCurrentHonor = select(2,GetCurrencyInfo(392));
				if xpajkIokFQpae == -1 then
					xpajkIokFQpae = pTCurrentHonor
				end

				slCNuSGOAA = slCNuSGOAA + (pTCurrentHonor - xpajkIokFQpae)-SKorVapBNEND;
				SKorVapBNEND = pTCurrentHonor - xpajkIokFQpae;
			end
		elseif (event == "BATTLEFIELDS_SHOW") then
			if bebXPmDn:IsVisible() or bebXPmDn2:IsVisible() then
				if( CanJoinBattlefieldAsGroup() and GetNumPartyMembers() > 0) then
					if IsBattlefieldArena() then
						if GetNumPartyMembers() == 1 then
							JoinBattlefield(1, 1, 1);
						elseif GetNumPartyMembers() == 2 then
							JoinBattlefield(2, 1, 1);
						elseif GetNumPartyMembers() == 4 then
							JoinBattlefield(3, 1, 1);
						end
						HideUIPanel(ArenaFrame);
					end
				end
			end
			if(MJhVVmDbaJi:IsVisible() or StiSHFbIlB == 1) then
				if( CanJoinBattlefieldAsGroup() and GetNumPartyMembers() > 0) then
					JoinBattlefield(0, 1);
				else
					JoinBattlefield(0);
				end
				HideUIPanel(BattlefieldFrame);
			end

		elseif (event == "UPDATE_BATTLEFIELD_STATUS") then
			local index = nil;
			local inQueue = nil;
			for i=1, MAX_BATTLEFIELD_QUEUES, 1 do
				local status,mapname,instanceID = GetBattlefieldStatus(i);

				if (status == "confirm") then
					index = i;
					inQueue = 2;
				elseif (status == "queued" and IsInBg == 0) then
				bebXPmDn:SetTexture(1,0,0); --red queued
				bebXPmDn2:SetTexture(1,0,0); --red queued
				UwAawNsiT = "rot";
					inQueue = 1;
				elseif (status == "active") then
					inQueue = 1;
				end

			end
			if (inQueue == nil) then
		      bebXPmDn:SetTexture(1,1,1); --white
		      bebXPmDn2:SetTexture(1,1,1); --white
		      UwAawNsiT = "white";
			end
			if ( index ~= nil and ((qUFxdFacm == 0 and IsInBg == 0) or (cSlmeSVKHyBMQT == 1 and IsInBg == 1))) then
				if (MJhVVmDbaJi:IsVisible() or oegmuUVMLv == 1) then
					bebXPmDn:SetTexture(1,0,1); --pink joining in 15sec
					bebXPmDn2:SetTexture(1,0,1); --pink joining in 15sec
					UwAawNsiT = "pink";
					EsfdhSiMcDg = GetTime()+15;
					qUFxdFacm = 1;
					iMUKujykIFz = index;
				end
			end
		end
end


function TESTTESTTEST_OnUpdate()
	local IPsxSHqksHtgikSQ = GetBattlefieldInstanceRunTime();
	local EIkkfuiua = GetTime();
	local isArena, isRegistered = IsActiveBattlefieldArena();
	local zone = GetRealZoneText();

	if (MJhVVmDbaJi:IsVisible()) then
		if bWTtcGBlIcar == 0 and not UnitIsGhost("player") and lAceBokVoP ~= 1 then
			if ((fnmodWiR == 1) and (QEJlbdyHvD ~= nil)) then
				if (QEJlbdyHvD < IPsxSHqksHtgikSQ) then
					SendChatMessage("Joining " .. zone,"WHISPER", GetDefaultLanguage("player"), SSPKaXLJcN);
					QEJlbdyHvD = nil;
				end
			end
			if isArena == 1 then
				HlOCozDMaCIQ = "arena";
			end

			if HlOCozDMaCIQ == "arena" then
				if IPsxSHqksHtgikSQ > 0 and IPsxSHqksHtgikSQ < 75000 then
					bebXPmDn:SetTexture(0,0.5,0); --darkgreen 0x008000
					bebXPmDn2:SetTexture(0,0.5,0); --darkgreen 0x008000
					UwAawNsiT = "darkgreen";
					TESTTESTTEST.BgBegun = 0;
				else
					if TESTTESTTEST.BgBegun == 0 then
						bebXPmDn:SetTexture(0,0,1); --blau
						bebXPmDn2:SetTexture(0,0,1); --blau
						UwAawNsiT = "blau";
						TESTTESTTEST.BgBegun = 1;
					end
				end
			else
				if IPsxSHqksHtgikSQ > 0 and IPsxSHqksHtgikSQ < 121500 then
					bebXPmDn:SetTexture(0,0.5,0); --darkgreen 0x008000
					bebXPmDn2:SetTexture(0,0.5,0); --darkgreen 0x008000
					UwAawNsiT = "darkgreen";
					TESTTESTTEST.BgBegun = 0;
				else
					if TESTTESTTEST.BgBegun == 0 then
						bebXPmDn:SetTexture(0,0,0.5); --darkblue
						bebXPmDn2:SetTexture(0,0,0.5); --darkblue
						UwAawNsiT = "darkblue";
						TESTTESTTEST.BgBegun = 1;
					end
				end
			end
		end
	end

		if (IcqJPfnUUGxuFjz <= EIkkfuiua and TlFOubnqAhyGnTx == 1) then
			IcqJPfnUUGxuFjz = 0;
			TlFOubnqAhyGnTx = 0;
			KHUssekIRT:SetTexture(1,1,1); --white
			KHUssekIRT2:SetTexture(1,1,1); --white
		end


		if (MTHAcvQTurxjOhn <= EIkkfuiua and heXwrHwpBFyJj == 1) then
			heXwrHwpBFyJj = 2;
			MTHAcvQTurxjOhn = 0;
			KHUssekIRT:SetTexture(1,1,1); --white
			KHUssekIRT2:SetTexture(1,1,1); --white
		end

		if (dMThWACsMroUR <= EIkkfuiua and lfdLvtqIrm == 1) then
			dMThWACsMroUR = 0;
			lfdLvtqIrm = 0;
			KHUssekIRT:SetTexture(1,1,1); --white
			KHUssekIRT2:SetTexture(1,1,1); --white
		end

		if (UnitIsGhost("player")) then
			if lfdLvtqIrm ~= 1 then
				KHUssekIRT:SetTexture(1,1,0); --gelb
				KHUssekIRT2:SetTexture(1,1,0); --gelb
				lAceBokVoP = 2;
			end
		elseif (lAceBokVoP == 2) then
			if lfdLvtqIrm ~= 1 then
				KHUssekIRT:SetTexture(1,1,1); --white
				KHUssekIRT2:SetTexture(1,1,1); --white
				lAceBokVoP = 0;
			end
		end


	if (VypJITllwlEGJj < EIkkfuiua and VypJITllwlEGJj ~= 0) then
		VypJITllwlEGJj = 0;
	end

	if (not StaticPopup_Visible("CONFIRM_BATTLEFIELD_ENTRY") and qUFxdFacm == 1) then
		EsfdhSiMcDg = 0;
		qUFxdFacm = 0;	
		if (IsInBg == 1) then
	   bebXPmDn:SetTexture(0,0,1); --blau
		bebXPmDn2:SetTexture(0,0,1); --blau
		UwAawNsiT = "blau";
		else
		bebXPmDn:SetTexture(1,1,1); --white
		bebXPmDn2:SetTexture(1,1,1); --white
		UwAawNsiT = "white";
		end
	end	

	if (IsInBg == 0) then
		zFlcnapKLkk = 0;
		if (oegmuUVMLv == 1 or MJhVVmDbaJi:IsVisible()) then
			if (EsfdhSiMcDg <= EIkkfuiua and qUFxdFacm == 1 and iMUKujykIFz ~= nil and UnitAffectingCombat("player") == nil) then
				DEFAULT_CHAT_FRAME:AddMessage("Can Join Battleground now.", 0, 0.7, 1);
				EsfdhSiMcDg = 0;
				qUFxdFacm = 0;
				iMUKujykIFz = nil;
			end	
		end
	else

		if (cSlmeSVKHyBMQT == 1 and (oegmuUVMLv == 1 or MJhVVmDbaJi:IsVisible())) then
			if (EsfdhSiMcDg <= EIkkfuiua and qUFxdFacm == 1 and iMUKujykIFz ~= nil and UnitAffectingCombat("player") == nil ) then
				bebXPmDn:SetTexture(0,0.5,0); --darkgreen 0x008000
				bebXPmDn2:SetTexture(0,0.5,0); --darkgreen 0x008000
				UwAawNsiT = "darkgreen";
				EsfdhSiMcDg = 0;
				qUFxdFacm = 0;
				iMUKujykIFz = nil;
			end	
		end
		if (BHvwhmydVHCwcM == 1 or MJhVVmDbaJi:IsVisible()) then
			local TxoGzsMbb = GetBattlefieldWinner();
			if (TxoGzsMbb ~= nil) then
      		bebXPmDn:SetTexture(1,0,1); --pink leaving in 15sec
				bebXPmDn2:SetTexture(1,0,1); --pink leaving in 15sec
				UwAawNsiT = "pink";
				if (zFlcnapKLkk == 0) then
					DEFAULT_CHAT_FRAME:AddMessage("AutoLeave BG in 15 sec", 0, 0.7, 1);
					IVmtRFhvnf = GetTime()+15;
					zFlcnapKLkk = 1;
				end
			end

			if (IVmtRFhvnf <= EIkkfuiua and zFlcnapKLkk == 1) then
				LeaveBattlefield();
				IVmtRFhvnf = 0;
			end
		end
	end
	if (GFdrGmUOUUODLC == 1 or MJhVVmDbaJi:IsVisible()) then
			if (cdMNDSOLRtd <= EIkkfuiua and lAceBokVoP == 1) then
				StaticPopup_Hide("DEATH");
				RepopMe();
				lAceBokVoP = 0;
				cdMNDSOLRtd = 0;
			end
		end
end


function mrxrsrXrBN()
	local zone = GetRealZoneText();
	local zoneNr2 = GetCurrentMapZone();

	if IsInBg == 1 then
		HlOCozDMaCIQ = zone;
		QEJlbdyHvD = GetTime()+1;
		bWTtcGBlIcar = 0;
		if (UwAawNsiT == "white" or UwAawNsiT == nil) then
			bebXPmDn:SetTexture(0,0,1); --blau
			bebXPmDn2:SetTexture(0,0,1); --blau
			UwAawNsiT = "blau";
		end
	else
		HlOCozDMaCIQ = nil;
		if ((JoTxPnsrTAocfbX == 1) and (bWTtcGBlIcar == 0)) then
			PlaySoundFile("Interface\\AddOns\\TESTTESTTEST\\hHyogfiGJ.wav");
		end
		if ((fnmodWiR == 1) and (bWTtcGBlIcar == 0)) then
			SendChatMessage("BG over","WHISPER", GetDefaultLanguage("player"), SSPKaXLJcN);
		end
		TESTTESTTEST.BgBegun = 0;
		zFlcnapKLkk = 0;
		bebXPmDn:SetTexture(1,1,1); --white
		bebXPmDn2:SetTexture(1,1,1); --white
		UwAawNsiT = "white";
		bWTtcGBlIcar = 1;
		IVmtRFhvnf = 0;
		lAceBokVoP = 0;
		heXwrHwpBFyJj = 0;
	end
	if zoneNr == 11 and zoneNr2 ~= 11 then
	   DeclineGroup();
	   zoneNr = 0;
	end
end
That's an other way for do. I mean that using an addon that load .TGA files I think that is better (e.g.: Each time that player lose life load an other .TGA health frame with color different). This addon is impossible to understand because there are random letters
vabatta is offline  
Old   #7
 
elite*gold: 0
Join Date: Jul 2010
Posts: 56
Received Thanks: 68
Problem selber gelöst, Angebot beendet.

I self solved the problem.
SF-Bot-Support is offline  
Old   #8
 
elite*gold: 0
Join Date: Nov 2010
Posts: 3
Received Thanks: 1
Okay deutsch
callii12 is offline  
Old   #9
3-2-1...Let's Jam
 
elite*gold: 0
Join Date: May 2007
Posts: 60,167
Received Thanks: 27,864
#closed


Obilee is offline  
Closed Thread

Tags
bot, programmieren, programmierer gesucht, wow bot, wow-addon



« Previous Thread | Next Thread »

Similar Threads
[Suche] Photoshop,Gimp Kenntnisse! [Biete] Geld "Viel Geld"
Hallo Leute :) wir suchen einen guten Designer für ... "wird über ICQ verraten" Wir bieten euch viel viel Geld im Monat ;) Ihr solltet gut sein......
1 Replies - General Art
[Biete]WoW 3x80 6k GS! [Suche]Geld
Hallo, Ich möchte jetzt mit WoW aufhören,da ich langsam kein Geld mehr dafür habe und nun ins Studium gehe. Der Account besitzt 3 lvl 80er...
0 Replies - World of Warcraft Trading
Suche Nos Acc Lv 79+ biete geld
suche nen guten nos acc lv 79+ bogi wäre mir am liebsten sollte auf server 2 oder 3 sein ich biete geld und wir machen das über trusted trade oder...
3 Replies - Nostale Trading
Biete Leveling, Suche Geld
Moin, also ich biete wieder einmal meine leveling Dienste an :) Ich nehm jede Klasse, wobei es bei dmg klassen schneller geht,heiler bekomm ich n...
7 Replies - World of Warcraft Trading
Suche Levler biete geld
Hallo Ich suche jemanden der mir einen Schurken auf Allianz Seite von 1-70 Levelt auf dem Weg zu 70 solltet ihr Maximal Skill in...
0 Replies - World of Warcraft Trading



All times are GMT +1. The time now is 09:55.


Powered by vBulletin®
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
SEO by vBSEO ©2011, Crawlability, Inc.

Support | Contact Us | FAQ | Advertising | Privacy Policy | Abuse
Copyright ©2017 elitepvpers All Rights Reserved.