viewing paste Unknown #46416 | Text

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 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
//==================== [ Máquina GetPrize ChallengeRO (c) ] =====================//
//                            Powered by por Ferraz                              //
//                           Idealizado por Romes Jr.                            //
//===============================================================================//
 
prontera,150,150,5  script  Máquina GetPrize   563,{
 
    set .title$,"[^FF0000Máquina GetPrize^000000]";
 
    mes .title$;
    mes "Olá "+strcharinfo(0)", tudo bem?";
    mes "Gostaria de fazer a troca de suas moedas GetPrize?";
    switch(select("Sim, quero.","O que essa Máquina faz?","Não, obrigado!")) {
 
        case 1:
            mes .title$;
            mes "Tudo bem então...";
 
            next;
 
            mes .title$;
            mes "Quantas trocas você deseja realizar?";
 
            next;
 
            input .@qnt;
 
            mes .title$;
            mes "Certo... serão "+.@qnt+" trocas.";
 
            next;
 
            mes .title$;
            mes "Tem certeza que deseja realizar esta ação?";
            switch(select("Sim, tenho!","Não, volto depois...")) {
                case 1:
                    mes .title$;
 
                    if(countitem(.@moeda[.@s]) < .@calculo){
                        mes "Você não tem ^FF0000"+getitemname(.@moeda[.@s])+"^000000 suficientes para a troca.";
                        close;
                    }
 
                    callfunc "getprize";
                    mes "Certo...";
                    mes "Até mais então.";
                    close;
 
                case 2:
                    mes .title$;
                    mes "Tudo bem então, estarei aqui quando precisar.";
                    close;
            }
 
        case 2:
            mes .title$;
            mes "Na Máquina GetPrize você troca moedas por itens aleatórios,";
            mes "você pode ganhar moedas votando no servidor e trocando no npc Vote Points";
            mes .title$;
            mes "Você pode ganhar:";
            mes "^000FFF[+]^000000 ^FF00001000^000000 Moedas Poring";
            mes "^000FFF[+]^000000 ^FF00001^000000 Caixa de Yggdrasil";
            mes "^000FFF[+]^000000 ^FF000050^000000 Aloe Vera";
            mes "^000FFF[+]^000000 ^FF000050^000000 Caixa do Trovão";
            mes "^000FFF[+]^000000 ^FF000050^000000 Caixa da Escuridão";
            mes "^000FFF[+]^000000 ^FF0000[10]^000000 Pergaminho de Bênção";
            mes "^000FFF[+]^000000 ^FF0000[10]^000000 Pergaminho de Aumentar Agilidade";
            mes "^000FFF[+]^000000 ^FF0000[10]^000000 Espelho Convexo";
            mes "^000FFF[+]^000000 ^FF0000[10]^000000 Língua no Vapor";
            mes "^000FFF[+]^000000 ^FF0000[10]^000000 Escorpiões do Deserto no Vapor";
            mes "^000FFF[+]^000000 ^FF0000[10]^000000 Cozido Imortal";
            mes "^000FFF[+]^000000 ^FF0000[10]^000000 Coquetel Sopro do Dragão";
            mes "^000FFF[+]^000000 ^FF0000[10]^000000 Tônico de Hwergelmir";
            mes "^000FFF[+]^000000 ^FF0000[10]^000000 Nove Caudas Cozidas";
            mes "^000FFF[+]^000000 ^FF000020^000000 Pudim de Guyak";
            mes "^000FFF[+]^000000 ^FF00001^000000 Goma de Mascar";
            mes "^000FFF[+]^000000 ^FF00001^000000 Dinheiro 50kk";
            mes "^000FFF[+]^000000 ^FF00001^000000 Vale VIP [1] DIA"; // faltando
            mes "^000FFF[+]^000000 ^FF00001^000000 Vale Visual"; // faltando
            mes "^000FFF[+]^000000 ^FF00001^000000 Vale Cash [1.000]"; // faltando
            close;
 
        case 3:
            mes .title$;
            mes "Tudo bem então, estarei aqui quando precisar.";
            close;
    }
}
 
function    script  getprize    {
 
    setarray @id[0], 7539, 25002, 606, 12028, 12029, 12913, 12914, 12912, 12903, 12090, 12085, 12905, 12906, 12907, 12710, 12210, 27005;   /* I dos premios que podem ser obtido.*/
    setarray @qn[0], 1000, 1, 50, 50, 50, 1, 1, 1, 1, 10, 10, 1, 1, 1, 20, 1, 1;    /* Quantidade ganha.*/
    setarray @pt[0], 30, 25, 25, 15, 15, 9, 9, 9, 9, 9, 9, 9, 9, 9, 8, 5, 5;   /* Porcentagem de chance para obter o item. (1 = 1% - 10 = 10% - 100 = 100%)*/
    setarray @rops[0], 1000;   /* I dos premios que podem ser obtido.*/
    setarray @ropsc[0], 1;   /* I dos premios que podem ser obtido.*/
 
    if (!checkweight2(@id[0],@qn[0])) {
        mes "Você está muito pesado, não posso fazer a troca pois os itens irão cair no chão!";
        close;
    }
 
    for(set @i,0; @i < getarraysize(@id);set @i,@i+1) {
        if(@pt[@i] >= Rand(100)) {
            delitem 671,.@qnt;
            getitem @id[@i],@qn[@i];
            end;
        }
    }
 
    for(set @i,0; @i < getarraysize(@rops);set @i,@i+1) {
        if(@ropsc[@i] >= Rand(100)) {
            set #CASHPOINTS,#CASHPOINTS+@rops;
            end;
        }
    }
 
    if (checkweight(27005,1)) {
        getitem 27005,1;
    } else {
        mes "Você está muito pesado, não posso fazer a troca pois os itens irão cair no chão!";
        close;
    }
}
Viewed 1152 times, submitted by Guest.