Plr is nil value

[Xmaily]

I'm trying to script a quest and I keep getting this error Attempt to index local "Plr" <a nil value>

Here is the code:

if(intid == 5) then
pUnit:GossipCreateMenu(3544, player, 0)
pUnit:SendChatMessage(12, 0, "Thanks for the Help!", 0, 0)
pUnit:Emote(1, 5000)
pUnit:RegisterEvent("Testquest", 1000, 1)
pUnit:GossipSendMenu(player)
end
end

RegisterUnitGossipEvent(97582, 1, "Teleport_on_gossip_talk")
RegisterUnitGossipEvent(97582, 2, "Teleport_on_gossip_select")

function Testquest(pUnit, Event, Plr)
if Player:HasQuest(QuestID) then
Plr:AdvanceQuestObjective(QuestID, 0)
end
end

[stoneharry]

function Testquest(pUnit, Event, Plr)
if Player:HasQuest(QuestID) then
Plr:AdvanceQuestObjective(QuestID, 0)
end
end

You pass in the value Plr then use Player on the next line which is not going to exist.

Also you should post the full script and the error line number.

[Xmaily]

function Testquest(pUnit, Event, Plr)
if Player:HasQuest(QuestID) then
Plr:AdvanceQuestObjective(QuestID, 0)
end
end

You pass in the value Plr then use Player on the next line which is not going to exist.

Also you should post the full script and the error line number.

local QuestID = 90072

function Teleport_on_gossip_talk(pUnit, event, player)
pUnit:GossipCreateMenu(3544, player, 0)
pUnit:GossipMenuAddItem(0, "You need to get out of here Quickly! It's not safe here.", 5, 0)
pUnit:GossipSendMenu(player)
end

function Teleport_on_gossip_select(pUnit, event, player, id, intid, code)

if(intid == 5) then
pUnit:GossipCreateMenu(3544, player, 0) 
pUnit:SendChatMessage(12, 0, "Thanks for the Help!", 0, 0)
pUnit:Emote(1, 5000)
pUnit:RegisterEvent("TestFunction", 1000, 1)
pUnit:RegisterEvent("Citizendespawn", 5000, 1)
pUnit:GossipSendMenu(player)
end
end

RegisterUnitGossipEvent(97582, 1, "Teleport_on_gossip_talk")
RegisterUnitGossipEvent(97582, 2, "Teleport_on_gossip_select")

function Orggruntevent_OnSpawn(pUnit, Event)
        pUnit:Emote(430, 4000)
end

function Orggruntevent_OnCombat(pUnit, Event, Plr)
	pUnit:RemoveEvents()
end

function Orggruntevent_OnKilledPlayer(pUnit, Event, Plr)
end

function Orggruntevent_OnLeaveCombat(pUnit, Event, Plr)
	pUnit:RemoveEvents()
end

function Orggruntevent_OnDied(pUnit, Event, Plr)
	pUnit:RemoveEvents()
end

RegisterUnitEvent(97582, 1, Orggruntevent_OnCombat)
RegisterUnitEvent(97582, 2, Orggruntevent_OnLeaveCombat)
RegisterUnitEvent(97582, 3, Orggruntevent_OnKilledPlayer)
RegisterUnitEvent(97582, 4, Orggruntevent_OnDied)
RegisterUnitEvent(97582, 18, Orggruntevent_OnSpawn)

function TestFunction(pUnit, Event, Plr)
	if Plr:HasQuest(QuestID) then
		Plr:AdvanceQuestObjective(QuestID, 0)
	end
end

    function Citizendespawn(pUnit, Event, Plr)
            pUnit:CastSpell(51347)
            pUnit:Despawn(1600, 0)
    end

The Error Line is if Plr:HasQuest(QuestID) then wit the error Attempt to index local "Plr" <a nil value>

I change that silly mistake of Player and Plr but it's still giving me a error.

[stoneharry]

I'll be surprised if this even slightly worked.

Try this:

local QuestID = 90072

function Teleport_on_gossip_talk(pUnit, event, player)
	pUnit:GossipCreateMenu(3544, player, 0)
	pUnit:GossipMenuAddItem(0, "You need to get out of here Quickly! It's not safe here.", 5, 0)
	pUnit:GossipSendMenu(player)
end

function Teleport_on_gossip_select(pUnit, event, player, id, intid, code)
	if(intid == 5) then
		pUnit:SendChatMessage(12, 0, "Thanks for the Help!", 0, 0)
		pUnit:Emote(1, 5000)
		pUnit:RegisterEvent("TestFunction", 1000, 1)
		pUnit:RegisterEvent("Citizendespawn", 5000, 1)
		player:GossipComplete()
	end
end

RegisterUnitGossipEvent(97582, 1, "Teleport_on_gossip_talk")
RegisterUnitGossipEvent(97582, 2, "Teleport_on_gossip_select")

function Orggruntevent_OnSpawn(pUnit, Event)
    pUnit:Emote(430, 0)
end

function Orggruntevent_OnCombat(pUnit, Event, Plr)
	pUnit:RemoveEvents()
end

function Orggruntevent_OnKilledPlayer(pUnit, Event, Plr)
end

function Orggruntevent_OnLeaveCombat(pUnit, Event, Plr)
	pUnit:RemoveEvents()
end

function Orggruntevent_OnDied(pUnit, Event, Plr)
	pUnit:RemoveEvents()
end

RegisterUnitEvent(97582, 1, Orggruntevent_OnCombat)
RegisterUnitEvent(97582, 2, Orggruntevent_OnLeaveCombat)
RegisterUnitEvent(97582, 3, Orggruntevent_OnKilledPlayer)
RegisterUnitEvent(97582, 4, Orggruntevent_OnDied)
RegisterUnitEvent(97582, 18, Orggruntevent_OnSpawn)

function TestFunction(pUnit, Event)
	local Plr = pUnit:GetClosestPlayer()
	if Plr and Plr:HasQuest(QuestID) then
		Plr:AdvanceQuestObjective(QuestID, 0)
	end
end

function Citizendespawn(pUnit, Event, Plr)
	pUnit:CastSpell(51347)
	pUnit:Despawn(1600, 0)
end

Player is not a variable passed with a registered unit event.