Worldchat

BatidaDeKill · Mar 9th 2017, 8:33am

Hallo Community

Hier würde ich Euch gerne meinen World Chat zur Verfügung stellen.

Er beinhaltet eine Faction Abfrage, Geschlechts Abfrage, Klassen, Rassen , GM & VIP Abfrage alles unterlegt mit Icons.

Screens:

prntscr.com/ehr80t

prntscr.com/ehr8bv

Der Script dazu:

Worldchat.lua

Viel Spass damit :thumbsup:

Zyres · Mar 9th 2017, 5:07pm

C Source Code

--[[ Scripted by Batidadekill ]]--
local ChatMsg = "#w" -- Command for use of chat system
local Class = {
["Warrior"] = "|cff00ff00|TInterface\\icons\\INV_Sword_27.png:-1|t|r|cffff0000",
["Paladin"] = "|cff00ff00|TInterface\\icons\\INV_Hammer_01.png:-1|t|r|cffff0000",
["Hunter"] = "|cff00ff00|TInterface\\icons\\INV_Weapon_Bow_07.png:-1|t|r|cffff0000",
["Rogue"] = "|cff00ff00|TInterface\\icons\\INV_ThrowingKnife_04.png:-1|t|r|cffff0000",
["Priest"] = "|cff00ff00|TInterface\\icons\\INV_Staff_30.png:-1|t|r|cffff0000",
["Death Knight"] = "|cff00ff00|TInterface\\icons\\Spell_Deathknight_ClassIcon.png:-1|t|r|cffff0000",
["Shaman"] = "|cff00ff00|TInterface\\icons\\inv_jewelry_talisman_04.png:-1|t|r|cffff0000",
["Mage"] = "|cff00ff00|TInterface\\icons\\inv_staff_13.png:-1|t|r|cffff0000",
["Warlock"] = "|cff00ff00|TInterface\\icons\\spell_nature_drowsy.png:-1|t|r|cffff0000",
["Druid"] = "|cff00ff00|TInterface\\icons\\Ability_Druid_Maul.png:-1|t|r|cffff0000",
};
--Männlich
local Race1 = {
[1] = "|TInterface/ICONS/Achievement_Character_Human_Male:-1|t", -- Mensch
[2] = "|TInterface/ICONS/Achievement_Character_Orc_Male:-1|t", -- Orc
[3] = "|TInterface/ICONS/Achievement_Character_Dwarf_Male:-1|t", -- Zwerg
[4] = "|TInterface/ICONS/Achievement_Character_Nightelf_Male:-1|t", -- Nachtelf
[5] = "|TInterface/ICONS/Achievement_Character_Undead_Male:-1|t", -- Untoter
[6] = "|TInterface/ICONS/Achievement_Character_Tauren_Male:-1|t", -- Taure
[7] = "|TInterface/ICONS/Achievement_Character_Gnome_Male:-1|t", -- Gnom
[8] = "|TInterface/ICONS/Achievement_Character_Troll_Male:-1|t", -- Troll
[10] = "|TInterface/ICONS/Achievement_Character_Bloodelf_Male:-1|t", -- Blutelf
[11] = "|TInterface/ICONS/Achievement_Character_Draenei_Male:-1|t", -- Draenei
};
--Weiblich
local Race2 = {
[1] = "|TInterface/ICONS/Achievement_Character_Human_Female:-1|t", -- Mensch
[2] = "|TInterface/ICONS/Achievement_Character_Orc_Female:-1|t", -- Orc
[3] = "|TInterface/ICONS/Achievement_Character_Dwarf_Female:-1|t", -- Zwerg
[4] = "|TInterface/ICONS/Achievement_Character_Nightelf_Female:-1|t", -- Nachtelf
[5] = "|TInterface/ICONS/Achievement_Character_Undead_Female:-1|t", -- Untoter
[6] = "|TInterface/ICONS/Achievement_Character_Tauren_Female:-1|t", -- Taure
[7] = "|TInterface/ICONS/Achievement_Character_Gnome_Female:-1|t", -- Gnom
[8] = "|TInterface/ICONS/Achievement_Character_Troll_Female:-1|t", -- Troll
[10] = "|TInterface/ICONS/Achievement_Character_Bloodelf_Female:-1|t", -- Blutelf
[11] = "|TInterface/ICONS/Achievement_Character_Draenei_Female:-1|t", -- Draenei
};
--[[ EDIT THE BELOW SCRIPT AT YOUR OWN RISK ]]--
function ChatSystem (event, player, message, type, language)
if (player:GetGender() == 0) then -- Männlich
if (message:find(ChatMsg.." ") == 1) then
local text = message:gsub(ChatMsg.." ", "")
local plrs = GetPlayersInWorld()
for k, v in pairs(plrs) do
if (player:GetTeam() == 0) then -- Alliance
local GMrank = player:GetGmRank()
if (GMrank == 'az') then
v:SendBroadcastMessage("|cFF00FFFF[HG-Team] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Human.png:-1|t "..Class[player:GetPlayerClass()].." "..Race1[player:GetPlayerRace()].."|r |TInterface\\chatframe\\UI-ChatIcon-Blizz:-1|t |cffFF0000["..player:GetName().."] : |cff00FF00"..text.."") -- Admin Tag
elseif (GMrank == 'a') then
v:SendBroadcastMessage("|cFF00FFFF[HG-Team] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Human.png:-1|t "..Class[player:GetPlayerClass()].." "..Race1[player:GetPlayerRace()].."|r |TInterface\\chatframe\\UI-ChatIcon-Blizz:-1|t |cffFF0000["..player:GetName().."] : |cff00FF00"..text.."") -- GM Tag
elseif (GMrank == 'gm2listjpbkvwucqeon') then
v:SendBroadcastMessage("|cFF00FFFF[HG-Team] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Human.png:-1|t "..Class[player:GetPlayerClass()].." "..Race1[player:GetPlayerRace()].."|r |TInterface\\chatframe\\UI-ChatIcon-Blizz:-1| |cffFF0000[t"..player:GetName().."] : |cff00FF00"..text.."") -- GM Tag
elseif (GMrank == '1') then
v:SendBroadcastMessage("|TInterface\\icons\\INV_Misc_Coin_02:-1|t|cFF00FFFF [V.I.P] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Human.png:-1|t "..Class[Player:GetPlayerClass()].." "..Race1[player:GetPlayerRace()].."|r |cff00FF00["..player:GetName().."] : |cffFF0000"..text.."") -- Vip Tag
elseif (GMrank == '1v') then
v:SendBroadcastMessage("|TInterface\\icons\\INV_Misc_Coin_02:-1|t|cFF00FFFF [V.I.P] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Human.png:-1|t "..Class[player:GetPlayerClass()].." "..Race1[player:GetPlayerRace()].."|r |cff00FF00["..player:GetName().."] : |cffFF0000"..text.."") -- Vip Tag
else
v:SendBroadcastMessage("|cFF00FFFF[HG]-|r|cffFFFF00[Spieler] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Human.png:-1|t "..Class[player:GetPlayerClass()].." "..Race1[player:GetPlayerRace()].."|r |cffEE7621["..player:GetName().."] : |cffC0FF3E"..text.."") -- Ally Tag
end
elseif (player:GetTeam() == 1) then -- Horde
local GMrank = player:GetGmRank()
if (GMrank == 'az') then
v:SendBroadcastMessage("|cFF00FFFF[HG-Team] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Orc.png:-1|t "..Class[player:GetPlayerClass()].." "..Race1[player:GetPlayerRace()].."|r |TInterface\\chatframe\\UI-ChatIcon-Blizz:-1|t |cffFF0000["..player:GetName().."] : |cff00FF00"..text.."") -- Admin Tag
elseif (GMrank == 'a') then
v:SendBroadcastMessage("|cFF00FFFF[HG-Team] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Orc.png:-1|t "..Class[player:GetPlayerClass()].." "..Race1[player:GetPlayerRace()].."|r |TInterface\\chatframe\\UI-ChatIcon-Blizz:-1|t |cffFF0000["..player:GetName().."] : |cff00FF00"..text.."") -- GM Tag
elseif (GMrank == 'gm2listjpbkvwucqeon') then
v:SendBroadcastMessage("|cFF00FFFF[HG-Team] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Orc.png:-1|t "..Class[player:GetPlayerClass()].." "..Race1[player:GetPlayerRace()].."|r |TInterface\\chatframe\\UI-ChatIcon-Blizz:-1|t |cffFF0000["..player:GetName().."] : |cff00FF00"..text.."") -- GM Tag
elseif (GMrank == '1') then
v:SendBroadcastMessage("|TInterface\\icons\\INV_Misc_Coin_02:-1|t|cFF00FFFF [V.I.P] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Orc.png:-1|t "..Class[player:GetPlayerClass()].." "..Race1[player:GetPlayerRace()].."|r |cff00FF00["..player:GetName().."] : |cffFF0000"..text.."") -- Vip Tag
elseif (GMrank == '1v') then
v:SendBroadcastMessage("|TInterface\\icons\\INV_Misc_Coin_02:-1|t|cFF00FFFF [V.I.P] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Orc.png:-1|t "..Class[player:GetPlayerClass()].." "..Race1[player:GetPlayerRace()].."|r |cff00FF00["..player:GetName().."] : |cffFF0000"..text.."") -- Vip Tag
else
v:SendBroadcastMessage("|cFF00FFFF[HG]-|r|cff00FF00[Spieler] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Orc.png:-1|t "..Class[player:GetPlayerClass()].." "..Race1[player:GetPlayerRace()].."|r |cffEE7621["..player:GetName().."] : |cffC0FF3E"..text.."") -- Horde Tag
end
end
end
return 0
end
elseif (player:GetGender() == 1) then -- Weiblich
if (message:find(ChatMsg.." ") == 1) then
local text = message:gsub(ChatMsg.." ", "")
local plrs = GetPlayersInWorld()
for k, v in pairs(plrs) do
if (player:GetTeam() == 0) then -- Alliance
local GMrank = player:GetGmRank()
if (GMrank == 'az') then
v:SendBroadcastMessage("|cFF00FFFF[HG-Team] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Human.png:15|t "..Class[player:GetPlayerClass()].." "..Race2[player:GetPlayerRace()].."|r |TInterface\\chatframe\\UI-ChatIcon-Blizz:15|t |cffFF0000["..player:GetName().."] : |cff00FF00"..text.."") -- Admin Tag
elseif (GMrank == 'a') then
v:SendBroadcastMessage("|cFF00FFFF[HG-Team] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Human.png:15|t "..Class[player:GetPlayerClass()].." "..Race2[player:GetPlayerRace()].."|r |TInterface\\chatframe\\UI-ChatIcon-Blizz:15|t |cffFF0000["..player:GetName().."] : |cff00FF00"..text.."") -- GM Tag
elseif (GMrank == 'gm2listjpbkvwucqeon') then
v:SendBroadcastMessage("|cFF00FFFF[HG-Team] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Human.png:15|t "..Class[player:GetPlayerClass()].." "..Race2[player:GetPlayerRace()].."|r |TInterface\\chatframe\\UI-ChatIcon-Blizz:15| |cffFF0000[t"..player:GetName().."] : |cff00FF00"..text.."") -- GM Tag
elseif (GMrank == '1') then
v:SendBroadcastMessage("|TInterface\\icons\\INV_Misc_Coin_02:15|t|cFF00FFFF [V.I.P] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Human.png:15|t "..Class[Player:GetPlayerClass()].." "..Race2[player:GetPlayerRace()].."|r |cff00FF00["..player:GetName().."] : |cffFF0000"..text.."") -- Vip Tag
elseif (GMrank == '1v') then
v:SendBroadcastMessage("|TInterface\\icons\\INV_Misc_Coin_02:15|t|cFF00FFFF [V.I.P] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Human.png:15|t "..Class[player:GetPlayerClass()].." "..Race2[player:GetPlayerRace()].."|r |cff00FF00["..player:GetName().."] : |cffFF0000"..text.."") -- Vip Tag
else
v:SendBroadcastMessage("|cFF00FFFF[HG]-|r|cffFFFF00[Spieler] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Human.png:15|t "..Class[player:GetPlayerClass()].." "..Race2[player:GetPlayerRace()].."|r |cffEE7621["..player:GetName().."] : |cffC0FF3E"..text.."") -- Ally Tag
end
elseif (player:GetTeam() == 1) then -- Horde
local GMrank = player:GetGmRank()
if (GMrank == 'az') then
v:SendBroadcastMessage("|cFF00FFFF[HG-Team] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Orc.png:15|t "..Class[player:GetPlayerClass()].." "..Race2[player:GetPlayerRace()].."|r |TInterface\\chatframe\\UI-ChatIcon-Blizz:15|t |cffFF0000["..player:GetName().."] : |cff00FF00"..text.."") -- Admin Tag
elseif (GMrank == 'a') then
v:SendBroadcastMessage("|cFF00FFFF[HG-Team] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Orc.png:15|t "..Class[player:GetPlayerClass()].." "..Race2[player:GetPlayerRace()].."|r |TInterface\\chatframe\\UI-ChatIcon-Blizz:15|t |cffFF0000["..player:GetName().."] : |cff00FF00"..text.."") -- GM Tag
elseif (GMrank == 'gm2listjpbkvwucqeon') then
v:SendBroadcastMessage("|cFF00FFFF[HG-Team] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Orc.png:15|t "..Class[player:GetPlayerClass()].." "..Race2[player:GetPlayerRace()].."|r |TInterface\\chatframe\\UI-ChatIcon-Blizz:15|t |cffFF0000["..player:GetName().."] : |cff00FF00"..text.."") -- GM Tag
elseif (GMrank == '1') then
v:SendBroadcastMessage("|TInterface\\icons\\INV_Misc_Coin_02:15|t|cFF00FFFF [V.I.P] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Orc.png:15|t "..Class[player:GetPlayerClass()].." "..Race2[player:GetPlayerRace()].."|r |cff00FF00["..player:GetName().."] : |cffFF0000"..text.."") -- Vip Tag
elseif (GMrank == '1v') then
v:SendBroadcastMessage("|TInterface\\icons\\INV_Misc_Coin_02:15|t|cFF00FFFF [V.I.P] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Orc.png:15|t "..Class[player:GetPlayerClass()].." "..Race2[player:GetPlayerRace()].."|r |cff00FF00["..player:GetName().."] : |cffFF0000"..text.."") -- Vip Tag
else
v:SendBroadcastMessage("|cFF00FFFF[HG]-|r|cff00FF00[Spieler] |cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_banner_Orc.png:15|t "..Class[player:GetPlayerClass()].." "..Race2[player:GetPlayerRace()].."|r |cffEE7621["..player:GetName().."] : |cffC0FF3E"..text.."") -- Horde Tag
end
end
end
return 0
end
end
end
RegisterServerHook(16, "ChatSystem")

Display All

Thank you @BatidaDeKill

Worldchat

Worldchat

C Source Code

Share

Users Online 1