Добавлен ofeerist,
опубликован
Алгоритмы, Наработки и Способности
Способ реализации:
vJass
Тип:
Наработка
Версия Warcraft:
1.26, 1.27a, 1.27b, 1.28f
Магазин на фреймах
- Обычный магазин на фреймах, имеет 128 предметов, продает выбранному юниту...
- Обычный магазин на фреймах, имеет 128 предметов, продает выбранному юниту...
Функционал
- Кнопки в виде любой иконки юнита/ предмета/ спелла.
- Название и описание, стоимость для любого предмета.
- Средняя скорость отклика на нажатие фрейма, с помощью 7-ми юнитов.
- Полная поддержка мультиплеера.
- Кнопки в виде любой иконки юнита/ предмета/ спелла.
- Название и описание, стоимость для любого предмета.
- Средняя скорость отклика на нажатие фрейма, с помощью 7-ми юнитов.
- Полная поддержка мультиплеера.
Требования
- Уверенное пользование jass.
- Мемхак анрайза. (>1.3)
- pjass для работы мемхака. (Закинуть в JNGP/jasshelper)
- Уверенное пользование jass.
- Мемхак анрайза. (>1.3)
- pjass для работы мемхака. (Закинуть в JNGP/jasshelper)
Использование
1. Скачиваем пример.
2. Копируем папку триггеров Shop и кидаем к себе в карту.
3. Экспортируем text.fdf, uitoc.toc и кидаем к себе в карту.
4. Настраиваем это дело.
5. Радуемся. (optional)
1. Скачиваем пример.
2. Копируем папку триггеров Shop и кидаем к себе в карту.
3. Экспортируем text.fdf, uitoc.toc и кидаем к себе в карту.
4. Настраиваем это дело.
5. Радуемся. (optional)
Принцип работы
- Используется быстрый синх булевых через локальный выбор.
- Схема старая.
- Скорость синха - ~700мс.
- Используется быстрый синх булевых через локальный выбор.
- Схема старая.
- Скорость синха - ~700мс.
Код
- 7.
- 7.
ItemSettings
library ItemInit
function InitItemVar takes nothing returns nothing
set ItemText[0] = "Урна с прахом Теренаса"
set ItemIconPath[0] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[0] = 200
set ItemLumberCost[0] = 100
set ItemId[0] = 'ktrm'
set ItemDesc[0] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[1] = "Урна с прахом Теренаса"
set ItemIconPath[1] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[1] = 200
set ItemLumberCost[1] = 100
set ItemId[1] = 'ktrm'
set ItemDesc[1] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[2] = "Урна с прахом Теренаса"
set ItemIconPath[2] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[2] = 200
set ItemLumberCost[2] = 100
set ItemId[2] = 'ktrm'
set ItemDesc[2] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[3] = "Урна с прахом Теренаса"
set ItemIconPath[3] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[3] = 200
set ItemLumberCost[3] = 100
set ItemId[3] = 'ktrm'
set ItemDesc[3] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[4] = "Урна с прахом Теренаса"
set ItemIconPath[4] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[4] = 200
set ItemLumberCost[4] = 100
set ItemId[4] = 'ktrm'
set ItemDesc[4] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[5] = "Урна с прахом Теренаса"
set ItemIconPath[5] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[5] = 200
set ItemLumberCost[5] = 100
set ItemId[5] = 'ktrm'
set ItemDesc[5] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[6] = "Урна с прахом Теренаса"
set ItemIconPath[6] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[6] = 200
set ItemLumberCost[6] = 100
set ItemId[6] = 'ktrm'
set ItemDesc[6] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[7] = "Урна с прахом Теренаса"
set ItemIconPath[7] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[7] = 200
set ItemLumberCost[7] = 100
set ItemId[7] = 'ktrm'
set ItemDesc[7] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[8] = "Урна с прахом Теренаса"
set ItemIconPath[8] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[8] = 200
set ItemLumberCost[8] = 100
set ItemId[8] = 'ktrm'
set ItemDesc[8] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[9] = "Урна с прахом Теренаса"
set ItemIconPath[9] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[9] = 200
set ItemLumberCost[9] = 100
set ItemId[9] = 'ktrm'
set ItemDesc[9] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[10] = "Урна с прахом Теренаса"
set ItemIconPath[10] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[10] = 200
set ItemLumberCost[10] = 100
set ItemId[10] = 'ktrm'
set ItemDesc[10] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[11] = "Урна с прахом Теренаса"
set ItemIconPath[11] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[11] = 200
set ItemLumberCost[11] = 100
set ItemId[11] = 'ktrm'
set ItemDesc[11] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[12] = "Урна с прахом Теренаса"
set ItemIconPath[12] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[12] = 200
set ItemLumberCost[12] = 100
set ItemId[12] = 'ktrm'
set ItemDesc[12] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[13] = "Урна с прахом Теренаса"
set ItemIconPath[13] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[13] = 200
set ItemLumberCost[13] = 100
set ItemId[13] = 'ktrm'
set ItemDesc[13] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[14] = "Урна с прахом Теренаса"
set ItemIconPath[14] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[14] = 200
set ItemLumberCost[14] = 100
set ItemId[14] = 'ktrm'
set ItemDesc[14] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[15] = "Урна с прахом Теренаса"
set ItemIconPath[15] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[15] = 200
set ItemLumberCost[15] = 100
set ItemId[15] = 'ktrm'
set ItemDesc[15] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[16] = "Урна с прахом Теренаса"
set ItemIconPath[16] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[16] = 200
set ItemLumberCost[16] = 100
set ItemId[16] = 'ktrm'
set ItemDesc[16] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[17] = "Урна с прахом Теренаса"
set ItemIconPath[17] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[17] = 200
set ItemLumberCost[17] = 100
set ItemId[17] = 'ktrm'
set ItemDesc[17] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[18] = "Урна с прахом Теренаса"
set ItemIconPath[18] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[18] = 200
set ItemLumberCost[18] = 100
set ItemId[18] = 'ktrm'
set ItemDesc[18] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[19] = "Урна с прахом Теренаса"
set ItemIconPath[19] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[19] = 200
set ItemLumberCost[19] = 100
set ItemId[19] = 'ktrm'
set ItemDesc[19] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[20] = "Урна с прахом Теренаса"
set ItemIconPath[20] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[20] = 200
set ItemLumberCost[20] = 100
set ItemId[20] = 'ktrm'
set ItemDesc[20] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[21] = "Урна с прахом Теренаса"
set ItemIconPath[21] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[21] = 200
set ItemLumberCost[21] = 100
set ItemId[21] = 'ktrm'
set ItemDesc[21] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[22] = "Урна с прахом Теренаса"
set ItemIconPath[22] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[22] = 200
set ItemLumberCost[22] = 100
set ItemId[22] = 'ktrm'
set ItemDesc[22] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[23] = "Урна с прахом Теренаса"
set ItemIconPath[23] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[23] = 200
set ItemLumberCost[23] = 100
set ItemId[23] = 'ktrm'
set ItemDesc[23] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[24] = "Урна с прахом Теренаса"
set ItemIconPath[24] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[24] = 200
set ItemLumberCost[24] = 100
set ItemId[24] = 'ktrm'
set ItemDesc[24] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[25] = "Урна с прахом Теренаса"
set ItemIconPath[25] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[25] = 200
set ItemLumberCost[25] = 100
set ItemId[25] = 'ktrm'
set ItemDesc[25] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[26] = "Урна с прахом Теренаса"
set ItemIconPath[26] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[26] = 200
set ItemLumberCost[26] = 100
set ItemId[26] = 'ktrm'
set ItemDesc[26] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[27] = "Урна с прахом Теренаса"
set ItemIconPath[27] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[27] = 200
set ItemLumberCost[27] = 100
set ItemId[27] = 'ktrm'
set ItemDesc[27] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[28] = "Урна с прахом Теренаса"
set ItemIconPath[28] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[28] = 200
set ItemLumberCost[28] = 100
set ItemId[28] = 'ktrm'
set ItemDesc[28] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[29] = "Урна с прахом Теренаса"
set ItemIconPath[29] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[29] = 200
set ItemLumberCost[29] = 100
set ItemId[29] = 'ktrm'
set ItemDesc[29] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[30] = "Урна с прахом Теренаса"
set ItemIconPath[30] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[30] = 200
set ItemLumberCost[30] = 100
set ItemId[30] = 'ktrm'
set ItemDesc[30] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[31] = "Урна с прахом Теренаса"
set ItemIconPath[31] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[31] = 200
set ItemLumberCost[31] = 100
set ItemId[31] = 'ktrm'
set ItemDesc[31] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[32] = "Урна с прахом Теренаса"
set ItemIconPath[32] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[32] = 200
set ItemLumberCost[32] = 100
set ItemId[32] = 'ktrm'
set ItemDesc[32] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[33] = "Урна с прахом Теренаса"
set ItemIconPath[33] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[33] = 200
set ItemLumberCost[33] = 100
set ItemId[33] = 'ktrm'
set ItemDesc[33] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[34] = "Урна с прахом Теренаса"
set ItemIconPath[34] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[34] = 200
set ItemLumberCost[34] = 100
set ItemId[34] = 'ktrm'
set ItemDesc[34] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[35] = "Урна с прахом Теренаса"
set ItemIconPath[35] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[35] = 200
set ItemLumberCost[35] = 100
set ItemId[35] = 'ktrm'
set ItemDesc[35] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[36] = "Урна с прахом Теренаса"
set ItemIconPath[36] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[36] = 200
set ItemLumberCost[36] = 100
set ItemId[36] = 'ktrm'
set ItemDesc[36] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[37] = "Урна с прахом Теренаса"
set ItemIconPath[37] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[37] = 200
set ItemLumberCost[37] = 100
set ItemId[37] = 'ktrm'
set ItemDesc[37] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[38] = "Урна с прахом Теренаса"
set ItemIconPath[38] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[38] = 200
set ItemLumberCost[38] = 100
set ItemId[38] = 'ktrm'
set ItemDesc[38] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[39] = "Урна с прахом Теренаса"
set ItemIconPath[39] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[39] = 200
set ItemLumberCost[39] = 100
set ItemId[39] = 'ktrm'
set ItemDesc[39] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[40] = "Урна с прахом Теренаса"
set ItemIconPath[40] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[40] = 200
set ItemLumberCost[40] = 100
set ItemId[40] = 'ktrm'
set ItemDesc[40] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[41] = "Урна с прахом Теренаса"
set ItemIconPath[41] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[41] = 200
set ItemLumberCost[41] = 100
set ItemId[41] = 'ktrm'
set ItemDesc[41] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[42] = "Урна с прахом Теренаса"
set ItemIconPath[42] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[42] = 200
set ItemLumberCost[42] = 100
set ItemId[42] = 'ktrm'
set ItemDesc[42] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[43] = "Урна с прахом Теренаса"
set ItemIconPath[43] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[43] = 200
set ItemLumberCost[43] = 100
set ItemId[43] = 'ktrm'
set ItemDesc[43] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[44] = "Урна с прахом Теренаса"
set ItemIconPath[44] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[44] = 200
set ItemLumberCost[44] = 100
set ItemId[44] = 'ktrm'
set ItemDesc[44] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[45] = "Урна с прахом Теренаса"
set ItemIconPath[45] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[45] = 200
set ItemLumberCost[45] = 100
set ItemId[45] = 'ktrm'
set ItemDesc[45] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[46] = "Урна с прахом Теренаса"
set ItemIconPath[46] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[46] = 200
set ItemLumberCost[46] = 100
set ItemId[46] = 'ktrm'
set ItemDesc[46] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[47] = "Урна с прахом Теренаса"
set ItemIconPath[47] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[47] = 200
set ItemLumberCost[47] = 100
set ItemId[47] = 'ktrm'
set ItemDesc[47] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[48] = "Урна с прахом Теренаса"
set ItemIconPath[48] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[48] = 200
set ItemLumberCost[48] = 100
set ItemId[48] = 'ktrm'
set ItemDesc[48] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[49] = "Урна с прахом Теренаса"
set ItemIconPath[49] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[49] = 200
set ItemLumberCost[49] = 100
set ItemId[49] = 'ktrm'
set ItemDesc[49] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[50] = "Урна с прахом Теренаса"
set ItemIconPath[50] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[50] = 200
set ItemLumberCost[50] = 100
set ItemId[50] = 'ktrm'
set ItemDesc[50] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[51] = "Урна с прахом Теренаса"
set ItemIconPath[51] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[51] = 200
set ItemLumberCost[51] = 100
set ItemId[51] = 'ktrm'
set ItemDesc[51] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[52] = "Урна с прахом Теренаса"
set ItemIconPath[52] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[52] = 200
set ItemLumberCost[52] = 100
set ItemId[52] = 'ktrm'
set ItemDesc[52] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[53] = "Урна с прахом Теренаса"
set ItemIconPath[53] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[53] = 200
set ItemLumberCost[53] = 100
set ItemId[53] = 'ktrm'
set ItemDesc[53] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[54] = "Урна с прахом Теренаса"
set ItemIconPath[54] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[54] = 200
set ItemLumberCost[54] = 100
set ItemId[54] = 'ktrm'
set ItemDesc[54] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[55] = "Урна с прахом Теренаса"
set ItemIconPath[55] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[55] = 200
set ItemLumberCost[55] = 100
set ItemId[55] = 'ktrm'
set ItemDesc[55] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[56] = "Урна с прахом Теренаса"
set ItemIconPath[56] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[56] = 200
set ItemLumberCost[56] = 100
set ItemId[56] = 'ktrm'
set ItemDesc[56] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[57] = "Урна с прахом Теренаса"
set ItemIconPath[57] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[57] = 200
set ItemLumberCost[57] = 100
set ItemId[57] = 'ktrm'
set ItemDesc[57] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[58] = "Урна с прахом Теренаса"
set ItemIconPath[58] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[58] = 200
set ItemLumberCost[58] = 100
set ItemId[58] = 'ktrm'
set ItemDesc[58] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[59] = "Урна с прахом Теренаса"
set ItemIconPath[59] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[59] = 200
set ItemLumberCost[59] = 100
set ItemId[59] = 'ktrm'
set ItemDesc[59] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[60] = "Урна с прахом Теренаса"
set ItemIconPath[60] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[60] = 200
set ItemLumberCost[60] = 100
set ItemId[60] = 'ktrm'
set ItemDesc[60] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[61] = "Урна с прахом Теренаса"
set ItemIconPath[61] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[61] = 200
set ItemLumberCost[61] = 100
set ItemId[61] = 'ktrm'
set ItemDesc[61] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[62] = "Урна с прахом Теренаса"
set ItemIconPath[62] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[62] = 200
set ItemLumberCost[62] = 100
set ItemId[62] = 'ktrm'
set ItemDesc[62] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[63] = "Урна с прахом Теренаса"
set ItemIconPath[63] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[63] = 200
set ItemLumberCost[63] = 100
set ItemId[63] = 'ktrm'
set ItemDesc[63] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[64] = "Урна с прахом Теренаса"
set ItemIconPath[64] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[64] = 200
set ItemLumberCost[64] = 100
set ItemId[64] = 'ktrm'
set ItemDesc[64] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[65] = "Урна с прахом Теренаса"
set ItemIconPath[65] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[65] = 200
set ItemLumberCost[65] = 100
set ItemId[65] = 'ktrm'
set ItemDesc[65] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[66] = "Урна с прахом Теренаса"
set ItemIconPath[66] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[66] = 200
set ItemLumberCost[66] = 100
set ItemId[66] = 'ktrm'
set ItemDesc[66] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[67] = "Урна с прахом Теренаса"
set ItemIconPath[67] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[67] = 200
set ItemLumberCost[67] = 100
set ItemId[67] = 'ktrm'
set ItemDesc[67] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[68] = "Урна с прахом Теренаса"
set ItemIconPath[68] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[68] = 200
set ItemLumberCost[68] = 100
set ItemId[68] = 'ktrm'
set ItemDesc[68] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[69] = "Урна с прахом Теренаса"
set ItemIconPath[69] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[69] = 200
set ItemLumberCost[69] = 100
set ItemId[69] = 'ktrm'
set ItemDesc[69] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[70] = "Урна с прахом Теренаса"
set ItemIconPath[70] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[70] = 200
set ItemLumberCost[70] = 100
set ItemId[70] = 'ktrm'
set ItemDesc[70] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[71] = "Урна с прахом Теренаса"
set ItemIconPath[71] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[71] = 200
set ItemLumberCost[71] = 100
set ItemId[71] = 'ktrm'
set ItemDesc[71] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[72] = "Урна с прахом Теренаса"
set ItemIconPath[72] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[72] = 200
set ItemLumberCost[72] = 100
set ItemId[72] = 'ktrm'
set ItemDesc[72] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[73] = "Урна с прахом Теренаса"
set ItemIconPath[73] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[73] = 200
set ItemLumberCost[73] = 100
set ItemId[73] = 'ktrm'
set ItemDesc[73] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[74] = "Урна с прахом Теренаса"
set ItemIconPath[74] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[74] = 200
set ItemLumberCost[74] = 100
set ItemId[74] = 'ktrm'
set ItemDesc[74] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[75] = "Урна с прахом Теренаса"
set ItemIconPath[75] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[75] = 200
set ItemLumberCost[75] = 100
set ItemId[75] = 'ktrm'
set ItemDesc[75] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[76] = "Урна с прахом Теренаса"
set ItemIconPath[76] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[76] = 200
set ItemLumberCost[76] = 100
set ItemId[76] = 'ktrm'
set ItemDesc[76] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[77] = "Урна с прахом Теренаса"
set ItemIconPath[77] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[77] = 200
set ItemLumberCost[77] = 100
set ItemId[77] = 'ktrm'
set ItemDesc[77] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[78] = "Урна с прахом Теренаса"
set ItemIconPath[78] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[78] = 200
set ItemLumberCost[78] = 100
set ItemId[78] = 'ktrm'
set ItemDesc[78] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[79] = "Урна с прахом Теренаса"
set ItemIconPath[79] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[79] = 200
set ItemLumberCost[79] = 100
set ItemId[79] = 'ktrm'
set ItemDesc[79] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[80] = "Урна с прахом Теренаса"
set ItemIconPath[80] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[80] = 200
set ItemLumberCost[80] = 100
set ItemId[80] = 'ktrm'
set ItemDesc[80] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[81] = "Урна с прахом Теренаса"
set ItemIconPath[81] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[81] = 200
set ItemLumberCost[81] = 100
set ItemId[81] = 'ktrm'
set ItemDesc[81] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[82] = "Урна с прахом Теренаса"
set ItemIconPath[82] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[82] = 200
set ItemLumberCost[82] = 100
set ItemId[82] = 'ktrm'
set ItemDesc[82] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[83] = "Урна с прахом Теренаса"
set ItemIconPath[83] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[83] = 200
set ItemLumberCost[83] = 100
set ItemId[83] = 'ktrm'
set ItemDesc[83] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[84] = "Урна с прахом Теренаса"
set ItemIconPath[84] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[84] = 200
set ItemLumberCost[84] = 100
set ItemId[84] = 'ktrm'
set ItemDesc[84] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[85] = "Урна с прахом Теренаса"
set ItemIconPath[85] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[85] = 200
set ItemLumberCost[85] = 100
set ItemId[85] = 'ktrm'
set ItemDesc[85] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[86] = "Урна с прахом Теренаса"
set ItemIconPath[86] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[86] = 200
set ItemLumberCost[86] = 100
set ItemId[86] = 'ktrm'
set ItemDesc[86] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[87] = "Урна с прахом Теренаса"
set ItemIconPath[87] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[87] = 200
set ItemLumberCost[87] = 100
set ItemId[87] = 'ktrm'
set ItemDesc[87] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[88] = "Урна с прахом Теренаса"
set ItemIconPath[88] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[88] = 200
set ItemLumberCost[88] = 100
set ItemId[88] = 'ktrm'
set ItemDesc[88] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[89] = "Урна с прахом Теренаса"
set ItemIconPath[89] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[89] = 200
set ItemLumberCost[89] = 100
set ItemId[89] = 'ktrm'
set ItemDesc[89] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[90] = "Урна с прахом Теренаса"
set ItemIconPath[90] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[90] = 200
set ItemLumberCost[90] = 100
set ItemId[90] = 'ktrm'
set ItemDesc[90] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[91] = "Урна с прахом Теренаса"
set ItemIconPath[91] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[91] = 200
set ItemLumberCost[91] = 100
set ItemId[91] = 'ktrm'
set ItemDesc[91] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[92] = "Урна с прахом Теренаса"
set ItemIconPath[92] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[92] = 200
set ItemLumberCost[92] = 100
set ItemId[92] = 'ktrm'
set ItemDesc[92] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[93] = "Урна с прахом Теренаса"
set ItemIconPath[93] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[93] = 200
set ItemLumberCost[93] = 100
set ItemId[93] = 'ktrm'
set ItemDesc[93] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[94] = "Урна с прахом Теренаса"
set ItemIconPath[94] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[94] = 200
set ItemLumberCost[94] = 100
set ItemId[94] = 'ktrm'
set ItemDesc[94] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[95] = "Урна с прахом Теренаса"
set ItemIconPath[95] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[95] = 200
set ItemLumberCost[95] = 100
set ItemId[95] = 'ktrm'
set ItemDesc[95] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[96] = "Урна с прахом Теренаса"
set ItemIconPath[96] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[96] = 200
set ItemLumberCost[96] = 100
set ItemId[96] = 'ktrm'
set ItemDesc[96] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[97] = "Урна с прахом Теренаса"
set ItemIconPath[97] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[97] = 200
set ItemLumberCost[97] = 100
set ItemId[97] = 'ktrm'
set ItemDesc[97] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[98] = "Урна с прахом Теренаса"
set ItemIconPath[98] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[98] = 200
set ItemLumberCost[98] = 100
set ItemId[98] = 'ktrm'
set ItemDesc[98] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[99] = "Урна с прахом Теренаса"
set ItemIconPath[99] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[99] = 200
set ItemLumberCost[99] = 100
set ItemId[99] = 'ktrm'
set ItemDesc[99] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[100] = "Урна с прахом Теренаса"
set ItemIconPath[100] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[100] = 200
set ItemLumberCost[100] = 100
set ItemId[100] = 'ktrm'
set ItemDesc[100] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[101] = "Урна с прахом Теренаса"
set ItemIconPath[101] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[101] = 200
set ItemLumberCost[101] = 100
set ItemId[101] = 'ktrm'
set ItemDesc[101] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[102] = "Урна с прахом Теренаса"
set ItemIconPath[102] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[102] = 200
set ItemLumberCost[102] = 100
set ItemId[102] = 'ktrm'
set ItemDesc[102] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[103] = "Урна с прахом Теренаса"
set ItemIconPath[103] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[103] = 200
set ItemLumberCost[103] = 100
set ItemId[103] = 'ktrm'
set ItemDesc[103] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[104] = "Урна с прахом Теренаса"
set ItemIconPath[104] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[104] = 200
set ItemLumberCost[104] = 100
set ItemId[104] = 'ktrm'
set ItemDesc[104] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[105] = "Урна с прахом Теренаса"
set ItemIconPath[105] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[105] = 200
set ItemLumberCost[105] = 100
set ItemId[105] = 'ktrm'
set ItemDesc[105] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[106] = "Урна с прахом Теренаса"
set ItemIconPath[106] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[106] = 200
set ItemLumberCost[106] = 100
set ItemId[106] = 'ktrm'
set ItemDesc[106] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[107] = "Урна с прахом Теренаса"
set ItemIconPath[107] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[107] = 200
set ItemLumberCost[107] = 100
set ItemId[107] = 'ktrm'
set ItemDesc[107] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[108] = "Урна с прахом Теренаса"
set ItemIconPath[108] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[108] = 200
set ItemLumberCost[108] = 100
set ItemId[108] = 'ktrm'
set ItemDesc[108] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[109] = "Урна с прахом Теренаса"
set ItemIconPath[109] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[109] = 200
set ItemLumberCost[109] = 100
set ItemId[109] = 'ktrm'
set ItemDesc[109] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[110] = "Урна с прахом Теренаса"
set ItemIconPath[110] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[110] = 200
set ItemLumberCost[110] = 100
set ItemId[110] = 'ktrm'
set ItemDesc[110] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[111] = "Урна с прахом Теренаса"
set ItemIconPath[111] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[111] = 200
set ItemLumberCost[111] = 100
set ItemId[111] = 'ktrm'
set ItemDesc[111] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[112] = "Урна с прахом Теренаса"
set ItemIconPath[112] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[112] = 200
set ItemLumberCost[112] = 100
set ItemId[112] = 'ktrm'
set ItemDesc[112] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[113] = "Урна с прахом Теренаса"
set ItemIconPath[113] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[113] = 200
set ItemLumberCost[113] = 100
set ItemId[113] = 'ktrm'
set ItemDesc[113] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[114] = "Урна с прахом Теренаса"
set ItemIconPath[114] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[114] = 200
set ItemLumberCost[114] = 100
set ItemId[114] = 'ktrm'
set ItemDesc[114] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[115] = "Урна с прахом Теренаса"
set ItemIconPath[115] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[115] = 200
set ItemLumberCost[115] = 100
set ItemId[115] = 'ktrm'
set ItemDesc[115] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[116] = "Урна с прахом Теренаса"
set ItemIconPath[116] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[116] = 200
set ItemLumberCost[116] = 100
set ItemId[116] = 'ktrm'
set ItemDesc[116] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[117] = "Урна с прахом Теренаса"
set ItemIconPath[117] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[117] = 200
set ItemLumberCost[117] = 100
set ItemId[117] = 'ktrm'
set ItemDesc[117] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[118] = "Урна с прахом Теренаса"
set ItemIconPath[118] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[118] = 200
set ItemLumberCost[118] = 100
set ItemId[118] = 'ktrm'
set ItemDesc[118] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[119] = "Урна с прахом Теренаса"
set ItemIconPath[119] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[119] = 200
set ItemLumberCost[119] = 100
set ItemId[119] = 'ktrm'
set ItemDesc[119] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[120] = "Урна с прахом Теренаса"
set ItemIconPath[120] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[120] = 200
set ItemLumberCost[120] = 100
set ItemId[120] = 'ktrm'
set ItemDesc[120] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[121] = "Урна с прахом Теренаса"
set ItemIconPath[121] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[121] = 200
set ItemLumberCost[121] = 100
set ItemId[121] = 'ktrm'
set ItemDesc[121] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[122] = "Урна с прахом Теренаса"
set ItemIconPath[122] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[122] = 200
set ItemLumberCost[122] = 100
set ItemId[122] = 'ktrm'
set ItemDesc[122] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[123] = "Урна с прахом Теренаса"
set ItemIconPath[123] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[123] = 200
set ItemLumberCost[123] = 100
set ItemId[123] = 'ktrm'
set ItemDesc[123] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[124] = "Урна с прахом Теренаса"
set ItemIconPath[124] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[124] = 200
set ItemLumberCost[124] = 100
set ItemId[124] = 'ktrm'
set ItemDesc[124] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[125] = "Урна с прахом Теренаса"
set ItemIconPath[125] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[125] = 200
set ItemLumberCost[125] = 100
set ItemId[125] = 'ktrm'
set ItemDesc[125] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[126] = "Урна с прахом Теренаса"
set ItemIconPath[126] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[126] = 200
set ItemLumberCost[126] = 100
set ItemId[126] = 'ktrm'
set ItemDesc[126] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
set ItemText[127] = "Урна с прахом Теренаса"
set ItemIconPath[127] = "ReplaceableTextures\\CommandButtons\\BTNUrnOfKelThuzad.blp"
set ItemGoldCost[127] = 200
set ItemLumberCost[127] = 100
set ItemId[127] = 'ktrm'
set ItemDesc[127] = "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r"
endfunction
endlibrary
Init
globals
integer MainBackdrop
integer GoldBackdrop
integer GoldText
integer LumberBackdrop
integer LumberText
integer ItemNameText
integer ItemDescText
integer array ItemBackdrop
integer array ItemButton
string array ItemText
string array ItemDesc
string array ItemIconPath
integer array ItemGoldCost
integer array ItemLumberCost
integer array ItemId
unit array Bit[8]
unit EndTrans
unit array SelectedUnit[1]
endglobals
function InitItemFrames takes nothing returns nothing
local integer i = 0
local real x = -.07
local real y = .189
loop
exitwhen i == 128
set ItemBackdrop[i] = CreateFrame("ChatHistoryBackdrop", MainBackdrop, 1 + i)
call SetFrameTexture(ItemBackdrop[i], ItemIconPath[i], false)
call SetFrameSize(ItemBackdrop[i], .03, .03)
call SetFramePoint(ItemBackdrop[i], 4, MainBackdrop, 4, x, y)
set ItemButton[i] = CreateFrame("ButtonChat", MainBackdrop, 129 + i)
call SetFrameSize(ItemButton[i], .03, .03)
call SetFramePoint(ItemButton[i], 4, ItemBackdrop[i], 4, 0, 0)
call SetFrameAlpha(ItemButton[i], 0)
set x = x + .021
if x == .098 then
set x = -.07
set y = y - .021
endif
set i = i + 1
endloop
endfunction
function Trig_Init_Actions takes nothing returns nothing
local integer i = 0
local real x = -.05
local real y = 0
call EnableOPLimit(false)
call LoadTOCFile("uitoc.toc")
call InitItemVar()
set MainBackdrop = CreateFrame("ChatHistoryBackdrop", pGameUI, 0)
call SetFrameSize(MainBackdrop, .2, .41)
call SetFrameAbsolutePoint(MainBackdrop, 4, .68, .37)
call ExecuteFunc("InitItemFrames")
set ItemNameText = CreateFrame("ChatText1", MainBackdrop, 0)
call SetFramePoint(ItemNameText, 4, MainBackdrop, 4, -.042, -.145)
call SetFrameText(ItemNameText, "Урна с прахом Теренаса")
set GoldBackdrop = CreateFrame("ChatHistoryBackdrop", MainBackdrop, 0)
call SetFrameSize(GoldBackdrop, .026, .026)
call SetFrameTexture(GoldBackdrop, "UI\\Feedback\\Resources\\ResourceGold.blp", false)
call SetFramePoint(GoldBackdrop, 4, MainBackdrop, 4, .014, -.145)
set GoldText = CreateFrame("ChatText2", MainBackdrop, 0)
call SetFramePoint(GoldText, 4, MainBackdrop, 4, .035, -.145)
call SetFrameText(GoldText, "99999")
set LumberBackdrop = CreateFrame("ChatHistoryBackdrop", MainBackdrop, 0)
call SetFrameSize(LumberBackdrop, .026, .026)
call SetFrameTexture(LumberBackdrop, "UI\\Feedback\\Resources\\ResourceLumber.blp", false)
call SetFramePoint(LumberBackdrop, 4, MainBackdrop, 4, .058, -.145)
set LumberText = CreateFrame("ChatText2", MainBackdrop, 0)
call SetFramePoint(LumberText, 4, MainBackdrop, 4, .08, -.145)
call SetFrameText(LumberText, "99999")
set ItemDescText = CreateFrame("ChatText1", MainBackdrop, 0)
call SetFramePoint(ItemDescText, 4, MainBackdrop, 4, 0, -.177)
call SetFrameText(ItemDescText, "|c00FFFFFFЭта магическая урна, некогда служившая |n вместилищем праха короля Теренаса, была |n избрана Тикондрусом для хранения останков |n Кел-Тузеда.|r")
set i = 0
loop
exitwhen i == 8
set Bit[i] = CreateUnit(Player(15), 'hfoo', 0, 0, 0)
set i = i + 1
endloop
set EndTrans = CreateUnit(Player(15), 'hfoo', 0, 0, 0)
// TEST
call SetPlayerState(Player(0), PLAYER_STATE_GOLD_GATHERED, 1000)
call SetPlayerState(Player(0), PLAYER_STATE_LUMBER_GATHERED, 1000)
call SetPlayerState(Player(1), PLAYER_STATE_GOLD_GATHERED, 1000)
call SetPlayerState(Player(1), PLAYER_STATE_LUMBER_GATHERED, 1000)
// ENDTEST
endfunction
//===========================================================================
function InitTrig_Init takes nothing returns nothing
set gg_trg_Init = CreateTrigger( )
call TriggerRegisterTimerEventSingle( gg_trg_Init, 0.05 )
call TriggerAddAction( gg_trg_Init, function Trig_Init_Actions )
endfunction
Sync
library BinOperations
function Mod2 takes integer n returns integer
local real num = I2R(n) / I2R(2)
local integer i = 0
loop
exitwhen i > StringLength(R2S(num)) - 2
if SubString(R2S(num), i, i + 2) == ".0" then
return 0
endif
set i = i + 1
endloop
return 1
endfunction
function ToBin takes integer n returns string
local integer bin = 0
local integer i = 0
local string s = ""
local string ts = ""
if n == 0 then
return "0"
endif
loop
exitwhen not (n > 0)
set bin = Mod2(n)
set n = n / 2
set s = s + I2S(bin)
set i = i + 1
endloop
// Переворот
set i = StringLength(s)
loop
exitwhen StringLength(ts) == StringLength(s)
set ts = ts + SubString(s, i - 1, i)
set i = i - 1
endloop
return ts
endfunction
function ToDec takes string n returns integer
local integer temp = 0
local integer sum = 0
local integer i = 0
local integer j = StringLength(n) - 1
loop
exitwhen i == StringLength(n)
set temp = S2I(SubString(n, i, i + 1)) * PowI(2, j)
set sum = sum + temp
set j = j - 1
set i = i + 1
endloop
return sum
endfunction
endlibrary
globals
string array TempTrans[1][7]
endglobals
function ItemCreate takes unit u, integer id returns nothing
local item it = CreateItem(ItemId[id] , GetUnitX(u), GetUnitY(u))
call UnitAddItem(u, it)
set it = null
endfunction
function Trig_Sync_Actions takes nothing returns nothing
local integer pid = GetPlayerId(GetTriggerPlayer())
local integer i = 0
local string num = ""
local integer b = 0
loop
exitwhen i == 8
if GetTriggerUnit() == Bit[i] then
set TempTrans[pid][i] = "1"
set b = 1
endif
set i = i + 1
endloop
if b == 0 and GetOwningPlayer(GetTriggerUnit()) == GetTriggerPlayer() then
set SelectedUnit[pid] = GetTriggerUnit()
endif
if GetTriggerUnit() == EndTrans then
set i = 0
loop
exitwhen i == 5
set num = num + TempTrans[pid][i]
set TempTrans[pid][i] = "0"
set i = i + 1
endloop
call ItemCreate(SelectedUnit[pid], ToDec(num))
if GetLocalPlayer() == GetTriggerPlayer() then
call SelectUnit(SelectedUnit[pid], true)
endif
endif
endfunction
//===========================================================================
function InitTrig_Sync takes nothing returns nothing
local integer i = 0
local integer j = 0
loop
exitwhen i == 2
set j = 0
loop
exitwhen j == 8
set TempTrans[i][j] = "0"
set j = j + 1
endloop
set i = i + 1
endloop
set gg_trg_Sync = CreateTrigger( )
call TriggerRegisterPlayerSelectionEventBJ( gg_trg_Sync, Player(0), true )
call TriggerRegisterPlayerSelectionEventBJ( gg_trg_Sync, Player(1), true )
call TriggerAddAction( gg_trg_Sync, function Trig_Sync_Actions )
endfunction
MouseEvent
globals
boolean KeySpan
real TempCurTime = 0
boolean BackdropMove = false
endglobals
function SyncChoose takes integer n returns nothing
local string bin = ToBin(n)
local integer i = 0
loop
exitwhen StringLength(bin) == 8
set bin = "0" + bin
endloop
set i = 0
loop
exitwhen i == 8
if SubString(bin, i, i + 1) == "1" then
call SelectUnit(Bit[i], true)
call ClearSelection()
endif
set i = i + 1
endloop
call SelectUnit(EndTrans, true)
call ClearSelection()
endfunction
function ItemLoop takes integer p, integer layer returns nothing
local integer i = 0
local real x = -.07
local real y = .189
local integer b = 0
loop
exitwhen i == 128
if ItemButton[i] == layer then
call SetFrameSize(ItemBackdrop[i], .032, .032)
call SetFrameAlpha(ItemBackdrop[i], 255)
set b = 1
if IsKeyPressed(0x01) and KeySpan and GetPlayerState(Player(p), PLAYER_STATE_GOLD_GATHERED) >= ItemGoldCost[i] and GetPlayerState(Player(p), PLAYER_STATE_LUMBER_GATHERED) >= ItemLumberCost[i] then
set KeySpan = false
if SelectedUnit[p] != null then
call SetPlayerState(Player(p), PLAYER_STATE_GOLD_GATHERED, GetPlayerState(Player(p), PLAYER_STATE_GOLD_GATHERED) - ItemGoldCost[i])
call SetPlayerState(Player(p), PLAYER_STATE_LUMBER_GATHERED, GetPlayerState(Player(p), PLAYER_STATE_LUMBER_GATHERED) - ItemLumberCost[i])
call SyncChoose(i)
else
call BJDebugMsg("Нужно выбрать своего юнита!!!")
endif
exitwhen true
endif
else
call SetFrameSize(ItemBackdrop[i], .03, .03)
call SetFrameAlpha(ItemBackdrop[i], 150)
endif
if b == 1 then
call SetFrameText(ItemNameText, ItemText[i] )
call SetFrameText(GoldText, I2S(ItemGoldCost[i] ))
call SetFrameText(LumberText, I2S(ItemLumberCost[i]))
call SetFrameText(ItemDescText, ItemDesc[i] )
call SetFrameAlpha(LumberBackdrop, 255)
call SetFrameAlpha(GoldBackdrop, 255)
else
call SetFrameText(ItemNameText, "")
call SetFrameText(GoldText, "")
call SetFrameText(LumberText, "")
call SetFrameText(ItemDescText, "")
call SetFrameAlpha(LumberBackdrop, 0)
call SetFrameAlpha(GoldBackdrop, 0)
endif
set x = x + .021
if x == .098 then
set x = -.07
set y = y - .021
endif
set i = i + 1
endloop
endfunction
function Trig_MouseEvent_Actions takes nothing returns nothing
local integer i = 0
local integer layer = FindCLayerUnderCursor()
loop
exitwhen i == 2
if GetLocalPlayer() == Player(i) then
call ItemLoop(i, layer)
if IsKeyPressed(0x01) then
set KeySpan = false
else
set KeySpan = true
set BackdropMove = false
endif
endif
set i = i + 1
endloop
endfunction
//===========================================================================
function InitTrig_MouseEvent takes nothing returns nothing
set gg_trg_MouseEvent = CreateTrigger( )
call TriggerRegisterTimerEventPeriodic( gg_trg_MouseEvent, 0.05 )
call TriggerAddAction( gg_trg_MouseEvent, function Trig_MouseEvent_Actions )
endfunction
`
ОЖИДАНИЕ РЕКЛАМЫ...
Чтобы оставить комментарий, пожалуйста, войдите на сайт.
Нативки или код в движке гораздо шустрее, потому все и пилят Длл с этими магазинами, талантами и тому подобным, ибо когда в карте и без того много чего, 6 кадров обеспечено, не стоит юзать функции этого типа бездумно.
Отредактирован ofeerist
Поэтому и говорю, что кому надо, тот сделает вообще без проблем.
Делается бэкдроп с какой-нибудь рамкой и перемещается он, и вот вызовов 2, а не 254.
Отредактирован JackFastGame