[Request Lua] Orc Battlefield Quest

[BanzBoyz77]

Hey guys, I'm here to ask for a mega big and awesome script. Since I'm a beginner Lua scripter but my server has high demands on lua quests, I decided to ask you guys for help. The lua is to contain the following for Rep:

• Mounting of a Horde Demolisher upon accepting quest id 94000.
• Spawn one npc in multipule places (Battle feeling) Npc Ids: 94003, 94010,94011, 94006
• Dismount Player from Demolisher after quest 94000 is complete. Keep army spawned
• After quest id 94001 is accepted, Alliance Catapults appear, npc id: 94012
• Army respawns over and over.
• Upon accepting quest id: 94000, a song starts playing: Put a sign in the song numbers place and put a note what I need to replace.
• Song repeats playing untill forced to stop at the end of completeing quest id: 94001
• At beginning of quest accept 94000, npc 94004 says: Scouting of Alliance Forces, prepare for battle!
• After npc 94004 says his line, npc 94000 says: Go recruit, help us fight off the Alliance from Durotar.

That's it. It seems like a lot but for an expert Lua scripting its an estimated 10 mins of work for 3 reps. Thanks guys

[stoneharry]

I'll do this later if nobody else does. Busy atm.

[BanzBoyz77]

Ty Stoneharry, also forgot to mention. Npc 94003, 94010,94011, 94006 are suppose to disappear after quest complete 94001.

[stoneharry]

I gave this script a shot, however the logic behind it is not clear. Also it would be much, much more effective to do this via phasing. Npc's appearing/disappearing depending on quest + respawning? Phasing sounds perfect to me.

Phase 1 is default, phase 2 is a separate realm. So when quest is accepted, change to phase 3 (you can see 1 and 2) but have the enemies and the vehicle in phase 2. That way it works as normal but you can only see them on the quest.

However I have not used phasing in the basic script I have created so far, let me know what you want to do and I can fix up the script to your liking:

local Call = nil

function OnQuestAccept(event, plr, questId, pUnit)
	if (questId == 94000) then
		plr:SetMount(1) -- Mount(displayID) - ArcEmu does not support vehicles by default
		pUnit:SpawnCreature(94003, x, y, z, o, faction, 0) -- Fill this in
		pUnit:SpawnCreature(94010, x, y, z, o, faction, 0) -- Fill this in
		pUnit:SpawnCreature(94011, x, y, z, o, faction, 0) -- Fill this in
		pUnit:SpawnCreature(94006, x, y, z, o, faction, 0) -- Fill this in
		pUnit:PlaySoundToSet(soundID) -- Fill this in
		RegisterTimedEvent("Check_If_Player_On_Quest", 120000, 0, plr) -- 120000 = 120 seconds = 2mins, change to duration of song
		Call:SendChatMessage(12,0,"Alliance scouted, prepare for battle!")
		RegisterTimedEvent("Let_The_Main_Guy_Talk_quest", 4000, 1, pUnit)
	elseif (questId == 94001) then
		pUnit:SpawnCreature(94012, x, y, z, o, faction, 0) -- Fill this in
	end
end

function zzz_OnQuestFinished(event, plr, QuestId, pQuestGiver)
	if (QuestId == 94000) then
		plr:Dismount() -- Reset
	end
end

RegisterServerHook(14, "zzz_OnQuestAccept")
RegisterServerHook(22, "zzz_OnQuestFinished")

function OnSpawn_Define_ToCall(pUnit, Event)
	Call = pUnit
end

RegisterUnitEvent(94004, 18, "OnSpawn_Define_ToCall")

function Check_If_Player_On_Quest(plr)
	if plr ~= nil then
		if plr:HasQuest(94000) then
			plr:PlaySoundToSet(soundID) -- Play Sound
		else
			RemoveTimedEvents()
		end
	else
		RemoveTimedEvents()
	end
end

function Let_The_Main_Guy_Talk_quest(pUnit)
	pUnit:SendChatMessage(12,0,"Go recruit, help us fight off the Alliance from Durotar.")
end

--[[
Mounting of a Horde Demolisher upon accepting quest id 94000.
Spawn one npc in multipule places (Battle feeling) Npc Ids: 94003, 94010,94011, 94006
Dismount Player from Demolisher after quest 94000 is complete. Keep army spawned
After quest id 94001 is accepted, Alliance Catapults appear, npc id: 94012
Army respawns over and over. -- NOT DONE
Upon accepting quest id: 94000, a song starts playing: Put a sign in the song numbers place and put a note what I need to replace.
Song repeats playing untill forced to stop at the end of completeing quest id: 94001
At beginning of quest accept 94000, npc 94004 says: Scouting of Alliance Forces, prepare for battle!
After npc 94004 says his line, npc 94000 says: Go recruit, help us fight off the Alliance from Durotar.

Npc 94003, 94010,94011, 94006 are suppose to disappear after quest complete 94001.
]]

I highly recommend the use of phasing! Without it this quest would be messy and buggy, however with it, it would be fluent and look good.

[BanzBoyz77]

Say I wanted to use phase, could you script the new script without spawning of npcs? Just replace the spawning of npcs with changing phases on accepting quests plz. and then it will be perfect and full of rep.

[stoneharry]

Is the second NPC that sends the message already spawned (permanently)?

