На какком то из серверов видел квест на рыбалку, помоему на Deimos 2. Ну так вот, кто может дать такой? И объяснить что де менять, чтобы награду изменить) С меня +)tags-zB11Квест, на, рыбалку
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
