Назад

Неуловимый Джо

Автор: MiRoTVoReZ: Дата: 12.16.2008

Ивент настроен стандартно по понедельникам.

// ===========================================================================
//
// Неуловимый Джо... таймеры, функции
-    script    JOE_uncatch    -1,{
end;
//=========================================================================================================
// это должно убивать Джо
OnMinute55: // это должно убивать Джо
killmonster "$@JoeLoc$","JOE_uncatch::OnJOEDie";
end;
OnMinute01: // респ Джо
if((gettime(4)!=1)) { //проверка чтобы только в понедельник запускать
end;
} else if ((gettime(4)==1) && (gettime(3)==00)){ // напоминалка  для всех(=
announce "День неуловимого Джо начался!",bc_all|bc_yellow;
}
//=========================================================================================================
// рандом на какой локации будет
switch(rand(1,8)) {
    case 1: set $@JoeLoc$,"prontera"; break;
    case 2: set $@JoeLoc$,"pay_fild10"; break;
    case 3: set $@JoeLoc$,"in_sphinx2"; break;
    case 4: set $@JoeLoc$,"cmd_fild02"; break;
    case 5: set $@JoeLoc$,"prt_fild04"; break;
    case 6: set $@JoeLoc$,"gef_fild07"; break;
    case 7: set $@JoeLoc$,"lhz_fild02"; break;
    case 8: set $@JoeLoc$,"ein_fild07"; break;
}
//=========================================================================================================
// рандом какой моб с локации будет
if($@JoeLoc$=="prontera") {
    set $@JoeMob, 1261; // ну тут думать нечего какой моб будет (=
}else if($@JoeLoc$=="pay_fild10") {
        switch(rand(1,5)) {
        case 1: set $@JoeMob, 1013; break; //Poporing
        case 2: set $@JoeMob, 1077; break; // Poison Spore
        case 3: set $@JoeMob, 1129; break; // Horong
        case 4: set $@JoeMob, 1180; break; // Nine Tail
        case 5: set $@JoeMob, 1277; break; // Greatest General
}
}else if($@JoeLoc$=="in_sphinx2") {
        switch(rand(1,4)) {
        case 1: set $@JoeMob, 1111; break; //Drainliar    
        case 2: set $@JoeMob, 1146; break; // Matyr
        case 3: set $@JoeMob, 1164; break; // Requiem
        case 4: set $@JoeMob, 1178; break; // Zerom
}
}else if($@JoeLoc$=="cmd_fild02") {
        switch(rand(1,9)) {
        case 1: set $@JoeMob, 1067; break; //Cornutus    
        case 2: set $@JoeMob, 1073; break; // Crab
        case 3: set $@JoeMob, 1074; break; // Shellfish
        case 4: set $@JoeMob, 1254; break; // Raggler
        case 5: set $@JoeMob, 1266; break; // Aster
        case 6: set $@JoeMob, 1277; break; // Alligator
        case 7: set $@JoeMob, 1313; break; // Mobster
        case 8: set $@JoeMob, 1317; break; // Fur Seal
        case 9: set $@JoeMob, 1391; break; // Galapago
}
}else if($@JoeLoc$=="prt_fild04") {
        switch(rand(1,5)) {
        case 1: set $@JoeMob, 1002; break; // Poring
        case 2: set $@JoeMob, 1008; break; // Pupa
        case 3: set $@JoeMob, 1018; break; // Creamy
        case 4: set $@JoeMob, 1052; break; // Rocker
        case 5: set $@JoeMob, 1088; break; // Vocal
}
}else if($@JoeLoc$=="gef_fild07") {
        switch(rand(1,5)) {
        case 1: set $@JoeMob, 1002; break; // Poring
        case 2: set $@JoeMob, 1008; break; // Pupa
        case 3: set $@JoeMob, 1007; break; // Fabre
        case 4: set $@JoeMob, 1011; break; // Chonchon
}
}else if($@JoeLoc$=="lhz_fild02") {
        switch(rand(1,5)) {
        case 1: set $@JoeMob, 1103; break; //Caramel
        case 2: set $@JoeMob, 1128; break; // Horn
        case 3: set $@JoeMob, 1613; break; // Metaling
        case 4: set $@JoeMob, 1627; break; // Anopheles
        case 5: set $@JoeMob, 1628; break; // Mole
}
}else if($@JoeLoc$=="ein_fild07") {
        switch(rand(1,6)) {
        case 1: set $@JoeMob, 1118; break; //Flora
        case 2: set $@JoeMob, 1368; break; // Geographer
        case 3: set $@JoeMob, 1613; break; // Metaling
        case 4: set $@JoeMob, 1618; break; // Ungoliant
        case 5: set $@JoeMob, 1031; break; // Poporing
        case 6: set $@JoeMob, 1002; break; // Poring
}
// сюда можно добавить ещё карт (-
}


//=========================================================================================================
// спам моба, + кричалка
monster $@JoeLoc$,0,0,"Джо",$@JoeMob,1,"JOE_uncatch::OnJOEDie";
announce "Неуловимого Джо видели на локации: "+$@JoeLoc$,bc_all|bc_yellow;
end;

//=========================================================================================================
// это если его убили
OnJOEDie:
announce "Неуловимого Джо убил\а: "+strcharinfo(0),bc_all|bc_yellow;
// честно спизжено из рахель квеста...  
// немного уменьшил шанс дропа ОКА, ОФБ
set .@JoeItemVar,rand(100);
        if (.@JoeItemVar == 99) {
            set .@JoeItemVar2,rand(100);
            if (.@JoeItemVar2 > 0 && .@JoeItemVar2 < 5) getitem 616,1;        //Old Card Album
            else if (.@JoeItemVar2 > 4 && .@JoeItemVar2 < 21) getitem 617,1;    //Old Violet Box
            else if (.@JoeItemVar2 > 20 && .@JoeItemVar2 < 61) getitem 603,1;    //Old Blue Box
            else getitem 607,1; //Yggdrasil Berry 0.4+%
        }
        else if (.@JoeItemVar > 88 && .@JoeItemVar < 96) getitem 644,1;    //Gift Box 7%
        else if (.@JoeItemVar > 76 && .@JoeItemVar < 89) getitem 607,1;    //Yggdrasil Berry 12%
        else if (.@JoeItemVar > 65 && .@JoeItemVar < 77) getitem 505,1;    //Blue Potion 11%
        else if (.@JoeItemVar > 57 && .@JoeItemVar < 66) getitem 604,1;    //Dead Branch 8%
        else if (.@JoeItemVar > 45 && .@JoeItemVar < 58) getitem 608,1;    //Yggdrasil Seed 12%
        else if (.@JoeItemVar > 5 && .@JoeItemVar < 11) getitem 518,1;    //Honey 5%
        else if (.@JoeItemVar > 0 && .@JoeItemVar < 6) getitem 526,1;    //Royal Jelly 5%
        else getitem 547,1; //Condensed White Potion 39%
end;
}

Автор: : Дата: 01.01.1970