quest fish_event begin
state start begin
when login or levelup with pc.get_level() >= 1 begin
set_state(information)
end
end
state information begin
when letter begin
local v = find_npc_by_vnum(20008)
if v != 0 then
target.vid("__TARGET__", v, " Эвент-квест. ")
end
send_letter(" Эвент-квест. ")
end

when button or info begin
say_title(" Найти Октавио. ")
say("")
say(" Найдите Октавио, ")
say(" и возьмите у него задание, ")
say(" чтобы начать Эвент-квест для себя. ")
say_reward(" Примечание: ")
say_reward(" Участвовать в Эвенте, Вы сможете, ")
say_reward(" как только будете 30 ур. или выше. ")
end

when __TARGET__.target.click or
20008.chat." Эвент-квест рыбалка. " begin
target.delete("__TARGET__")
say_title(" Октавио: ")
say(" Приветствую тебя, ".. pc.get_name() ..".")
say(" Я решил приготовит новою блюдо.. ")
say(" Не жалаешь помочь мне? ")
say("")
wait()
say_pc_name()
say(" Хмм..Я? ")
say("")
wait()
say_title(" Октавио: ")
say(" Да, ты, почему ты так удивился? ")
say(" Это очень просто.. ")
say(" Тебе будет нужно всего лишь поймать пару рыб. ")
wait()
say_pc_name()
say(" Ну я даже не знаю.. ")
say("")
wait()
say(" Помоги мне, я тебя отблагодарю. ")
say_reward(" Что скажешь? ")
say(" ")
local s=select(" Пожалуй, помогу Вам. "," Завершить квест. ")
if 2==s then
say(" Вы уверены? ")

local a=select(" Да. "," Нет, помогу позже. ")
if 2==a then
say_title(" Октавио: ")
say(" Что ж, наверное, у Вас есть другие дела.. ")
say(" Надеюсь поможете, когда освободитесь.. ")
say("")
return
end

say_title(" Октавио: ")
say(" Удачи. ")
say("")
set_state(__GIVEUP__)
return
end
say_title(" Октавио: ")
say(" Как я рад, что Вы согласились.. ")
say("")
set_state(go_to_fishing)

end
end

state go_to_fishing begin
when letter begin
send_letter(" Эвент квест - Рыбалка. ")
end
when info or button begin
say_title(" Идите рыбачить. ")
--- l
say("")
say(" Октавио нашёл старинный рецепт, ")
say(" который очень хочет испробывать, ")
say(" для этого ему нужна Ваша помощь. ")
wait()
say_title(" Вы должны ловить: ")
say_reward(" - Судак; ")
say_reward(" - Лосось; ")
say_reward(" - Рыба-Кошка; ")
say_reward(" - Карп. ")
wait()
say_title(" Награды: ")
say_reward(" Если Вы поймаите ")
say_item(" Судак. ", 27803, "")
say_reward(" Вы получите: Янги 25.000.000.")
wait()
say_title(" Награды: ")
say_reward(" Если Вы поймаите ")
say_item(" Лосось. ", 27807, "")
say_reward(" Вы получите: Лунная Шкатулка.")
wait()
say_title(" Награды: ")
say_reward(" Если Вы поймаите ")
say_item(" Рыба-Кошка(2). ", 27816, "")
say_reward(" Вы получите: Сундук с ингридиентами.")
wait()
say_title(" Награды: ")
say_reward(" Если Вы поймаите ")
say_item(" Карп. ", 27806, "")
say_reward(" Вы получите: Камень души. ")
wait()
say_title(" Информация. ")
say_reward(" В дальнейшем, награды, ")
say_reward(" могут быть изменены, ")
say_reward(" добавлены новые вид рыб за награду. ")
end

when 20008.chat." Я поймал(а) рыбу. " begin

local b = pc.count_item(27803);
local y = pc.count_item(27807);
local m = pc.count_item(27816);
local i = pc.count_item(27806);
local t = b + y + m + i

if t == 0 then
say_title(" Октавио: ")
say(" Хм.. ")
say(" У Вас нет ни какой рыбы. ")
say(" Возвращайтесь, когда Вы раздобудите рыбу. ")
say("")
return
end

say_title(" Октавио: ")
say(" Оуу..отлично! ")
say(" У Вас есть рыба! ")
wait()
say_title(" Октавио: ")
say(" Какая рыба у Вас есть сейчас? ")
local fish_list= select (" Судак. "," Лосось. "," Рыба-Кошка. "," Карп. ")
if 1== fish_list then
if b == 0 then
say_title(" Октавио: ")
say_reward(" У Вас нет этой рыбы! ")
return
end

pc.give_gold(25000000)
say_title(" Октавио: ")
say(" Отличная работа! ")
say(" Вот Вам, обещенная награда. ")
say(" Если будет рыба ещё, ")
say(" приходите, буду рад. ")
say("")
pc.remove_item(27803,1)

elseif 2== fish_list then
if y == 0 then
say_title(" Октавио: ")
say_reward(" У Вас нет этой рыбы! ")
return
end
pc.give_item2(50011)
say_title(" Октавио: ")
say(" Отличная работа! ")
say(" Вот Вам, обещенная награда. ")
say(" Если будет рыба ещё, ")
say(" приходите, буду рад. ")
say("")
pc.remove_item(27807,1)

elseif 3== fish_list then
if m == 0 then
say_title(" Октавио: ")
say_reward(" У Вас нет этой рыбы! ")
return
end
pc.give_item2(50110)
say_title(" Октавио: ")
say(" Отличная работа! ")
say(" Вот Вам, обещенная награда. ")
say(" Если будет рыба ещё, ")
say(" приходите, буду рад. ")
say("")
pc.remove_item(27816,2)
elseif 4== fish_list then
if i == 0 then
say_title(" Октавио: ")
say_reward(" У Вас нет этой рыбы! ")
return
end
pc.give_item2(50513)
say_title(" Октавио: ")
say(" Отличная работа! ")
say(" Вот Вам, обещенная награда. ")
say(" Если будет рыба ещё, ")
say(" приходите, буду рад. ")
say("")
pc.remove_item(27806,1)

end
end

end

state __GIVEUP__ begin
end
state __COMPLEPE__ begin
end

end