Lua script frage

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

    • Lua script frage

      Moin Zusammen,

      ich möchte eine custom boss so schreiben dass er an einen zufälligen punkt einen Add spawn und diese besagte Add
      soll direket zum Boss laufen und ihn heilen oder einen Damage buff geben(wecheles von dabei ich nehme weiß ich noch nicht).
      Jetzt ist nur meine frage weiß jemand wie ich das am besten schreiben kann oder mir eine vorlage geben kann?


      Boss Script
    • ich bin gerade nicht an meinem pc aber du machst folgendes:

      Boss -> der boss
      Mob -> dein npc der den spell castet.

      Rand = math.random(5, 8)
      If (Boss:GetHealthPct() == 50 ) then
      Mob = Boss:SpawnCreature(id, Boss:GetX() + Rand , Boss:GetY() + Rand , Boss:GetZ(), Boss:GetO(), Boss:GetFaction(), 10000)

      If (Mob ~= nil)
      x = Boss:GetX() y = Boss:GetY() z = Boss:GetZ() Mob:MoveTo(x, y , z)
      Mob:CastSpellOnTarget(id, Boss)


      So in etwa sollte es aussehen ^^

      Dieser Beitrag wurde bereits 1 mal editiert, zuletzt von aaron02 ()

    • Ich weiß der post ist schon fast 1 Jahr alt aber hier ist mal ein alter World of Warcraft AscEmu World Boss denn ich für einen Fun Server geschrieben habe.

      C-Quellcode

      1. --[[Made By PassCody]]--
      2. --[[World of Warcraft Vendor Script]]--
      3. local BossID = 700000
      4. local EinSchlaefern = 20669
      5. local InsenktenSchwarm = 58852
      6. local TodUndVerfall = 71001
      7. local MordLust = 51690
      8. local BerserkerPhase = 28498
      9. local phase = 0
      10. function Deathroc_OnEinSchlaefern (pUnit, Event)
      11. pUnit:FullCastSpellOnTarget(EinSchlaefern, pUnit:GetRandomPlayer())
      12. end
      13. function Deathroc_OnInsenktenSchwarm (pUnit, event, player)
      14. pUnit:CastSpell(InsenktenSchwarm)
      15. end
      16. function Deathroc_OnTodUndVerfall (pUnit, event, player)
      17. pUnit:CastSpell(TodUndVerfall)
      18. end
      19. function Deathroc_OnMordLust (pUnit, event, player)
      20. pUnit:FullCastSpellOnTarget(MordLust, pUnit:GetRandomPlayer())
      21. end
      22. function Deathroc_OnSpawnCreature1(pUnit, event, player)
      23. pUnit:SpawnCreature(700001, -9346.664062, 177.327301, 61.558193, 5.709037, 17, 45000)
      24. pUnit:SpawnCreature(700001, -9346.664062, 171.327301, 61.558193, 5.709037, 17, 45000)
      25. pUnit:SpawnCreature(700001, -9346.664062, 171.713745, 61.558193, 5.709037, 17, 45000)
      26. pUnit:SpawnCreature(700001, -9341.453125, 186.093231, 61.557121, 4.207363, 17, 45000)
      27. pUnit:SpawnCreature(700001, -9337.453125, 186.093231, 61.557121, 4.207363, 17, 45000)
      28. pUnit:SpawnCreature(700001, -9326.453125, 186.093231, 61.557121, 4.207363, 17, 45000)
      29. end
      30. function Deathroc_OnSpawnCreature2(pUnit, event, player)
      31. pUnit:SpawnCreature(700002, pUnit:GetX()+math.random(1,6), pUnit:GetY() + math.random(1,6), pUnit:GetZ() + math.random(2,4), pUnit:GetO(), 17, 45000)
      32. pUnit:SpawnCreature(700002, pUnit:GetX()+math.random(1,6), pUnit:GetY() + math.random(1,6), pUnit:GetZ() + math.random(2,4), pUnit:GetO(), 17, 45000)
      33. pUnit:SpawnCreature(700002, pUnit:GetX()+math.random(1,6), pUnit:GetY() + math.random(1,6), pUnit:GetZ() + math.random(2,4), pUnit:GetO(), 17, 45000)
      34. pUnit:SpawnCreature(700002, pUnit:GetX()+math.random(1,6), pUnit:GetY() + math.random(1,6), pUnit:GetZ() + math.random(2,4), pUnit:GetO(), 17, 45000)
      35. pUnit:SpawnCreature(700002, pUnit:GetX()+math.random(1,6), pUnit:GetY() + math.random(1,6), pUnit:GetZ() + math.random(2,4), pUnit:GetO(), 17, 45000)
      36. pUnit:SpawnCreature(700002, pUnit:GetX()+math.random(1,6), pUnit:GetY() + math.random(1,6), pUnit:GetZ() + math.random(2,4), pUnit:GetO(), 17, 45000)
      37. end
      38. function Deathroc_OnCombat(Unit, Event)
      39. Unit:SendChatMessage(12, 0, "Wer wagt es meine Ruhe zu st\195\182ren?")
      40. Unit:RegisterEvent("Deathroc_OnPhase1", 1000, 0)
      41. end
      42. function Deathroc_OnPhase1(Unit, Event)
      43. Unit:RemoveEvents()
      44. Unit:SendChatMessage(14, 0, "Nun gut, dann Spürt meine D\195\164monische Kraft!")
      45. Unit:RegisterEvent("Deathroc_OnEinSchlaefern", 150000, 0)
      46. Unit:RegisterEvent("Deathroc_OnInsenktenSchwarm", 8000, 0)
      47. Unit:RegisterEvent("Deathroc_OnTodUndVerfall", 12000, 0)
      48. Unit:RegisterEvent("Deathroc_OnMordLust", 20000, 0)
      49. phase = 1
      50. Unit:RegisterEvent("Deathroc_OnPhase2", 20000, 0)
      51. end
      52. function Deathroc_OnPhase2(Unit, Event)
      53. if Unit:GetHealthPct() < 75 and phase == 1 then
      54. Unit:RemoveEvents()
      55. Unit:SendChatMessage(12, 0, "Ihr lebt ja immer noch... Nun Gut.")
      56. Unit:SendChatMessage(14, 0, "Kommt herbei meine Guhle!")
      57. Unit:RegisterEvent("Deathroc_OnSpawnCreature1", 45000, 0)
      58. Unit:RegisterEvent("Deathroc_OnEinSchlaefern", 150000, 0)
      59. Unit:RegisterEvent("Deathroc_OnInsenktenSchwarm", 8000, 0)
      60. Unit:RegisterEvent("Deathroc_OnTodUndVerfall", 12000, 0)
      61. Unit:RegisterEvent("Deathroc_OnMordLust", 20000, 0)
      62. phase = 2
      63. Unit:RegisterEvent("Deathroc_OnPhase3", 20000, 0)
      64. end
      65. end
      66. function Deathroc_OnPhase3(Unit, Event)
      67. if Unit:GetHealthPct() < 50 and phase == 2 then
      68. Unit:RemoveEvents()
      69. Unit:SendChatMessage(12, 0, "Ihr seit hartn\195\164ckig... Also Gut.")
      70. Unit:SendChatMessage(14, 0, "Kommt herbei Ihr Verlorene Seelen!")
      71. Unit:RegisterEvent("Deathroc_OnSpawnCreature2", 45000, 0)
      72. Unit:RegisterEvent("Deathroc_OnEinSchlaefern", 15000, 0)
      73. Unit:RegisterEvent("Deathroc_OnInsenktenSchwarm", 8000, 0)
      74. Unit:RegisterEvent("Deathroc_OnTodUndVerfall", 12000, 0)
      75. Unit:RegisterEvent("Deathroc_OnMordLust", 20000, 0)
      76. phase = 3
      77. Unit:RegisterEvent("Deathroc_OnPhase4", 20000, 0)
      78. end
      79. end
      80. function Deathroc_OnPhase4(Unit, Event)
      81. if Unit:GetHealthPct() < 25 and phase == 3 then
      82. Unit:RemoveEvents()
      83. Unit:SendChatMessage(12, 0, "Ihr seit hartn\195\164ckig... Also Gut.")
      84. Unit:SendChatMessage(14, 0, "Kommt herbei all meine Diener!")
      85. Unit:RegisterEvent("Deathroc_OnSpawnCreature1", 45000, 0)
      86. Unit:RegisterEvent("Deathroc_OnSpawnCreature2", 45000, 0)
      87. Unit:RegisterEvent("Deathroc_OnEinSchlaefern", 15000, 0)
      88. Unit:RegisterEvent("Deathroc_OnInsenktenSchwarm", 8000, 0)
      89. Unit:RegisterEvent("Deathroc_OnTodUndVerfall", 12000, 0)
      90. Unit:RegisterEvent("Deathroc_OnMordLust", 20000, 0)
      91. phase = 4
      92. Unit:RegisterEvent("Deathroc_OnPhase5", 20000, 0)
      93. end
      94. end
      95. function Deathroc_OnPhase5(Unit, Event)
      96. if Unit:GetHealthPct() < 5 and phase == 4 then
      97. Unit:RemoveEvents()
      98. Unit:SendChatMessage(12, 0, "IHR...")
      99. Unit:SendChatMessage(12, 0, "MACHT...")
      100. Unit:SendChatMessage(12, 0, "MICH....")
      101. Unit:SendChatMessage(14, 0, "W\195\156TENT!")
      102. Unit:CastSpell(BerserkerPhase)
      103. Unit:SetScale(1.7)
      104. Unit:RegisterEvent("Deathroc_OnBerserkerPhase", 20000, 0)
      105. end
      106. end
      107. function Deathroc_OnBerserkerPhase(Unit, Event)
      108. Unit:RemoveEvents()
      109. Unit:RegisterEvent("Deathroc_OnSpawnCreature1", 45000, 0)
      110. Unit:RegisterEvent("Deathroc_OnSpawnCreature2", 45000, 0)
      111. Unit:RegisterEvent("Deathroc_OnEinSchlaefern", 15000, 0)
      112. Unit:RegisterEvent("Deathroc_OnInsenktenSchwarm", 8000, 0)
      113. Unit:RegisterEvent("Deathroc_OnTodUndVerfall", 12000, 0)
      114. Unit:RegisterEvent("Deathroc_OnMordLust", 20000, 0)
      115. end
      116. function Deathroc_OnLeaveCombat(Unit, Event)
      117. Unit:RemoveEvents()
      118. end
      119. function Deathroc_OnKillTarget(Unit, Event)
      120. Unit:SendChatMessage(14, 0, "Ihr seid nichts weiter als kleine lachhafte W\195\188rmer!")
      121. Unit:RemoveEvents()
      122. end
      123. function Deathroc_OnDeath(Unit, Event)
      124. Unit:SendChatMessage(14, 0, "NEIN! DAS KANN NICHT SEIN!")
      125. end
      126. RegisterUnitEvent(BossID, 1, "Deathroc_OnCombat")
      127. RegisterUnitEvent(BossID, 2, "Deathroc_OnLeaveCombat")
      128. RegisterUnitEvent(BossID, 3, "Deathroc_OnKillTarget")
      129. RegisterUnitEvent(BossID, 4, "Deathroc_OnDeath")
      Alles anzeigen
      viel Spaß und gutes Gelingen.

      Cordinaten musst man natürlich anpassen ;)

      MFG

      PassCody

      P.S.: Den Tag bitte drin lassen.