Hola amigos, el npc quedo asi
//===== Vendedor de Cuentas VIP ============================//
// //
// By: //
// Arkantos RO //
// Current Version: //
// 1.0 //
// Compatible With: //
// eAthena //
// //
//==========================================================//
prontera,147,160,5 script Sec 405,{
set @precio, "1500"; //precio comandos 60 Dias
mes "Hola ^3366FF" + strcharinfo(0) + "^000000, soy Sec";
mes " ";
mes "Vendo Comandos VIP por 60 dias, los cuales tienen un costo de 1500 Cash Point";
mes "si quieres mas informacion visita www.arkantos-ro.net en el menu Donaciones";
next;
mes "estas interesado?";
switch(select("SI:NO")){
case 1:
if(#CASHPOINTS >= @precio){
set #CASHPOINTS,#CASHPOINTS-@precio;
query_sql "update `login` SET `level` = 10 WHERE `account_id`='"+getcharid(3)+"'";
query_sql "update `login` SET `vip` = 1 WHERE `account_id`='"+getcharid(3)+"'";
query_sql "update `login` SET `vip_inicio` = NOW() WHERE `account_id`='"+getcharid(3)+"'";
query_sql "update `login` SET `vip_fin` = DATE_ADD(NOW(),INTERVAL 60 DAY) WHERE `account_id`='"+getcharid(3)+"'";
next;
mes "Listo!";
mes " ";
mes "Ya tienes los Comandos VIP pero tienes que reloguear para que puedas usarlos, estas listo?";
next;
atcommand "@kick "+strcharinfo(0);
}
mes "No tienes los Cash necesarios para la compra de Comandos VIP";
mes "regresa cuando los tengas o visita www.Arkantos-RO.net";
close;
case 2:
mes " no...";
mes " ";
mes "OK, regresa cuando estes listo para negociar.";
mes "Adios...";
close;
}
//Esto fue tomado del NPC de: Hurican Dooders Script's ™ (Gracias, si tienes problemas con eso puedo quitarlo)
OnInit:
waitingroom "",0;
OnTimer2000:
setarray .@Display$,"Arkantos RO","Comandos VIP","Bienvenidos";
set .@msg, rand(getarraysize(.@Display$));
delwaitingroom;
waitingroom .@Display$[.@msg],0;
initnpctimer;
close;
}
Gracias por la ayuda
se aceptan sugerencias y comentarios
Aprovecho para preguntar si es recomendable usar este mismo npc para hacer una búsqueda de cuentas vencidas y pasarlas nuevamente a level 0, la pregunta concreta seria que tanto recarga al servidor esta búsqueda o consulta en la db cuando sean muchas cuentas a consultar.
--------------Edit--------------
se me olvido preguntar algo sobre los créditos tengo una parte del código que fue copiado de otro script en esos casos como se maneja si esta bien como lo coloque