//===== eAthena Script =======================================
//= LunatikBunnie's Compact Jobchanger AKA Job Master
//===== By: ==================================================
//= LunatikBunnie
//===== Current Version: =====================================
//= 1.1b
//===== Compatible With: =====================================
//= Any Athena Version
//===== Description: =========================================
//= Changes your job without asking too much
//= For other info, please contact me at Lunatikbunnie@gmail.com 
//============================================================

// ------------------------------ Start ------------------------------
prontera.gat,153,193,6	script	Job Master	123,{
// Variable Setup
	set @MinimumJB, 40; //Minimum job level for changing between 2nd and advance class (Default : 40)
	set @GivePlat, 1; //Give Platinum skills on Jobchange (Default : 1-yes)
	set @SupNovM, 45; //Base Level to change into Super Novice (Default : 45)
// Check Jobtype
	if(SkillPoint != 0) goto L_skillUsed;
	if(class ==0) goto L_novice;
	if(JobLevel <10) goto L_notEn;
	if((class ==4001) && ((lastJob ==7) || (lastJob ==14))) goto L_cHsword;
	if((class ==4001) && ((lastJob ==9) || (lastJob ==16))) goto L_cHmage;
	if((class ==4001) && ((lastJob ==11) || (lastJob ==14))) goto L_cHarcher;
	if((class ==4001) && ((lastJob ==8) || (lastJob ==15))) goto L_cHacolyte;
	if((class ==4001) && ((lastJob ==10) || (lastJob ==18))) goto L_cHmerchant;
	if((class ==4001) && ((lastJob ==12) || (lastJob ==17))) goto L_cHthief;
	if(JobLevel <@MinimumJB) goto L_notEn;
	if(class ==1) goto L_iSword;
	if(class ==2) goto L_iMage;
	if(class ==3) goto L_iArcher;
	if(class ==4) goto L_iAcolyte;
	if(class ==5) goto L_iMerchant;
	if(class ==6) goto L_iThief;
	if(checkfalcon(0) == 1 || checkcart(0) == 1 || checkriding(0) == 1) goto L_remove;
	if(lastJob ==7) goto L_iKnight;
	if(lastJob ==8) goto L_iPriest;
	if(lastJob ==9) goto L_iWizard;
	if(lastJob ==10) goto L_iBlacksmith;
	if(lastJob ==11) goto L_iHunter;
	if(lastJob ==12) goto L_iAssassin;
	if(lastJob ==14) goto L_iCrusader;
	if(lastJob ==15) goto L_iMonk;
	if(lastJob ==16) goto L_iSage;
	if(lastJob ==17) goto L_iRogue;
	if(lastJob ==18) goto L_iAlchemist;
	if(lastJob ==19) goto L_iBard;
	if(lastJob ==20) goto L_iDancer;
	if((class >=7) && (class <=20)) goto L_rebirth;
	close;
// Novice
	L_novice:
		skill 142,1,0;
		skill 143,1,0;
		if(JobLevel<10) goto L_notEn;
		mes "^ff0000[Job Master]^000000";
		mes "Welcome, please select the job you wish to change into";
		menu "Swordsman",L_sword,"Mage",L_mage,"Archer",L_archer,"Acolyte",L_acolyte,"Merchant",L_merchant,"Thief",L_thief,"Super Novice",L_superN;
// Change to Swordsman
			L_sword:
				jobchange 1;
				if(GivePlat ==1) goto L_givePlat;
				close;
// Change to Mage
			L_mage:
				jobchange 2;
				if(GivePlat ==1) goto L_givePlat;
				close;
// Change to Archer
			L_archer:
				jobchange 3;
				if(GivePlat ==1) goto L_givePlat;
				close;
// Change to Acolyte
			L_acolyte:
				jobchange 4;
				if(GivePlat ==1) goto L_givePlat;
				close;
// Change to Merchant
			L_merchant:
				jobchange 5;
				if(GivePlat ==1) goto L_givePlat;
				close;
// Change to Thief
			L_thief:
				jobchange 6;
				if(GivePlat ==1) goto L_givePlat;
				close;
// Change to Super Novice
			L_superN:
				if(BaseLevel<@SupNovM) goto L_notSup;
				jobchange 23;
				if(GivePlat ==1) goto L_givePlat;
				close;
// Change to Knight/Crusader
	L_iSword:
		mes "^ff0000[Job Master]^000000";
		mes "Welcome, please select the job you wish to change into";
		menu "Knight",L_knight,"Crusader",L_crusader;
			L_knight:
				jobchange 7;
				if(GivePlat ==1) goto L_givePlat;
				close;
			L_crusader:
				jobchange 14;
				if(GivePlat ==1) goto L_givePlat;
				close;
// Change to Wizard/Sage
	L_iMage:
		mes "^ff0000[Job Master]^000000";
		mes "Welcome, please select the job you wish to change into";
		menu "Wizard",L_wizard,"Sage",L_sage;
			L_wizard:
				jobchange 9;
				if(GivePlat ==1) goto L_givePlat;
				close;
			L_sage:
				jobchange 16;
				if(GivePlat ==1) goto L_givePlat;
				close;
// Change to Hunter/Bard/Dancer
	L_iArcher:
		mes "^ff0000[Job Master]^000000";
		mes "Welcome, please select the job you wish to change into";
		menu "Hunter",L_hunter,"Bard/Dancer",L_bandd;
			L_hunter:
				jobchange 11;
				if(GivePlat ==1) goto L_givePlat;
				close;
			L_bandd:
				if(sex==0) goto L_dancer;
				if(sex==1) goto L_bard;
				L_bard:
					jobchange 19;
					if(GivePlat ==1) goto L_givePlat;
					close;
				L_dancer:
					jobchange 14;
					if(GivePlat ==1) goto L_givePlat;
					close;
// Change to Priest/Monk
	L_iAcolyte:
		mes "^ff0000[Job Master]^000000";
		mes "Welcome, please select the job you wish to change into";
		menu "Priest",L_priest,"Monk",L_monk;
			L_priest:
				jobchange 8;
				if(GivePlat ==1) goto L_givePlat;
				close;
			L_monk:
				jobchange 15;
				if(GivePlat ==1) goto L_givePlat;
				close;
// Change to Blacksmith/Alchemist
	L_iMerchant:
		mes "^ff0000[Job Master]^000000";
		mes "Welcome, please select the job you wish to change into";
		menu "Blacksmith",L_blacksmith,"Alchemist",L_alchemist;
			L_blacksmith:
				jobchange 10;
				if(GivePlat ==1) goto L_givePlat;
				close;
			L_alchemist:
				jobchange 18;
				if(GivePlat ==1) goto L_givePlat;
				close;
// Change to Assassin/Rogue
	L_iThief:
		mes "^ff0000[Job Master]^000000";
		mes "Welcome, please select the job you wish to change into";
		menu "Assassin",L_assassin,"Rogue",L_rogue;
			L_assassin:
				jobchange 12;
				if(GivePlat ==1) goto L_givePlat;
				close;
			L_rogue:
				jobchange 17;
				if(GivePlat ==1) goto L_givePlat;
				close;
// Rebirth
	L_rebirth:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to reborn?";
		next;
		menu "Yes",-,"No",L_quit;
		if ((BaseLevel < 99) && (JobLevel < 50)) goto L_cantCh;
		set lastJob, readparam(19);
		jobchange 24;
		resetlvl(1);
		skill 142,1,0;
		skill 143,1,0;
		mes "^ff0000[Job Master]^000000";
		mes "You are now reborn";
		mes "Please come again soon";
		close;
	L_cHsword:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a High Swordsman?";
		next;
		menu "Yes",-,"No",L_quit;
		jobchange 25;
		mes "^ff0000[Job Master]^000000";
		mes "Thank you, please come again soon!";
		close;
	L_cHmage:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a High Mage?";
		next;
		menu "Yes",-,"No",L_quit;
		jobchange 26;
		mes "^ff0000[Job Master]^000000";
		mes "Thank you, please come again soon!";
		close;
	L_cHarcher:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a High Archer?";
		next;
		menu "Yes",-,"No",L_quit;
		jobchange 27;
		mes "^ff0000[Job Master]^000000";
		mes "Thank you, please come again soon!";
		close;
	L_cHacolyte:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a High Acolyte?";
		next;
		menu "Yes",-,"No",L_quit;
		jobchange 28;
		mes "^ff0000[Job Master]^000000";
		mes "Thank you, please come again soon!";
		close;
	L_cHmerchant:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a High Merchant?";
		next;
		menu "Yes",-,"No",L_quit;
		jobchange 29;
		mes "^ff0000[Job Master]^000000";
		mes "Thank you, please come again soon!";
		close;
	L_cHthief:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a High Thief?";
		next;
		menu "Yes",-,"No",L_quit;
		jobchange 30;
		mes "^ff0000[Job Master]^000000";
		mes "Thank you, please come again soon!";
		close;	
// Change to Lord Knight
	L_iKnight:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a Lord Knight?";
		menu "Yes",-,"No",L_quit;
			jobchange 31;
			if(GivePlat ==1) goto L_givePlat;
			close;
// Change to Paladin
	L_iCrusader:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a Paladin?";
		menu "Yes",-,"No",L_quit;
			jobchange 38;
			if(GivePlat ==1) goto L_givePlat;
			close;
// Change to High Priest
	L_iPriest:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a High Priest?";
		menu "Yes",-,"No",L_quit;
			jobchange 32;
			if(GivePlat ==1) goto L_givePlat;
			close;
// Change to Champion
	L_iMonk:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a Champion?";
		menu "Yes",-,"No",L_quit;
			jobchange 39;
			if(GivePlat ==1) goto L_givePlat;
			close;
// Change to Whitesmith
	L_iBlacksmith:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a Whitesmith?";
		menu "Yes",-,"No",L_quit;
			jobchange 34;
			if(GivePlat ==1) goto L_givePlat;
			close;
// Change to Creator
	L_iAlchemist:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a Creator?";
		menu "Yes",-,"No",L_quit;
			jobchange 42;
			if(GivePlat ==1) goto L_givePlat;
			close;
// Change to High Wizard
	L_iWizard:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a High Wizard?";
		menu "Yes",-,"No",L_quit;
			jobchange 33;
			if(GivePlat ==1) goto L_givePlat;
			close;
// Change to Professor
	L_iSage:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a Professor?";
		menu "Yes",-,"No",L_quit;
			jobchange 40;
			if(GivePlat ==1) goto L_givePlat;
			close;
// Change to Sniper
	L_iHunter:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a Sniper?";
		menu "Yes",-,"No",L_quit;
			jobchange 35;
			if(GivePlat ==1) goto L_givePlat;
			close;
// Change to Clown
	L_iBard:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a Clown?";
		menu "Yes",-,"No",L_quit;
			jobchange 43;
			if(GivePlat ==1) goto L_givePlat;
			close;
// Change to Gypsy
	L_iDancer:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a Gypsy?";
		menu "Yes",-,"No",L_quit;
			jobchange 44;
			if(GivePlat ==1) goto L_givePlat;
			close;
// Change to Assassin Cross
	L_iAssassin:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into an Assassin Cross?";
		menu "Yes",-,"No",L_quit;
			jobchange 36;
			if(GivePlat ==1) goto L_givePlat;
			close;
// Change to Stalker
	L_iRogue:
		mes "^ff0000[Job Master]^000000";
		mes "Do you want to change into a Stalker?";
		menu "Yes",-,"No",L_quit;
			jobchange 41;
			if(GivePlat ==1) goto L_givePlat;
			close;
// Giving Platinum Skills
	L_givePlat:
		if (BaseJob==Job_SuperNovice) goto L_sSuperN;
		if ((Class==Job_Swordman) || (Class==7) || (Class==13) || (Class==14)|| (Class==21) || (Class==4002) || (Class==4008)) goto L_sSword;
		if ((Class==Job_Mage) || (Class==9) || (Class==16) || (Class==4003) || (Class==4010) || (Class==4017)) goto L_sMage;
		if ((Class==Job_Archer) || (Class==11) || (Class==19) || (Class==20) || (Class==4004) || (Class==4012) || (Class==4020) || (Class==4021)) goto L_sArcher;
		if ((Class==Job_Acolyte) || (Class==8) || (Class==15) || (Class==50) || (Class==54) || (Class==61) || (Class==4005) || (Class==4009) || (Class==4016)) goto L_sAcolyte;
		if ((Class==Job_Merchant) || (Class==10) || (Class==18) || (Class==51) || (Class==56) || (Class==64) || (Class==4006) || (Class==4011) || (Class==4019)) goto L_sMerchant;
		if ((Class==Job_Thief) || (Class==12) || (Class==17) || (Class==52) || (Class==58) || (Class==63) || (Class==4007) || (Class==4013) || (Class==4018)) goto L_sThief;
		L_sSuperN:
			skill 142,1,0;
			close;
		L_sSword:
			skill 142,1,0;
			skill 144,1,0;
			skill 145,1,0;
			skill 146,1,0;
		L_sMage:
			skill 142,1,0;
			skill 157,1,0;
			close;
		L_sArcher:
			skill 142,1,0;
			skill 147,1,0;
			skill 148,1,0;
			close;
		L_sAcolyte:
			skill 142,1,0;
			skill 156,1,0;
			close;
		L_sMerchant:
			skill 142,1,0;
			skill 153,1,0;
			skill 154,1,0;
			skill 155,1,0;
			close;
		L_sThief:
			skill 142,1,0;
			skill 149,1,0;
			skill 150,1,0;
			skill 151,1,0;
			skill 152,1,0;
			close;
	L_quit:
		close;
// Errors
	L_cantCh:
		mes "^ff0000[Job Master]^000000";
		mes "I'm sorry, you do not meet the requirements to change";
		mes "Please come again soon!";
		close;
	L_skillUsed:
		mes "^ff0000[Job Master]^000000";
		mes "I'm sorry, please use up all your skill points before changing jobs";
		mes "Please come again soon!";
		close;
	L_notEn:
		mes "^ff0000[Job Master]^000000";
		mes "I'm sorry, you do not seem to have enough Job Levels";
		mes "Please come again soon!";
		close;
	L_notSup:
		mes "^ff0000[Job Master]^000000";
		mes "I'm sorry, you do not seem to have enough Base Levels";
		mes "Please come again soon!";
		close;
	L_remove:
		mes "^ff0000[Job Master]^000000";
		mes "Please remove your cart,falcon or peco";
		mes "Please come again soon!";
		close;
}
// ------------------------------ End ------------------------------