// Originais: // Programador: Adson Renato // Texto: Arkanjo // Revisão: Jesusalva // Utilidade: Troca itens dropaveis e dinheiro por outro item. // // IMPORTANTE: Bugs no script, não vai entrar sem consertar! // // Custo: // * 10 Poções da Morte , 10 Poções energética, 10 Poção de Concentração, // * 10 Cocha de Frango, 5 potes de água, 1 Tinta Vermelha, 1 Tinta preta, // * 1 Trevo de Quatro Folhas e 100.000kgp. // Talvez isso devesse ser reescrito, para pedir outras coisas. Que façam mais sentido. // // Recompensa: // * 1 ChapeuDeMarinheiro[ID:764] navio-2,25,23,0 script debug NPC101,{ mes "..."; QUEST_ChapeuDeMarinheiro = 0; close; } navio-2,28,23,0 script Mercador Fugitivo NPC101,{ L_Inicio: // CONFIGURE os IDs @Cranio = 0; if (QUEST_ChapeuDeMarinheiro == 1) goto L_pegou; if (QUEST_ChapeuDeMarinheiro == 2) goto L_Cheio1; if (QUEST_ChapeuDeMarinheiro == 3) goto L_Insuf1; if (QUEST_ChapeuDeMarinheiro == 4) goto L_Fim; mesn; mes "\"E aí, cara! Os guardas da Ilha Fortaleza estão atrás de mim. Preciso de sua ajuda e posso te recompençar.\""; next; mesn strcharinfo(0); menu "Guardaaas! Socorro! Temos um fugitivo!", L_revolta, "Não, estou ocupado.", L_Fechar, "Opa , você disse recompença", L_gogo; L_revolta: message strcharinfo(0), "Guardaaas! Socorro! Temos um fugitivo!"; mesn; mes "\"Não, por favor! Tenho 3 filhos para criar. Eles estão me procurando por contrabando. Por favor, deixe me ir embora!\""; close; L_gogo: mesn; mes "\"Sim, eu preciso fugir daqui o quanto antes. Tenho uma coisa que você irá gostar.\""; next; mesn strcharinfo(0); mes "\"Bom, então me diga logo o que você precisa!"; mes "E qual a recompença?\""; next; mesn; mes "Retira do bolso um pedaço de papel bem velho e lhe entrega, dizendo:"; mes "\"Bom , eu preciso de algumas coisas...\""; next; mes "[PAPEL VELHO]"; mes "* 10 (Poções da Morte)"; mes "* 10 (Poções energética)"; mes "* 10 (Poção de Concentração)"; mes "* 10 (Cocha de Frango)"; mes "* 5 (potes de água)"; mes "* 1 (Tinta Vermelha)"; mes "* 1 (Tinta Preta)"; //mes "* 1 (Cranio)"; //mes "* 5 (Crystais Negros)"; mes "* 1 (Trevo de Quatro Folhas)"; mes "CUSTO: 10.000 GP"; next; mesn; mes "\"Lhe darei em troca de sua ajuda uma (ChapeuDeMarinheiro)\""; menu "Claro, lhe ajudarei !", L_Ajuda, "Está louco ? isto é muita coisa ! Acabo de me lembrar que tenho que encontrar uns amigos na Taberna do Querubin !", L_Fechar; L_Ajuda: mesn; mes "\"Nossa! Muito obrigado! Te espero o quanto antes!\""; next; mesn strcharinfo(0); mes "\"Hey! Não entendi pq estes itens.\""; next; mesn; mes "\"Bem vou explicar meu plano!\""; next; mesn; mes "\"Eu tenho que ter varios disfarce por isto preciso de algumas tintas para pintar roupas. "+ "Trevo de 4 folhas, para fazer a magia de sorte, para fugir sem ser visto.\""; next; mesn; mes "\"Água e Coxas de Galinha para se alimentar durante o percuso e ir de clandestino no navio. "+ "Algunas poções pois nunca se sabe o que vou enfrentar e dinheiro para não andar liso. \""; next; mesn strcharinfo(0); mes "\"Você planejou bem. Vou pegar os itens...\""; QUEST_ChapeuDeMarinheiro = 1; close; L_pegou: mesn; mes "\"Você já tem o que lhe pedi?\""; next; mesn strcharinfo(0); menu "Sim, pode conferir.", L_ver, "Vou avisar as autoridades... boa sorte na prisão.", L_Fechar; L_ver: // 10 Poções da Morte , 10 Poções energética, 10 Poção de Concentração, 10 Cocha de Frango, 5 potes de água // 1 Tinta Vermelha , 1 Tinta preta , 1 Trevo de Quatro Folhas e 100.000 GP if ( countitem(3003) < 10 || countitem(567) < 10 || countitem(568) < 10 || countitem(562) < 10 || countitem(541) < 5 || countitem(690) < 1 || countitem(696) < 1 || countitem(742) < 1 || Zeny < 100000 ) goto L_Insuf; L_Ok3: mesn; mes "\"Nossa , muito obrigado ! Tenho que fugir antes que os guardas me achem aqui !\""; next; mesn; mes "\"Opa , quase ia me esquecendo ! Aqui está sua recompença !\""; next; if ( countitem(3003) < 10 && countitem(567) < 10 && countitem(568) < 10 && countitem(562) < 10 && countitem(541) < 5 && countitem(690) < 1 && countitem(696) < 1 && countitem(@Cranio) >= 1 && countitem(631) < 5 && countitem(742) < 1 && Zeny < 10000 ) goto L_Insuf; //Lunovox: Esse teste tem que ser feito sempre pouco antes de dar ou retirar itens. delitem 3003, 10; delitem 567, 10; delitem 568, 10; delitem 562, 10; delitem 541, 5; delitem 690, 1; delitem 696, 1; delitem 742, 1; Zeny = Zeny - 10000; if (@inventorylist_count >= 100) goto L_Cheio; getitem "ChapeuDeMarinheiro", 1; QUEST_ChapeuDeMarinheiro = 4; close; L_Insuf: mesn; mes "\"Você não tem os itens que pedi. Volte quando tiver com todos!\""; next; mes "[PAPEL VELHO]"; mes "* 10 (Poções da Morte)"; mes "* 10 (Poções energética)"; mes "* 10 (Poção de Concentração)"; mes "* 10 (Cocha de Frango)"; mes "* 5 (potes de água)"; mes "* 1 (Tinta Vermelha)"; mes "* 1 (Tinta Preta)"; mes "* 1 (Trevo de Quatro Folhas)"; mes "CUSTO: 10.000 GP"; QUEST_ChapeuDeMarinheiro = 3; close; L_Insuf1: mesn; mes "\"Lembre-se, Eu preciso de 10 Poções da Morte, 10 Poções energética, "+ "10 Poção de Concentração, 10 Coxa de Frango, 5 potes de água, 1 Tinta Vermelha, "+ "1 Tinta preta, 1 Trevo de Quatro Folhas e 10.000 GP.\""; mes "Conseguiu o que eu pedi?\""; next; menu "Sim! Eu consegui.", L_ver, "Não! Ainda estou procurando.", L_Fechar; L_Cheio: QUEST_ChapeuDeMarinheiro = 2; mesn; mes "\"Seu inventário está cheio! Vá se livrar de alguns itens...\""; close; L_Cheio1: if (@inventorylist_count >= 100) goto L_Cheio; mesn; mes "\"Agora sim, obrigad" + @fm$ + "... Fui!\""; getitem "ChapeuDeMarinheiro", 1; QUEST_ChapeuDeMarinheiro = 4; close; L_Fim: mes "[Mercador]"; mes "\"Estou por aqui... Mais já paguei pelos meus atos, agora estou de bem com tudo não preciso mais fugir...\""; next; mesn strcharinfo(0); mes "\"Por que será que eu não acredito nisso...\""; close; L_Fechar: close; }