prontera,150,150,0 script Starter NPC 100,{
if (#server_start) {
mes "[Starter NPC]";
mes "You can only use my services";
mes "once per account, sorry.";
close;
}
setarray .@jobs,
Job_Rune_Knight_T,Job_Warlock_T,Job_Ranger_T,Job_Arch_Bishop_T,Job_Mechanic_T,Job_Guillotine_Cross_T,
Job_Royal_Guard_T,Job_Sorcerer_T,((Sex)?Job_Minstrel_T:Job_Wanderer_T),Job_Sura_T,Job_Genetic_T,Job_Shadow_Chaser_T,
Job_Gunslinger,Job_Taekwon,Job_Star_Gladiator,Job_Soul_Linker,Job_Super_Novice_E,((Sex)?Job_Kagerou:Job_Oboro);
set .@size, getarraysize(.@jobs);
for(set .@i,0; .@i<.@size; set .@i,.@i+1)
set .@menu$,.@menu$+jobname(.@jobs[.@i])+":";
mes "[Starter NPC]";
mes "Welcome to Ragnarok!";
mes "Please select a job.";
next;
set .@i, select(.@menu$)-1;
mes "[Starter NPC]";
mes "Are you sure you want to switch to the "+jobname(.@jobs[.@i])+" class?";
next;
if(select("Yes, I'm sure.:No, let me pick again.") == 2) {
mes "[Starter NPC]";
mes "Okay, take your time.";
close;
}
mes "[Starter NPC]";
mes "Job changed!";
mes "Please take some apples, too.";
mes "They'll come in handy.";
emotion e_lv2;
set #server_start,1;
jobchange .@jobs[.@i];
getitem 512,100;
close;
}