Gastwirt und .co über Lua schreiben?

    This site uses cookies. By continuing to browse this site, you are agreeing to our Cookie Policy.

    • Gastwirt und .co über Lua schreiben?

      Hallo zusammen,

      Ich wollte mal wissen ob es möglich wäre einen Gastwirt, BG Meister, Bankier und Autopionier in einen NPC zu schreiben und wenn ja wie und was muss ich beachten?

      Meine kleine Idee war das hier:

      C Source Code

      1. local NpcID = 46023
      2. function AllInOne_OnGossip(pUnit,event,player)
      3. pUnit:VendorRemoveAllItems()
      4. pUnit:GossipCreateMenu(100, player, 0)
      5. pUnit:GossipMenuAddItem(3, "Mein Zuhause hier her setzen.",1,0)
      6. pUnit:GossipMenuAddItem(3, "Mein Bankfach \195\182ffnen.",2,0)
      7. pUnit:GossipMenuAddItem(3, "Ich m\195\182chte die Auktionen sehen.",3,0)
      8. pUnit:GossipMenuAddItem(3, "Ich m\195\182chte an einem Bettalground teil nehmen.",4,0)
      9. pUnit:GossipMenuAddItem(0, "[Tsch\195\188\195\159]",485,0)
      10. pUnit:GossipSendMenu(player)
      11. end
      12. function AllInOne_OnSelect(pUnit,event,player,id,intid,code)
      13. if (intid == 1) then
      14. pUnit:SendInnkeeperWindow("ERR_DEATHBIND_SUCCESS_S")
      15. player:GossipComplete()
      16. end
      17. if (intid == 2) then
      18. pUnit:SendBankWindow()
      19. player:GossipComplete()
      20. end
      21. if (intid == 3) then
      22. pUnit:SendAuctionWindow()
      23. player:GossipComplete()
      24. end
      25. if (intid == 4) then
      26. pUnit:SendBattlegroundWindow()
      27. player:GossipComplete()
      28. end
      29. if (intid == 485) then
      30. pUnit:SendChatMessageToPlayer(8, 0, "Hab einen Schönen Tag", player)
      31. player:GossipComplete()
      32. end
      33. end
      34. RegisterUnitGossipEvent(NpcID, 1, "AllInOne_OnGossip")
      35. RegisterUnitGossipEvent(NpcID, 2, "AllInOne_OnSelect")
      36. --------------------------
      37. ----[[Made by RyffLe]]----
      38. --[[Made for MSCrew.de]]--
      39. --------------------------
      Display All
      Wäre net wenn mir jemand helfen könnte.


      Mit freundlichen Grüßen,

      RyffLe aka. Chris
    • Ok habs ungefähr hin bekommen hier der script:


      C Source Code

      1. local NpcID = 46023
      2. function AllInOne_OnGossip(pUnit,event,player)
      3. pUnit:VendorRemoveAllItems()
      4. pUnit:GossipCreateMenu(100, player, 0)
      5. pUnit:GossipMenuAddItem(3, "Mein Zuhause hier her setzen.",1,0)
      6. pUnit:GossipMenuAddItem(3, "Mein Bankfach \195\182ffnen.",2,0)
      7. pUnit:GossipMenuAddItem(3, "Ich m\195\182chte die Auktionen sehen.",3,0)
      8. pUnit:GossipMenuAddItem(3, "Ich m\195\182chte an einem Bettalground teil nehmen.",4,0)
      9. pUnit:GossipMenuAddItem(0, "[Tsch\195\188\195\159]",485,0)
      10. pUnit:GossipSendMenu(player)
      11. end
      12. function AllInOne_OnSelect(pUnit,event,player,id,intid,code)
      13. if (intid == 1) then
      14. player:SendInnkeeperWindow(pUnit)
      15. player:GossipComplete()
      16. end
      17. if (intid == 2) then
      18. player:SendBankWindow(pUnit)
      19. player:GossipComplete()
      20. end
      21. if (intid == 3) then
      22. player:SendAuctionWindow(pUnit)
      23. player:GossipComplete()
      24. end
      25. if (intid == 4) then
      26. player:SendBattlegroundWindow(pUnit)
      27. player:GossipComplete()
      28. end
      29. if (intid == 485) then
      30. pUnit:SendChatMessageToPlayer(8, 0, "Hab einen Schönen Tag", player)
      31. player:GossipComplete()
      32. end
      33. end
      34. RegisterUnitGossipEvent(NpcID, 1, "AllInOne_OnGossip")
      35. RegisterUnitGossipEvent(NpcID, 2, "AllInOne_OnSelect")
      36. --------------------------
      37. ----[[Made by RyffLe]]----
      38. --[[Made for MSCrew.de]]--
      39. --------------------------
      Display All
      der Fehler liegt noch bei Punkt 3 und 4 ;) bin am arbeiten daran.

      Der Script ist Open sorce könnt ihr gerne verwenden.