viewing paste Kyuke | 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
////////////////////////////////////////////////////////////////
//------------------------------------------------------------//
// ____  __.             __                                   //
//|    |/ _|___.__.__ __|  | __ ____                          //
//|      < <   |  |  |  \  |/ // __ \                         //
//|    |  \ \___  |  |  /    <\  ___/                         //
//|____|__ \/ ____|____/|__|_ \\___  >                        //
//        \/\/               \/    \/                         //
//                                                            //  
// Por favor não retire os créditos.                          //
//------------------------------------------------------------//
//Versão:1.0                                                  //
//------------------------------------------------------------//
//Data de criação: 18/12/2013                                 //
//------------------------------------------------------------//
//Atualizações:                                               //
// 1 - Criação do NPC.                                        //
//------------------------------------------------------------//
////////////////////////////////////////////////////////////////
//
// - Configuração                                               
set .nome$,"[ ^B22222Removedor de Skill^000000 ]";//Nome do NPC
////////////////////////////////////////////////////////////////
prontera,150,150,4  script  Removedora de Skills    68,{
 
    mes .nome$;
    mes "Olá "+strcharinfo(0)+", vou verificar quantos pontos de habilidade você tem sobrando.";
    next;
    mes .nome$;
    set @skillPoints, skillPointCount();
    mes "Você tem "+@skillPoints+" Pontos de Habilidade sobrando!";
    next;
    mes .nome$;
    mes "Deseja remover "+@skillPoints+" Pontos de Habilidade?";
    next;
    if(select("Sim.:Nao") == 2) close;
    mes .nome$;
    mes "Então eu irei remover estes pontos!";
    next;
    set SkillPoint,0;
    mes "Seus ^FF0000Pontos de Habilidade^000000 foram removidos com sucesso!";
    close;
}
Viewed 636 times, submitted by Guest.