Jfirewall Posted August 16, 2013 Report Share Posted August 16, 2013 quest buy_fishrod beginstate start beginwhen 9009.chat."Mision de Pesca" with pc.level>=7 and pc.level<=17 beginsay("Pescador: ")say("")say("Hola"..pc.get_name())say("Para Comenzar, Necesitas 1 Cana De Pescar")say("y Caranada, Te Puedo Vender Mi Cana")say("y 100 Gusanos, Para Que Empieces a")say("Pescar.. Por $ 4.000 Yangs. Que Dices?")local b=select("Aceptar", "Cancelar")if 1==b thenif pc.money>=4000 thenpc.changemoney(-4000)say("Gracias Por Tu Compra")say("La Cana y La Carnada")say("Estab En Tu Inventario")pc.give_item2("27400", 1)pc.give_item2("27801", 100)setstate(notify_event)elsesay("Lo Siento")say("No Tienes Suficiente Dinero")say("Para Comprar La Cana y La Carnada")endelseif 2==b thenelsesay("UNKNOWN BUTTON ["..b.."]")endendendstate notify_event beginwhen letter beginsetskin(NOWINDOW)makequestbutton("Evento De Pesca")q.set_title("Evento De Pesca")q.start()endwhen button beginsay(locale.NOTICE_COLOR.." Evento De Pesca"..locale.NORMAL_COLOR)say("Gracias Por Comprarme La Cana")say("Como Agradeciento, Te Voy A Dar")say("Una Sorpresa. Pero Tienes Que Ir A Pescar")say("y Traerme 5 Carpas Muertas..")say("Te Gusta La Idea? ")local b=select("Aceptar", "Cancelar")if 1==b thensetstate(play_event)elseif 2==b thensetstate(__COMPLETE__)q.done()elsesay("UNKNOWN BUTTON ["..b.."]")endendwhen info beginsay(locale.NOTICE_COLOR.." Evento De Pesca"..locale.NORMAL_COLOR)say("Gracias Por Comprarme La Cana")say("Como Agradeciento, Te Voy A Dar")say("Una Sorpresa. Pero Tienes Que Ir A Pescar")say("y Traerme 5 Carpas Muertas..")say("Te Gusta La Idea? ")local b=select("Aceptar", "Cancelar")if 1==b thensetstate(play_event)elseif 2==b thensetstate(__COMPLETE__)q.done()elsesay("UNKNOWN BUTTON ["..b.."]")endendendstate play_event beginwhen letter beginsetskin(NOWINDOW)makequestbutton("Evento De Pescar")q.set_title("Evento De Pesca")q.start()endwhen button beginsay(locale.NOTICE_COLOR.."Evento De Pesca"..locale.NORMAL_COLOR)say("Para Matar Las Carpas, Luego De Capturarlas")say("Haz Click Secundario Encimas De Las Carpas")endwhen info beginsay(locale.NOTICE_COLOR.."Evento de Pesca"..locale.NORMAL_COLOR) say("Para Matar Las Carpas, Luego De Capturarlas")say("Haz Click Secundario Encimas De Las Carpas") end when 9009.chat."Evento de Pesca" with pc.countitem("27833")>=5 beginsay("Excelente!!. Ya Conseguiste Las 5 Carpas Muertas")say("Ahora Voy A Entregarte El Premio,")say("Por Completar El Evento De Pesca")setstate(reward)endwhen 9009.chat."Evento de Pesca" with pc.countitem("27833")<5 beginsay("No Has Conseguido Las 5 Carpas")say("Muertas, Vuelve Cuando Estes Listo")say("")endendstate reward beginwhen letter beginsetskin(NOWINDOW)makequestbutton("Evento de Pesca")q.set_title("Evento de Pesca")q.start()endwhen button beginsay(locale.NOTICE_COLOR.."Evento de Pesca"..locale.NORMAL_COLOR)say("Aqui Tienes Tu Premio!!")say("Una Arma Basica +9")say("Y 10 Millones De Yang")if pc.countitem("27833")>=5 thenpc.removeitem("27833", 5)if pc.job==0 then pc.change_money(10000000)local r=number(1, 10)if r==1 thenpc.give_item2("00019", 1)elseif r==2 thenpc.give_item2("00029", 1)elseif r==3 thenpc.give_item2("00039", 1)elseif r==4 thenpc.give_item2("00049", 1)elseif r==5 thenpc.give_item2("00059", 1)elseif r==6 thenpc.give_item2("03009", 1)elseif r==7 thenpc.give_item2("03019", 1)elseif r==8 thenpc.give_item2("03029", 1)elseif r==9 thenpc.give_item2("03039", 1)elseif r==10 thenpc.give_item2("03049", 1)endelseif pc.job==1 then pc.change_money(10000000)local r=number(1, 15)if r==1 thenpc.give_item2("00019", 1)elseif r==2 thenpc.give_item2("00029", 1)elseif r==3 thenpc.give_item2("00039", 1)elseif r==4 thenpc.give_item2("00049", 1)elseif r==5 thenpc.give_item2("00059", 1)elseif r==6 thenpc.give_item2("01009", 1)elseif r==7 thenpc.give_item2("04009", 1)elseif r==8 thenpc.give_item2("01019", 1)elseif r==9 thenpc.give_item2("04019", 1)elseif r==10 thenpc.give_item2("01029", 1)elseif r==11 thenpc.give_item2("02009", 1)elseif r==12 thenpc.give_item2("02019", 1)elseif r==13 thenpc.give_item2("02029", 1)elseif r==14 thenpc.give_item2("02039", 1)elseif r==15 thenpc.give_item2("2049", 1)endelseif pc.job==2 then pc.change_money(10000000)local r=number(1, 6)if r==1 thenpc.give_item2("00019", 1)elseif r==2 thenpc.give_item2("00029", 1)elseif r==3 thenpc.give_item2("00039", 1)elseif r==4 thenpc.give_item2("00049", 1)elseif r==5 thenpc.give_item2("00059", 1)elseif r==6 thenpc.give_item2("00059", 1)endelseif pc.job==3 then pc.change_money(10000000)local r=number(1, 8)if r==1 thenpc.give_item2("05009", 1)elseif r==2 thenpc.give_item2("05019", 1)elseif r==3 thenpc.give_item2("05029", 1)elseif r==4 thenpc.give_item2("07009", 1)elseif r==5 thenpc.give_item2("07019", 1)elseif r==6 thenpc.give_item2("07029", 1)elseif r==7 thenpc.give_item2("07039", 1)elseif r==8 thenpc.give_item2("07049", 1)endendelsesay("No Tienes Las 5 Carpas Muertas")say("Vuelve, Cuando Consigas Los Pescados")say("")endsetstate(__COMPLETE__)q.done()endendstate __COMPLETE__ beginwhen enter beginq.done()endendend Miguelito 1 Quote Link to comment Share on other sites More sharing options...
KeKo Posted August 16, 2013 Report Share Posted August 16, 2013 Codigo, codigo everywhere Quote Link to comment Share on other sites More sharing options...
Dextrok Posted August 16, 2013 Report Share Posted August 16, 2013 OH KeKo has vuelto Quote Link to comment Share on other sites More sharing options...
KeKo Posted August 16, 2013 Report Share Posted August 16, 2013 OH KeKo has vuelto Sigo aqui sep, simplemente no aporto. Pero hacer spam es divertido :3 Dextrok 1 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.