Hei
Verified Member
- 7
- 2015
- 2
Professions Teacher [GERMAN]
Description:
•Teaches the professions
Tested and working under TC Cata: Yes
In this paste the professions are in german
I hope you like it
Description:
•Teaches the professions
Tested and working under TC Cata: Yes
In this paste the professions are in german
I hope you like it
Code:
--[[
Do not repost without my permission.
Do not take credits for what you haven't scripted.
------------------------------------------------------
- Developer: Hei
- Complete: 100% with ElunaTrinityCata
- ScriptName: 'Professionsteacher'
]]
local npcid = 600025
function Vendor_OnGossip(event, player, unit)
player:GossipMenuAddItem(3, "Berufe", 0, 100)
player:GossipMenuAddItem(6, "Schlie\195\159en", 0, 500)
player:GossipSendMenu(1, unit)
end
function Vendor_OnSelect(event, player, unit, id, intid, code)
if (intid == 100) then
player:GossipMenuAddItem(3, "Alchemie", 0, 1)
player:GossipMenuAddItem(3, "Schmiedekunst", 0, 2)
player:GossipMenuAddItem(3, "Verzauberungskunst", 0, 3)
player:GossipMenuAddItem(3, "Ingenieurskunst", 0, 4)
player:GossipMenuAddItem(3, "Kr\195\164uterkunde", 0, 5)
player:GossipMenuAddItem(3, "Inschriftkunde", 0, 6)
player:GossipMenuAddItem(3, "Juwelenschleifen", 0, 7)
player:GossipMenuAddItem(3, "Lederverarbeitung", 0, 8)
player:GossipMenuAddItem(3, "Bergbau", 0, 9)
player:GossipMenuAddItem(3, "K\195\188rschnern", 0, 10)
player:GossipMenuAddItem(3, "Schneiderei", 0, 14)
player:GossipMenuAddItem(3, "Arch\195\164ologie", 0, 16)
player:GossipMenuAddItem(5, "Setzen Sie meinen Beruf F\195\164higkeiten auf 525", 0,15)
player:GossipMenuAddItem(3, "[Back]", 0, 500)
player:GossipSendMenu(1, unit)
end
--Alchemy
if(intid == 1) then
player:GossipMenuAddItem(3, "Verlerne Alchimie", 0, 415)
player:GossipMenuAddItem(3, "Lerne Alchimie", 0, 416)
player:GossipSendMenu(1, unit)
end
--BlackSmithing
if(intid == 2) then
player:GossipMenuAddItem(3, "Verlerne Schmiedekunst", 0, 417)
player:GossipMenuAddItem(3, "Lerne Schmiedekunst", 0, 418)
player:GossipSendMenu(1, unit)
end
--Enchanting
if(intid == 3) then
player:GossipMenuAddItem(3, "Verlerne Verzauberungskunst", 0, 419)
player:GossipMenuAddItem(3, "Lerne Verzauberungskunst", 0, 420)
player:GossipSendMenu(1, unit)
end
--Engineering
if(intid == 4) then
player:GossipMenuAddItem(3, "Verlerne Ingenieurskunst", 0, 421)
player:GossipMenuAddItem(3, "Lerne Ingenieurskunst", 0, 422)
player:GossipSendMenu(1, unit)
end
--Herbalism
if(intid == 5) then
player:GossipMenuAddItem(3, "Verlerne Kr\195\164uterkunde", 0, 423)
player:GossipMenuAddItem(3, "Lerne Kr\195\164uterkunde", 0, 424)
player:GossipSendMenu(1, unit)
end
--Inscription
if(intid == 6) then
player:GossipMenuAddItem(3, "Verlerne Inschriftenkunde", 0, 425)
player:GossipMenuAddItem(3, "Lerne Inschriftenkunde", 0, 426)
player:GossipSendMenu(1, unit)
end
--Jewelcrafting
if(intid == 7) then
player:GossipMenuAddItem(3, "Verlerne Juwelenschleifen", 0, 427)
player:GossipMenuAddItem(3, "Lerne Juwelenschleifen", 0, 428)
player:GossipSendMenu(1, unit)
end
--Leatherworking
if(intid == 8) then
player:GossipMenuAddItem(3, "Verlerne Lederverarbeitung", 0, 429)
player:GossipMenuAddItem(3, "Lerne Lederverarbeitung", 0, 430)
player:GossipSendMenu(1, unit)
end
--Mining
if(intid == 9) then
player:GossipMenuAddItem(3, "Verlerne Bergbau", 0, 431)
player:GossipMenuAddItem(3, "Lerne Bergbau", 0, 432)
player:GossipSendMenu(1, unit)
end
--Skinning
if(intid == 10) then
player:GossipMenuAddItem(3, "Verlerne K\195\188rschnern", 0, 433)
player:GossipMenuAddItem(3, "Lerne K\195\188rschnern", 0, 434)
player:GossipSendMenu(1, unit)
end
--Tailor
if(intid == 14) then
player:GossipMenuAddItem(3, "Verlerne Schneiderei", 0, 441)
player:GossipMenuAddItem(3, "Lerne Schneiderei", 0, 442)
player:GossipSendMenu(1, unit)
end
--Archaeology
if(intid == 16) then
player:GossipMenuAddItem(3, "Verlerne Arch\195\164ologie", 0, 443)
player:GossipMenuAddItem(3, "Lerne Arch\195\164ologie", 0, 444)
player:GossipSendMenu(1, unit)
end
--This is the unlearn/learn procces
if(intid == 415) then
player:RemoveSpell(80731)
player:GossipComplete()
end
if(intid == 416) then
player:LearnSpell(80731)
player:GossipComplete()
end
if(intid == 417) then
player:RemoveSpell(76666)
player:GossipComplete()
end
if(intid == 418) then
player:LearnSpell(76666)
player:GossipComplete()
end
if(intid == 419) then
player:RemoveSpell(74258)
player:GossipComplete()
end
if(intid == 420) then
player:LearnSpell(74258)
player:GossipComplete()
end
if(intid == 421) then
player:RemoveSpell(82774)
player:GossipComplete()
end
if(intid == 422) then
player:LearnSpell(82774)
player:GossipComplete()
end
if(intid == 423) then
player:RemoveSpell(74519)
player:GossipComplete()
end
if(intid == 424) then
player:LearnSpell(74519)
player:GossipComplete()
end
if(intid == 425) then
player:RemoveSpell(86008)
player:GossipComplete()
end
if(intid == 426) then
player:LearnSpell(86008)
player:GossipComplete()
end
if(intid == 427) then
player:RemoveSpell(73318)
player:GossipComplete()
end
if(intid == 428) then
player:LearnSpell(73318)
player:GossipComplete()
end
if(intid == 429) then
player:RemoveSpell(81199)
player:GossipComplete()
end
if(intid == 430) then
player:LearnSpell(81199)
player:GossipComplete()
end
if(intid == 431) then
player:RemoveSpell(74517)
player:GossipComplete()
end
if(intid == 432) then
player:LearnSpell(74517)
player:GossipComplete()
end
if(intid == 433) then
player:RemoveSpell(74522)
player:GossipComplete()
end
if(intid == 434) then
player:LearnSpell(74522)
player:GossipComplete()
end
if(intid == 441) then
player:RemoveSpell(75156)
player:GossipComplete()
end
if(intid == 442) then
player:LearnSpell(75156)
player:GossipComplete()
end
if(intid == 443) then
player:RemoveSpell(51308)
player:GossipComplete()
end
if(intid == 444) then
player:LearnSpell(89722)
player:LearnSpell(74268)
player:LearnSpell(80451)
player:GossipComplete()
end
if (intid == 15) then
player:AdvanceSkill(333, 525)
player:AdvanceSkill(197, 525)
player:AdvanceSkill(202, 525)
player:AdvanceSkill(755, 525)
player:AdvanceSkill(171, 525)
player:AdvanceSkill(164, 525)
player:AdvanceSkill(182, 525)
player:AdvanceSkill(165, 525)
player:AdvanceSkill(186, 525)
player:AdvanceSkill(393, 525)
player:AdvanceSkill(185, 525)
player:AdvanceSkill(129, 525)
player:AdvanceSkill(356, 525)
player:AdvanceSkill(773, 525)
player:AdvanceSkill(794, 525)
player:GossipComplete()
end
if (intid == 500) then
player:GossipComplete()
end
end
RegisterCreatureGossipEvent(npcid, 1, Vendor_OnGossip)
RegisterCreatureGossipEvent(npcid, 2, Vendor_OnSelect)