viewing paste Evento de Natal | 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
//===== Cronus Script ========================================
//= Evento de Natal
//===== Por ==================================================
//= Banned
//===== Versão ===============================================
//= 1.5
//===== Descrição ============================================
//= Sumona Monstros Natalinos.
//===== Changelog ============================================
//= 1.0 Script inicial. [Banned]
//= 1.1 Adicionado set de mapflags. [Banned]
//= 1.2 Reformulado, coisas inúteis retiradas. [Banned]
//= 1.3 Corrigida contagem de pontos. [Banned]
//= 1.4 Script Reestruturado. [Mehah]
//= 1.5 Otimizado e algumas correções. [RoM]
//= 1.6 Atualizado ao emulador atual. [Hodor]
//============================================================
prontera,142,174,5  script  Evento de Natal::Evento de Natal    718,{
 
mes "[Papai Noel]";
mes "Olá "+strcharinfo(0)+"!";
mes "O que você gostaria de fazer?";
next;
if(getgroupid() > 80) set .@m$,"Manipular o Evento";
while(1){
    switch(select(.@m$,"Contar Meus Pontos","Pegar meu Prêmio!","Cancelar")){
     
        case 1:
        mes "[Papai Noel]";
        mes "O que gostaria de fazer com o Evento?";
        next;
        switch(select("Vamos Começar!","Parar o Evento!","Cancelar")){
            Case 1:
            mes "[Papai Noel]";
            mes "Inciado!";
            close2;
            goto start_event;
             
            Case 2:
            mes "[Papai Noel]";
            mes "Finalizado!";
            close2;
            announce "O GM "+strcharinfo(0)+" finalizou o Evento de Natal!",8;
            stopnpctimer;
            killmonsterall "prontera.gat";
            end;
             
            Case 3:
            close;
        }
     
        case 2:
        mes "[Papai Noel]";
        mes "Você tem "+@Mob_Killed+" pontos!";
        next;
        break;
         
        case 3:
        mes "[Papai Noel]";
        mes "Escolha seu prêmio!";
        next;
        switch(select("1 Velha Caixa Azul [^00FF0070 Pontos^000000]",
        "1 Caixa de Presente [^00FF0050 Pontos^000000]",
        "1 Gorro de Natal [^00FF0025 Pontos^000000]",
        "50 Bengala Doce [^00FF0020 Pontos^000000]",
        "75 Biscoito de Gengibre [^00FF0015 Pontos^000000]",
        "100 Doce da Sorte [^00FF0010 Pontos^000000]",
        "Nenhum")){ 
        case 1: callsub mobKillCheck,70,603,1;
        case 2: callsub mobKillCheck,50,644,1;
        case 3: callsub mobKillCheck,25,2236,1;
        case 4: callsub mobKillCheck,20,530,50;
        case 5: callsub mobKillCheck,15,538,75; 
        case 6: callsub mobKillCheck,10,570,100; 
        }
     
        case 4:
        close;
    }
}
 
OnClock0000:
OnClock0300:
OnClock0600:
OnClock0900:
OnClock1200:
OnClock1500:
OnClock1800:
OnClock2100:
 
start_event:
announce "O GM "+strcharinfo(0)+" deu Início ao Evento de Natal!",8;
set $@MapMobs,250;
monster "prontera.gat",0,0,"Antônio",1247,50,"Evento de Natal::OnMobDead";
monster "prontera.gat",0,0,"Cookie Natalino",1246,50,"Evento de Natal::OnMobDead";
monster "prontera.gat",0,0,"Poring Noel",1062,50,"Evento de Natal::OnMobDead";
monster "prontera.gat",0,0,"Presente",1249,50,"Evento de Natal::OnMobDead";
monster "prontera.gat",0,0,"Goblin Natalino",1245,50,"Evento de Natal::OnMobDead";
monster "prontera.gat",0,0,"Cavaleiro da Tempestade",1251,2,"Evento de Natal::OnMobDead";
initnpctimer;
end;
 
mobKillCheck:
mes "[Papai Noel]";
if(@Mob_Killed < getarg(0)) mes "Você não tem pontos o suficiente.";
else {
    mes "Muito Bem, aí está seu prêmio!";
    getitem getarg(1),getarg(2);
    set @Mob_Killed,@Mob_Killed-getarg(0);
}
close;
 
OnMobDead:
set @Mob_Killed,@Mob_Killed+1;
set $@MapMobs,$@MapMobs-1;
if(!$@MapMobs){
    announce "Todos os Monstros foram Mortos, portanto o Evento acabou!",bc_blue|bc_all;
    stopnpctimer;
}
end;
 
OnTimer2000:
announce "[Papai Noel]: Vocês tem 3 minutos para matar todos os monstros!",bc_blue|bc_all;
end;
OnTimer62000:
announce "[Papai Noel]: Vocês tem 2 minutos para matar todos os monstros!",bc_blue|bc_all;
end;
OnTimer92000:
announce "[Papai Noel]: Matandos os Monstros você ganha pontos e pode trocar por prêmios!",bc_blue|bc_all;
end;
OnTimer122000:
announce "[Papai Noel]: Vocês tem 1  minutos para matar todos os monstros!",bc_blue|bc_all;
end;
OnTimer152000:
announce "[Papai Noel]: Vocês só tem 30 segundos para matar todos os monstros!",bc_blue|bc_all;
end;
OnTimer172000:
announce "[Papai Noel]: Vocês só tem 10 segundos para matar todos os monstros!",bc_blue|bc_all;
end;
OnTimer182000:
announce "[Papai Noel]: O Tempo do Evento acabou, vá trocar seus prêmios!",bc_blue|bc_all;
killmonsterall "prontera.gat";
stopnpctimer;
end;
}
Viewed 973 times, submitted by rogeriorsz.