//===== BrAthena Script ========================================
//- Por: Roodriigo
//=Renomeadora
//===== Por: =================================================
//===== Versão Atual: =====================================================
//= 3.0
//===== Descrição: ========================================================
//= Renomeia um jogador VIP/Ou não VIP
//===== Changelog:=========================================================
//= 2.0 Implementado função "escape_sql"
//= 3.0 Implementado função para bloquear caracteres como: [],†,®,©,×,Ø
//=========================================================================
prontera,141,180,5	script	Renomeadora	915,{

set @npc$,"[^FF0000 Renomeadora ^000000]";
mes @npc$;
mes "Olá senhor(a) "+strcharinfo(0)+",";
if (getgmlevel()<1) goto naovip;
mes "Gostaria de trocar seu nome?";
next;
menu "Sim",-,"Não Obrigado!",l_no;

mes @npc$;
mes "Cuidado, se o nome ja existir,o sistema não funcionara!";
next;
menu "Tudo bem!",-,"Ah! Deixa pra lá!",l_no;

mes @npc$;
mes "Coloque seu novo nome:";
next;
[npc]digit @name$;
if(compare(@name$,"[ADM]") || compare(@name$,"[GM]") compare(@name$,"Ø") compare(@name$,"×") compare(@name$,"©") compare(@name$,"®") compare(@name$,"†") compare(@name$,"[CM]") compare(@name$,"[EM]") compare(@name$,"[Admin]") || compare(@name$,"[") || compare(@name$,"]")){
mes "Você não pode colocar Tags [ADM] ou [GM] ou qualquer outra em seu nome...";
close;
}[/npc]

deletearray @existe$[0],getarraysize(@existe$);
query_sql "SELECT `name` FROM `char` WHERE `name`='"+@name$+"'",@existe$;
if(@existe$[0] != "") goto jaexiste;
query_sql "UPDATE `char` SET `name` = '"+escape_sql(@name$)+"' WHERE `name` = '"+strcharinfo(0)+"'";

mes @npc$;
mes "Pronto!! Agora basta você relogar!";
close;

l_no:
mes @npc$;
mes "Volte quando precisar dos meus serviços!";
close;

jaexiste:
mes @npc$;
mes "Desculpe mas esse nome já esta em uso.";
mes "Selecione outro.";
close;

naovip:
mes "Lamento, mas você não é um VIPlayer!";
close;

}