//// Script Design By : - P a r a d o X -
//// 2009 - 2014 ParadoX's Script  present
// ===================================================================
//// Script Name :  Change Job
// ===================================================================
//// Note:
// - เมื่อ Add Npc เสร็จแล้ว @reloadscript ได้เลย
// - หาก Script มีปัญหาโปรดแจ้ง : sinokok@hotmail.com
// - ขอความกรุณา อย่านำไป Discredit เป็นของตัวเอง
// ===================================================================

morocc,171,111,3	script	เปลี่ยนอาชีพ#job-1::changjob	743,{

	cutin "job_sage_kayron",2;
	mes "[ ^0000FFผู้เชี่ยวชาญด้านอาชีพ^000000 ]";
	mes " สวัสดี  ^00CC90" + strcharinfo(0) +"^000000 ";
	mes "ขณะนี่เจ้าคือ : ^FF0000"+jobname(Class)+"^000000 ";
	mes " ข้าพอที่จะช่วยอะไรท่านได้บ้างไหม?";
	next;
	menu "^00CC66๐ เปลี่ยนอาชีพ",-,"^000000๐ ไม่มีอะไร ข้าแค่ผ่านมาเท่านั้น",L_Close;

	if (Class==0) goto L_Nov;
	if (Class==1) goto L_Sword;
	if (Class==2) goto L_Mage;
	if (Class==3) goto L_Archer;
	if (Class==4) goto L_Acolyte;
	if (Class==5) goto L_Merchant;
	if (Class==6) goto L_Thief;

	mes "[ ^0000FFผู้เชี่ยวชาญด้านอาชีพ^000000 ]";
	mes "ในตอนนี้คุณคือ : "+jobname(Class);
	mes "และได้มาถึงจุดสูงสุดของสายอาชีพแล้ว";
	close2;
	cutin "job_sage_kayron",255;
	close;

L_Nov:
	if(JobLevel < 10) goto L_JobLevel_10;
	if(SkillPoint > 0) goto L_SkillPoint;
	mes "[ ^0000FFผู้เชี่ยวชาญด้านอาชีพ^000000 ]";
	mes "อย่างงั้นหรอ แล้วเจ้าต้องการเป็นอาชีพอะไรล่ะ";
	next;
	menu "^FF0000๐^000000 Swordman",L_Swordman,
	"^FF0000๐^000000 Mage",mage,
	"^FF0000๐^000000 Archer",archer,
	"^FF0000๐^000000 Acolyte",acolyte,
	"^FF0000๐^000000 Merchant",merchant,
	"^FF0000๐^000000 Thief",thief,
	"^FF0000๐^000000 Super Novice",supernovice,
	"^FF0000๐^000000 Gunslinger",gunslinger,
	"^FF0000๐^000000 Ninja",ninja,
	//"^FF0000๐^000000 Teakwon",teakwon,
	"^FF0000๐^000000 ยกเลิก",L_Close;

L_Swordman:
	set @nextjob,1;
	set @jname$,"Swordman";
	goto L_FJob;

L_Mage:
	set @nextjob,2;
	set @jname$,"Mage";
	goto L_FJob;

L_Archer:
	set @nextjob,3;
	set @jname$,"Archer";
	goto L_FJob;

L_Acolyte:
	set @nextjob,4;
	set @jname$,"Acolyte";
	goto L_FJob;

L_Merchant:
	set @nextjob,5;
	set @jname$,"Merchant";
	goto L_FJob;

L_Thief:
	set @nextjob,6;
	set @jname$,"Thief";
	goto L_FJob;

L_Supernovice:
	if(JobLevel < 45) goto L_JobLevel_45;
	set @nextjob,23;
	set @jname$,"Super Novice";
	goto L_FJob;

L_Gunslinger:
	set @nextjob,24;
	set @jname$,"Gunslinger";
	goto L_FJob;

L_Ninja:
	set @nextjob,25;
	set @jname$,"Ninja";
	goto L_FJob;

//L_Teakwon:
	//set @nextjob,4046;
	//set @jname$,"Teakwon";
	//goto L_FJob;

L_Sword:
	set @nextjob,7;
	set @jname$,"Knight";
	set @nextjob2,14;
	set @jname2$,"Crusader";
	goto L_SJob;

L_Mage:
	set @nextjob,9;
	set @jname$,"Wizard";
	set @nextjob2,16;
	set @jname2$,"Sage";
	goto L_SJob;

