Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- // [AD] Balder : Tomasco (eAthena - 2008)
- prt_in,119,34,4 script Bate-Papo 882,{ end; OnInit: waitingroom "Bate-papo !!",20; end; }
- prt_in,119,28,1 script Aventureiro 881,{
- if (getgmlevel() > 1) goto GRUPOPARTY;
- emotion 2;
- if (QuestGP) goto GRUPOPARTY;
- mes "[Aventureiro]";
- mes "Olá, amig"+ callfunc ("F_TiuTalk_SexWord","o","a") +", há quanto tempo... vejo que ao contrário de mim se formou como "+ callfunc ("F_ClassName") +"!";
- next;
- mes "[Aventureiro]";
- mes "Eu nada! mas me tornei um famoso caçador de tesouros... sempre fui o vagabundo da turma! xD";
- next;
- mes "^996666["+strcharinfo(0)+"]^996666";
- mes "Vagabundo é apelido! Mas bons tempos... rs";
- next;
- mes "^996666["+strcharinfo(0)+"]^996666";
- mes "Estou precisando encontrar companheiros prá formar um Grupo. Pode-me ajudar com isso?";
- next;
- mes "[Aventureiro]";
- mes "Traga-me quatro 'Sharp Paper'[The Papper] prá eu espalhar em minhas viagens sobre você! Num cartaz assim: '"+ callfunc ("F_TiuTalk_SexWord","O","A") +" Grande "+strcharinfo(0)+"! convoca novos membros prá seu Grupo...', melhor do que ficar gritando por aí.";
- next;
- mes "^996666["+strcharinfo(0)+"]^996666";
- mes "Uhm hum...";
- next;
- menu "- Eu Fiz a Mini-Quest",-,"- Não Fiz a Mini-Quest",L_CancelGP;
- if(countitem(7112) < 4) goto L_SemItGP;
- delitem 7112,4;
- set QuestGP, 1;
- goto GRUPOPARTY;
- L_SemItGP:
- next;
- mes "[Aventureiro]";
- mes "Querendo me passar a perna, colega!? Nem...";
- close;
- L_CancelGP:
- next;
- mes "[Aventureiro]";
- mes "Pois bem, agente se vê...";
- close;
- GRUPOPARTY:
- mes "[Aventureiro]";
- mes "Olá amigo "+strcharinfo(0)+", o que você está procurando?";
- menu "- Eu quero um Grupo!",s2,
- "- Eu quero um Clã!",s1,
- "- Eu quero um"+ callfunc ("F_TiuTalk_SexWord","a Esposa"," Marido") +"!",sr1,
- "- Eu quero um Mapa",MUNDI,
- "- Eu não quero nada!",s3;
- MUNDI:
- cutin "worldmap2",1;
- next;
- mes "[Aventureiro]";
- mes "Boa viagem...";
- cutin "", 255;
- close;
- s1:
- if(getcharid(2) == 1) { mes "Você já tem um Clã!"; close; }
- if (getgmlevel() < 1) { mes "Você não é VIP!"; close; };
- if(getcharid(2) == 0) goto r2;
- s3:
- next;
- mes "[Aventureiro]";
- mes "Ok, agente se vê em Prontera! Lá posso lhe atender melhor...";
- close;
- r2:
- next;
- mes "[Aventureiro]";
- mes "Você realmente gostaria de procurar Clã?";
- menu "- Sim",-,"- Não",p1;
- next;
- mes "[Aventureiro]";
- mes "Ok, Anunciarei que você procura um Clã em todos os Feudos em troca de 18 'Sharp Paper' do The Papper como já combinamos em Prontera certa vez...";
- next;
- if(countitem(7112) < 18) goto ffalta;
- delitem 7112,18;
- MapAnnounce "prontera.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros de Clã e os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "prt_in.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros de Clã e os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "prt_church.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros de Clã e os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "payon.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros de Clã e os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "pay_arche.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros de Clã e os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "payon_in01.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros de Clã e os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "payon_in02.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros de Clã e os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "payon_in03.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros de Clã e os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "geffen.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros de Clã e os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "geffen_in.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros de Clã e os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "aldebaran.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros de Clã e os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "aldeba_in.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros de Clã e os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- close;
- s2:
- if(getcharid(1) == 1) { mes "Você já tem um Grupo"; close; }
- if (getgmlevel() < 1) { mes "Você não é VIP!"; close; };
- if(getcharid(1) == 0) goto r1;
- r1:
- next;
- mes "[Aventureiro]";
- mes "Você gostaria de procurar um Grupo?";
- menu "- Sim",-,"- Não",p1;
- next;
- mes "[Aventureiro]";
- mes "Ok, Anunciarei que você procura um Grupo em todos os Feudos em troca de 8 'Sharp Paper' do The Papper como já combinamos em Prontera certa vez...";
- next;
- if(countitem(7112) < 8) goto ffalta;
- delitem 7112,8;
- MapAnnounce "prontera.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros para o seu Grupo [ "+ getpartyname(getcharid(1)) +" ] os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "prt_in.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros para o seu Grupo [ "+ getpartyname(getcharid(1)) +" ] os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "prt_church.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros para o seu Grupo [ "+ getpartyname(getcharid(1)) +" ] os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "payon.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros para o seu Grupo [ "+ getpartyname(getcharid(1)) +" ] os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "pay_arche.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros para o seu Grupo [ "+ getpartyname(getcharid(1)) +" ] os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "payon_in01.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros para o seu Grupo [ "+ getpartyname(getcharid(1)) +" ] os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "payon_in02.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros para o seu Grupo [ "+ getpartyname(getcharid(1)) +" ] os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "payon_in03.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros para o seu Grupo [ "+ getpartyname(getcharid(1)) +" ] os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "geffen.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros para o seu Grupo [ "+ getpartyname(getcharid(1)) +" ] os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "geffen_in.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros para o seu Grupo [ "+ getpartyname(getcharid(1)) +" ] os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "aldebaran.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros para o seu Grupo [ "+ getpartyname(getcharid(1)) +" ] os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "aldeba_in.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura companheiros para o seu Grupo [ "+ getpartyname(getcharid(1)) +" ] os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- close;
- sr1:
- next;
- mes "[Aventureiro]";
- mes "Você gostaria de procurar um"+ callfunc ("F_TiuTalk_SexWord","a Esposa"," Marido") +"?";
- menu "- Sim",-,"- Não",p1;
- next;
- mes "[Aventureiro]";
- mes "Ok, Anunciarei que você procura um"+ callfunc ("F_TiuTalk_SexWord","a Esposa"," Marido") +" em todos os Feudos em troca de 21 'Sharp Paper' do The Papper como já combinamos em Prontera certa vez...";
- next;
- if(countitem(7112) < 21) goto ffalta;
- delitem 7112,21;
- MapAnnounce "prontera.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura um"+ callfunc ("F_TiuTalk_SexWord","a Esposa"," Marido") +" prá casar! Os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "prt_in.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura um"+ callfunc ("F_TiuTalk_SexWord","a Esposa"," Marido") +" prá casar! Os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "prt_church.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura um"+ callfunc ("F_TiuTalk_SexWord","a Esposa"," Marido") +" prá casar! Os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "payon.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura um"+ callfunc ("F_TiuTalk_SexWord","a Esposa"," Marido") +" prá casar! Os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "pay_arche.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura um"+ callfunc ("F_TiuTalk_SexWord","a Esposa"," Marido") +" prá casar! Os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "payon_in01.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura um"+ callfunc ("F_TiuTalk_SexWord","a Esposa"," Marido") +" prá casar! Os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "payon_in02.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura um"+ callfunc ("F_TiuTalk_SexWord","a Esposa"," Marido") +" prá casar! Os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "payon_in03.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura um"+ callfunc ("F_TiuTalk_SexWord","a Esposa"," Marido") +" prá casar! Os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "geffen.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura um"+ callfunc ("F_TiuTalk_SexWord","a Esposa"," Marido") +" prá casar! Os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "geffen_in.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura um"+ callfunc ("F_TiuTalk_SexWord","a Esposa"," Marido") +" prá casar! Os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "aldebaran.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura um"+ callfunc ("F_TiuTalk_SexWord","a Esposa"," Marido") +" prá casar! Os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- MapAnnounce "aldeba_in.gat",""+ callfunc ("F_TiuTalk_SexWord","O","A") +" Jogado"+ callfunc ("F_TiuTalk_SexWord","r","ra") +" "+strcharinfo(0)+" [ Nível: "+ BaseLevel +" Profissão: "+ jobname(Class) +" ] procura um"+ callfunc ("F_TiuTalk_SexWord","a Esposa"," Marido") +" prá casar! Os interessados favor procurá-l"+ callfunc ("F_TiuTalk_SexWord","o","a") +"!",0;
- close;
- p1:
- next;
- mes "[Aventureiro]";
- mes "Ok, vamos seguir viagem...";
- close;
- ffalta:
- next;
- mes "[Aventureiro]";
- mes "Esqueceu de me recompensar pelo serviço...";
- close;
- OnInit:
- waitingroom "Grupo, Clã, Casa e Bebê",20;
- end;
- }
- // Item (Sharp Paper, 7112,1) drop de um monstro não muito comum e até difícil;
- // Evita o uso abusivo ou tudo precisar de dinheiro ao invés de esforço/mérito;
- // É uma prova de coragem abater um 'The Paper', um monstro difícil prá começo;
- // Incrementa a Economia pela Venda de Itens de Quest & Mini-Quests no Mercado;
- // Socializam os heróis;
- // Isso intrinsecamente dá mais credibilidade e mérito ao Anúncio de uma Party;
Add Comment
Please, Sign In to add comment