-
Notifications
You must be signed in to change notification settings - Fork 12
/
Hardcore.lua
60 lines (55 loc) · 2.37 KB
/
Hardcore.lua
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
--NPC id
local hcNPC = 90000
--This is how long the character is locked for - default is 32 years.
local banTimer = 999999999
--on death function - checks if player has token and bans character if it does.
local function PlayerDeath(event, killer, killed)
if killed:HasItem(90000,1) and killed:GetLevel() == 1 then
print(killed:GetName() .. " was killed by " .. killer:GetName())
SendWorldMessage(killed:GetName() .. " was killed by " .. killer:GetName())
Ban(1,killed:GetName(),banTimer)
end
end
--First Gossip Screen for NPC
function OnFirstTalk(event, player, unit)
if player:GetLevel() == 1 then
player:PlayDistanceSound(20431)
player:GossipMenuAddItem(0, "Looking for a challenge? Click here to try hardcore mode!", 0, 1)
player:GossipSendMenu(1, unit)
else
player:SendBroadcastMessage("You must be level 1 to access hardcore mode.")
player:PlayDistanceSound(20432)
player:GossipComplete()
end
end
--Selection for NPC gossip
function OnSelect(event, player, unit, sender, intid, code)
if intid == 1 then
player:PlayDistanceSound(20433)
player:GossipMenuAddItem(0, "Just double checking to make sure that you want to turn on hardcore mode. This will lock the character after death to be no longer playable, remove all your current gold, remove bonus starter items and Murky will no longer be with you! I will likely be adding rewards for reaching certain stages of the game later...", 0, 2)
player:GossipMenuAddItem(0, "NO TAKE ME BACK!", 0, 3)
player:GossipSendMenu(2, unit)
end
end
--if player chooses to do hardcore they receive the token and have custom items and Murky removed
function OnHardCore(event, player, unit, sender, intid, code)
if intid == 2 then
player:PlayDistanceSound(20434)
player:AddItem(90000, 1)
player:SetCoinage(0)
player:RemoveItem(60002, player:GetItemCount(60002))
player:RemoveItem(10594, player:GetItemCount(10594))
player:RemoveItem(65000, player:GetItemCount(65000))
player:RemoveSpell(24939)
player:RemoveSpell(100117)
player:RemoveSpell(100118)
--else gossip ends
else
player:GossipComplete()
player:PlayDistanceSound(20434)
end
end
RegisterCreatureGossipEvent(hcNPC, 1 , OnFirstTalk)
RegisterCreatureGossipEvent(hcNPC, 2, OnSelect)
RegisterCreatureGossipEvent(hcNPC, 2, OnHardCore)
RegisterPlayerEvent(8, PlayerDeath)