//===== Akito Script =========================================
//= Capitulo 1
//===== By: ==================================================
//= Akito && Dynasty
//===== Current Version: =====================================
//=
//===== Compatible With: =====================================
//= rAthena SVN 3422+(Requires jA Script System)
//===== Description: =========================================
// Capitulo 1
//===== Additional Comments: =================================
//============================================================
//======Changeslog============================================
//============================================================
prt_in,173,101,2 script Windhouse 416,{
set .@name$,"[Windhouse]";
set .@questcap,1018;
set .@quest2,1019;
set .@quest, checkquest(.@quest2);
set .@llegar, checkquest(.@questcap);
if (.@llegar == -1){
mes .@name$;
mes "Estoy ocupado ahora";
close;
} else if (.@llegar == 0){
}else if (.@quest == 0) || (.@quest == 1){
mes .@name$;
mes "ve a prt_sew4 y habla con el sospechosos";
close;
} else if (.@quest == 2) && (capitulo1 != 1){
mes .@name$;
mes "Oh! bienvenido!";
next;
mes .@name$;
mes "bueno bueno dejame ver esas muestras...";
next;
mes .@name$;
mes "magnifico, esto es suficiente para sacar mi concluciones";
next;
mes .@name$;
mes " y encontraste a alguien sopechoso?";
next;
switch(select("No")){
case 1:
mes .@name$;
mes "bueno, bueno es igual, solo son rumeros despues de todo. ya que estas aqui podrias entregarle esto a al lider de los caballeros de prontera";
next;
mes .@name$;
mes "te dije que te recompensaria no? tomas estos 1Mz, y ya sabes si encuentras mas de mis ocumentos pasate por aqui!";
specialeffect2 221;
sleep2 100;
specialeffect2 223;
sleep2 100;
specialeffect2 310;
sleep2 100;
specialeffect2 311;
set zeny,zeny+1000000;
getitem 30202,1;// Papel del capitulo 2
set capitulo1,1;
set hablacap,0;
close;
/*windhouse: te dije que te recompensaria no? tomas estos 500k, y ya sabes si encuentras mas de mis ocumentos pasate por aqui!
fin de quest!
(eso es la siguiente quest)*/
}
}else if (hablacap == 1){
mes .@name$;
mes "Hola de nuevo.. ¿crees que puedas ayudarme?";
next;
switch(select("Si:No")){
case 1:
goto buenas;
end;
case 2:
goto buenas;
end;
}
}else if (hablacap < 1) && (capitulo1 != 1){
buenas:
mes .@name$;
mes "Benas tardes, en que puedo ayudarle?";
next;
mes .@name$;
mes "Busca la historiador mas famoso del mundo? ha, ha ,ha";
next;
mes .@name$;
mes " Lo tiene en frente, y ¿ Usted es? un gusto conoserle "+strcharinfo(0)+"";
next;
mes .@name$;
mes "Welcome, " + (Sex?"Mr.":"Mrs.") + " " + strcharinfo(0);
next;
mes .@name$;
mes "para que me necesita " + (Sex?"un fiero guerrero":"una fiera guerra") + " como usted?";
next;
switch(select("Mostrar papel")){
case 1:
mes .@name$;
mes "Oh! no puedo crerlo es la primera pagina de mi gran recopilacion de historias pasadas y presentes! lo habia perdido en alguna parte... espera... tu por casulidad ¿hablaste con la Valkiria Kara? ";
next;
switch(select("si")){
case 1:
mes .@name$;
mes "Maravillozo!, Explendido!, Inigualable! tu eres como yo y como el ^005EFFHeroe^000000! ¿tu tambien has muerto no? y esa atolondrada valkiria te a obligadoa ayudar a su amor platonico....";
next;
mes .@name$;
mes "ha ha ha ha ha. puedo imaginarlo claro en mi mente.";
next;
mes .@name$;
mes "emh em, bueno volviendo a lo que realmente importa quieres saber que dice este papel? ha ha ha si, esta escrito en otra lengua de un pais lejano. bueno lo leere para ti";
next;
again:
cutin "sipnosis",1;
next;
cutin "",255;
switch(select("leer otra ves:he entendido")){
case 1:
goto again;
end;//si elijes la primera opcion se vuelve a abrir la imagen luego te vuelve a preguntar los mismo...
case 2:
mes .@name$;
mes "...";
next;
mes .@name$;
mes "...";
next;
mes .@name$;
mes "...";
next;
mes .@name$;
mes "bueno pareces un buen tipo asi que quiero que em hagas un favor.";
next;
mes .@name$;
mes "¿podrias ir a las cloacas de pornera por mi y consegirme muestras de organismos? y me refiero a los insectos que alli viven. bueno lo que realmente quiero es que busques a lguien sospechozo... ";
next;
mes .@name$;
mes "segun mis contacto por las cloacas se han visto draconianos... y como eres un guerrero me gustaria que fuers a investigar y tambien me traigas unas muestras de alli. ¿que dices? ¿me ayudaras?";
next;
switch(select("si:no")){
case 1:
completequest 1018;
sleep2 200;
mes .@name$;
mes "Muchas gracias! bueno lo dejo en tus manos cuanto engas todo pasate por aqui! te recompesare!";
setquest 1019;
set hablacap,2;
specialeffect2 253;
close;
case 2:
mes .@name$;
mes "bueno quizas estas ocupado ahora, si puedes pasate por aqui de nuevo ";
set hablacap,1;
close;
}
}
}
}
}else{
mes .@name$;
mes "Ya hiciste la quest porfavor continua con el capitulo 2";
close;
}
}
- script capitulo 1 -1,{
OnPCLoadMapEvent:
getmapxy(.@map$,.@x,.@y,0);
set .@questcap,1018;
set .@hunting, checkquest(.@questcap);
if(strcharinfo(3) == .@map$) || (.@map$ == "prontera"){
if(.@hunting == -1) {
set capitulo,1;
setquest 1018;
set prologo,0;
cutin "valkria",1;
mes "[Anunciador]";
mes "Prologo Quest Terminada";
next;
mes "[Anunciador]";
mes "Capitulo 1 Quest Empezada";
next;
mes "[Anunciador]";
mes "Ve y habla con el historiado windhose en la biblioteca de prontera";
cutin "",255;
close;
}else if (.@hunting > -1){
end;
}
end;
}
}
- script capitulo 2 -1,{
OnPCLoadMapEvent:
getmapxy(.@map$,.@x,.@y,0);
set .@questcap,1020;
set .@hunting, checkquest(.@questcap);
set .@questcap2,1021;
set .@capitulo2, checkquest(.@questcap2);
if(strcharinfo(3) == .@map$) || (.@map$ == "prontera"){
if(.@hunting == 2) && (.@capitulo2 == -1){
set capitulo,1;
setquest 1021;
set prologo,0;
cutin "valkria",1;
mes "[Anunciador]";
mes "Quest Capitulo 1 Terminada";
next;
mes "[Anunciador]";
mes "Capitulo 2 Quest Empezada";
next;
mes "[Anunciador]";
mes "Ve y habla con el historiado windhose en la biblioteca de prontera";
cutin "",255;
close;
}else if (.@hunting > -1){
end;
}
end;
}
}
prontera mapflag loadevent
//==============================
//==============================
// Quest
//==============================
//==============================
- script Dacul -1,{
OnNPCKillEvent:
getmapxy(.@map$,.@x,.@y,0);
set .@questcap,1019;
set .@hunting, checkquest(.@questcap,HUNTING);
if(strcharinfo(3) == .@map$) || (.@map$ == "prt_sewb4"){
if(.@hunting == -1){
end;
}else if (.@hunting == 2){
dispbottom "bueno parece que ya termine con todos... tengo que encontrar a ese tal Dacul Snerf";
end;
}
}
end;
}
prt_sewb4,97,92,5 script Dacul Snerf 546,{
set .@questcap,1019;
set .@hunting, checkquest(.@questcap,HUNTING);
set .@name$,"[Dacul Snerf]";
if (.@hunting == 0) || (.@hunting == 1){
mes .@name$;
mes "...";
close;
}else if (.@hunting == 2){
mes .@name$;
mes "Por favor no me ataque. yo no quiero pelear... ";
next;
mes .@name$;
mes "Mira te dare buena informacion si me dejas en paz...";
next;
switch(select("Si")){
case 1:
mes .@name$;
mes "Muchas gracias. bueno e puedo decir que hay alguno draconiaos que estms en contra de la conquista y la guerra... o fui uno de los pocos que escapo con vida nuestro fallesido mundo draconia...";
next;
mes .@name$;
mes "Luego de eso los lideres de lso clanes draconianos se unieron en una aliana y hemos ido de mundo en mundo buscando un hoga donde vivir.";
next;
mes .@name$;
mes "bueno mi historia parece aburrida asi que ire al grano.";
next;
mes .@name$;
mes "Creemos que la forma mas facil de terminar esa guerra es destruir a los 10 clanes de la llama negra.";
next;
mes .@name$;
mes "mira guarda esto es un sello de nuestra organizacion si te encuentras con uno de nososros muestrales este emblema y te ayudaran.";
specialeffect2 221;
sleep2 100;
specialeffect2 223;
sleep2 100;
specialeffect2 311;
completequest 1019;
getitem 30300,1; //item custom: emblema de lo dragones de la luz).
next;
mes .@name$;
mes "Y no le cuentes nadie que esto aqui porfavor. buen adios";
setquest 1020;
specialeffect2 253;
close;
}
}
}
/*es un npc
que no va a estar en hiding
solo estara parado en la pueta del cuvet 4
y si le hablas sin terminar la quest solo te pone 3 puntos
La quest consta de matar 15 male thief bug, 15 female, 15 Crampe
pero si matas todos los ichos
el e habla auomaticamene
*/