L_Archer:
	set @nextjob,11;
	set @jname$,"Hunter";
	if(Sex==0) set @jname2$,"Dancer";
	if(Sex==0) set @nextjob2,20;
	if(Sex==1) set @jname2$,"Bard";
	if(Sex==1) set @nextjob2,19;
	goto L_SJob;

L_Acolyte:
	set @nextjob,8;
	set @jname$,"Priest";
	set @nextjob2,15;
	set @jname2$,"Monk";
	goto L_SJob;

L_Merchant:
	set @nextjob,10;
	set @jname$,"Black Smith";
	set @nextjob2,18;
	set @jname2$,"Alchemist";
	goto L_SJob;

L_Thief:
	set @nextjob,12;
	set @jname$,"Assassin";
	set @nextjob2,17;
	set @jname2$,"Rogue";
	goto L_SJob;

L_FJob:
	mes "[ ^0000FFผู้เชี่ยวชาญด้านอาชีพ^000000 ]";
	mes "เจ้าแน่ใจแล้วนะที่จะเปลื่ยนเป็น "+@jname$+" ?";
	next;
	menu "^0000FF๐ ตกลง",-,"^FF0000๐ ยกเลิก",L_Close;

	mes "[ ^0000FFผู้เชี่ยวชาญด้านอาชีพ^000000 ]";
	//mes "[ ^0000FFScript by : ParadoX^000000 ]";
	mes "ถ้าเป็นอย่างนั้น ข้าก็จะเปลื่ยนให้เจ้าทันที";
	next;
	JobChange @nextjob;
	mes "[ ^0000FFผู้เชี่ยวชาญด้านอาชีพ^000000 ]";
	mes "เจ้าได้เป็น "+@jname$+" เรียบร้อยแล้ว";
	close2;
	cutin "job_sage_kayron",255;
	close;

L_SJob:
	if(JobLevel < 40) goto L_JobLevel_40;
	if(SkillPoint > 0) goto L_SkillPoint;
	mes "[ ^0000FFผู้เชี่ยวชาญด้านอาชีพ^000000 ]";
	mes "ในตอนนี้เจ้าคือ : "+jobname(Class);
	mes "ต้องการเปลี่ยนเป็นอาชีพอะไรดีหล่ะ";
	next;
	menu "^0000FF๐ "+@jname$+"",L_FJob,"^FF0000๐ "+@jname2$+"",L_SJob2,"^000000๐ ยกเลิก",L_Close;

L_SJob2:
	mes "[ ^0000FFผู้เชี่ยวชาญด้านอาชีพ^000000 ]";
	mes "เจ้าแน่ใจแล้วนะที่จะเปลื่ยนเป็น "+@jname2$+" ?";
	next;
	menu "^0000FF๐ ตกลง",-,"^FF0000๐ ยกเลิก",L_Close;
	
	mes "[ ^0000FFผู้เชี่ยวชาญด้านอาชีพ^000000 ]";
	mes "ถ้าเป็นอย่างนั้น ข้าก็จะเปลื่ยนให้เจ้าทันที";
	next;
	JobChange @nextjob2;
	mes "[ ^0000FFผู้เชี่ยวชาญด้านอาชีพ^000000 ]";
	mes "ยินดีด้วย เจ้าได้เป็น "+@jname$+" เรียบร้อยแล้ว";
	close2;
	cutin "job_sage_kayron",255;
	close;

L_JobLevel_10:
	mes "[ ^0000FFผู้เชี่ยวชาญด้านอาชีพ^000000 ]";
	mes "Job Lv ของท่านยังไม่ถึง 10";
	close2;
	cutin "job_sage_kayron",255;
	close;

L_JobLevel_40:
	mes "[ ^0000FFผู้เชี่ยวชาญด้านอาชีพ^000000 ]";
	mes "Job Lv ของท่านยังไม่ถึง 40";
	close2;
	cutin "job_sage_kayron",255;
	close;

L_JobLevel_45:
	mes "[ ^0000FFผู้เชี่ยวชาญด้านอาชีพ^000000 ]";
	mes "Job Lv ของท่านยังไม่ถึง 45";
	close2;
	cutin "job_sage_kayron",255;
	close;

L_SkillPoint:
	mes "[ ^0000FFผู้เชี่ยวชาญด้านอาชีพ^000000 ]";
	mes "ท่านยังใช้ Skill Point ไม่หมด";
	close2;
	cutin "job_sage_kayron",255;
	close;

L_Close:
	mes "[ ^0000FFผู้เชี่ยวชาญด้านอาชีพ^000000 ]";
	mes "เราคงมีโอกาศได้พบกันใหม่อีกแน่ บาย";
	close2;
	cutin "job_sage_kayron",255;
	close;

}