ayuda con este npc

solo tengo un problema con el npc de que no me da los 99 skill point xD

adjunto el archivo por si tengo algo mal pero el npc no me da error en el emulador

Código:

//===== Athena Script =======================================
//= (name)
//===== By ================================================
//= (author)
//===== Version ===========================================
//= 1.0
//===== Compatible With ===================================
//= eAthena 0.52
//===== Description =======================================
//= (desc)
//===== Comments ==========================================
//=
//=========================================================
prontera.gat,146,166,4 script SoulLinker Max Lvl 997,{
if (BaseLevel==999) && (JobLevel==50 && Class >= Job_Soul_Linker) goto si_puede;
if (ok==1) goto listo;
mes "[ ^0065DFEnte Malo^000000 ]";
mes "...";
close;

si_puede:

mes "[ ^0065DFEnte Malo^000000 ]";
mes "Hola Chico Que Pex ^5555FF" + strcharinfo(0) + "^000000!...";
mes "Veo Que Quieres Tus Niveles";
menu "Si",si,"No",no;
if (JobLevel <50) goto Llow1;
if (BaseLevel <999) goto Llow2;

si:
mes "[ ^0065DFEnte Malo^000000 ]";
mes "O Wow Veamos Estate Atento";
next;
menu "Dame Mis LvL Pilss xD",lvl,"No Me Los Des Wey",wey;

lvl:
mes "[ ^0065DFEnte Malo^000000 ]";
mes "Ahora Ya Tienes Tus LvLs";
set BaseLevel,BaseLevel+1;
set JobLevel,JobLevel+1;
set ok,1;
close;
Llow1:
mes "[ ^0065DFEnte Malo^000000 ]";
mes "Que Crees Que Soy Menso!!!!";
mes "Debes Ser 50 de Job xD Manches xD ";
close;

Llow2:
mes "[ ^0065DFEnte Malo^000000 ]";
mes "Que Crees Que Soy Menso!!!!";
mes "Debes Ser 999 de Base xD Manches xD ";
close;

listo:
input @player$;
atcommand "@skpoint 99 "+@player$;
mes "[ ^0065DFEnte Malo^000000 ]";
mes "Que Crees Que Soy Menso!!!!";
mes "ya Me Usaste No Te Kieras Pasar De Listo ¬¬";
mes "Moriras Por Querer Pasarte De Listo";
mes "Mejor No xD Te Dejare Vivir Esta Vez";
close;

wey:
mes "[ ^0065DFEnte Malo^000000 ]";
mes "Que Lastima... Bueno si Cambias de Opinion Recuerda que Estoy Aqui...";
close;

no:
mes "[ ^0065DFEnte Malo^000000 ]";
mes "Que Lastima... Bueno si Cambias de Opinion Recuerda que Estoy Aqui...";
close;

}