Add this
setarray .@char$, "!", "@", "#", "$", "%", "^", "&", "*", "(", ")", "{", "}", "[", "]";
for ( set .@i, 0; .@i < getarraysize(.@char$); set .@i, .@i + 1 )
{
if ( compare(.@tmp_name$,.@char$[.@i]) )
{
next;
mes .@n$;
mes "No restricted characters allowed.";
set .@k, 2;
break;
}
}
After
mes .@n$;
mes "So.. " + .@tmp_name$ + " will be your new name?";
set .@k, select ( "Yes:No" );