viewing paste Unknown #9169 | 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
//===== Akito Script =========================================
//= prologo 1
//===== By: ==================================================
//= Akito && Dynasty
//===== Current Version: =====================================
//= 1.0
//===== Compatible With: =====================================
//= rAthena SVN 3422+(Requires jA Script System)
//===== Description: =========================================
//===== Additional Comments: =================================
//============================================================
//======Changeslog============================================
//= 1.0 Work complete
//============================================================
prontera,100,100,3      Script  prologo 100,{
set .@name$,"Kara";
set .@questpro1,1000;
set .@hunting, checkquest(.@questpro1,HUNTING);
set .@map$,"prontera";
set .@x,100;
set .@y,100;
if (.@hunting == 2) {
                        cutin "Capitulo_1",1;
                        completequest .@questpro1;
                        next;
                        cutin "",255;
                        mes .@name$;
                        switch(select("Swordman:Thief:Archer:Acolite:Merchant:Ninja:Taekwado:Gunslinger:Super novice")){
                                case 1:
                                set .@id,1;//Swordman
                                callfunc "jobchange3",.@id;
                                end;
                                case 2:
                                set .@id,1;//Thief
                                callfunc "jobchange3",.@id;
                                end;
                                case 3:
                                set .@id,1;//Archer
                                callfunc "jobchange3",.@id;
                                end;
                                case 4:
                                set .@id,1;//Acolite
                                callfunc "jobchange3",.@id;
                                end;
                                case 5:
                                set .@id,1;//Merchant
                                callfunc "jobchange3",.@id;
                                end;
                                case 6:
                                set .@id,1;//Ninja
                                callfunc "jobchange3",.@id;
                                end;
                                case 7:
                                set .@id,1;//Taekwado
                                callfunc "jobchange3",.@id;
                                end;
                                case 8:
                                set .@id,1;//Gunslinger
                                callfunc "jobchange3",.@id;
                                end;
                                case 9:
                                set .@id,45;//Super novice
                                callfunc "jobchange2",.@id;
                                end;
                        }
}else if (.@hunting == 0 || .@hunting == 1) {
                        mes .@name$;
                        mes "Is fighting Ancient Mummies going well?";
                        next;
                        switch(select("Bien.:No quiero seguir")) {
                        case 1:
                                mes .@name$;
                                mes "Bien, Continua;";
                                close;
                        case 2:
                                mes .@name$;
                                mes "muy bien te mandara a midgar";
                                erasequest .@questpro1;
                                next;
                                warp .@map$,.@x,.@y;
                                close;
                        }
}else if(prologe) || (.@hunting == -1){
        mes .@name$;
        mes "he,he,he. por alguna razon estyo feliz.";
        next;
        mes "ahora puedes conseguir poder!";
        next;
        mes "¿que te gustaria ser?";
        next;
        if(select("Swordman:Thief:Archer:Acolite:Merchant:Ninja:Taekwado:Gunslinger:Super novice")>=0)goto L_quest;
 
L_quest:
        mes "oh! exlente. se apega a ti perfectamente!";
        mes "bueno esta zona esta llena de mounstruos. muestrame tu determinacion y te dare el poder!";
        next;
        mes "vuelve aqui cuando llas terminado";
                setquest .@questpro1; //quest de matar  5 poring, 5 drops, 5 picky
        close;
}else{
mes "Hola... yo soy Kara una valkiria.";
mes .@name$;
mes "Que donde estamos?.";
mes .@name$;
mes "Estamos en las puertas de Vanaheim, el mundo de la creacion.";
mes .@name$;
mes "Si, tu estas muerto. hace ya unos meses...";
mes .@name$;
mes "h-ah, ah! ¿que como moriste?. Los draconianos atacaron tu ciudad.";
mes .@name$;
mes "ha! no sabes ¿quienes son?. ellos viene de otro mundo un mundo que ya fue destruido.";
mes .@name$;
mes "Ellos declararon la guerra a Asgard! tienen mucho poder... pero de eso hace 7 años!. ";
mes .@name$;
mes "Eso me hace recordar, cuando lo conoci por primera vez. Al ''heroe''(en azul).";
mes .@name$;
mes "¿quien es el heroe?. es el hombre del que me enamore! me pidio desesperadamente que lo devolviera a Midgar";
mes .@name$;
mes "el perdio todo... su esposa e hijos... los draconianos hace 7 años atacaron su pueblo natal y de pueblo solo quedo cenizas.";
mes .@name$;
mes "¿Que?. tu tambien¡ ¿Quieres volver a midgar?.";
        switch(select(si)){
                case 1:
                        mes .@name$;
                        mes "y Que quieres hacer despues?";
                        switch(select("Pelar:Vivir una vida pacifica:Cancelar")){
                                        case 1:
                                                mes .@name;
                                                mes "Oh! Maravillozo! si estas decidido, puedo ayudarte! te dare fuerza para pelear, pero tu crecicmiento depende de ti!";
                                                set prologe,1;
                                                getitem 20010,1;
                                                close;
                                        case 2:
                                                mes .@name;
                                                mes "Pero en algun momento tendras que luchar ¿no cres?... bueno, si llega el seguro sabras que hacer, hasta la proxima vida";
                                                next;
                                                        warp .@map$,.@x,.@y;
                                                        end;
                                        case 3:
                                                        close;
                        }
                }
        }
}
function        script  jobchange2      {
                mes "Please remove your "+((checkfalcon())?"falcon":"")+((checkcart())?"cart":"")+((checkriding())?"Peco":"")+((ismounting())?"mount":"")+" before proceeding.";
                close;
        }
        if (SkillPoint) {
                mes "Please use all your skill points before proceeding.";
                close;
        }
        if (Class > 4049) {
                mes "No more jobs are available.";
                close;
        }
        if (BaseLevel < 45){
                mes "Aun no eres lvl 45";
                                close;
        }
if (getarg(0)==45){
        mes .@name;
        mes  "Bien! ahora te enviare al midgard! hasta la proxima vida!.";
                sleep2 100;    
        specialeffect2 501;
                sleep2 300;
        specialeffect2 488;
                sleep2 100;
        specialeffect2 847;
                sleep2 500;
                jobchange getarg(0);
                sleep2 500;
        specialeffect2 338;
                sleep2 1;
        specialeffect2 183;
                sleep2 500;
                specialeffect2 581;
                next;
                warp .@map$,.@x,.@y;
                end;
        }
}
function        script  jobchange3      {
                mes "Please remove your "+((checkfalcon())?"falcon":"")+((checkcart())?"cart":"")+((checkriding())?"Peco":"")+((ismounting())?"mount":"")+" before proceeding.";
                close;
        }
        if (SkillPoint) {
                mes "Please use all your skill points before proceeding.";
                close;
        }
        if (Class > 4049) {
                mes "No more jobs are available.";
                close;
        }else{
        mes  "Bien! ahora te enviare al midgard! hasta la proxima vida!.";
                sleep2 100;    
        specialeffect2 501;
                sleep2 300;
        specialeffect2 488;
                sleep2 100;
        specialeffect2 847;
                sleep2 500;
                jobchange getarg(0);
                sleep2 500;
        specialeffect2 338;
                sleep2 1;
        specialeffect2 183;
                sleep2 500;
                specialeffect2 581;
                next;
                warp .@map$,.@x,.@y;
                end;
        }
}
Viewed 882 times, submitted by Dynasty.