So far:

local Call = nil

function OnQuestAccept(event, plr, questId, pUnit)
	if (questId == 94000) then
		plr:SetMount(1) -- Mount(displayID) - ArcEmu does not support vehicles by default
		plr:SetPhase(3) -- 1 (default) and 2
		pUnit:PlaySoundToSet(soundID) -- Fill this in, it's the sound ID of the song
		RegisterTimedEvent("Check_If_Player_On_Quest", 120000, 0, plr) -- 120000 = 120 seconds = 2mins, change to duration of song
		Call:SendChatMessage(12,0,"Alliance scouted, prepare for battle!")
		RegisterTimedEvent("Let_The_Main_Guy_Talk_quest", 4000, 1, pUnit)
	elseif (questId == 94001) then
		pUnit:SpawnCreature(94012, x, y, z, o, faction, 0) -- Fill this in, npc that spawns on next quest
	end
end

function zzz_OnQuestFinished(event, plr, QuestId, pQuestGiver)
	if (QuestId == 94000) then
		plr:Dismount() -- Reset
		plr:SetPhase(1) -- Back to normal
	end
end

RegisterServerHook(14, "zzz_OnQuestAccept")
RegisterServerHook(22, "zzz_OnQuestFinished")

function OnSpawn_Define_ToCall(pUnit, Event)
	Call = pUnit
end

RegisterUnitEvent(94004, 18, "OnSpawn_Define_ToCall")

function Check_If_Player_On_Quest(plr)
	if plr ~= nil then
		if plr:HasQuest(94000) then
			plr:PlaySoundToSet(soundID) -- Play Sound ID
		else
			RemoveTimedEvents()
		end
	else
		RemoveTimedEvents()
	end
end

function Let_The_Main_Guy_Talk_quest(pUnit)
	pUnit:SendChatMessage(12,0,"Go recruit, help us fight off the Alliance from Durotar.")
end

--[[
Mounting of a Horde Demolisher upon accepting quest id 94000.
Spawn one npc in multipule places (Battle feeling) Npc Ids: 94003, 94010,94011, 94006
Dismount Player from Demolisher after quest 94000 is complete. Keep army spawned
After quest id 94001 is accepted, Alliance Catapults appear, npc id: 94012
Army respawns over and over. -- NOT DONE
Upon accepting quest id: 94000, a song starts playing: Put a sign in the song numbers place and put a note what I need to replace.
Song repeats playing untill forced to stop at the end of completeing quest id: 94001
At beginning of quest accept 94000, npc 94004 says: Scouting of Alliance Forces, prepare for battle!
After npc 94004 says his line, npc 94000 says: Go recruit, help us fight off the Alliance from Durotar.

Npc 94003, 94010,94011, 94006 are suppose to disappear after quest complete 94001.

You will need to fill parts in.

[BanzBoyz77]

Yes the second npc is already spawned, he is quest giver. And how does the vehicle thing work. Do they get abilities?

[stoneharry]

"Mounting of a Horde Demolisher upon accepting quest id 94000."
^
ArcEmu does not support vehicles so I don't know how you want me to do this...

[BanzBoyz77]

GOT IT, replace mounting demolisher with changing their displayid. Ill give them an item that they will use to cast the demolisher spells

[stoneharry]

local Call = nil

function OnQuestAccept(event, plr, questId, pUnit)
	if (questId == 94000) then
		plr:SetModel(4) -- Change to DisplayID of demolisher
		plr:SetPhase(3) -- 1 (default) and 2
		pUnit:PlaySoundToSet(soundID) -- Fill this in, it's the sound ID of the song
		RegisterTimedEvent("Check_If_Player_On_Quest", 120000, 0, plr) -- 120000 = 120 seconds = 2mins, change to duration of song
		Call:SendChatMessage(12,0,"Alliance scouted, prepare for battle!")
		RegisterTimedEvent("Let_The_Main_Guy_Talk_quest", 4000, 1, pUnit)
	elseif (questId == 94001) then
		pUnit:SpawnCreature(94012, x, y, z, o, faction, 0) -- Fill this in, npc that spawns on next quest
	end
end

function zzz_OnQuestFinished(event, plr, QuestId, pQuestGiver)
	if (QuestId == 94000) then
		plr:Demorph()
		plr:SetPhase(1) -- Back to normal
	end
end

RegisterServerHook(14, "zzz_OnQuestAccept")
RegisterServerHook(22, "zzz_OnQuestFinished")

function OnSpawn_Define_ToCall(pUnit, Event)
	Call = pUnit
end

RegisterUnitEvent(94004, 18, "OnSpawn_Define_ToCall")

function Check_If_Player_On_Quest(plr)
	if plr ~= nil then
		if plr:HasQuest(94000) then
			plr:PlaySoundToSet(soundID) -- Play Sound ID
		else
			RemoveTimedEvents()
		end
	else
		RemoveTimedEvents()
	end
end

function Let_The_Main_Guy_Talk_quest(pUnit)
	pUnit:SendChatMessage(12,0,"Go recruit, help us fight off the Alliance from Durotar.")
end

That script does everything you want, however you will have to setup the enemies etc in the second phase through the DB (spawning in game while in phase 2).

[BanzBoyz77]

Thanks mate, +rep