Advertisement
Guest User

Untitled

a guest
Jun 4th, 2014
219
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
Lua 39.22 KB | None | 0 0
  1. local NpcGoblinID = 90021
  2. local MenuGoblinID = 1243878
  3. local crystal = "|TInterface\\icons\\FB415EF44E64A165E29BD1EBCD747627.blp:16:16|t"
  4. local currency = 150006
  5.  
  6. local RULON_LNYANAYA_TKAN = 2996
  7. local TONKAYA_NIT = 2321
  8. local RULON_SHERSTI = 2997
  9. local TIGROVII_GLAZ = 818
  10. local MOXOVII_AGAT = 1206
  11. local SHELKOVAYA_NIT = 4291
  12. local RULON_SHELKA = 4305
  13. local MAGICHESKAYA_TKAN = 4339
  14. local JESTKAYA_KOJA = 2319
  15. local TOLSTAYA_KOJA = 4234
  16. local OBRABOTANNAYA_PLOTNAYA_SHKURA = 8172
  17. local PLOTNAYA_KOJA = 4304
  18. local JELEZNII_SLITOK = 3575
  19. local MALENKAYA_BLESTASHAYA_JEMCHUZHINA = 5498
  20. local MALAXIT = 774
  21. local STALNOI_SLITOK = 3859
  22. local MIFRILOVII_SLITOK = 3860
  23. local PROCHNII_PRIKLAD = 4400
  24. local DEREVYANNI_PRIKLAD = 4399
  25.  
  26. local function OnGossipHelloGoblin(event, player, object)
  27.     player:GossipClearMenu()
  28.     local chartype = WorldDBQuery("SELECT type FROM roleplay_characters WHERE player = '"..player:GetName().."';")
  29.     if (chartype and chartype:GetInt32(0)==0) then
  30.     player:GossipMenuAddItem(3, "Прокачка профессий", 1, 1)
  31.     player:GossipMenuAddItem(6, "Обмен "..crystal.." на реагенты", 1, 2)
  32.     player:GossipMenuAddItem(1, "Покупка инструментов. 50 "..crystal, 1, 3)
  33.     end
  34.     player:GossipMenuAddItem(6, "Обмен "..crystal.." на золото (100 осколков - 2.5 золотые)", 1, 4)
  35.     player:GossipMenuAddItem(0, "До скорого!", 1, 228)
  36.     player:GossipSendMenu(1, object, MenuGoblinID)
  37. end
  38.  
  39. local function OnGossipSelectGoblin(event, player, object, sender, intid, code, menuid)
  40. if (intid == 229) then
  41.    player:GossipClearMenu()
  42.     local chartype = WorldDBQuery("SELECT type FROM roleplay_characters WHERE player = '"..player:GetName().."';")
  43.     if (chartype and chartype:GetInt32(0)==0) then
  44.     player:GossipMenuAddItem(3, "Прокачка профессий", 1, 1)
  45.     player:GossipMenuAddItem(6, "Обмен "..crystal.." на реагенты", 1, 2)
  46.     player:GossipMenuAddItem(1, "Покупка инструментов. 50 "..crystal, 1, 3)
  47.     end
  48.     player:GossipMenuAddItem(6, "Обмен "..crystal.." на золото (100 осколков - 2.5 золотые)", 1, 4)
  49.     player:GossipMenuAddItem(0, "До скорого!", 1, 228)
  50.     player:GossipSendMenu(1, object, MenuGoblinID)
  51. end
  52.  
  53. if (intid == 228) then
  54.   player:GossipComplete()
  55. end
  56.  
  57. --professionz
  58. if (intid == 1) then
  59.  
  60.   player:GossipClearMenu()
  61.   player:GossipMenuAddItem(3, "Алхимия. 50 "..crystal, 1, 11)
  62.   player:GossipMenuAddItem(3, "Кузнечное дело. 50 "..crystal, 1, 12)
  63.   player:GossipMenuAddItem(3, "Горное дело. 50 "..crystal, 1, 13)
  64.   player:GossipMenuAddItem(3, "Травничество. 50 "..crystal, 1, 14)
  65.   player:GossipMenuAddItem(3, "Кожевничество. 50 "..crystal, 1, 15)
  66.   player:GossipMenuAddItem(3, "Портняжное дело. 50 "..crystal, 1, 16)
  67.   player:GossipMenuAddItem(3, "Инженерное дело. 50 "..crystal, 1, 17)
  68.   player:GossipMenuAddItem(3, "Наложение чар. 50 "..crystal, 1, 18)
  69.   player:GossipMenuAddItem(3, "Снятие шкур. 50 "..crystal, 1, 19)
  70.   player:GossipMenuAddItem(3, "Ювелирное дело. 50 "..crystal, 1, 20)
  71.   player:GossipMenuAddItem(3, "Начертание. 50 "..crystal, 1, 21)
  72.  
  73.   player:GossipMenuAddItem(0, "Назад", 1, 229)
  74.   player:GossipSendMenu(1, object, MenuGoblinID)
  75.  
  76.   elseif (intid == 11) then
  77.     player:GossipClearMenu()
  78.     player:GossipMenuAddItem(3, "Алхимия. 50 "..crystal, 1, 11)
  79.   player:GossipMenuAddItem(3, "Кузнечное дело. 50 "..crystal, 1, 12)
  80.   player:GossipMenuAddItem(3, "Горное дело. 50 "..crystal, 1, 13)
  81.   player:GossipMenuAddItem(3, "Травничество. 50 "..crystal, 1, 14)
  82.   player:GossipMenuAddItem(3, "Кожевничество. 50 "..crystal, 1, 15)
  83.   player:GossipMenuAddItem(3, "Портняжное дело. 50 "..crystal, 1, 16)
  84.   player:GossipMenuAddItem(3, "Инженерное дело. 50 "..crystal, 1, 17)
  85.   player:GossipMenuAddItem(3, "Наложение чар. 50 "..crystal, 1, 18)
  86.   player:GossipMenuAddItem(3, "Снятие шкур. 50 "..crystal, 1, 19)
  87.   player:GossipMenuAddItem(3, "Ювелирное дело. 50 "..crystal, 1, 20)
  88.   player:GossipMenuAddItem(3, "Начертание. 50 "..crystal, 1, 21)
  89.  
  90.   player:GossipMenuAddItem(0, "Назад", 1, 229)
  91.   player:GossipSendMenu(1, object, MenuGoblinID)
  92.     if player:HasItem(currency, 50) then
  93.     player:RemoveItem(currency, 50)
  94.     player:LearnSpell(3465)
  95.     player:SetSkill(171, 2, 175, 200)
  96.   else
  97.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  98.     end
  99.     elseif (intid == 12) then
  100.       player:GossipClearMenu()
  101.       player:GossipMenuAddItem(3, "Алхимия. 50 "..crystal, 1, 11)
  102.   player:GossipMenuAddItem(3, "Кузнечное дело. 50 "..crystal, 1, 12)
  103.   player:GossipMenuAddItem(3, "Горное дело. 50 "..crystal, 1, 13)
  104.   player:GossipMenuAddItem(3, "Травничество. 50 "..crystal, 1, 14)
  105.   player:GossipMenuAddItem(3, "Кожевничество. 50 "..crystal, 1, 15)
  106.   player:GossipMenuAddItem(3, "Портняжное дело. 50 "..crystal, 1, 16)
  107.   player:GossipMenuAddItem(3, "Инженерное дело. 50 "..crystal, 1, 17)
  108.   player:GossipMenuAddItem(3, "Наложение чар. 50 "..crystal, 1, 18)
  109.   player:GossipMenuAddItem(3, "Снятие шкур. 50 "..crystal, 1, 19)
  110.   player:GossipMenuAddItem(3, "Ювелирное дело. 50 "..crystal, 1, 20)
  111.   player:GossipMenuAddItem(3, "Начертание. 50 "..crystal, 1, 21)
  112.  
  113.   player:GossipMenuAddItem(0, "Назад", 1, 229)
  114.   player:GossipSendMenu(1, object, MenuGoblinID)
  115.       if player:HasItem(currency, 50) then
  116.     player:RemoveItem(currency, 50)
  117.     player:LearnSpell(3539)
  118.     player:SetSkill(164, 2, 175, 200)
  119.   else
  120.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  121.     end
  122.       elseif (intid == 13) then
  123.         player:GossipClearMenu()
  124.         player:GossipMenuAddItem(3, "Алхимия. 50 "..crystal, 1, 11)
  125.   player:GossipMenuAddItem(3, "Кузнечное дело. 50 "..crystal, 1, 12)
  126.   player:GossipMenuAddItem(3, "Горное дело. 50 "..crystal, 1, 13)
  127.   player:GossipMenuAddItem(3, "Травничество. 50 "..crystal, 1, 14)
  128.   player:GossipMenuAddItem(3, "Кожевничество. 50 "..crystal, 1, 15)
  129.   player:GossipMenuAddItem(3, "Портняжное дело. 50 "..crystal, 1, 16)
  130.   player:GossipMenuAddItem(3, "Инженерное дело. 50 "..crystal, 1, 17)
  131.   player:GossipMenuAddItem(3, "Наложение чар. 50 "..crystal, 1, 18)
  132.   player:GossipMenuAddItem(3, "Снятие шкур. 50 "..crystal, 1, 19)
  133.   player:GossipMenuAddItem(3, "Ювелирное дело. 50 "..crystal, 1, 20)
  134.   player:GossipMenuAddItem(3, "Начертание. 50 "..crystal, 1, 21)
  135.  
  136.   player:GossipMenuAddItem(0, "Назад", 1, 229)
  137.   player:GossipSendMenu(1, object, MenuGoblinID)
  138.         if player:HasItem(currency, 50) then
  139.     player:RemoveItem(currency, 50)
  140.     player:LearnSpell(3568)
  141.     player:SetSkill(186, 2, 175, 200)
  142.   else
  143.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  144.     end
  145.         elseif (intid == 14) then
  146.           player:GossipClearMenu()
  147.           player:GossipMenuAddItem(3, "Алхимия. 50 "..crystal, 1, 11)
  148.   player:GossipMenuAddItem(3, "Кузнечное дело. 50 "..crystal, 1, 12)
  149.   player:GossipMenuAddItem(3, "Горное дело. 50 "..crystal, 1, 13)
  150.   player:GossipMenuAddItem(3, "Травничество. 50 "..crystal, 1, 14)
  151.   player:GossipMenuAddItem(3, "Кожевничество. 50 "..crystal, 1, 15)
  152.   player:GossipMenuAddItem(3, "Портняжное дело. 50 "..crystal, 1, 16)
  153.   player:GossipMenuAddItem(3, "Инженерное дело. 50 "..crystal, 1, 17)
  154.   player:GossipMenuAddItem(3, "Наложение чар. 50 "..crystal, 1, 18)
  155.   player:GossipMenuAddItem(3, "Снятие шкур. 50 "..crystal, 1, 19)
  156.   player:GossipMenuAddItem(3, "Ювелирное дело. 50 "..crystal, 1, 20)
  157.   player:GossipMenuAddItem(3, "Начертание. 50 "..crystal, 1, 21)
  158.  
  159.   player:GossipMenuAddItem(0, "Назад", 1, 229)
  160.   player:GossipSendMenu(1, object, MenuGoblinID)
  161.           if player:HasItem(currency, 50) then
  162.     player:RemoveItem(currency, 50)
  163.     player:LearnSpell(3571)
  164.     player:SetSkill(182, 2, 175, 200)
  165.   else
  166.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  167.     end
  168.           elseif (intid == 15) then
  169.             player:GossipClearMenu()
  170.             player:GossipMenuAddItem(3, "Алхимия. 50 "..crystal, 1, 11)
  171.   player:GossipMenuAddItem(3, "Кузнечное дело. 50 "..crystal, 1, 12)
  172.   player:GossipMenuAddItem(3, "Горное дело. 50 "..crystal, 1, 13)
  173.   player:GossipMenuAddItem(3, "Травничество. 50 "..crystal, 1, 14)
  174.   player:GossipMenuAddItem(3, "Кожевничество. 50 "..crystal, 1, 15)
  175.   player:GossipMenuAddItem(3, "Портняжное дело. 50 "..crystal, 1, 16)
  176.   player:GossipMenuAddItem(3, "Инженерное дело. 50 "..crystal, 1, 17)
  177.   player:GossipMenuAddItem(3, "Наложение чар. 50 "..crystal, 1, 18)
  178.   player:GossipMenuAddItem(3, "Снятие шкур. 50 "..crystal, 1, 19)
  179.   player:GossipMenuAddItem(3, "Ювелирное дело. 50 "..crystal, 1, 20)
  180.   player:GossipMenuAddItem(3, "Начертание. 50 "..crystal, 1, 21)
  181.  
  182.   player:GossipMenuAddItem(0, "Назад", 1, 229)
  183.   player:GossipSendMenu(1, object, MenuGoblinID)
  184.             if player:HasItem(currency, 50) then
  185.     player:RemoveItem(currency, 50)
  186.     player:LearnSpell(3812)
  187.     player:SetSkill(165, 2, 175, 200)
  188.   else
  189.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  190.     end
  191.             elseif (intid == 16) then
  192.               player:GossipClearMenu()
  193.               player:GossipMenuAddItem(3, "Алхимия. 50 "..crystal, 1, 11)
  194.   player:GossipMenuAddItem(3, "Кузнечное дело. 50 "..crystal, 1, 12)
  195.   player:GossipMenuAddItem(3, "Горное дело. 50 "..crystal, 1, 13)
  196.   player:GossipMenuAddItem(3, "Травничество. 50 "..crystal, 1, 14)
  197.   player:GossipMenuAddItem(3, "Кожевничество. 50 "..crystal, 1, 15)
  198.   player:GossipMenuAddItem(3, "Портняжное дело. 50 "..crystal, 1, 16)
  199.   player:GossipMenuAddItem(3, "Инженерное дело. 50 "..crystal, 1, 17)
  200.   player:GossipMenuAddItem(3, "Наложение чар. 50 "..crystal, 1, 18)
  201.   player:GossipMenuAddItem(3, "Снятие шкур. 50 "..crystal, 1, 19)
  202.   player:GossipMenuAddItem(3, "Ювелирное дело. 50 "..crystal, 1, 20)
  203.   player:GossipMenuAddItem(3, "Начертание. 50 "..crystal, 1, 21)
  204.  
  205.   player:GossipMenuAddItem(0, "Назад", 1, 229)
  206.   player:GossipSendMenu(1, object, MenuGoblinID)
  207.               if player:HasItem(currency, 50) then
  208.     player:RemoveItem(currency, 50)
  209.     player:LearnSpell(3913)
  210.     player:SetSkill(197, 2, 175, 200)
  211.   else
  212.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  213.     end
  214.               elseif (intid == 17) then
  215.                 player:GossipClearMenu()
  216.                 player:GossipMenuAddItem(3, "Алхимия. 50 "..crystal, 1, 11)
  217.   player:GossipMenuAddItem(3, "Кузнечное дело. 50 "..crystal, 1, 12)
  218.   player:GossipMenuAddItem(3, "Горное дело. 50 "..crystal, 1, 13)
  219.   player:GossipMenuAddItem(3, "Травничество. 50 "..crystal, 1, 14)
  220.   player:GossipMenuAddItem(3, "Кожевничество. 50 "..crystal, 1, 15)
  221.   player:GossipMenuAddItem(3, "Портняжное дело. 50 "..crystal, 1, 16)
  222.   player:GossipMenuAddItem(3, "Инженерное дело. 50 "..crystal, 1, 17)
  223.   player:GossipMenuAddItem(3, "Наложение чар. 50 "..crystal, 1, 18)
  224.   player:GossipMenuAddItem(3, "Снятие шкур. 50 "..crystal, 1, 19)
  225.   player:GossipMenuAddItem(3, "Ювелирное дело. 50 "..crystal, 1, 20)
  226.   player:GossipMenuAddItem(3, "Начертание. 50 "..crystal, 1, 21)
  227.  
  228.   player:GossipMenuAddItem(0, "Назад", 1, 229)
  229.   player:GossipSendMenu(1, object, MenuGoblinID)
  230.                 if player:HasItem(currency, 50) then
  231.     player:RemoveItem(currency, 50)
  232.     player:LearnSpell(4041)
  233.     player:SetSkill(202, 2, 175, 200)
  234.   else
  235.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  236.     end
  237.                 elseif (intid == 18) then
  238.                   player:GossipClearMenu()
  239.                   player:GossipMenuAddItem(3, "Алхимия. 50 "..crystal, 1, 11)
  240.   player:GossipMenuAddItem(3, "Кузнечное дело. 50 "..crystal, 1, 12)
  241.   player:GossipMenuAddItem(3, "Горное дело. 50 "..crystal, 1, 13)
  242.   player:GossipMenuAddItem(3, "Травничество. 50 "..crystal, 1, 14)
  243.   player:GossipMenuAddItem(3, "Кожевничество. 50 "..crystal, 1, 15)
  244.   player:GossipMenuAddItem(3, "Портняжное дело. 50 "..crystal, 1, 16)
  245.   player:GossipMenuAddItem(3, "Инженерное дело. 50 "..crystal, 1, 17)
  246.   player:GossipMenuAddItem(3, "Наложение чар. 50 "..crystal, 1, 18)
  247.   player:GossipMenuAddItem(3, "Снятие шкур. 50 "..crystal, 1, 19)
  248.   player:GossipMenuAddItem(3, "Ювелирное дело. 50 "..crystal, 1, 20)
  249.   player:GossipMenuAddItem(3, "Начертание. 50 "..crystal, 1, 21)
  250.  
  251.   player:GossipMenuAddItem(0, "Назад", 1, 229)
  252.   player:GossipSendMenu(1, object, MenuGoblinID)
  253.                   if player:HasItem(currency, 50) then
  254.     player:RemoveItem(currency, 50)
  255.     player:LearnSpell(7416)
  256.     player:SetSkill(333, 2, 175, 200)
  257.   else
  258.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  259.     end
  260.                   elseif (intid == 19) then
  261.                     player:GossipClearMenu()
  262.                     player:GossipMenuAddItem(3, "Алхимия. 50 "..crystal, 1, 11)
  263.   player:GossipMenuAddItem(3, "Кузнечное дело. 50 "..crystal, 1, 12)
  264.   player:GossipMenuAddItem(3, "Горное дело. 50 "..crystal, 1, 13)
  265.   player:GossipMenuAddItem(3, "Травничество. 50 "..crystal, 1, 14)
  266.   player:GossipMenuAddItem(3, "Кожевничество. 50 "..crystal, 1, 15)
  267.   player:GossipMenuAddItem(3, "Портняжное дело. 50 "..crystal, 1, 16)
  268.   player:GossipMenuAddItem(3, "Инженерное дело. 50 "..crystal, 1, 17)
  269.   player:GossipMenuAddItem(3, "Наложение чар. 50 "..crystal, 1, 18)
  270.   player:GossipMenuAddItem(3, "Снятие шкур. 50 "..crystal, 1, 19)
  271.   player:GossipMenuAddItem(3, "Ювелирное дело. 50 "..crystal, 1, 20)
  272.   player:GossipMenuAddItem(3, "Начертание. 50 "..crystal, 1, 21)
  273.  
  274.   player:GossipMenuAddItem(0, "Назад", 1, 229)
  275.   player:GossipSendMenu(1, object, MenuGoblinID)
  276.                     if player:HasItem(currency, 50) then
  277.     player:RemoveItem(currency, 50)
  278.     player:LearnSpell(8620)
  279.     player:SetSkill(393, 2, 175, 200)
  280.   else
  281.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  282.     end
  283.                     elseif (intid == 20) then
  284.                       player:GossipClearMenu()
  285.                       player:GossipMenuAddItem(3, "Алхимия. 50 "..crystal, 1, 11)
  286.   player:GossipMenuAddItem(3, "Кузнечное дело. 50 "..crystal, 1, 12)
  287.   player:GossipMenuAddItem(3, "Горное дело. 50 "..crystal, 1, 13)
  288.   player:GossipMenuAddItem(3, "Травничество. 50 "..crystal, 1, 14)
  289.   player:GossipMenuAddItem(3, "Кожевничество. 50 "..crystal, 1, 15)
  290.   player:GossipMenuAddItem(3, "Портняжное дело. 50 "..crystal, 1, 16)
  291.   player:GossipMenuAddItem(3, "Инженерное дело. 50 "..crystal, 1, 17)
  292.   player:GossipMenuAddItem(3, "Наложение чар. 50 "..crystal, 1, 18)
  293.   player:GossipMenuAddItem(3, "Снятие шкур. 50 "..crystal, 1, 19)
  294.   player:GossipMenuAddItem(3, "Ювелирное дело. 50 "..crystal, 1, 20)
  295.   player:GossipMenuAddItem(3, "Начертание. 50 "..crystal, 1, 21)
  296.  
  297.   player:GossipMenuAddItem(0, "Назад", 1, 229)
  298.   player:GossipSendMenu(1, object, MenuGoblinID)
  299.                       if player:HasItem(currency, 50) then
  300.     player:RemoveItem(currency, 50)
  301.     player:LearnSpell(28896)
  302.     player:SetSkill(755, 2, 175, 200)
  303.   else
  304.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  305.     end
  306.                       elseif (intid == 21) then
  307.                         player:GossipClearMenu()
  308.                         player:GossipMenuAddItem(3, "Алхимия. 50 "..crystal, 1, 11)
  309.   player:GossipMenuAddItem(3, "Кузнечное дело. 50 "..crystal, 1, 12)
  310.   player:GossipMenuAddItem(3, "Горное дело. 50 "..crystal, 1, 13)
  311.   player:GossipMenuAddItem(3, "Травничество. 50 "..crystal, 1, 14)
  312.   player:GossipMenuAddItem(3, "Кожевничество. 50 "..crystal, 1, 15)
  313.   player:GossipMenuAddItem(3, "Портняжное дело. 50 "..crystal, 1, 16)
  314.   player:GossipMenuAddItem(3, "Инженерное дело. 50 "..crystal, 1, 17)
  315.   player:GossipMenuAddItem(3, "Наложение чар. 50 "..crystal, 1, 18)
  316.   player:GossipMenuAddItem(3, "Снятие шкур. 50 "..crystal, 1, 19)
  317.   player:GossipMenuAddItem(3, "Ювелирное дело. 50 "..crystal, 1, 20)
  318.   player:GossipMenuAddItem(3, "Начертание. 50 "..crystal, 1, 21)
  319.  
  320.   player:GossipMenuAddItem(0, "Назад", 1, 229)
  321.   player:GossipSendMenu(1, object, MenuGoblinID)
  322.                         if player:HasItem(currency, 50) then
  323.     player:RemoveItem(currency, 50)
  324.     player:LearnSpell(45377)
  325.     player:SetSkill(773, 2, 175, 200)
  326.   else
  327.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  328.     end
  329.   end
  330. --professionz end
  331.  
  332. --trade of reagenrz
  333. if (intid == 2) then
  334.   player:GossipClearMenu()
  335.     player:GossipMenuAddItem(6, "Железный слиток. 2 "..crystal, 1, 30)
  336.     player:GossipMenuAddItem(6, "Жесткая кожа. 2 "..crystal, 1, 31)
  337.     player:GossipMenuAddItem(6, "Стальной слиток. 2 "..crystal, 1, 32)
  338.     player:GossipMenuAddItem(6, "Плотная кожа. 2 "..crystal, 1, 33)
  339.     player:GossipMenuAddItem(6, "Тигровый глаз. 5 "..crystal, 1, 34)
  340.     player:GossipMenuAddItem(6, "Мифриловый слиток. 3 "..crystal, 1, 35)
  341.     player:GossipMenuAddItem(6, "Моховой агат. 15 "..crystal, 1, 36)
  342.     player:GossipMenuAddItem(6, "Рулон льняной ткани. 2 "..crystal, 1, 37)
  343.     player:GossipMenuAddItem(6, "Рулон магической ткани. 3 "..crystal, 1, 38)
  344.     player:GossipMenuAddItem(6, "Рулон шелка. 2 "..crystal, 1, 39)
  345.     player:GossipMenuAddItem(6, "Рулон шерсти. 2 "..crystal, 1, 40)
  346.     player:GossipMenuAddItem(6, "Маленькая блестящая жемчужина. 5 "..crystal, 1, 41)
  347.  
  348.     player:GossipMenuAddItem(0, "Назад", 1, 229)
  349.   player:GossipSendMenu(1, object, MenuGoblinID)
  350.   elseif (intid == 30) then
  351.       player:GossipClearMenu()
  352.     player:GossipMenuAddItem(6, "Железный слиток. 2 "..crystal, 1, 30)
  353.     player:GossipMenuAddItem(6, "Жесткая кожа. 2 "..crystal, 1, 31)
  354.     player:GossipMenuAddItem(6, "Стальной слиток. 2 "..crystal, 1, 32)
  355.     player:GossipMenuAddItem(6, "Плотная кожа. 2 "..crystal, 1, 33)
  356.     player:GossipMenuAddItem(6, "Тигровый глаз. 5 "..crystal, 1, 34)
  357.     player:GossipMenuAddItem(6, "Мифриловый слиток. 3 "..crystal, 1, 35)
  358.     player:GossipMenuAddItem(6, "Моховой агат. 15 "..crystal, 1, 36)
  359.     player:GossipMenuAddItem(6, "Рулон льняной ткани. 2 "..crystal, 1, 37)
  360.     player:GossipMenuAddItem(6, "Рулон магической ткани. 3 "..crystal, 1, 38)
  361.     player:GossipMenuAddItem(6, "Рулон шелка. 2 "..crystal, 1, 39)
  362.     player:GossipMenuAddItem(6, "Рулон шерсти. 2 "..crystal, 1, 40)
  363.     player:GossipMenuAddItem(6, "Маленькая блестящая жемчужина. 5 "..crystal, 1, 41)
  364.  
  365.     player:GossipMenuAddItem(0, "Назад", 1, 229)
  366.     if player:HasItem(currency, 2) then
  367.     player:RemoveItem(currency, 2)
  368.     player:AddItem(JELEZNII_SLITOK, 1)
  369.   else
  370.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  371.     end
  372.     elseif (intid == 31) then
  373.         player:GossipClearMenu()
  374.     player:GossipMenuAddItem(6, "Железный слиток. 2 "..crystal, 1, 30)
  375.     player:GossipMenuAddItem(6, "Жесткая кожа. 2 "..crystal, 1, 31)
  376.     player:GossipMenuAddItem(6, "Стальной слиток. 2 "..crystal, 1, 32)
  377.     player:GossipMenuAddItem(6, "Плотная кожа. 2 "..crystal, 1, 33)
  378.     player:GossipMenuAddItem(6, "Тигровый глаз. 5 "..crystal, 1, 34)
  379.     player:GossipMenuAddItem(6, "Мифриловый слиток. 3 "..crystal, 1, 35)
  380.     player:GossipMenuAddItem(6, "Моховой агат. 15 "..crystal, 1, 36)
  381.     player:GossipMenuAddItem(6, "Рулон льняной ткани. 2 "..crystal, 1, 37)
  382.     player:GossipMenuAddItem(6, "Рулон магической ткани. 3 "..crystal, 1, 38)
  383.     player:GossipMenuAddItem(6, "Рулон шелка. 2 "..crystal, 1, 39)
  384.     player:GossipMenuAddItem(6, "Рулон шерсти. 2 "..crystal, 1, 40)
  385.     player:GossipMenuAddItem(6, "Маленькая блестящая жемчужина. 5 "..crystal, 1, 41)
  386.  
  387.     player:GossipMenuAddItem(0, "Назад", 1, 229)
  388.       if player:HasItem(currency, 2) then
  389.     player:RemoveItem(currency, 2)
  390.     player:AddItem(JESTKAYA_KOJA, 1)
  391.   else
  392.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  393.     end
  394.       elseif (intid == 32) then
  395.           player:GossipClearMenu()
  396.     player:GossipMenuAddItem(6, "Железный слиток. 2 "..crystal, 1, 30)
  397.     player:GossipMenuAddItem(6, "Жесткая кожа. 2 "..crystal, 1, 31)
  398.     player:GossipMenuAddItem(6, "Стальной слиток. 2 "..crystal, 1, 32)
  399.     player:GossipMenuAddItem(6, "Плотная кожа. 2 "..crystal, 1, 33)
  400.     player:GossipMenuAddItem(6, "Тигровый глаз. 5 "..crystal, 1, 34)
  401.     player:GossipMenuAddItem(6, "Мифриловый слиток. 3 "..crystal, 1, 35)
  402.     player:GossipMenuAddItem(6, "Моховой агат. 15 "..crystal, 1, 36)
  403.     player:GossipMenuAddItem(6, "Рулон льняной ткани. 2 "..crystal, 1, 37)
  404.     player:GossipMenuAddItem(6, "Рулон магической ткани. 3 "..crystal, 1, 38)
  405.     player:GossipMenuAddItem(6, "Рулон шелка. 2 "..crystal, 1, 39)
  406.     player:GossipMenuAddItem(6, "Рулон шерсти. 2 "..crystal, 1, 40)
  407.     player:GossipMenuAddItem(6, "Маленькая блестящая жемчужина. 5 "..crystal, 1, 41)
  408.  
  409.     player:GossipMenuAddItem(0, "Назад", 1, 229)
  410.         if player:HasItem(currency, 2) then
  411.     player:RemoveItem(currency, 2)
  412.     player:AddItem(STALNOI_SLITOK, 1)
  413.   else
  414.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  415.     end
  416.         elseif (intid == 33) then
  417.             player:GossipClearMenu()
  418.     player:GossipMenuAddItem(6, "Железный слиток. 2 "..crystal, 1, 30)
  419.     player:GossipMenuAddItem(6, "Жесткая кожа. 2 "..crystal, 1, 31)
  420.     player:GossipMenuAddItem(6, "Стальной слиток. 2 "..crystal, 1, 32)
  421.     player:GossipMenuAddItem(6, "Плотная кожа. 2 "..crystal, 1, 33)
  422.     player:GossipMenuAddItem(6, "Тигровый глаз. 5 "..crystal, 1, 34)
  423.     player:GossipMenuAddItem(6, "Мифриловый слиток. 3 "..crystal, 1, 35)
  424.     player:GossipMenuAddItem(6, "Моховой агат. 15 "..crystal, 1, 36)
  425.     player:GossipMenuAddItem(6, "Рулон льняной ткани. 2 "..crystal, 1, 37)
  426.     player:GossipMenuAddItem(6, "Рулон магической ткани. 3 "..crystal, 1, 38)
  427.     player:GossipMenuAddItem(6, "Рулон шелка. 2 "..crystal, 1, 39)
  428.     player:GossipMenuAddItem(6, "Рулон шерсти. 2 "..crystal, 1, 40)
  429.     player:GossipMenuAddItem(6, "Маленькая блестящая жемчужина. 5 "..crystal, 1, 41)
  430.  
  431.     player:GossipMenuAddItem(0, "Назад", 1, 229)
  432.           if player:HasItem(currency, 2) then
  433.     player:RemoveItem(currency, 2)
  434.     player:AddItem(PLOTNAYA_KOJA, 1)
  435.   else
  436.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  437.     end
  438.           elseif (intid == 34) then
  439.               player:GossipClearMenu()
  440.     player:GossipMenuAddItem(6, "Железный слиток. 2 "..crystal, 1, 30)
  441.     player:GossipMenuAddItem(6, "Жесткая кожа. 2 "..crystal, 1, 31)
  442.     player:GossipMenuAddItem(6, "Стальной слиток. 2 "..crystal, 1, 32)
  443.     player:GossipMenuAddItem(6, "Плотная кожа. 2 "..crystal, 1, 33)
  444.     player:GossipMenuAddItem(6, "Тигровый глаз. 5 "..crystal, 1, 34)
  445.     player:GossipMenuAddItem(6, "Мифриловый слиток. 3 "..crystal, 1, 35)
  446.     player:GossipMenuAddItem(6, "Моховой агат. 15 "..crystal, 1, 36)
  447.     player:GossipMenuAddItem(6, "Рулон льняной ткани. 2 "..crystal, 1, 37)
  448.     player:GossipMenuAddItem(6, "Рулон магической ткани. 3 "..crystal, 1, 38)
  449.     player:GossipMenuAddItem(6, "Рулон шелка. 2 "..crystal, 1, 39)
  450.     player:GossipMenuAddItem(6, "Рулон шерсти. 2 "..crystal, 1, 40)
  451.     player:GossipMenuAddItem(6, "Маленькая блестящая жемчужина. 5 "..crystal, 1, 41)
  452.  
  453.     player:GossipMenuAddItem(0, "Назад", 1, 229)
  454.             if player:HasItem(currency, 5) then
  455.     player:RemoveItem(currency, 5)
  456.     player:AddItem(TIGROVII_GLAZ, 1)
  457.   else
  458.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  459.     end
  460.             elseif (intid == 35) then
  461.                 player:GossipClearMenu()
  462.     player:GossipMenuAddItem(6, "Железный слиток. 2 "..crystal, 1, 30)
  463.     player:GossipMenuAddItem(6, "Жесткая кожа. 2 "..crystal, 1, 31)
  464.     player:GossipMenuAddItem(6, "Стальной слиток. 2 "..crystal, 1, 32)
  465.     player:GossipMenuAddItem(6, "Плотная кожа. 2 "..crystal, 1, 33)
  466.     player:GossipMenuAddItem(6, "Тигровый глаз. 5 "..crystal, 1, 34)
  467.     player:GossipMenuAddItem(6, "Мифриловый слиток. 3 "..crystal, 1, 35)
  468.     player:GossipMenuAddItem(6, "Моховой агат. 15 "..crystal, 1, 36)
  469.     player:GossipMenuAddItem(6, "Рулон льняной ткани. 2 "..crystal, 1, 37)
  470.     player:GossipMenuAddItem(6, "Рулон магической ткани. 3 "..crystal, 1, 38)
  471.     player:GossipMenuAddItem(6, "Рулон шелка. 2 "..crystal, 1, 39)
  472.     player:GossipMenuAddItem(6, "Рулон шерсти. 2 "..crystal, 1, 40)
  473.     player:GossipMenuAddItem(6, "Маленькая блестящая жемчужина. 5 "..crystal, 1, 41)
  474.  
  475.     player:GossipMenuAddItem(0, "Назад", 1, 229)
  476.               if player:HasItem(currency, 3) then
  477.     player:RemoveItem(currency, 3)
  478.     player:AddItem(MIFRILOVII_SLITOK, 1)
  479.   else
  480.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  481.     end
  482.               elseif (intid == 36) then
  483.                   player:GossipClearMenu()
  484.     player:GossipMenuAddItem(6, "Железный слиток. 2 "..crystal, 1, 30)
  485.     player:GossipMenuAddItem(6, "Жесткая кожа. 2 "..crystal, 1, 31)
  486.     player:GossipMenuAddItem(6, "Стальной слиток. 2 "..crystal, 1, 32)
  487.     player:GossipMenuAddItem(6, "Плотная кожа. 2 "..crystal, 1, 33)
  488.     player:GossipMenuAddItem(6, "Тигровый глаз. 5 "..crystal, 1, 34)
  489.     player:GossipMenuAddItem(6, "Мифриловый слиток. 3 "..crystal, 1, 35)
  490.     player:GossipMenuAddItem(6, "Моховой агат. 15 "..crystal, 1, 36)
  491.     player:GossipMenuAddItem(6, "Рулон льняной ткани. 2 "..crystal, 1, 37)
  492.     player:GossipMenuAddItem(6, "Рулон магической ткани. 3 "..crystal, 1, 38)
  493.     player:GossipMenuAddItem(6, "Рулон шелка. 2 "..crystal, 1, 39)
  494.     player:GossipMenuAddItem(6, "Рулон шерсти. 2 "..crystal, 1, 40)
  495.     player:GossipMenuAddItem(6, "Маленькая блестящая жемчужина. 5 "..crystal, 1, 41)
  496.  
  497.     player:GossipMenuAddItem(0, "Назад", 1, 229)
  498.                 if player:HasItem(currency, 15) then
  499.     player:RemoveItem(currency, 15)
  500.     player:AddItem(MOXOVII_AGAT, 1)
  501.   else
  502.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  503.     end
  504.                 elseif (intid == 37) then
  505.                     player:GossipClearMenu()
  506.     player:GossipMenuAddItem(6, "Железный слиток. 2 "..crystal, 1, 30)
  507.     player:GossipMenuAddItem(6, "Жесткая кожа. 2 "..crystal, 1, 31)
  508.     player:GossipMenuAddItem(6, "Стальной слиток. 2 "..crystal, 1, 32)
  509.     player:GossipMenuAddItem(6, "Плотная кожа. 2 "..crystal, 1, 33)
  510.     player:GossipMenuAddItem(6, "Тигровый глаз. 5 "..crystal, 1, 34)
  511.     player:GossipMenuAddItem(6, "Мифриловый слиток. 3 "..crystal, 1, 35)
  512.     player:GossipMenuAddItem(6, "Моховой агат. 15 "..crystal, 1, 36)
  513.     player:GossipMenuAddItem(6, "Рулон льняной ткани. 2 "..crystal, 1, 37)
  514.     player:GossipMenuAddItem(6, "Рулон магической ткани. 3 "..crystal, 1, 38)
  515.     player:GossipMenuAddItem(6, "Рулон шелка. 2 "..crystal, 1, 39)
  516.     player:GossipMenuAddItem(6, "Рулон шерсти. 2 "..crystal, 1, 40)
  517.     player:GossipMenuAddItem(6, "Маленькая блестящая жемчужина. 5 "..crystal, 1, 41)
  518.  
  519.     player:GossipMenuAddItem(0, "Назад", 1, 229)
  520.                   if player:HasItem(currency, 2) then
  521.     player:RemoveItem(currency, 2)
  522.     player:AddItem(RULON_LNYANAYA_TKAN, 1)
  523.   else
  524.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  525.     end
  526.                   elseif (intid == 38) then
  527.                       player:GossipClearMenu()
  528.     player:GossipMenuAddItem(6, "Железный слиток. 2 "..crystal, 1, 30)
  529.     player:GossipMenuAddItem(6, "Жесткая кожа. 2 "..crystal, 1, 31)
  530.     player:GossipMenuAddItem(6, "Стальной слиток. 2 "..crystal, 1, 32)
  531.     player:GossipMenuAddItem(6, "Плотная кожа. 2 "..crystal, 1, 33)
  532.     player:GossipMenuAddItem(6, "Тигровый глаз. 5 "..crystal, 1, 34)
  533.     player:GossipMenuAddItem(6, "Мифриловый слиток. 3 "..crystal, 1, 35)
  534.     player:GossipMenuAddItem(6, "Моховой агат. 15 "..crystal, 1, 36)
  535.     player:GossipMenuAddItem(6, "Рулон льняной ткани. 2 "..crystal, 1, 37)
  536.     player:GossipMenuAddItem(6, "Рулон магической ткани. 3 "..crystal, 1, 38)
  537.     player:GossipMenuAddItem(6, "Рулон шелка. 2 "..crystal, 1, 39)
  538.     player:GossipMenuAddItem(6, "Рулон шерсти. 2 "..crystal, 1, 40)
  539.     player:GossipMenuAddItem(6, "Маленькая блестящая жемчужина. 5 "..crystal, 1, 41)
  540.  
  541.     player:GossipMenuAddItem(0, "Назад", 1, 229)
  542.                     if player:HasItem(currency, 3) then
  543.     player:RemoveItem(currency, 3)
  544.     player:AddItem(MAGICHESKAYA_TKAN, 1)
  545.   else
  546.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  547.     end
  548.                     elseif (intid == 39) then
  549.                         player:GossipClearMenu()
  550.     player:GossipMenuAddItem(6, "Железный слиток. 2 "..crystal, 1, 30)
  551.     player:GossipMenuAddItem(6, "Жесткая кожа. 2 "..crystal, 1, 31)
  552.     player:GossipMenuAddItem(6, "Стальной слиток. 2 "..crystal, 1, 32)
  553.     player:GossipMenuAddItem(6, "Плотная кожа. 2 "..crystal, 1, 33)
  554.     player:GossipMenuAddItem(6, "Тигровый глаз. 5 "..crystal, 1, 34)
  555.     player:GossipMenuAddItem(6, "Мифриловый слиток. 3 "..crystal, 1, 35)
  556.     player:GossipMenuAddItem(6, "Моховой агат. 15 "..crystal, 1, 36)
  557.     player:GossipMenuAddItem(6, "Рулон льняной ткани. 2 "..crystal, 1, 37)
  558.     player:GossipMenuAddItem(6, "Рулон магической ткани. 3 "..crystal, 1, 38)
  559.     player:GossipMenuAddItem(6, "Рулон шелка. 2 "..crystal, 1, 39)
  560.     player:GossipMenuAddItem(6, "Рулон шерсти. 2 "..crystal, 1, 40)
  561.     player:GossipMenuAddItem(6, "Маленькая блестящая жемчужина. 5 "..crystal, 1, 41)
  562.  
  563.     player:GossipMenuAddItem(0, "Назад", 1, 229)
  564.                       if player:HasItem(currency, 2) then
  565.     player:RemoveItem(currency, 2)
  566.     player:AddItem(RULON_SHELKA, 1)
  567.   else
  568.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  569.     end
  570.  
  571.     elseif (intid == 40) then
  572.         player:GossipClearMenu()
  573.     player:GossipMenuAddItem(6, "Железный слиток. 2 "..crystal, 1, 30)
  574.     player:GossipMenuAddItem(6, "Жесткая кожа. 2 "..crystal, 1, 31)
  575.     player:GossipMenuAddItem(6, "Стальной слиток. 2 "..crystal, 1, 32)
  576.     player:GossipMenuAddItem(6, "Плотная кожа. 2 "..crystal, 1, 33)
  577.     player:GossipMenuAddItem(6, "Тигровый глаз. 5 "..crystal, 1, 34)
  578.     player:GossipMenuAddItem(6, "Мифриловый слиток. 3 "..crystal, 1, 35)
  579.     player:GossipMenuAddItem(6, "Моховой агат. 15 "..crystal, 1, 36)
  580.     player:GossipMenuAddItem(6, "Рулон льняной ткани. 2 "..crystal, 1, 37)
  581.     player:GossipMenuAddItem(6, "Рулон магической ткани. 3 "..crystal, 1, 38)
  582.     player:GossipMenuAddItem(6, "Рулон шелка. 2 "..crystal, 1, 39)
  583.     player:GossipMenuAddItem(6, "Рулон шерсти. 2 "..crystal, 1, 40)
  584.     player:GossipMenuAddItem(6, "Маленькая блестящая жемчужина. 5 "..crystal, 1, 41)
  585.  
  586.     player:GossipMenuAddItem(0, "Назад", 1, 229)
  587.                       if player:HasItem(currency, 2) then
  588.     player:RemoveItem(currency, 2)
  589.     player:AddItem(RULON_SHERSTI, 1)
  590.   else
  591.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  592.     end
  593.                       elseif (intid == 41) then
  594.                           player:GossipClearMenu()
  595.     player:GossipMenuAddItem(6, "Железный слиток. 2 "..crystal, 1, 30)
  596.     player:GossipMenuAddItem(6, "Жесткая кожа. 2 "..crystal, 1, 31)
  597.     player:GossipMenuAddItem(6, "Стальной слиток. 2 "..crystal, 1, 32)
  598.     player:GossipMenuAddItem(6, "Плотная кожа. 2 "..crystal, 1, 33)
  599.     player:GossipMenuAddItem(6, "Тигровый глаз. 5 "..crystal, 1, 34)
  600.     player:GossipMenuAddItem(6, "Мифриловый слиток. 3 "..crystal, 1, 35)
  601.     player:GossipMenuAddItem(6, "Моховой агат. 15 "..crystal, 1, 36)
  602.     player:GossipMenuAddItem(6, "Рулон льняной ткани. 2 "..crystal, 1, 37)
  603.     player:GossipMenuAddItem(6, "Рулон магической ткани. 3 "..crystal, 1, 38)
  604.     player:GossipMenuAddItem(6, "Рулон шелка. 2 "..crystal, 1, 39)
  605.     player:GossipMenuAddItem(6, "Рулон шерсти. 2 "..crystal, 1, 40)
  606.     player:GossipMenuAddItem(6, "Маленькая блестящая жемчужина. 5 "..crystal, 1, 41)
  607.  
  608.     player:GossipMenuAddItem(0, "Назад", 1, 229)
  609.                         if player:HasItem(currency, 5) then
  610.     player:RemoveItem(currency, 5)
  611.     player:AddItem(MALENKAYA_BLESTASHAYA_JEMCHUZHINA, 1)
  612.   else
  613.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  614.     end
  615. end
  616. -- trade of reagentz end
  617.  
  618. -- all other shit
  619. if (intid == 3) then
  620.   player:GossipClearMenu()
  621.     local chartype = WorldDBQuery("SELECT type FROM roleplay_characters WHERE player = '"..player:GetName().."';")
  622.     if (chartype and chartype:GetInt32(0)==0) then
  623.     player:GossipMenuAddItem(3, "Прокачка профессий", 1, 1)
  624.     player:GossipMenuAddItem(6, "Обмен "..crystal.." на реагенты", 1, 2)
  625.     player:GossipMenuAddItem(1, "Покупка инструментов. 50 "..crystal, 1, 3)
  626.     end
  627.     player:GossipMenuAddItem(6, "Обмен "..crystal.." на золото (100 осколков - 2.5 золотые)", 1, 4)
  628.     player:GossipMenuAddItem(0, "До скорого!", 1, 228)
  629.     player:GossipSendMenu(1, object, MenuGoblinID)
  630.    
  631.   if player:HasItem(currency, 50) then
  632.     player:RemoveItem(currency, 50)
  633.     player:AddItem(97400, 1)
  634.   else
  635.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  636.     end
  637. end
  638.  
  639. if (intid == 4) then
  640.   player:GossipClearMenu()
  641.     local chartype = WorldDBQuery("SELECT type FROM roleplay_characters WHERE player = '"..player:GetName().."';")
  642.     if (chartype and chartype:GetInt32(0)==0) then
  643.     player:GossipMenuAddItem(3, "Прокачка профессий", 1, 1)
  644.     player:GossipMenuAddItem(6, "Обмен "..crystal.." на реагенты", 1, 2)
  645.     player:GossipMenuAddItem(1, "Покупка инструментов. 50 "..crystal, 1, 3)
  646.     end
  647.     player:GossipMenuAddItem(6, "Обмен "..crystal.." на золото (100 осколков - 2.5 золотые)", 1, 4)
  648.     player:GossipMenuAddItem(0, "До скорого!", 1, 228)
  649.     player:GossipSendMenu(1, object, MenuGoblinID)
  650.  
  651.   if player:HasItem(currency, 100) then
  652.     player:RemoveItem(currency, 100)
  653.     player:ModifyMoney(25000)
  654.   else
  655.     player:SendUnitWhisper(" - У меня недостаточно средств для совершения этой операции.", player)
  656.     end
  657. end
  658. -- all other shit end
  659. end
  660.  
  661.  
  662.  
  663.  
  664. RegisterCreatureGossipEvent(NpcGoblinID, 1, OnGossipHelloGoblin)
  665. RegisterCreatureGossipEvent(NpcGoblinID, 2, OnGossipSelectGoblin)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement