viewing paste Unknown #15465 | Athena

Posted on the
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
-   script  PoringEvent2    -1,{
 
OnInit:
    // how many poring each map
    .poring_amount = 5;
    // event last how long ?
    .duration = 30;
    // map list
    setarray .map$,
        "prontera",
        "morocc",
        "payon",
        "aldebaran",
        "geffen";
    .map_size = getarraysize( .map$ );
    .npc_name$ = strnpcinfo(0);
    end;
    
OnClock0030:
OnClock0230:
OnClock0245:
OnClock0430:
OnClock0630:
OnClock0830:
OnClock1030:
OnClock1230:
OnClock1430:
OnClock1630:
OnClock1830:
OnClock2130:
OnClock2330:
if( !.status ){
    .status = 1;
    for( .@i = 0; .@i < .map_size; .@i++ ){
        killmonster .map$[.@i],.npc_name$+"::OnPoringDead";
        monster .map$[.@i],0,0,"Poring",1002,.poring_amount,.npc_name$+"::OnPoringDead";
        monster .map$[.@i],0,0,"Poring",1002,15,"";   // <--- NORMAL PORING
    }
    announce "HAPPY HOUR: Five special Porings and 15 normal Porings have spawned in each Town ("+implode( .map$,"," )+")!",0;
    
    sleep ( .duration * 60000 );
    
    for( .@i = 0; .@i < .map_size; .@i++ )
        killmonster .map$[.@i],.npc_name$+"::OnPoringDead";
    .status = 0;
}
end;
 
// kill poring get reward
OnPoringDead:
    .@count = mobcount( strcharinfo(3),.npc_name$+"::OnPoringDead" );
    if(.@count == 0){
        announce strcharinfo(0)+" has killed the last Special Poring in "+strcharinfo(3)+"!",(( .@count )? bc_map:bc_all );
    }
    getitem 6153,50;
        dispbottom "Congrats " + strcharinfo(0) + "! You killed a Special Poring!";
    end;
 
}
Viewed 635 times, submitted by Guest.