viewing paste Unknown #9686 | Athena

Posted on the | Last edited on
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300
//===== 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;
                }
        }
}
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
*/
Viewed 1150 times, submitted by Dynasty.