viewing paste Unknown #44261 | 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 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168
prontera,150,181,4  script  Siatema VIP!    642,{
 
//====== Configurações =======================================
set @npc$,"[^FF7F24Sistema Vip^000000]"; // Nome do npc
set @srv$,"RagnaFen"; // Nome do seu servidor
set @lvl,99; // Level da conta para administrar o vip
set @price,12000; // Preço dos dias vip.
set @dias,30; // Quantidade de dias vip.
set @map$,"quiz_02"; // Mapa da sala vip
set @x,45; // Coordenada x do mapa da sala vip
set @y,376; // Coordenada y do mapa da sala vip
//============================================================
 
if (getgmlevel() < @lvl){
if(getgmlevel() < 1){
mes @npc$;
mes "Me desculpe mais você não é vip, deseja adquirir seu vip agora mesmo?";
if (select("- Sim:- Não") == 2) close;
 
mes @npc$;
mes "Você pode adquirir "+@dias+" dias vip por apenas "+@price+" Cashs ";
mes "Deseja comprar?";
if (select("- Sim:- Não") == 2) close;
 
if(#CASHPOINTS < @price){ next; mes @npc$; mes "Desculpe mas você não possui cash suficiente"; close; }
next;
mes @npc$;
mes "Parabéns seus dias vip foram adquiridos com sucesso, relogue para ativar";
query_sql "UPDATE `login` SET `level`='1',`diasvip`=`diasvip`+"+@dias+" WHERE `account_id`='"+ getcharid(3) +"'";
set #CASHPOINTS,#CASHPOINTS-@price;
close;
}
 
mes @npc$;
query_sql "SELECT `diasvip` FROM `login` WHERE `account_id` = '"+getcharid(3)+"'", .@diasvip;
mes "Olá ^FF7F24"+strcharinfo(0)+"^000000 !";
mes "Você Possui ^00BFFF"+.@diasvip+"^000000 Dias VIP.";
mes "Deseja ir para a Sala Vip ?";
if (select("- Sim:- Não") == 2) close;
 
close2;
warp @map$,@x,@Y;
end;
}
 
mes @npc$;
mes "Olá "+strcharinfo(0)+" o que deseja administrar no sistema vip?";
switch(select("- Adicionar Vip:- Remover Vip:- Ver dias vip")){
 
case 1:
next;
mes @npc$;
mes "Digite o login da conta que deseja adicionar os dias vip";
input .@conta$;
query_sql "SELECT `account_id` FROM `login` WHERE `userid`='"+.@conta$+"'",.@cont;
if(.@cont == 0)
{
 
next;
mes @npc$;
mes "Desculpe mais você não digitou o login da conta corretamente.";
close;
}
 
next;
mes @npc$;
mes "Agora digite a quantidade de dias vip que deseja adicionar a conta "+.@conta$+".";
input .@quant;
if(.@quant == 0)
{
 
next;
mes @npc$;
mes "Desculpe mas você digitou uma quantidade invalida.";
close;
}
 
next;
mes @npc$;
mes "Tem certeza que deseja adicionar ^00BFFF"+.@quant+"^000000 dias vip na conta ^00BFFF"+.@conta$+"^000000?";
if (select("- Sim:- Não") == 2) close;
 
next;
mes @npc$;
mes "Os dias vip da conta "+@conta$+" foram adicionados com sucesso.";
query_sql "UPDATE `login` SET `level`='1',`diasvip`=`diasvip`+"+.@quant+" WHERE `userid`='"+.@conta$+"'";
close;
 
case 2:
next;
mes @npc$;
mes "Digite o login da conta que deseja remover os dias vip";
input .@conta$;
query_sql "SELECT `account_id` FROM `login` WHERE `userid`='"+.@conta$+"'",.@cont;
if(.@cont == 0)
{
 
next;
mes @npc$;
mes "Desculpe mais você não digitou o login da conta corretamente.";
close;
}
 
next;
mes @npc$;
mes "Agora digite a quantidade de dias vip que deseja remover da conta "+.@conta$+".";
input .@quant;
if(.@quant == 0)
{
 
next;
mes @npc$;
mes "Desculpe mas você digitou uma quantidade invalida.";
close;
}
 
next;
mes @npc$;
mes "Tem certeza que deseja remover ^00BFFF"+.@quant+"^000000 dias vip da conta ^00BFFF"+.@conta$+"^000000?";
if (select("- Sim:- Não") == 2) close;
 
next;
mes @npc$;
mes "Os dias vip da conta "+@conta1$+" foram removidos com sucesso.";
query_sql "UPDATE `login` SET `level`='1',`diasvip`=`diasvip`-"+.@quant+" WHERE `userid`='"+.@conta$+"'";
close;
 
case 3:
next;
mes @npc$;
mes "Digite o login da conta que deseja ver a quantidade de dias vip";
input .@conta$;
query_sql "SELECT `account_id` FROM `login` WHERE `userid`='"+.@conta$+"'",.@cont;
if(.@cont == 0)
{
next;
mes @npc$;
mes "Desculpe mais você não digitou o login da conta corretamente.";
close;
}
next;
mes @npc$;
query_sql "SELECT `diasvip` FROM `login` WHERE `userid` = '"+.@conta$+"'", .@diasvip;
mes "A Conta ^00BFFF"+.@conta$+"^000000 Possui ^00BFFF"+.@diasvip+"^000000 dias de vip.";
close;
}
}
 
 
-   script  Sistema Vip#02  -1,{
 
OnClock0001: query_sql "UPDATE `login` SET `diasvip`=`diasvip`-1 WHERE `level`='1'"; end;
OnClock0002: query_sql "UPDATE `login` SET `level`='0' WHERE `diasvip`<='0' AND `level`='1'"; end;
end;
}
 
 
 
-   script  Sistema Vip#03  -1,{
 
OnPCLoginEvent:
if (getgmlevel() >= 20){ end; }
query_sql "SELECT `diasvip` FROM `login` WHERE `account_id` = '"+getcharid(3)+"'", .@diasvip;
if(.@diasvip == 0){ end; }
dispbottom "Olá "+strcharinfo(0)+" você possui "+.@diasvip+" dias vip.";
end;
 
}
Viewed 956 times, submitted by Guest.