Jump to content

Syuel

Members
  • Content Count

    4
  • Joined

  • Last visited

About Syuel

  • Rank
    Newbie
  • Birthday 03/09/1989

Profile Information

  • Gender
    Male
  • Location:
    Santo Domingo
  • Emulator
    Hercules

Recent Profile Visitors

1474 profile views
  1. Syuel

    LatinRO

    Hola mi nombre es leuys, soy de rep dominicana tengo mucha experiencia con los emuladores hace ya varios años inicie en este mundo y quiero poner en practica lo que he aprendido con el pasar del tiempo, si quieres unirte a servidor eres bienvenido siempre y cuando cumplas con estos requisitos. Nivel de ingles: Fluido Edad mínima: 20 años Tiempo libre: 4/8 Horas dependiendo el área Solicito personal en las siguientes áreas: SCRIPTTER SOPORTE MODERADORES WEBMASTER Quiero que juntos formemos la mejor comunidad de ro latina que exista.
  2. I throw an error in the map server, if it is possible for someone to help me I would appreciate the gesture. //===== eAthena Script ===================================== //= Servicio //===== Por ================================================ //= Slacker //===== Versión ============================================ //= 2.0 //=========Log============================================== //= Cambiado de SQL a CashPoint XD!... //========================================================== prontera,157,190,4 script Servicios Especiales 4_M_CATMAN1,{ set .nombre$,"[^148b08Servicios Especiales^000000]"; setarray @sexveces[0], 4; //Cantidad de veces para cambiar de sexo. setarray @presex[0], 10; //Precio del cambio de sexo. setarray @reset[0], 4; //Cantidad de veces de reset setarray @prestat[0], 20; //Precio de reset stat setarray @preskill[0], 20; //Precio de reset skill setarray @cambnomb[0], 1; //cantidad de veces para cambiar el nombre setarray @prenomb[0], 40; //precio para el cambio de nombre mes .nombre$; mes "Hola "+strcharinfo(0)+", este es el servicio premium, ¿que deseas hacer?"; switch(select("Reset Service:Cambio de sexo:Cambio de nombre")){ case 1: if (res != 0)goto L_RESEUSA; L_RESEUSA: if (res == @reset[0]){ mes "Disculpa pero ya no puedes seguir usando este servicio contacta a la Administracion"; close; break; }else{ set .@restante, @reset - res; mes "Aun te quedan "+.@restante+" opotunidades para usar este servicio"; next; mes .nombre$; goto L_RESET; } mes "Recuerda que este servicio solo se puede hacer "+@reset[0]+" veces."; L_RESET: mes "Que deseas Hacer"; switch(select("Reset Stat:Reset Skill")){ case 1: if (#CASHPOINTS <= @prestat[0]) goto L_NOPER; mes "El Precio de este sercicio es de "+@prestat+" CashPoint, Deseas Continuar?"; switch(select("No:Si")){ case 1: close; break; case 2: ResetStatus; set #CASHPOINTS,#CASHPOINTS - @prestat; next; mes .nombre$; set res, res +1; mes "Gracias por usar el Servicio"; logmes "El usuario "+strcharinfo(0)+" reseteo Status"; close; break; } case 2: if (#CASHPOINTS < @preskill) goto L_NOPER; mes "El precio de este servicio es de "+@preskill+" CashPoint, Deseas Continuar?"; switch(select("No:Si")){ case 1: close; break; case 2: ResetSkill; set #CASHPOINTS,#CASHPOINTS - @preskill; set res, res +1; mes "Gracias por usar el Servicio"; logmes "El usuario "+strcharinfo(0)+" reseteo Skills"; close; break; } } L_NOPER: mes "Disculpa pero tus CashPoint no alcanzan para este servicio."; mes "..........."; mes "Este servicio cuesta "+@preskill+" cashpoint."; close; case 2: if (#CASHPOINTS <= @presex[0])goto L_NOPER; if (secam != 0){ set .@restante, @sexveces[0] - secam; if (.@restante == 0){ mes "Disculpa pero ya no puedes utilizar este servicio, contactacta a la administracion"; close; break; }else{ mes "Aun te quedan "+.@restante+" oportunidades para utilizar este servicio"; mes "El valor de cada uso cuesta "+@presex[0]+" CashPoint por cambio."; next; goto L_SEXCAM; } }else{ mes "Recuerda que solo puedes hacer "+@sexveces+" cambios."; mes "El valor de cada uso cuesta "+@presex[0]+" CashPoint por cambio."; next; goto L_SEXCAM; } L_SEXCAM: mes .nombre$; mes "Estas Seguro?"; switch(select("No:Si")){ case 1: close; break; case 2: set #CASHPOINTS, #CASHPOINTS - @presex[0]; mes "Se desconectara para Realizar el Cambio"; set secam, secam +1; logmes "El usuario "+strcharinfo(0)+" Cambio SEXO"; next; atcommand "@changesex"; break; } case 3: if (#CASHPOINTS <= @prenom[0])goto L_NOPER; if (chnam != 0){ set .@restante, @sexveces[0] - chnam; if (.@restante == 0){ mes "Disculpa pero ya no puedes utilizar este servicio, Contacta a la Administracion"; close; break; }else{ mes "Aun te quedan "+.@restante+" oportunidades para usar este servicio"; mes "El valor de cada uso cuesta "+@prenomb[0]+" CashPoint por cambio."; next; mes .nombre$; goto L_CHNOM; } }else{ mes "Recuerda que este servicio solo se puede usar "+@cambnomb+" veces."; mes "El valor de cada uso cuesta "+@prenomb[0]+" CashPoint por cambio."; goto L_CHNOM; } L_CHNOM: mes "Tu nombre actual es "+strcharinfo(0)+"."; switch(select("Cambiar Nombre:Cerrar")){ case 1: next; mes .nombre$; mes "Ingresa el nuevo nombre"; input @nuevonomb$; query_sql "UPDATE `char` SET `name` = '"+ @nuevonomb$ +"' WHERE `char`.`char_id` ="+getcharid(0, strcharinfo(0)); mes "Nombre cambiado debes Reloguear apara aplicar los cambios"; set #CASHPOINTS, #CASHPOINTS - @prenomb; set chnam, chnam +1; logmes "El usuario de char_id "+getcharid(0)+" cambio su nombre de "+strcharinfo(0)+" a "+@nuevonomb$+""; close; break; case 2: close; break; } } }
×
×
  • Create New...

Important Information

By using this site, you agree to our Terms of Use.