-   script  10minuteinvasion    -1,{
 
OnInit:
    bindatcmd "inva",strnpcinfo(3)+"::OnStartInva";
    set .InvaID,3008;
    set .InvaMap$,"jupe_ele";
    end;
 
OnStartInva:
OnMinute10:
OnMinute20:
OnMinute30:
OnMinute40:
OnMinute50:
OnMinute00:
    if(.InvaStart == 1) end;
    .InvaStart = 1;
    .InvaCount = 10;
    announce "[ Invasion ]: "+.InvaCount+" "+getmonsterinfo(.InvaID,0)+" has been invaded the "+.InvaMap$+".",0;
    monster .InvaMap$,0,0,"Paroo Paroo",.InvaID,.InvaCount,strnpcinfo(0)+"::OnParooDead";
    end;
 
OnParooDead:
    if(mobcount(.InvaMap$,"all") < 1) goto L_Done;
    set .InvaCount,-1;
    announce "[ "+strcharinfo(0)+" ] has killed 1 "+getmonsterinfo(.InvaID,0)+".",0;
    announce ""+mobcount(.InvaMap$,"all")+" "+getmonsterinfo(.InvaID,0)+" left in "+.InvaMap$+".",0;
    end;
 
L_Done:
    .InvaStart = 0;
    announce "[ "+strcharinfo(0)+" ] killed the last "+getmonsterinfo(.InvaID,0)+".",0;
    announce "[ Invasion ]: Event has ended.",0;
    end;
}