API tools faq
paste
Advertisement
Guest User

Untitled

a guest
Apr 3rd, 2013
78
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 10.89 KB | None | 0 0
raw download clone embed print report
  1. --[[
  2.   _____                        ____              
  3.  |  ___| __ ___ _______ _ __  / ___|___  _ __ ___
  4.  | |_ | '__/ _ \_  / _ \ '_ \| |   / _ \| '__/ _ \
  5.  |  _|| | | (_) / /  __/ | | | |__| (_) | | |  __/
  6.  |_|  |_|  \___/___\___|_| |_|\____\___/|_|  \___|
  7.      Lightning speed and strength
  8.          conjured directly from the depths of logic!  
  9.             Prismatic-Network 2013 (C) by Psykko
  10. <--------------------------------------------------------------------------->
  11.  - Entwickler: Psykko
  12.  - Fortschritt: 100%
  13.  - Titel: 'Playertreff Wache'
  14.  - Kommentar: Basierend auf den Blizzard Hauptstädte Wachen. Zeigen dir auf der Karte die Punkte von
  15. <--------------------------------------------------------------------------->
  16. ]]
  17.  
  18. local wachenpc = 999997
  19.  
  20. function PTWacheOnTalk(pUnit, event, pPlayer)
  21. pUnit:GossipCreateMenu(987, pPlayer, 0)
  22. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Spell_Holy_Flashheal:24|t|rIch suche einen Lehrer f\195\188r Zauber", 1, 0)
  23. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Stone_Weightstone_01:24|t|rIch suche einen Lehrer f\195\188r Berufe", 2, 0)
  24. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Misc_Pet_02:24|t|rIch suche einen Fris\195\182r", 3, 0)
  25. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Sword_01:24|t|rIch suche einen Waffenmeister", 4, 0)
  26. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_Tabard_Scourge:24|t|rIch suche einen Gildenmeister", 5, 0)
  27. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Misc_Key_06:24|t|rIch suche einen Gastwirt", 6, 0)
  28. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Misc_Pet_02:24|t|rIch suche einen Reitlehrer", 7, 0)
  29. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Misc_Bag_09:24|t|rIch suche die Bank", 8, 0)
  30. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Achievement_Pvp_P_250k:24|t|rIch suche den Duellplatz", 9, 0)
  31. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Misc_Coin_01:24|t|rIch suche das Auctionshaus", 10, 0)
  32. pUnit:GossipMenuAddItem(30, "Auf Wiedersehen", 11, 0)
  33. pUnit:GossipSendMenu(pPlayer)
  34. end
  35.  
  36. function PTWacheOnSelect(pUnit, event, pPlayer, id, pIntid, code)
  37. if (pIntid == 500) then
  38. pUnit:GossipCreateMenu(987, pPlayer, 0)
  39. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Spell_Holy_Flashheal:24|t|rIch suche einen Lehrer f\195\188r Zauber", 1, 0)
  40. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Stone_Weightstone_01:24|t|rIch suche einen Lehrer f\195\188r Berufe", 2, 0)
  41. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Misc_Pet_02:24|t|rIch suche einen Fris\195\182r", 3, 0)
  42. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Sword_01:24|t|rIch suche einen Waffenmeister", 4, 0)
  43. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Misc_Tournaments_Tabard_Scourge:24|t|rIch suche einen Gildenmeister", 5, 0)
  44. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Misc_Key_06:24|t|rIch suche einen Gastwirt", 6, 0)
  45. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Misc_Pet_02:24|t|rIch suche einen Reitlehrer", 7, 0)
  46. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Misc_Bag_09:24|t|rIch suche die Bank", 8, 0)
  47. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Achievement_Pvp_P_250k:24|t|rIch suche den Duellplatz", 9, 0)
  48. pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Misc_Coin_01:24|t|rIch suche das Auctionshaus", 10, 0)
  49. pUnit:GossipMenuAddItem(30, "Auf Wiedersehen", 11, 0)
  50. pUnit:GossipSendMenu(pPlayer)
  51. end
  52.  
  53. if (pIntid == 11) then
  54. pPlayer:GossipComplete()
  55. end
  56.  
  57. if (pIntid == 1) then -- Klassenlehrer
  58.     pUnit:GossipCreateMenu(988, pPlayer, 0)
  59.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Ability_Warrior_Battleshout:24|t|rKriegerlehrer", 20, 0)
  60.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Spell_Holy_GreaterBlessingOfKings:24|t|rPaladinlehrer", 21, 0)
  61.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Spell_Holy_Heal:24|t|rPristerlehrer", 22, 0)
  62.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Spell_Fire_Fireball02:24|t|rMagierlehrer", 23, 0)
  63.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Spell_Deathknight_Armyofthedead:24|t|rTodesritterlehrer", 24, 0)
  64.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Spell_Shadow_Burningspirit:24|t|rHexenmeisterlehrer", 25, 0)
  65.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Spell_Nature_Bloodlust:24|t|rSchamenenlehrer", 26, 0)
  66.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Ability_Hunter_Aimedshot:24|t|rJ\195\164gerlehrer", 27, 0)
  67.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Ability_Rogue_Kidneyshot:24|t|rSchurkenlehrer", 28, 0)
  68.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Spell_Nature_Natureguardian:24|t|rDruidenlehrer", 29, 0)
  69.     pUnit:GossipMenuAddItem(30, "[Zur\195\188ck]", 500, 0)
  70.     pUnit:GossipSendMenu(pPlayer)
  71. end
  72.  
  73. if (pIntid == 2) then -- Berufelehrer
  74.     pUnit:GossipCreateMenu(988, pPlayer, 0)
  75.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Trade_Blacksmithing:24|t|rSchmiedkunst", 30, 0)
  76.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Potion_112:24|t|rAlchemie", 31, 0)
  77.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Trade_Engraving:24|t|rVerzauberungskunst", 32, 0)
  78.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Misc_Herb_04:24|t|rKr\195\164uterkunde", 33, 0)
  79.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Ore_Copper_01:24|t|rBergbau", 34, 0)
  80.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Trade_Engineering:24|t|rEngineerkunst", 35, 0)
  81.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Scroll_04:24|t|rInschriftenkunde", 36, 0)
  82.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Misc_Gem_Diamond_06:24|t|rJuwelenschleifen", 37, 0)
  83.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Trade_Leatherworking:24|t|rLederverarbeitung", 38, 0)
  84.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Misc_Pelt_Bear_02:24|t|rK\195\188rschner", 39, 0)
  85.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Misc_Bandage_01:24|t|rErste Hilfe", 40, 0)
  86.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Inv_Misc_Food_01:24|t|rKochkunst", 41, 0)
  87.     pUnit:GossipMenuAddItem(30, "|cff00ff00|TInterface\\icons\\Trade_Tailoring:24|t|rSchneiderei", 42, 0)
  88.     pUnit:GossipMenuAddItem(30, "[Zur\195\188ck]", 500, 0)
  89.     pUnit:GossipSendMenu(pPlayer)
  90. end
  91.  
  92. if (pIntid == 3) then -- Barber
  93. pUnit:GossipSendPOI(-9610.226562, 1648.580444, 7, 6, 0, "Barber")
  94. pPlayer:GossipComplete()
  95. end
  96.  
  97. if (pIntid == 4) then -- Waffenmeister
  98. pUnit:GossipSendPOI(-9545.774414, 1605.978394, 7, 6, 0, "Waffenmeister")
  99. pPlayer:GossipComplete()
  100. end
  101.  
  102. if (pIntid == 5) then -- Gildenmeister
  103. pUnit:GossipSendPOI(-9410.320312, 1692.449951, 7, 6, 0, "Gildenmeister")
  104. pPlayer:GossipComplete()
  105. end
  106.  
  107. if (pIntid == 6) then -- Gastwirt
  108. pUnit:GossipSendPOI(-9626.150391, 1649.640015, 7, 6, 0, "Gastwirt")
  109. pPlayer:GossipComplete()
  110. end
  111.  
  112. if (pIntid == 7) then -- Reitlehrer
  113. pUnit:GossipSendPOI(-9657.700195, 1627.479980, 7, 6, 0, "Reitlehrer")
  114. pPlayer:GossipComplete()
  115. end
  116.  
  117. if (pIntid == 8) then -- Bank
  118. pUnit:GossipSendPOI(-9419.330078, 1701.260010, 7, 6, 0, "Bank")
  119. pPlayer:GossipComplete()
  120. end
  121.  
  122. if (pIntid == 9) then -- PVP
  123. pUnit:GossipSendPOI(-9746.795898, 1637.063599, 7, 6, 0, "PVP")
  124. pPlayer:GossipComplete()
  125. end
  126.  
  127. if (pIntid == 10) then -- Auctionshaus
  128. pUnit:GossipSendPOI(-9412.459961, 1673.229980, 7, 6, 0, "Auctionshaus")
  129. pPlayer:GossipComplete()
  130. end
  131.  
  132. if (pIntid == 20) then -- Krieger
  133. pUnit:GossipSendPOI(-9534.450195, 1545.400024, 7, 6, 0, "Kriegerlehrer")
  134. pPlayer:GossipComplete()
  135. end
  136.  
  137. if (pIntid == 21) then -- Paladin
  138. pUnit:GossipSendPOI(-9541.019531, 1540.069946, 7, 6, 0, "Paladinlehrer")
  139. pPlayer:GossipComplete()
  140. end
  141.  
  142. if (pIntid == 22) then -- Prister
  143. pUnit:GossipSendPOI(-9555.059570, 1582.180054, 7, 6, 0, "Pristerlehrer")
  144. pPlayer:GossipComplete()
  145. end
  146.  
  147. if (pIntid == 23) then -- Magier
  148. pUnit:GossipSendPOI(-9545.160156, 1573.689941, 7, 6, 0, "Magierlehrer")
  149. pPlayer:GossipComplete()
  150. end
  151.  
  152. if (pIntid == 24) then -- Todesritter
  153. pUnit:GossipSendPOI(-9543.799805, 1548.839966, 7, 6, 0, "Todesritterlehrer")
  154. pPlayer:GossipComplete()
  155. end
  156.  
  157. if (pIntid == 25) then -- Hexenmeister
  158. pUnit:GossipSendPOI(-9545.150391, 1582.709961, 7, 6, 0, "Hexenmeisterlehrer")
  159. pPlayer:GossipComplete()
  160. end
  161.  
  162. if (pIntid == 26) then -- Schamane
  163. pUnit:GossipSendPOI(-9549.410156, 1586.719971, 7, 6, 0, "Schamanenlehrer")
  164. pPlayer:GossipComplete()
  165. end
  166.  
  167. if (pIntid == 27) then -- Jäger
  168. pUnit:GossipSendPOI(-9542.530273, 1582.150024, 7, 6, 0, "J\195\164gerlehrer")
  169. pPlayer:GossipComplete()
  170. end
  171.  
  172. if (pIntid == 28) then -- Schurke
  173. pUnit:GossipSendPOI(-9497.269531, 1586.430054, 7, 6, 0, "Schurkenlehrer")
  174. pPlayer:GossipComplete()
  175. end
  176.  
  177. if (pIntid == 29) then -- Druide
  178. pUnit:GossipSendPOI(-9505.019531, 1596.099976, 7, 6, 0, "Druidenlehrer")
  179. pPlayer:GossipComplete()
  180. end
  181.  
  182. if (pIntid == 30) then -- Schmied
  183. pUnit:GossipSendPOI(-9709.269531, 1690.020020, 7, 6, 0, "Schmiedkunst")
  184. pPlayer:GossipComplete()
  185. end
  186.  
  187. if (pIntid == 31) then -- Alch
  188. pUnit:GossipSendPOI(-9560.339844, 1699.469971, 7, 6, 0, "Alchemie")
  189. pPlayer:GossipComplete()
  190. end
  191.  
  192. if (pIntid == 32) then -- VZ
  193. pUnit:GossipSendPOI(-9725.990234, 1755.810059, 7, 6, 0, "Verzauberungskunst")
  194. pPlayer:GossipComplete()
  195. end
  196.  
  197. if (pIntid == 33) then -- Kräuter
  198. pUnit:GossipSendPOI(-9566.589844, 1681.569946, 7, 6, 0, "Kr\195\164terkunde")
  199. pPlayer:GossipComplete()
  200. end
  201.  
  202. if (pIntid == 34) then -- Bergbau
  203. pUnit:GossipSendPOI(-9712.450195, 1682.530029, 7, 6, 0, "Bergbau")
  204. pPlayer:GossipComplete()
  205. end
  206.  
  207. if (pIntid == 35) then -- Engi
  208. pUnit:GossipSendPOI(-9707.870117, 1682.250000, 7, 6, 0, "Engineerkunst")
  209. pPlayer:GossipComplete()
  210. end
  211.  
  212. if (pIntid == 36) then -- Inschriften
  213. pUnit:GossipSendPOI(-9644.290039, 1650.630005, 7, 6, 0, "Inschriftenkunde")
  214. pPlayer:GossipComplete()
  215. end
  216.  
  217. if (pIntid == 37) then -- Juwe
  218. pUnit:GossipSendPOI(-9746.690430, 1727.579956, 7, 6, 0, "Juwelenschleifen")
  219. pPlayer:GossipComplete()
  220. end
  221.  
  222. if (pIntid == 38) then -- Leder
  223. pUnit:GossipSendPOI(-9583.120117, 1747.979980, 7, 6, 0, "Lederverarbeitung")
  224. pPlayer:GossipComplete()
  225. end
  226.  
  227. if (pIntid == 39) then -- Kürschner
  228. pUnit:GossipSendPOI(-9586.780273, 1755.540039, 7, 6, 0, "K195\188rschner")
  229. pPlayer:GossipComplete()
  230. end
  231.  
  232. if (pIntid == 40) then -- Erste Hilfe
  233. pUnit:GossipSendPOI(-9632.030273, 1653.439941, 7, 6, 0, "Erste Hilfe")
  234. pPlayer:GossipComplete()
  235. end
  236.  
  237. if (pIntid == 41) then -- Kochen
  238. pUnit:GossipSendPOI(-9614.500000, 1635.500000, 7, 6, 0, "Kochkunst")
  239. pPlayer:GossipComplete()
  240. end
  241.  
  242. if (pIntid == 42) then -- Schneider
  243. pUnit:GossipSendPOI(-9723.839844, 1758.579956, 7, 6, 0, "Schneiderei")
  244. pPlayer:GossipComplete()
  245. end
  246. end
  247.  
  248. RegisterUnitGossipEvent(wachenpc, 1, "PTWacheOnTalk")
  249. RegisterUnitGossipEvent(wachenpc, 2, "PTWacheOnSelect")
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement
Public Pastes
Advertisement
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!