Lua/EnterJeton.lua at master · 29Hido/Lua · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
local JetonT1 = 3000004
local JetonT2 = 3000005
local JetonT3 = 3000006
local JetonT4 = 3000007
local JetonMM = 3000008

local function HasJeton(event, player)
	local pMap = player:GetMapId()
	if(pMap == 543)then
		if(player:HasItem(JetonT1, 1) or player:IsGM() == true)then
			player:RemoveItem( JetonT1, 1 )
			player:SendBroadcastMessage( "Tu as perdu un jeton d'accès pour être entré dans l'instance." );
		else
			player:SendBroadcastMessage( "Tu n'as pas le jeton d'accès..." );
		end
	elseif(pMap == 209)then
		if(player:HasItem(JetonT2, 1) or player:IsGM() == true)then
			player:RemoveItem( JetonT2, 1 )
			player:SendBroadcastMessage( "Tu as perdu un jeton d'accès pour être entré dans l'instance." );
			local creatures = player:GetCreaturesInRange( 2000000 )
			for _,v in pairs(creatures) do
				v:AddAura(80867, v)
				v:AddAura(80870, v)
				v:AddAura(80868, v)
			end
		else
			player:SendBroadcastMessage( "Tu n'as pas le jeton d'accès..." );
		end
	elseif(pMap == 533)then
		if(player:HasItem(JetonT3, 1) or player:IsGM() == true)then
			player:RemoveItem( JetonT3, 1 )
			player:SendBroadcastMessage( "Tu as perdu un jeton d'accès pour être entré dans l'instance." );
			local creatures = player:GetCreaturesInRange( 2000000 )
			for _,v in pairs(creatures) do
				v:AddAura(80867, v)
				v:AddAura(80868, v)
				v:AddAura(80866, v)
			end
		else
			player:SendBroadcastMessage( "Tu n'as pas le jeton d'accès..." );
			player:Teleport(571, 2938.6572, 73.6227, 6.9898, 1.5813);
		end
	elseif(pMap == 603)then
		if(player:HasItem(JetonT4, 1) or player:IsGM() == true)then
			player:RemoveItem( JetonT4, 1 )
			player:SendBroadcastMessage( "Tu as perdu un jeton d'accès pour être entré dans l'instance." );
		else
			player:SendBroadcastMessage( "Tu n'as pas le jeton d'accès..." );
			player:Teleport(571, 2938.6572, 73.6227, 6.9898, 1.5813);
		end
	elseif(pMap == 389)then
		if(player:HasItem(JetonMM, 1) or player:IsGM() == true)then
			player:RemoveItem( JetonMM, 1 )
			player:SendBroadcastMessage( "Tu as perdu un jeton d'accès pour être entré dans l'instance." );
		else
			player:SendBroadcastMessage( "Tu n'as pas le jeton d'accès..." );
		end
	end
end

local function T7(event, player)
	local pMap = player:GetMapId()
	if(pMap == 249)then
		local i = 0;
		local AverageItemLevel = player:GetAverageItemLevel();
		ItemLevelTotal = 0;
		local pGroup = player:GetGroup();
		if(pGroup)then
			local gMembers = pGroup:GetMembers();
			for k,v in pairs(gMembers) do
				if(v:GetAverageItemLevel() >= 600)then
					pIlevelAverage = v:GetAverageItemLevel();
				else
					pIlevelAverage = 600;
				end
				ItemLevelTotal = ItemLevelTotal + pIlevelAverage;
			end
			local gMembersCount = pGroup:GetMembersCount();
			local ItemLevelGroupAverage = ItemLevelTotal / gMembersCount;
			player:SendBroadcastMessage(ItemLevelGroupAverage);
			local Stack = (AverageItemLevel-600)/100;
			local creatures = player:GetCreaturesInRange( 20000000 )
				for _,v in pairs(creatures) do
					local cMaxHealth = v:GetMaxHealth();
					v:RemoveAura(200024);
					v:RemoveAura(200025);
					v:RemoveAura(200026);
					if(cMaxHealth <= 2000000000)then
						for i=1,Stack do
							v:AddAura(200024, v);
							v:AddAura(200025, v);
							v:AddAura(200026, v);
						end
					else
						for i=1,Stack do
							v:AddAura(200024, v);
							v:AddAura(200024, v);
							v:AddAura(200026, v);
						end
					end
					for k=1,gMembersCount do
						v:AddAura(200024, v);
						v:AddAura(200025, v);
						v:AddAura(200026, v);
					end
				end
		else
			if(AverageItemLevel >= 600)then
				AverageItemLevel = AverageItemLevel
			else
				AverageItemLevel = 600;
			end
			local Stack = (AverageItemLevel-600)/100;
			local creatures = player:GetCreaturesInRange( 20000000 )
				for _,v in pairs(creatures) do
					local cMaxHealth = v:GetMaxHealth();
					v:RemoveAura(200024);
					v:RemoveAura(200025);
					v:RemoveAura(200026);
					if(cMaxHealth <= 2000000000)then
						for i=1,Stack do
							v:AddAura(200024, v);
							v:AddAura(200025, v);
							v:AddAura(200026, v);
						end
					else
						for i=1,Stack do
							v:AddAura(200024, v);
							v:AddAura(200024, v);
							v:AddAura(200026, v);
						end
					end
					v:AddAura(200024, v);
					v:AddAura(200025, v);
					v:AddAura(200026, v);
				end
		end
	end
end
RegisterPlayerEvent( 28, T7 )
RegisterPlayerEvent( 33, T7 )
RegisterPlayerEvent( 28, HasJeton )

local console = debug.getinfo (1, "S").short_src;
print("- "..console);