Advertisement
Bwl-Network

StartNpc

Aug 19th, 2012
158
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 1.75 KB | None | 0 0
  1. function On_Gossip(pUnit, Event, player)
  2.     pUnit:GossipCreateMenu(3000, player, 0)
  3.     local race=player:GetPlayerRace()
  4.     if race==1 or race==3 or race==4 or race==7 or race==11 then
  5.         pUnit:GossipMenuAddItem(0, "Level 80 und Zum Playertreff", 1, 0)
  6.         pUnit:GossipMenuAddItem(0, "Ich brauche Gold", 2, 0)
  7.     end
  8.     local race=player:GetPlayerRace()
  9.     if race==2 or race==5 or race==6 or race==8 or race==10 then
  10.         pUnit:GossipMenuAddItem(0, "Level 80 und Zum Playertreff", 1, 0)
  11.         pUnit:GossipMenuAddItem(0, "Ich brauche Gold", 2, 0)
  12.     end
  13.     pUnit:GossipSendMenu(player)
  14. end
  15.  
  16.  
  17. function Gossip_Submenus(pUnit, Event, player, id, intid, code)
  18.     if(intid == 999) then
  19.         pUnit:GossipCreateMenu(3000, player, 0)
  20.         local race=player:GetPlayerRace()
  21.         if race==1 or race==3 or race==4 or race==7 or race==11 then
  22.             pUnit:GossipMenuAddItem(0, "Level 80 und Zum Playertreff", 1, 0)
  23.             pUnit:GossipMenuAddItem(0, "Ich brauche Gold", 2, 0)
  24.         end
  25.         local race=player:GetPlayerRace()
  26.         if race==2 or race==5 or race==6 or race==8 or race==10 then
  27.         pUnit:GossipMenuAddItem(0, "Level 80 und Zum Playertreff", 1, 0)
  28.         pUnit:GossipMenuAddItem(0, "Ich brauche Gold", 2, 0)
  29.         end
  30.         pUnit:GossipSendMenu(player)
  31.     end
  32.    
  33.     if(intid == 1) then
  34.         pUnit:GossipCreateMenu(3000, player, 0)
  35.         player:SetLevel(80)
  36.         player:Teleport(571, 3581.429199, 209.008408, -120.071693, 0.206670)
  37.     end
  38.    
  39.     if(intid == 2) then
  40.         pUnit:GossipCreateMenu(3000, player, 0)
  41.     pUnit:SendChatMessage(12, 0, "Du bekommst von mir Gold")
  42.     end
  43. end
  44.  
  45. RegisterUnitGossipEvent(50, 1, "On_Gossip")
  46. RegisterUnitGossipEvent(50, 2, "Gossip_Submenus")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement