Elite™ Posted September 7, 2013 Report Share Posted September 7, 2013 quest buy_fishrod begin state start begin when 9009.chat."Descuento en la caña de pescar" with pc.level>=7 and pc.level<=17 begin say_title("Pescador:") say("¡Un precio increíble!¡Una caña de pescar con una") say("empuñadura fantástica!¡Y con esta caña vienen") say("100 gomas y 20 gusanos gratis! Nosotros, 'los") say("vendedores de las mejores cañas de pesca',") say("ofrecemos a nuestros clientes un Paquete de Caña") say("de Pesca 3 en 1 por 3980 Yangs") say("¿Quieres comprar el Paquete de Pesca?") say("") local b=select("Comprarlo", "No,gracias") if 1==b then if pc.money>=3980 then pc.changemoney(-3980) say_title("Pescador:") say("Has comprado el Paquete de Pesca 3 en 1. ¡Que te") say("diviertas! Y no olvides poner atención a la nota") say("sobre el concurso de pesca. ¡Hasta pronto!") pc.give_item2(27400) pc.give_item2(27800, 100) pc.give_item2(27801, 20) setstate(notify_event) else say_title("Pescador:") say("Lo siento, no tienes suficiente Yang por favor,") say("espera a la siguiente ganga especial.") end elseif 2==b then else say("UNKNOWN BUTTON ["..b.."]") end end end state notify_event begin when letter begin setskin(NOWINDOW) makequestbutton("Nota de la Competición de Pesca") q.set_title("Nota de la Competición de Pesca") q.start() end when button or info begin say_title("Nota:") say("Gracias por comprar el paquete de la caña de") say("pescar. Mi tienda no sólo ofrece ofertas") say("especiales, sino también concursos de pesca para") say("principiantes. El primer premio es deseados por") say("todos los aventureros... ¡un arma") say("de principiante +3! Si llevas 5 Luciopercas") say("muertos al pescador, obtendrás tu premio") say("inmediatamente.") say("¡Este es una oportunidad poco usual! ¡Así que,") say("acepta este reto!") local b=select("Participar", "Ignorar") if 1==b then setstate(play_event) elseif 2==b then setstate(__COMPLETE__) q.done() else say("UNKNOWN BUTTON ["..b.."]") end end end state play_event begin when letter begin setskin(NOWINDOW) makequestbutton("Competición de Pesca") q.set_title("Competición de Pesca") q.start() end when button or info begin say_title("Pescador") say("Pesca una Carpa Cruciana y mátala haciendo click") say("sobre ella. Llévale 5 Carpas Crucianas Muertas al") say("Pescador y serás recompensado.") end when 9009.chat."Retirar premio" with pc.countitem(27833)>=5 begin say_title("Pescador:") say("¿Has traído los 5 Luciopercas Muertos?") say("¡Maravilloso! Como prometido, aquí tienes el arma") say("de principiante +3. ¡Te deseo mucha diversión y") say("vuelve pronto!") pc.removeitem(27833,5) setstate(reward) end when 9009.chat."Retirar premio" with pc.countitem(27833)<5 begin say_title("Pescador:") say("Lo siento, pero sólo puedo darte el premio si me") say("traes 5 Luciopercas Muertos. ¡Inténtalo de nuevo!") end end state reward begin when letter begin setskin(NOWINDOW) makequestbutton("Premio de la Competición") q.set_title("Premio de la Competición") q.start() end when button begin say_title("Información:") say("Has participado en el concurso de pesca y") say("le has entregado 5 Luciopercas Muertos al") say("pescador. ¡Como premio obtienes una caja") say("maravillosa!") say("En la caja está el arma de principiante +3.") if pc.job==0 then pc.give_item2(3210, 1) elseif pc.job==1 then pc.give_item2(2150, 1) elseif pc.job==2 then pc.give_item2(290, 1) elseif pc.job==3 then pc.give_item2(5110, 1) end setstate(__COMPLETE__) q.done() end end state __COMPLETE__ begin when enter begin q.done() end endend Quote Link to comment Share on other sites More sharing options...
Gabiii Posted September 7, 2013 Report Share Posted September 7, 2013 Nice! Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.