viewing paste Arena Boss | 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 60 61 62 63 64 65 66 67 68
//----------------------------------------------------------------
//- .___  ___.  __   __    __       ___       _______  __        - 
//- |   \/   | |  | |  |  |  |     /   \     |   ____||  |       - 
//- |  \  /  | |  | |  |__|  |    /  ^  \    |  |__   |  |       - 
//- |  |\/|  | |  | |   __   |   /  /_\  \   |   __|  |  |       - 
//- |  |  |  | |  | |  |  |  |  /  _____  \  |  |____ |  `----.  -
//- |__|  |__| |__| |__|  |__| /__/     \__\ |_______||_______|  -
//-                 www.forum.brathena.org                       -
//----------------------------------------------------------------
 
prontera,144,188,4  script  Arena Boss  MOB_TOMB,{
 
//--- Nome do NPC. ----------------------------------------------------------------
set .n$,"[^cc0000Arena Boss^000000]";
//--- Mapa ------------------------------------------------------------------------
set .mp$, "bossnia_02";
//--- Coordenada X ----------------------------------------------------------------
set .x$, "203";
//--- Coordenada Y ----------------------------------------------------------------
set .y$, "203";
//---------------------------------------------------------------------------------
 
mes .n$;
mes "Olá "+strcharinfo(0)+", eu sou o guardião da Arena Boss o que deseja?";
next;
switch(select("Entrar na Arena:Informações:Cancelar")){
 
    case 1:
        if(BaseLevel < 90){
            mes .n$;
            mes "Sinto muito, você não possui Base Level 90 então não pode entrar.";
            close;
        }
        if (gettime(4)==6){
            mes .n$;
            mes "Perfeito, tudo nos conformes, faça uma boa viagem !";
            next;
            warp .mp$,.x$,.y$;
            close2;
        }
        mes .n$;
        mes "Sinto muito "+strcharinfo(0)+", eu só libero o acesso";
        mes "a Arena Boss aos Sábados...";
        close;
        
    case 2:
        mes .n$;
        mes "A Arena Boss é aberta todos os sábados";
        mes "Nela é permitido caçar mvps que são invocados";
        mes "periodicamente, é um sistema rápido e prático";
        mes "tanto para novatos quanto para veteranos em";
        mes "nosso servidor !";
        next;
        mes .n$;
        mes "Qualquer dúvida fale comigo novamente, estarei sempre aqui !";
        close;
    
    case 3:
        mes .n$;
        mes "Certo, volte quando precisar de meus serviços.";
        close;
    }
 
OnInit:
    waitingroom "Arena Boss",0;
    end;
 
}
Viewed 1044 times, submitted by Mihael.