eluna-scripts-ornfelt/lua/WowEmulationScriptPack/Lua/message.lua
2024-09-23 07:59:23 +02:00

895 lines
37 KiB
Lua
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

local Colors = { -- 职业颜色设置
[1] = "|cffC79C6E", -- 战士
[2] = "|cffF58CBA", -- 圣骑士
[3] = "|cffabd473", -- 猎人
[4] = "|cffFFF569", -- 盗贼
[5] = "|cffFFFFFF", -- 牧师
[6] = "|cffC41F3B", -- 死亡骑士
[7] = "|cff0070de", -- 萨满
[8] = "|cff69CCF0", -- 法师
[9] = "|cff9482C9", -- 术士
[10] = "|cff999999", -- UNKNOWN
[11] = "|cffFF7D0A", -- 德鲁伊
}
local Classes1 = { -- 职业
[1] = "战士",
[2] = "骑士",
[3] = "猎人",
[4] = "盗贼",
[5] = "牧师",
[6] = "xxx",
[7] = "萨满",
[8] = "法师",
[9] = "术士",
[10] = "UNKNOWN",
[11] = "小德",
}
local Zones1 = { -- 地区
[14] = "杜隆塔尔",
[215] = "莫高雷",
[17] = "贫瘠之地",
[36] = "奥特兰克",
[45] = "阿拉希",
[3] = "荒芜之地",
[4] = "诅咒之地",
[85] = "提瑞斯法林地",
[130] = "银松森林",
[28] = "西瘟疫之地",
[139] = "东瘟疫之地",
[267] = "希尔斯布莱德",
[47] = "辛特兰",
[1] = "丹莫罗",
[51] = "灼热峡谷",
[46] = "燃烧平原",
[12] = "艾尔文森林",
[41] = "逆风小径",
[10] = "暮色森林",
[38] = "洛克莫丹",
[44] = "赤脊山",
[33] = "荆棘谷",
[8] = "悲伤沼泽",
[40] = "西部荒野",
[11] = "湿地",
[141] = "泰达希尔",
[148] = "黑海岸",
[331] = "灰谷",
[400] = "千针石林",
[406] = "石爪山脉",
[405] = "凄凉之地",
[357] = "菲拉斯",
[15] = "尘泥沼泽",
[440] = "塔纳利斯",
[16] = "艾萨拉",
[361] = "费伍德森林",
[490] = "安戈洛环形山",
[493] = "月光林地",
[1377] = "希利苏斯",
[618] = "冬泉谷",
[1519] = "暴风城",
[1637] = "奥格瑞玛",
[1537] = "铁炉堡",
[1638] = "雷霆崖",
[1657] = "达纳苏斯",
[1497] = "幽暗城",
[0] = "艾泽拉斯",
[0] = "卡利姆多",
[2597] = "奥特兰克山谷",
[2557] = "厄运之槌",
[3277] = "战歌峡谷",
[3358] = "阿拉希盆地",
[796] = "血色修道院",
[612] = "灰谷战歌伐木营地",
[648] = "山巅之塔",
[721] = "诺莫瑞根",
--1,0,卡利姆多
}
local function Loot_money1(event, player, amount)
if (player:IsInGroup()) then --不要删除此句,并发过高会宕机
else
if (player:GetGMRank()<1)then
local i = player:GetClass()
local head1 = "|cffffc0c0[1. 综合] "..Colors[i].."[|Hplayer:"..player:GetName().."|h"..player:GetName().."]|r|cffffc0c0 "
local head2 = "|cffffc0c0[2. 交易] "..Colors[i].."[|Hplayer:"..player:GetName().."|h"..player:GetName().."]|r|cffffc0c0 "
local head3 = "|cffffc0c0[5. 寻求组队] "..Colors[i].."[|Hplayer:"..player:GetName().."|h"..player:GetName().."]|r|cffffc0c0 "
local plv = player:GetLevel()
local z2 = player:GetZoneId()
--print("zone:".. z2 .. " level:".. plv)
if (Zones1[z2] == nil) then
SendWorldMessage(""..head1.."请问我在哪,我是谁,我在做什么。。。|r")
else
if (plv>55) then
local m1 = math.random(400)
if (m1 == 1) then
SendWorldMessage(""..head3.."黑上求组,开荒队速度来人手红的来!|r")
end
if (m1 == 2) then
SendWorldMessage(""..head3.."求组TL速度刷~~求带队~~|r")
end
if (m1 == 3) then
SendWorldMessage(""..head3.."黑下速刷效率队随便来人!!!|r")
end
if (m1 == 4) then
SendWorldMessage(""..head3.."厄运完美贡品来的组~~|r")
end
if (m1 == 5) then
SendWorldMessage(""..head1.."野外PK的组起野外PK的组起|r")
end
if (m1 == 6) then
SendWorldMessage(""..head3.."扭木来人,速度开了!!!|r")
end
if (m1 == 7) then
SendWorldMessage(""..head3.."求组通灵,不打院长的组!!|r")
end
if (m1 == 8) then
SendWorldMessage(""..head1.."点卡在燃烧刷斯坦索姆XS的来|r")
end
if (m1 == 9) then
SendWorldMessage(""..head1.."黑上全通团 打完只要3个半小时 因为人员不稳定现在招收稳定职业!稳定一周后擦装备公会和谐!指挥疯骚!人品不好的不要!|r")
end
if (m1 == 10) then
SendWorldMessage(""..head3.."STSM求组能打通的速度加新手勿扰。|r")
end
if (m1 == 11) then
SendWorldMessage(""..head1.."求一MC公会稳定8小时在线能过老9的加 |r")
end
if (m1 == 12) then
SendWorldMessage(""..head1.."BWL开荒求老手带路~~~|r")
end
if (m1 == 13) then
SendWorldMessage(""..head1.."求大佬带STSM后门|r")
end
if (m1 == 14) then
SendWorldMessage(""..head1.."厄运任务的来人啊!在线等~~~|r")
end
if (m1 == 15) then
SendWorldMessage(""..head3.."通灵自立队,来菜刀和奶妈!!有意直接加!!|r")
end
if (m1 == 16) then
SendWorldMessage(""..head1.."STSM刷DK马的组起求带|r")
end
if (m1 == 17) then
SendWorldMessage(""..head3.."ZG老虎队来MT FS MS DZ LR.............|r")
end
if (m1 == 18) then
SendWorldMessage(""..head1.."求稳定RAID公会开荒ZG的直接加|r")
end
if (m1 == 19) then
SendWorldMessage(""..head1.."~~暮光任务组个~~|r")
end
if (m1 == 20) then
SendWorldMessage(""..head1.."橙杖队来熟练工!!!|r")
end
if (m1 == 21) then
SendWorldMessage(""..head1.."XLSS开风石会开的来来熟练工|r")
end
if (m1 == 22) then
SendWorldMessage(""..head1.."时光之穴任务的来,速度开组!|r")
end
if (m1 == 23) then
SendWorldMessage(""..head3.."一等四求组黑下,全刷的来,效率的来~~|r")
end
if (m1 == 24) then
SendWorldMessage(""..head1.."强力牛B工会正式招收会员我们会里有N尖端战士会做可乐的法师圣光过敏的骑士养不活BB的猎人除了人什么都会变的小D忘学潜行的盗贼爱护树木的萨满杀人无数的牧师近战无敌的SS就差你了|r")
end
if (m1 == 25) then
SendWorldMessage(""..head3.."求组MC门任务速度组起来强力人士。|r")
end
if (m1 == 26) then
SendWorldMessage(""..head1.."公会进度ZG老二每天晚上6点半活动希望有志人士积极参与公会加入办法单击我名字然后在对话框中键入我要加入每天的前几名有奖励哦。。|r")
end
if (m1 == 27) then
SendWorldMessage(""..head1.."职业T装速刷队懂得M效率开组。|r")
end
if (m1 == 28) then
SendWorldMessage(""..head3.."求组废墟老一开荒团,野人金团勿扰。。。。谢谢。。。|r")
end
if (m1 == 29) then
SendWorldMessage(""..head1.."求带TL任务小白一个直接拉走|r")
end
if (m1 == 30) then
SendWorldMessage(""..head3.."求组三本速刷旅游队,每天定时刷的组。。。|r")
end
if (m1 == 31) then
SendWorldMessage(""..head1.."。。。ZG老1稳定开荒团来MT治疗环保勿扰。。。。。。|r")
end
if (m1 == 32) then
SendWorldMessage(""..head1.."带刷STSM后门5G一次还有位。。。。|r")
end
if (m1 == 33) then
SendWorldMessage(""..head1.."屠城团有没啊,加我+++++|r")
end
if (m1 == 34) then
SendWorldMessage(""..head1.."每日上线没事干想下副本装备烂战场全是奥特曼出门到躺三秒半。无可奈何铁桥站采草挖矿本行干5G一刀不计算|r")
end
if (m1 == 35) then
SendWorldMessage(""..head1.."还有木有苍天啊大地啊,抚摩这行不容易啊;材料啊金币啊,客户算得比你细啊;痛苦啊流涕啊,恶性竞争真憋闷啊!|r")
end
if (m1 == 36) then
SendWorldMessage(""..head1.."人在江湖飘,哪能不挨刀,上马不喊话,那是没文化,喊话不上马,那是哥很卡!|r")
end
if (m1 == 37) then
SendWorldMessage(""..head1.."带刷XS2G一位随便来老板速度走起|r")
end
if (m1 == 38) then
SendWorldMessage(""..head2.."收克罗"..GetItemLink(2244)..""..GetItemLink(2244).."|cffffc0c0一把不黑人的M|r")
end
if (m1 == 39) then
SendWorldMessage(""..head2.."代收乔丹"..GetItemLink(873)..""..GetItemLink(873)..""..GetItemLink(873).."|cffffc0c0有的带价M。。。。|r")
end
if (m1 == 40) then
SendWorldMessage(""..head1..""..GetItemLink(12344)..""..GetItemLink(12344).."|cffffc0c0哪里弄啊小白求带。。。。|r")
end
if (m1 == 41) then
SendWorldMessage(""..head1.."求做黑龙MM"..GetItemLink(16309)..""..GetItemLink(16309).."|cffffc0c0门任务会做的组起。。。。|r")
end
if (m1 == 42) then
SendWorldMessage(""..head1.."求组厄运王子队。。。。厄运王子速度来菜刀,新手勿扰。。。。|r")
end
if (m1 == 43) then
SendWorldMessage(""..head2.."收大卡一张,有的带价密。。。。有担保可以先金。。。|r")
end
if (m1 == 44) then
if (i == 4) or (i == 11) then
SendWorldMessage(""..head1.."无聊组队深渊刷酒吧凶器"..GetItemLink(12791)..""..GetItemLink(12791).."|cffffc0c0DZXD们组起|r")
else
end
end
if (m1 == 45) then
SendWorldMessage(""..head1.."有会做"..GetItemLink(12784)..""..GetItemLink(12784).."|cffffc0c0的没会的大神请带价M自带材料|r")
end
if (m1 == 46) then
SendWorldMessage(""..head1.."恶魔布哪里出啊,知道的告诉下。。。|r")
end
if (m1 == 47) then
SendWorldMessage(""..head1.."收一张"..GetItemLink(9294)..""..GetItemLink(9294).."|cffffc0c0有的M。。。|r")
end
if (m1 == 48) then
SendWorldMessage(""..head1.."求抚摸"..GetItemLink(16252)..""..GetItemLink(16252).."|cffffc0c0会的直接加我交易。。。价格好说。。。自带材料也行。|r")
end
if (m1 == 49) then
SendWorldMessage(""..head1.."请问这个服LM和BL比例是多少。。。和谐么|r")
end
if (m1 == 50) then
SendWorldMessage(""..head1.."完了。。。又被盗号,几百金全没了。。。气死了。。。。。。|r")
end
if (m1 > 50) then
end
end
if (plv>45 and plv<56) then
local m2 = math.random(400)
if (m2 == 1) then
SendWorldMessage(""..head2.."出售点卡一张先金的M。。。骗子死远点。。。|r")
end
if (m2 == 2) then
SendWorldMessage(""..head3.."求组SM,自立队来的M,速度开组~~|r")
end
if (m2 == 3) then
SendWorldMessage(""..head1.."神庙刷龙之召唤"..GetItemLink(10847)..""..GetItemLink(10847).."|cffffc0c0的组起|r")
end
if (m2 == 4) then
SendWorldMessage(""..head1.."SM任务的开组啦~~"..GetItemLink(10845)..""..GetItemLink(10845)..""..GetItemLink(13067).."|r|cffffc0c0叶基娜任务的组起|r")
end
if (m2 == 5) then
SendWorldMessage(""..head2.."50G一组长期收美味风蛇有的直接邮寄信用保证|r")
end
if (m2 == 6) then
if (i == 4) or (i == 11) then
SendWorldMessage(""..head3.."无聊组队MLD潜行队DZXD速度来|r")
else
end
end
if (m2 == 7) then
SendWorldMessage(""..head3.."求组MLD直接公主的M|r")
end
if (m2 == 8) then
SendWorldMessage(""..head1.."点卡在燃烧老婆在发飙速刷SM的来。。。|r")
end
if (m2 == 9) then
SendWorldMessage(""..head1.."祖尔百人速刷队,只刷百人,不要面具的来。。。|r")
end
if (m2 == 10) then
SendWorldMessage(""..head1.."新人求组ZUL做任务刷督军剑的来。。。|r")
end
if (m2 == 11) then
SendWorldMessage(""..head1.."求一MC公会稳定8小时在线能过老9的加 |r")
end
if (m2 == 12) then
SendWorldMessage(""..head1.."深渊开荒队5G求DZ开门老手带路~~~|r")
end
if (m2 == 13) then
SendWorldMessage(""..head3.."求组ZUL MLD 求不环保的来!!!!|r")
end
if (m2 == 14) then
SendWorldMessage(""..head1.."速刷ADM,来的M随便来不小白的野人~~~|r")
end
if (m2 == 15) then
SendWorldMessage(""..head1.."SM自立队来菜刀和奶妈有意直接加|r")
end
if (m2 == 16) then
SendWorldMessage(""..head1.."ZUL求带会打百人|r")
end
if (m2 == 17) then
SendWorldMessage(""..head3.."求组MLD公主本人熟练工来的+++|r")
end
if (m2 == 18) then
SendWorldMessage(""..head1.."MLD前门任务随便刷下|r"..GetItemLink(17742)..""..GetItemLink(17742)..""..GetItemLink(17741).."|r|cffffc0c0不墨迹的来|r")
end
if (m2 == 19) then
SendWorldMessage(""..head2.."~~公会长期20G代收奥水|r"..GetItemLink(12363)..""..GetItemLink(12363).."|cffffc0c030G一组山鼠梦叶20G一组黄金参有的直接邮寄~~|r")
end
if (m2 == 20) then
SendWorldMessage(""..head1.."MLD速度来刷|r"..GetItemLink(11746)..""..GetItemLink(11746).."|cffffc0c0的ZSMT过时不候|r")
end
if (m2 == 21) then
SendWorldMessage(""..head2.."收太阳草幽灵菇高价求购黑莲花有的带价M|r")
end
if (m2 == 22) then
SendWorldMessage(""..head1..""..Zones1[z2].."做任务组起,速度开组!!|r")
end
if (m2 == 23) then
SendWorldMessage(""..head1..""..Zones1[z2].."打架来~~速度打1进组~~|r")
end
if (m2 == 24) then
SendWorldMessage(""..head1.."速度杀SM绿龙来强力牛B人士|r")
end
if (m2 == 25) then
SendWorldMessage(""..head1..""..Zones1[z2].."组队做任务的来,速度开搞,来强力治疗菜刀。。。|r")
end
if (m2 == 26) then
SendWorldMessage(""..head3..""..Zones1[z2].."任务组起。。最好是能打的。。|r")
end
if (m2 == 27) then
SendWorldMessage(""..head3..""..Zones1[z2].."打架的组起来。。。|r")
end
if (m2 == 28) then
SendWorldMessage(""..head1.."求带"..Zones1[z2].."任务,新手小白。。。谢谢。。。|r")
end
if (m2 == 29) then
SendWorldMessage(""..head1.."求带SM任务本人新手求组队|r")
end
if (m2 == 30) then
SendWorldMessage(""..head3.."求组ADM速刷旅游观光队熟练工。。。|r")
end
if (m2 == 31) then
SendWorldMessage(""..head1.."。。。ZUL速度来人不开最后BOSS来MT治疗环保勿扰。。。。。。|r")
end
if (m2 == 32) then
SendWorldMessage(""..head1.."3G一次带刷XS修道院全部刷速度走起还有位。。。。|r")
end
if (m2 == 33) then
SendWorldMessage(""..head1.."ZUL不要双剑的来直接组|r")
end
if (m2 == 34) then
SendWorldMessage(""..head1.."野人求组ADM女人放电影。。。|r")
end
if (m2 == 35) then
SendWorldMessage(""..head1.."大哥们你们卡么,我这怎么快掉线了。。。这什么破服务器。。。|r")
end
if (m2 == 36) then
SendWorldMessage(""..head1.."ADM刷戒指武器|r"..GetItemLink(11118)..""..GetItemLink(11118)..""..GetItemLink(9418).."|cffffc0c0的来人啊|r")
end
if (m2 == 37) then
SendWorldMessage(""..head1..""..Zones1[z2].."任务队开组来的M|r")
end
if (m2 == 38) then
SendWorldMessage(""..head3.."求组"..Zones1[z2].."任务,来各系菜刀速度效率队!!|r")
end
if (m2 == 39) then
SendWorldMessage(""..head2.."诚心收黑口鱼油精确瞄准镜奥金锭有的带价M。。。。|r")
end
if (m2 == 40) then
SendWorldMessage(""..head2.."收|r"..GetItemLink(16206)..""..GetItemLink(16206).."|cffffc0c0一个有的带价M。。。。|r")
end
if (m2 == 41) then
SendWorldMessage(""..head1.."尼玛挖个矿又被偷袭了。。卧艹。。。|r")
end
if (m2 == 42) then
SendWorldMessage(""..head3.."求组"..Classes1[i].."职业任务队一起做的M。。。。|r")
end
if (m2 == 43) then
SendWorldMessage(""..head2.."求购|r"..GetItemLink(2099)..""..GetItemLink(2099).."|cffffc0c0一把有的带价M。。。。黑人的勿扰。。。。谢谢|r")
end
if (m2 == 44) then
SendWorldMessage(""..head1.."玛拉顿的副本入口在哪啊已经迷路跑N次尸了|r")
end
if (m2 == 45) then
SendWorldMessage(""..head1.."这版本PK哪个职业最厉害啊知道的告诉下。。。|r")
end
if (m2 > 45) then
end
end
if (plv>35 and plv<46) then
local m3 = math.random(400)
if (m3 == 1) then
SendWorldMessage(""..head3.."ADM自立队走起。。。来MT,MS,DPS|r")
end
if (m3 == 2) then
SendWorldMessage(""..head3.."求组剃刀高地,自立队来的M,速度开组~~|r")
end
if (m3 == 3) then
SendWorldMessage(""..head3.."剃刀高地刷"..GetItemLink(10758)..""..GetItemLink(10758)..""..GetItemLink(10775).."|cffffc0c0的速度组起|r")
end
if (m3 == 4) then
SendWorldMessage(""..head3.."求组TDGD~~"..GetItemLink(14340)..""..GetItemLink(14340)..""..GetItemLink(10761).."|r|cffffc0c0顺道做任务的组起|r")
end
if (m3 == 5) then
SendWorldMessage(""..head2.."求组ADM刷装备小白求带有补贴|r")
end
if (m3 == 6) then
SendWorldMessage(""..head3.."剃刀沼泽开组速度来人随便来DPS奶妈优先|r")
end
if (m3 == 7) then
SendWorldMessage(""..head3.."求组XS,狗男女通刷的加我!!|r")
end
if (m3 == 8) then
SendWorldMessage(""..head1.."XS图书馆钥匙不需求"..GetItemLink(7714)..""..GetItemLink(7714).."|cffffc0c0的速度来。。。|r")
end
if (m3 == 9) then
SendWorldMessage(""..head1.."血色来人。。。只刷军械库。。。刷头肩膀斧头"..GetItemLink(7718)..""..GetItemLink(7718)..""..GetItemLink(7717)..""..GetItemLink(7719).."|cffffc0c0的速度。。。。|r")
end
if (m3 == 10) then
SendWorldMessage(""..head3.."新人求组XS图书馆做钥匙任务刷BOSS的来。。。|r")
end
if (m3 == 11) then
SendWorldMessage(""..head3.."求组XS墓园做任务的来 |r")
end
if (m3 == 12) then
SendWorldMessage(""..head1.."XS狗男女速度来人啊~~~在线等~~~|r")
end
if (m3 == 13) then
SendWorldMessage(""..head1.."萌新求带刷血色军械库,哪位好心的大哥带带啊!!!!|r")
end
if (m3 == 14) then
SendWorldMessage(""..head1.."速刷XS图书馆,来的M随便来野人和不小白的~~~|r")
end
if (m3 == 15) then
SendWorldMessage(""..head3.."XS自立队来菜刀和奶妈老手直接加|r")
end
if (m3 == 16) then
SendWorldMessage(""..head1.."血色求带会开BOSS|r")
end
if (m3 == 17) then
SendWorldMessage(""..head3.."求组XS修道院来熟练工速度开了+++|r")
end
if (m3 == 18) then
SendWorldMessage(""..head1.."血色钥匙,再组队刷下|r"..GetItemLink(7721)..""..GetItemLink(7721)..""..GetItemLink(7720).."|r|cffffc0c0会打BOSS的来|r")
end
if (m3 == 19) then
SendWorldMessage(""..head2.."~~收|r"..GetItemLink(2825)..""..GetItemLink(2825).."|cffffc0c0一把有的直接带价密~~|r")
end
if (m3 == 20) then
SendWorldMessage(""..head1.."XS教堂速度来刷|r"..GetItemLink(7726)..""..GetItemLink(7726).."|cffffc0c0的ZSMT过时不候|r")
end
if (m3 == 21) then
SendWorldMessage(""..head2.."收太阳草黄金参金珍珠有的带价M|r")
end
if (m3 == 22) then
SendWorldMessage(""..head3..""..Zones1[z2].."做任务组起速度开组来各种DPS|r")
end
if (m3 == 23) then
SendWorldMessage(""..head3..""..Zones1[z2].."PK的开组~~速刷任务顺道PK~~~来PVP牛人~~~|r")
end
if (m3 == 24) then
SendWorldMessage(""..head1.."收荆棘谷的青山1G一张或者换的M~~~~~~|r")
end
if (m3 == 25) then
SendWorldMessage(""..head1.."凄凉之地组队做任务的来,有高端任务插件,做"..GetItemLink(17705)..""..GetItemLink(17705).."|cffffc0c0的兄弟速度来强力治疗菜刀。。。|r")
end
if (m3 == 26) then
SendWorldMessage(""..head3.."联盟本诺莫瑞根有开组的没。。最好是能刷BOSS的。。|r")
end
if (m3 == 27) then
SendWorldMessage(""..head3.."诺莫瑞根的组起来。。。求MT带路大哥和奶妈|r")
end
if (m3 == 28) then
SendWorldMessage(""..head1.."求组侏儒副本"..GetItemLink(9456)..""..GetItemLink(9456)..""..GetItemLink(9459).."|cffffc0c0路熟打过的来。。。|r")
end
if (m3 == 29) then
SendWorldMessage(""..head1.."有做"..GetItemLink(2820)..""..GetItemLink(2820)..""..GetItemLink(11122).."|cffffc0c0的没速度组个~~~~|r")
end
if (m3 == 30) then
SendWorldMessage(""..head2.."高价收"..GetItemLink(1982)..""..GetItemLink(1982).."|cffffc0c0有的速度带价M。。。|r")
end
if (m3 == 31) then
SendWorldMessage(""..head2.."。。。求做"..GetItemLink(7961)..""..GetItemLink(7961).."|cffffc0c0会做的快M我。。。。。。|r")
end
if (m3 == 32) then
SendWorldMessage(""..head1.."组队开荒刷XS修道院全部刷速度走起MT已就位来治疗DPS。。。。|r")
end
if (m3 == 33) then
SendWorldMessage(""..head1.."血色不要"..GetItemLink(7723)..""..GetItemLink(7723).."|cffffc0c0的来直接组|r")
end
if (m3 == 34) then
SendWorldMessage(""..head3.."新人求组血色教堂。。。来MT治疗。。。|r")
end
if (m3 == 35) then
SendWorldMessage(""..head1.."大哥们你们卡么,我这怎么快掉线了。。。这什么破服务器。。。|r")
end
if (m3 == 36) then
SendWorldMessage(""..head1.."ADM刷戒指武器|r"..GetItemLink(11118)..""..GetItemLink(11118)..""..GetItemLink(9418).."|cffffc0c0的来人啊|r")
end
if (m3 == 37) then
SendWorldMessage(""..head1..""..Zones1[z2].."做任务的有没组起来的M|r")
end
if (m3 == 38) then
SendWorldMessage(""..head1.."求组做"..GetItemLink(6802)..""..GetItemLink(6802)..""..GetItemLink(6829).."|cffffc0c0任务的速度M。。。|r")
end
if (m3 == 39) then
SendWorldMessage(""..head2.."收本"..GetItemLink(16084)..""..GetItemLink(16084).."|cffffc0c0便宜的M。。。。|r")
end
if (m3 == 40) then
SendWorldMessage(""..head2.."收根魔杖|r"..GetItemLink(13064)..""..GetItemLink(13064).."|cffffc0c0有的带价M。。。。|r")
end
if (m3 == 41) then
SendWorldMessage(""..head1.."尼玛草了又被偷袭了。。一次来2个DZ真牛B啊。。。|r")
end
if (m3 == 42) then
SendWorldMessage(""..head1.."收大包一个会做的M。。。。|r")
end
if (m3 == 43) then
SendWorldMessage(""..head2.."求代做|r"..GetItemLink(10021)..""..GetItemLink(10021)..""..GetItemLink(10019).."|cffffc0c0有材料。。。。会做的M。。。。谢谢|r")
end
if (m3 == 44) then
SendWorldMessage(""..head1.."请问|r"..GetItemLink(18083)..""..GetItemLink(18083).."|cffffc0c0哪里出啊。。。。|r")
end
if (m3 == 45) then
SendWorldMessage(""..head3..""..Zones1[z2].."。。。"..Zones1[z2].."任务的M。。。|r")
end
if (m3 == 46) then
SendWorldMessage(""..head1.."吉兹洛克在哪里啊。。。人都转晕了急死了。。。!!|r")
end
if (m3 == 47) then
SendWorldMessage(""..head1.."问下需要学魔杖吗。。。!!|r")
end
if (m3 == 48) then
SendWorldMessage(""..head1.."》》》》问下老司机奥术水晶哪里挖啊》》》》|r")
end
if (m3 > 48) then
end
end
if (plv>1 and plv<36) then
local m4 = math.random(400)
if (m4 == 1) then
SendWorldMessage(""..head1..""..Zones1[z2].."有一起做任务的没,组个。。。|r")
end
if (m4 == 2) then
SendWorldMessage(""..head1.."求组剃刀沼泽,自立队来的M,速度开组~~|r")
end
if (m4 == 3) then
SendWorldMessage(""..head1.."求组矿井"..GetItemLink(7230)..""..GetItemLink(7230)..""..GetItemLink(5201).."|cffffc0c0的速度组起|r")
end
if (m4 == 4) then
SendWorldMessage(""..head1.."新手求组暴风监狱~~!!!刷"..GetItemLink(2941)..""..GetItemLink(2941).."|r|cffffc0c0做任务的组起|r")
end
if (m4 == 5) then
SendWorldMessage(""..head2.."死矿的来,速度开组!!|r")
end
if (m4 == 6) then
SendWorldMessage(""..head1.."剃刀沼泽开组速度来人随便来DPS奶妈优先|r")
end
if (m4 == 7) then
SendWorldMessage(""..head1.."求组监狱,加我个!!|r")
end
if (m4 == 8) then
SendWorldMessage(""..head1.."矿井速度来。。。随便来人开搞了!|r")
end
if (m4 == 9) then
SendWorldMessage(""..head1.."新人求问哪里学骑术买马啊。。。。|r")
end
if (m4 == 10) then
SendWorldMessage(""..head1.."新人求助部落恐龙哪里买啊。。。|r")
end
if (m4 == 11) then
SendWorldMessage(""..head1.."1G求法爷开个门 |r")
end
if (m4 == 12) then
SendWorldMessage(""..head1.."新人求带矿井~~~哪个大哥带下啊~~~|r")
end
if (m4 == 13) then
SendWorldMessage(""..head1.."萌新求助沼泽怎么走??|r")
end
if (m4 == 14) then
SendWorldMessage(""..head1.."刚才的SS哥拉下我我在"..Zones1[z2].."迷路了~~~|r")
end
if (m4 == 15) then
SendWorldMessage(""..head1.."骑术哪里学啊,求大神告诉一下!!|r")
end
if (m4 == 16) then
SendWorldMessage(""..head1.."新手请教怒焰裂谷怎么去???|r")
end
if (m4 == 17) then
SendWorldMessage(""..head1.."组队杀霍格,杀霍格的速度了~~~|r")
end
if (m4 == 18) then
SendWorldMessage(""..head1.."做副本任务,组队刷下哀嚎洞穴|r"..GetItemLink(6627)..""..GetItemLink(6627)..""..GetItemLink(6469).."|r|cffffc0c0会打BOSS的来|r")
end
if (m4 == 19) then
SendWorldMessage(""..head2.."~~收|r"..GetItemLink(21341)..""..GetItemLink(21341).."|cffffc0c0一个价格合适的带价密~~|r")
end
if (m4 == 20) then
SendWorldMessage(""..head2.."大量收|r"..GetItemLink(2592)..""..GetItemLink(2592)..""..GetItemLink(2840).."|cffffc0c0有的M支持邮寄|r")
end
if (m4 == 21) then
SendWorldMessage(""..head1..""..Zones1[z2].."做任务的有没!组个!|r")
end
if (m4 == 22) then
SendWorldMessage(""..head1..""..Zones1[z2].."做任务的开组!随便来人!|r")
end
if (m4 == 23) then
SendWorldMessage(""..head1..""..Zones1[z2].."PK~~~来PVP大神~~~|r")
end
if (m4 == 24) then
SendWorldMessage(""..head1..""..Zones1[z2].."做任务的密~~~~~~|r")
end
if (m4 == 25) then
SendWorldMessage(""..head1..""..Zones1[z2].."任务的组个啊来的兄弟速度M啊来强力PK菜刀和治疗。。。|r")
end
if (m4 == 26) then
SendWorldMessage(""..head1.."联盟本诺莫瑞根有开组的没。。最好是能刷BOSS的。。|r")
end
if (m4 == 27) then
SendWorldMessage(""..head1.."诺莫瑞根的组起来。。。求MT带路大哥和奶妈|r")
end
if (m4 == 28) then
SendWorldMessage(""..head1.."求组侏儒副本任务队"..GetItemLink(9279)..""..GetItemLink(9279).."|cffffc0c0会走后门的来。。。|r")
end
if (m4 == 29) then
SendWorldMessage(""..head1.."有做"..Classes1[i].."职业任务的没,速度组个~~~~|r")
end
if (m4 == 30) then
SendWorldMessage(""..head2.."高价收"..GetItemLink(1982)..""..GetItemLink(1982).."|cffffc0c0有的速度带价M。。。|r")
end
if (m4 == 31) then
SendWorldMessage(""..head2.."。。。求做"..GetItemLink(22246)..""..GetItemLink(22246).."|cffffc0c0会做的快M我。。。。。。|r")
end
if (m4 == 32) then
SendWorldMessage(""..head1.."组队开荒刷XS修道院全部刷速度走起MT已就位来治疗DPS。。。。|r")
end
if (m4 == 33) then
SendWorldMessage(""..head1..""..Zones1[z2].."做任务的没!组一下!|r")
end
if (m4 == 34) then
SendWorldMessage(""..head1..""..Zones1[z2].."做任务的组。。。|r")
end
if (m4 == 35) then
SendWorldMessage(""..head1.."星期几维护啊,有知道的没。。。|r")
end
if (m4 == 36) then
SendWorldMessage(""..head1.."坐骑哪里买啊!啊啊。。。|r")
end
if (m4 == 37) then
SendWorldMessage(""..head1.."小白请问中立拍卖行在哪里啊?|r")
end
if (m4 == 38) then
SendWorldMessage(""..head1.."地铁怎么走啊。。。|r")
end
if (m4 == 39) then
SendWorldMessage(""..head2.."收几组"..GetItemLink(4306)..""..GetItemLink(4306)..""..GetItemLink(3575).."|cffffc0c0便宜的M。。。。|r")
end
if (m4 == 40) then
SendWorldMessage(""..head2.."请问锡矿在哪里挖啊。。。。|r")
end
if (m4 == 41) then
SendWorldMessage(""..head1.."幽暗城飞艇在哪啊??|r")
end
if (m4 == 42) then
SendWorldMessage(""..head1.."萌新请问大神怎么去藏宝海湾啊??|r")
end
if (m4 == 43) then
SendWorldMessage(""..head2.."请问|r"..GetItemLink(13397)..""..GetItemLink(13397).."|cffffc0c0哪里出啊。。。。谢谢|r")
end
if (m4 == 44) then
SendWorldMessage(""..head1.."影牙的组起啊!!!菜刀速度来!!!|r")
end
if (m4 == 45) then
SendWorldMessage(""..head1.."影牙开组。。。。菜刀奶妈直接进。。。|r")
end
if (m4 == 46) then
SendWorldMessage(""..head1.."YY城堡开组。。。|r"..GetItemLink(6220)..""..GetItemLink(6220)..""..GetItemLink(6324).."|cffffc0c0菜刀奶妈直接进。。。|r")
end
if (m4 == 47) then
SendWorldMessage(""..head1..""..Zones1[z2].."做任务的组起。。。速度开打。。。|r")
end
if (m4 == 48) then
SendWorldMessage(""..head1.."怎么去黑海岸啊。。。求指教。。。|r")
end
if (m4 == 49) then
SendWorldMessage(""..head1.."要SS拉人的请点确认。。。|r")
end
if (m4 == 50) then
SendWorldMessage(""..head1.."请问"..Zones1[z2].."飞行点在哪里啊。。。|r")
end
if (m4 == 51) then
SendWorldMessage(""..head1.."请问"..GetItemLink(3358)..""..GetItemLink(3358).."|cffffc0c0哪里多啊。。。|r")
end
if (m4 == 52) then
SendWorldMessage(""..head1.."GM在吗能带我练练级吗。。。|r")
end
if (m4 == 53) then
SendWorldMessage(""..head1.."无聊人士组起。。。任务刷本PK随意。。。|r")
end
if (m4 > 53) then
end
end
end
end
end
end
local function Money_Change1(event, player)
if (player:IsInGroup()) then --不要删除此句,并发过高会宕机
else
if (player:GetGMRank()<1)then
local i2 = player:GetClass()
local head4 = "|cffffc0c0[2. 交易] "..Colors[i2].."[|Hplayer:"..player:GetName().."|h"..player:GetName().."]|r|cffffc0c0 "
for slot = 23, 38 do
local item = player:GetItemByPos( 255, slot )
if item then
if (item:GetQuality()>2) and (item:IsSoulBound()==false) then
local itk = item:GetItemLink(4)
local m6 = math.random(500)
if (m6 == 1) then
SendWorldMessage(""..head4.."有要"..itk..""..itk.."|cffffc0c0的没速度了太低了不回|r")
end
if (m6 == 2) then
SendWorldMessage(""..head4..""..itk..""..itk.."|cffffc0c0要的带价M~~~|r")
end
if (m6 == 3) then
SendWorldMessage(""..head4.."有要"..itk..""..itk.."|cffffc0c0的没需要的老板速度了价格面议|r")
end
if (m6 == 4) then
SendWorldMessage(""..head4.."有需要"..itk..""..itk.."|cffffc0c0的么进组交易价格好说|r")
end
if (m6 == 5) then
SendWorldMessage(""..head4.."机会!机会!忍痛甩卖"..itk..""..itk.."|cffffc0c0组我直接面谈交谈价格私聊|r")
end
if (m6 == 6) then
SendWorldMessage(""..head4.."极品出售"..itk..""..itk.."|cffffc0c0组我面谈交易|r")
end
if (m6 == 7) then
SendWorldMessage(""..head4.."。。。。。。。挥泪甩卖"..itk..""..itk.."|cffffc0c0需要的老板组我交易。。。。。。。|r")
end
if (m6 == 8) then
SendWorldMessage(""..head4.."。。。转让"..itk..""..itk.."|cffffc0c0需要的组我交易价格合适就出了。。。。|r")
end
if (m6 > 8) then
end
end
end
end
end
end
end
local function Kill_1(event, killer, killed)
local i3 = killer:GetClass()
local le = killer:GetLevel()
local string1 = ""..killer:GetName().."的BL"..Classes1[i3]..""
local string2 = ""..killer:GetName().."的LM"..Classes1[i3]..""
local i4 = killed:GetClass()
if (killed:IsInGroup()) then
else
if (killer == killed) then
else
if (killed:GetGMRank()<1)then
local z1 = killed:GetZoneId()
if (Zones1[z1] == nil) then
SendWorldMessage("|cffffc0c0[1. 综合] "..Colors[i4].."[|Hplayer:"..killed:GetName().."|h"..killed:GetName().."]|r|cffffc0c0 呼叫GM请告诉我这是哪里我传错地图了吗????????????????????|r")
else
if (killed:GetTeam()==0) then
local m7 = math.random(40)
local head5 = "|cffffc0c0[1. 综合] "..Colors[i4].."[|Hplayer:"..killed:GetName().."|h"..killed:GetName().."]|r|cffffc0c0 "
if (m7 == 1) then
SendWorldMessage(""..head5..""..Zones1[z1].."有BL~~~~呼叫大侠,快来~~~~给我报仇~~~~|r")
end
if (m7 == 2) then
SendWorldMessage(""..head5.."有来"..Zones1[z1].."杀BL的吗。。。速度来人。。|r")
end
if (m7 == 3) then
SendWorldMessage(""..head5..""..Zones1[z1].."发现BL。。。速度来强力人士|r")
end
if (m7 == 4) then
SendWorldMessage(""..head5.."没心思做任务了,有来"..Zones1[z1].."打架的吗开组打BL了|r")
end
if (m7 == 5) then
SendWorldMessage(""..head5.."惨啊,我在"..Zones1[z1].."被叫"..string1.."守尸了,求大神救命。。。。|r")
end
if (m7 == 6) then
SendWorldMessage(""..head5..""..Zones1[z1].."有个"..le.."级的BL到处杀人做不了任务有一起来PK的么|r")
end
if (m7 == 7) then
SendWorldMessage(""..head5.."我在"..Zones1[z1].."被一个叫"..string1.."打死几次了有PVP大神帮我报仇吗|r")
end
if (m7 == 8) then
SendWorldMessage(""..head5.."。。这什么情况。。杀我人算了,还要守我的尸??|r")
end
if (m7 == 9) then
SendWorldMessage(""..head5.."。。"..Zones1[z1].."做任务又被打死了。。叫"..string1.."你等着,我马上叫大号来。。|r")
end
if (m7 == 10) then
SendWorldMessage(""..head5.."我天真的以为我很强大。。直到我出门就遇见了个"..le.."级的BL杀手。。|r")
end
if (m7 == 11) then
SendWorldMessage(""..head5.."。。"..Zones1[z1].."寻求支援。。有大号的赶紧上啊。。|r")
end
if (m7 == 12) then
if (le==60) then
SendWorldMessage(""..head5..""..Zones1[z1].."有个叫"..string1.."大号到处杀小号。。求LM大号快来。。|r")
end
end
if (m7 > 12) then
end
end
if (killed:GetTeam()==1) then
local m8 = math.random(40)
local head6 = "|cffffc0c0[1. 综合] "..Colors[i4].."[|Hplayer:"..killed:GetName().."|h"..killed:GetName().."]|r|cffffc0c0 "
if (m8 == 1) then
SendWorldMessage(""..head6..""..Zones1[z1].."这有LM。。。快来人。。。没事干杀LM的来。。。。|r")
end
if (m8 == 2) then
SendWorldMessage(""..head6.."兄弟们快来"..Zones1[z1].."杀LM啊。。。顺便帮我报仇啊|r")
end
if (m8 == 3) then
SendWorldMessage(""..head6..""..Zones1[z1].."有一个"..le.."级的叫"..string2.."到处杀人。。。PK牛人快来啊|r")
end
if (m8 == 4) then
SendWorldMessage(""..head6.."有来"..Zones1[z1].."打架的吗组起打跑LM再做任务|r")
end
if (m8 == 5) then
SendWorldMessage(""..head6.."我在"..Zones1[z1].."被叫"..string2.."守尸,气人啊,快来各路武林高手。。。|r")
end
if (m8 == 6) then
SendWorldMessage(""..head6..""..Zones1[z1].."貌似又有架打了有开组来PK的么|r")
end
if (m8 == 7) then
SendWorldMessage(""..head6.."我在"..Zones1[z1].."被个"..le.."级的叫"..string2.."打死了,有大佬可以飞过来报仇么。。|r")
end
if (m8 == 8) then
SendWorldMessage(""..head6.."尼玛。。居然打不过。。。这服LM真牛B啊。。。|r")
end
if (m8 == 9) then
SendWorldMessage(""..head6.."。。这还让人活吗。。。PVP服务器就是凶残啊。。。|r")
end
if (m8 == 10) then
SendWorldMessage(""..head6.."。。又被联盟欺负了。。。大神们你们在哪里。。。|r")
end
if (m8 == 11) then
SendWorldMessage(""..head6.."|cffffc0c0我怎么又死了大家帮忙看看这是什么地方。。。怎么查看坐标啊。。|r")
end
if (m8 == 12) then
SendWorldMessage(""..head6.."。。"..Zones1[z1].."发现LM活动。。打架兼做任务的组起。。。|r")
end
if (m8 == 13) then
if (le==60) then
SendWorldMessage(""..head6..""..Zones1[z1].."有个叫"..string2.."大号到处捣乱。。求BL大佬快来帮忙。。|r")
end
end
if (m8 > 13) then
end
end
end
end
end
end
end
RegisterPlayerEvent(14, Money_Change1)
RegisterPlayerEvent(37, Loot_money1)
RegisterPlayerEvent(6, Kill_1)