Gastwirt und .co über Lua schreiben?

    Diese Seite verwendet Cookies. Durch die Nutzung unserer Seite erklären Sie sich damit einverstanden, dass wir Cookies setzen. Weitere Informationen

    • 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-Quellcode

      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. --------------------------
      Alles anzeigen
      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-Quellcode

      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. --------------------------
      Alles anzeigen
      der Fehler liegt noch bei Punkt 3 und 4 ;) bin am arbeiten daran.

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