Try this:
{
.npc$ = "[Dr. Ibarra]";
mes .npc$;
if (Class != Job_Novice) {
mes "Who are you? Get away from here.";
close;
}
mes "What job do you want?";
next;
set .@i, .Jobs[select(.menu$)-1];
if(Sex==1 && .@i==jobname(4042))
set .@i,jobname(4043);
else if(Sex==1 && .@i==jobname(4020)
set .@i,jobname(4021);
else if(Sex==0 && .@i==jobname(4043))
set .@i,jobname(4042);
else if(Sex==0 && .@i==jobname(4021))
set .@i,jobname(4020);
else
mes .npc$;
mes "You have changed into the ^0055FF"+jobname(.@i)+"^000000 class!";
skill "NV_BASIC",9,0; // Give Basic Skill instantly
jobchange .@i;
BaseLevel = 100; //set base level
JobLevel = 50; // set job level
SkillPoint = SkillPoint + 118; // Set Skill Point to max
specialeffect2 413;
close;
OnInit:
setarray .Jobs[0],4008,4009,4010,4011,4012,4013,4015,4016,4017,4018,4019,4020,4021,4049,4047,23,24,25,4023,4024,4025,4026,4027,4028,4029,4030,4031,4032,4033,4034,4035,4037,4038,4039,4040,4041,4042,4043,4045;
set .menu$,"";
for(set .@i,0; .@i<getarraysize(.Jobs); set .@i,.@i+1)
set .menu$, .menu$+jobname(.Jobs[.@i])+":";
end;
}
I haven't tested it yet.