try this
prontera,155,181,5 script Sample 757,{
mes "Which skill you need me to cast on you ?";
set .@SkillID,select( implode( .SkillName$,":" ) ) - 1;
mes "Selected "+.Skillname$[.@SkillID];
close2;
unitskilluseid getnpcid(0),.SkillID[.@SkillID],.SkillLv[.@SkillID],getcharid(3);
sleep 3000;
movenpc strnpcinfo(0),155,181;
end;
OnInit:
setarray .SkillID[0],14,19,20,421;
setarray .SkillLv[0],3,5,10,5;
setarray .SkillName$[0],"Cold Bolt","Fire Bolt","Lightning Bolt","Fly Kick";
end;
}