Slabon Posted February 22, 2013 Report Share Posted February 22, 2013 Tengo esta quest pero no funciona quest eventopescador begin state start begin when 9009.chat."Evento del Pescador" with game.get_event_flag("pez")>0 begin say_title("Pescador:") say("") say("Hoy existe la oportunidad de cambiar" .. game.get_event_flag("pez") .. "un Pez Pequeño") say("por un objeto valioso.") say("") say("En su interior encontraras") say("una recompensa sorprendente!") say("") end when 9009.chat."Quiero mi Recompensa" with game.get_event_flag("manwoo")>0 and pc.countitem(27802) >= game.get_event_flag("pez") begin local count = pc.countitem(27802) local need = game.get_event_flag("pez") say_title("Pescador:") say("") say("Aquí tienes tu recompensa!") say("Mira en su interior.") say("") say_reward("Ganaste una Bolsa de Dinero!") pc.removeitem(27802, need) pc.give_item2(50023, 1) say("") end end end Link to comment Share on other sites More sharing options...
DryUz Posted February 22, 2013 Report Share Posted February 22, 2013 toma esta que tenia yop pero falta traducirla quest susi_event begin state start begin when login or levelup with game.get_event_flag("susi_event") begin set_state(information) end end state information begin when letter begin local v=find_npc_by_vnum(20008) if 0==v then else target.vid("__TARGET__", v, "Octavio") end end when __TARGET__.target.click or 20008.chat."Sushi event" begin target.delete("__TARGET__") say("Octavio :") --- l say("Hey") say("Have you heard about sushi which is") say("one of the legendary food in orient?") say("") wait() say_pc_name() say("hmmm?") say("Maybe I have heard somewhere..") say("") wait() say("Octavio:") say("Sushi is combination of fillet of raw fish") say("and rice.") say("It's every Cook's dream dish") say("But these days, it's hard to get fishes...") say("Can you help me?") say(" ") local s=select("Accept.","Refuse.") if 2==s then say("Do you want to give up the quest?") local a=select("Yes","No") if 2==a then say("Octavio:") say("You're not interested in new food") say("Help me when you're free next time.") say("") return end say("Octavio:") say("Too bad..") say("Good-bye") say("") set_state(__GIVEUP__) return end say("Octavio:") say("Oh~ I knew that you are going to accept my favor") say("Thanks so much") say("") set_state(go_to_fishing) end end state go_to_fishing begin when letter begin send_letter("Go fishing") end when info or button begin say_title("Go fishing") --- l say("") say("Octavio the cook found out Sushi the legendary food from orient ") say("for this summer. But he can't get any fish to make sushi") say("because of this war") say("so he is asking players") say(" in the kingdom") say("to get fishes to make sushi.") say("Who gives fish to Octavio ") say("will get some sushi.") say("") end when 20008.chat."I got fish" 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("Octavio:") say("hmm....") say("I can't really do much with this fish...") say("It's only for soup...") say("Hmm... I can't use this for sushi") say("Take it back..") say("") return end say("Octavio:") say("Ohh.....") say("You are so good at everything...") say("I never seen any fish like this flesh") say("Great..") wait() say("Octavio:") say("What kind of sushi you want?") local fish_list= select ("Crucian Crap Sushi","Salmon Sushi","Catfish Sushi","Carp Sushi") if 1== fish_list then if b == 0 then say("Octavio:") say("with the fish you have") say("I can¡¯t make sushi") say("I need to have Crucian carp to make Crucian carp sushi") return end pc.give_item2(50091) say("Octavio:") say("Wait a sec....") say("Here you go~!! It's done...") say("This is Crucian carp sushi~!") say("Try it~! here..") say("") pc.remove_item(27803,1) elseif 2== fish_list then if y == 0 then say("Octavio:") say("with the fish you have") say("I can¡¯t make sushi") say("I need to have salmon to make salmon sushi") return end pc.give_item2(50093) say("Octavio:") say("Wait a sec....") say("Here you go~!! It's done...") say("This is salmon sushi~!") say("Try it~! here..") say("") pc.remove_item(27807,1) elseif 3== fish_list then if m == 0 then say("Octavio:") say("with the fish you have") say("I can¡¯t make sushi") say("I need to have catfish to make catfish sushi") return end pc.give_item2(50094) say("Octavio:") say("Wait a sec....") say("Here you go~!! It's done...") say("This is catfish sushi~!") say("Try it~! here..") say("") pc.remove_item(27816,1) elseif 4== fish_list then if i == 0 then say("Octavio:") say("with the fish you have") say("I can¡¯t make sushi") say("I need to have carp to make carp sushi") return end pc.give_item2(50092) say("Octavio:") say("Wait a sec....") say("Here you go~!! It's done...") say("This is carp sushi~!") say("Try it~! here..") say("") pc.remove_item(27806,1) end end end state __GIVEUP__ begin end state __COMPLEPE__ begin end end Link to comment Share on other sites More sharing options...
Shogun Posted February 22, 2013 Report Share Posted February 22, 2013 Buenas, Prueba con esta. Para activar el evento usa: /e pez numero Donde número es el número de peces que quieres pedir por cada premio. quest eventopescador begin state start begin when 9009.chat."Evento del Pescador" with game.get_event_flag("pez")>0 begin say_title("Pescador:") say("") say("Hoy existe la oportunidad de cambiar " .. game.get_event_flag("pez") .. " peces") say("por un objeto valioso.") say("") say("En su interior encontraras") say("una recompensa sorprendente!") say("") end when 9009.chat."Quiero mi Recompensa" with game.get_event_flag("pez")>0 and pc.countitem(27802) >= game.get_event_flag("pez") begin local count = pc.countitem(27802) local need = game.get_event_flag("pez") say_title("Pescador:") say("") say("Aquí tienes tu recompensa!") say("Mira en su interior.") say("") say_reward("Ganaste una Bolsa de Dinero!") pc.removeitem(27802, need) pc.give_item2(50023, 1) say("") end end end @chikitica ese es otro evento Link to comment Share on other sites More sharing options...
Recommended Posts