Особенности: Друид, находящийся в Скрытой деревне объеденился с баффером.
Вы можете найти дубликаты NPC Бафферов около "Торговца Осколками" в СД (Скрытой Деревне).
Оба игрока и существа могут получать баффы, которые длятся в течение 2,5 часов.
Так-же можно получить все бафы кликнув "Get All Buffs".
Как Установить:
Заменяем "NPC_buff.lua" со следующим содержимым:
PHP код:
function get_module_name()
return "NPC_Buff"
end
--============================================================
-- <<<<<< 1. Druid Kart >>>>>>
--============================================================
function hidden_village_buffer()
local npc_id = get_npc_id()
if npc_id == 11225 then
dlg_title("Madosa Kart")
else
dlg_title("Druid Kart")
end
if is_premium() then
dlg_text("Would you like some buffs?")
dlg_menu("Can you please buff me?", "druid_kart_select_player()")
dlg_menu("Can you please buff my creature?", "druid_kart_select_creature()")
dlg_menu("Goodbye!", "")
dlg_show()
else
is_not_premium_error()
end
end
function druid_kart_select_player()
local npc_id = get_npc_id()
if npc_id == 11225 then
dlg_title("@105011225")
else
dlg_title("Druid Kart")
end
if is_premium() then
dlg_text("Which buff do you want?")
dlg_menu("Physical Attack - 1,000R", "druid_kart_give_player(1007)")
dlg_menu("Magical Attack - 1,000R", "druid_kart_give_player(1008)")
dlg_menu("Physical Defense - 1,000R", "druid_kart_give_player(1009)")
dlg_menu("Magical Defense - 1,000R", "druid_kart_give_player(1010)")
dlg_menu("Attack Speed - 1,000R", "druid_kart_give_player(1011)")
dlg_menu("Cast Speed - 1,000R", "druid_kart_give_player(1012)")
dlg_menu("Movement Speed - 1,000R", "druid_kart_give_player(1013)")
dlg_menu("Get All Buffs - 7,000R", "druid_kart_give_player(0)")
dlg_menu("Nevermind.", "hidden_village_buffer()")
dlg_menu("Goodbye!", "")
dlg_show()
else
is_not_premium_error()
end
end
function druid_kart_select_creature()
local npc_id = get_npc_id()
if npc_id == 11225 then
dlg_title("Madosa Kart")
else
dlg_title("Druid Kart")
end
if is_premium() then
dlg_text("Which buff do you want?")
dlg_menu("Physical Attack - 1,000R", "druid_kart_give_creature(1007)")
dlg_menu("Magical Attack - 1,000R", "druid_kart_give_creature(1008)")
dlg_menu("Physical Defense - 1,000R", "druid_kart_give_creature(1009)")
dlg_menu("Magical Defense - 1,000R", "druid_kart_give_creature(1010)")
dlg_menu("Attack Speed - 1,000R", "druid_kart_give_creature(1011)")
dlg_menu("Cast Speed - 1,000R", "druid_kart_give_creature(1012)")
dlg_menu("Movement Speed - 1,000R", "druid_kart_give_creature(1013)")
dlg_menu("Get All Buffs - 7,000R", "druid_kart_give_creature(0)")
dlg_menu("Nevermind.", "hidden_village_buffer()")
dlg_menu("Goodbye!", "")
dlg_show()
else
is_not_premium_error()
end
end
function druid_kart_give_player(buffcode)
local npc_id = get_npc_id()
if npc_id == 11225 then
dlg_title("Madosa Kart")
else
dlg_title("Druid Kart")
end
local gold = get_value("gold")
gold = tonumber(gold)
if buffcode == 0 then
if gold >= 7000 then
sv("gold", gold-7000)
update_gold_chaos()
add_state(1007, 6, 900000)
add_state(1008, 6, 900000)
add_state(1009, 6, 900000)
add_state(1010, 6, 900000)
add_state(1011, 6, 900000)
add_state(1012, 6, 900000)
add_state(1013, 6, 900000)
druid_kart_select_player()
else
dlg_text("Sorry, you do not have enough money.")
dlg_menu("Goodbye!", "")
dlg_show()
end
else
if gold >= 1000 then
sv("gold", gold-1000)
update_gold_chaos()
add_state("" .. buffcode .. "", 6, 900000)
druid_kart_select_player()
else
dlg_text("Sorry, you do not have enough money.")
dlg_menu("Goodbye!", "")
dlg_show()
end
end
end
function druid_kart_give_creature(buffcode)
local npc_id = get_npc_id()
if npc_id == 11225 then
dlg_title("Madosa Kart")
else
dlg_title("Druid Kart")
end
local gold = get_value("gold")
gold = tonumber(gold)
if buffcode == 0 then
if gold >= 7000 then
sv("gold", gold-7000)
update_gold_chaos()
add_cstate(1007, 6, 900000)
add_cstate(1008, 6, 900000)
add_cstate(1009, 6, 900000)
add_cstate(1010, 6, 900000)
add_cstate(1011, 6, 900000)
add_cstate(1012, 6, 900000)
add_cstate(1013, 6, 900000)
druid_kart_select_creature()
else
dlg_text("Sorry, you do not have enough money.")
dlg_menu("Goodbye!", "")
dlg_show()
end
else
if gold >= 1000 then
sv("gold", gold-1000)
update_gold_chaos()
add_cstate("" .. buffcode .. "", 6, 900000)
druid_kart_select_creature()
else
dlg_text("Sorry, you do not have enough money.")
dlg_menu("Goodbye!", "")
dlg_show()
end
end
end
В нижней части "etc_script_function.lua" добавляем следующее:
PHP код:
function is_premium()
local hvbuff = get_state_level("9004")
if hvbuff >= 1 then
return true
else
return false
end
end
function is_not_premium_error()
dlg_text("I'm sorry, but we only provide services to those with a Hidden Village pass.")
dlg_menu("Goodbye!", "")
dlg_show()
end
Запускаем следующий запрос в MS SQL Server Management Studio:
PHP код:
USE
Arcadia
GO
UPDATE [dbo].[NPCResource] SET contact_script='hidden_village_buffer()' WHERE id='7025' OR id='11225'
UPDATE [dbo].[NPCResource] SET local_flag='0' WHERE id='11225'
UPDATE [dbo].[NPCResource] SET x='221311', y='20575' WHERE id='11225'
UPDATE [dbo].[NPCResource] SET x='222541', y='20331' WHERE id='7025'
Всё, запускаем свой сервер и радуемся.
Хотелось бы добавить, что при попытке переместить NPS в другое место,
возможен провал в текстуры,
но если всё правильно расчитать, Вам повезёт
Дерзайте!
[Ссылки могут видеть только зарегистрированные пользователи. ]
Автор: [Ссылки могут видеть только зарегистрированные пользователи. ]
Благодарю за Внимание!
С Уважением, Roch
________________ Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
[Ссылки могут видеть только зарегистрированные пользователи. ]
Для просмотра ссылок или изображений в подписях, у Вас должно быть не менее 10 сообщение(ий). Сейчас у Вас 0 сообщение(ий).
Регистрация: 27.09.2011
Сообщений: 832
Популярность: 48460
Золото Zhyk.Ru: 3 
Сказал(а) спасибо: 584
[Rappelz] Скрытая Деревня (Добавляем баффы)
