//// 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 มีปัญหาโปรดแจ้ง : [email protected]
// - ขอความกรุณา อย่านำไป 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;
 
}