shadowofdoom

I also need this script. Anyone can fix it for latest rAathena?

I'm using Euphy's Class Mastery system. //===== eAthena Script ======================================= //= Class Mastery System //===== By: ================================================== //= Euphy //===== Current Version: ===================================== //= 1.2 //===== Description: ========================================= //= An advanced job & build switcher. //== Classes either become available as they are mastered, //== or when purchased from an NPC. //============================================================ prontera,148,203,4 script Class Mastery::CMSys 405,{ set .@n$,"[Class Mastery]"; mes .@n$; mes "How may I assist you?"; next; switch(select(" ~ Purchase a manual: ~ Purchase classes: ~ ^777777Close^000000")) { case 1: mes .@n$; if (!.Mode[3]) { mes "It seems like we're out of stock"; mes "at the moment. My apologies."; close; } if (countitem(.ManualID)) { mes "We only allow one manual per character. Orders, orders..."; close; } mes "Manuals cost ^FF0000"+.Mode[3]+" Zeny^000000."; mes "Would you like one?"; next; switch(select(" ~ Sure!: ~ I'll think about it.")) { case 1: mes .@n$; if (Zeny < .Mode[3]) { mes "You don't appear to have"; mes "enough Zeny... These are very"; mes "valuable books, you know?"; close; } set Zeny, Zeny-.Mode[3]; getitem .ManualID,1; specialeffect2 441; mes "Enjoy!"; close; case 2: mes .@n$; mes "Okay. Take your time."; close; } case 2: mes .@n$; if (!.Mode[4]) { mes "No classes are available for"; mes "purchase. You'll have to earn"; mes "them manually, I suppose..."; close; } if (!countitem(.ManualID)) { mes "You'll need a manual first!"; close; } mes "Entries cost ^FF0000"+.Mode[4]+" Zeny^000000 each."; if (Zeny < .Mode[4]) { mes "Go earn some more!"; close; } set .@menu$,""; for(set .@i,1; .@i<getarraysize(.JobList); set .@i,.@i+1) { if (!(Class_Mastery & pow(2,.@i))) set .@menu$, .@menu$+" ~ "+jobname(.JobList[.@i]); set .@menu$, .@menu$+":"; } set .@menu$, .@menu$+" ~ ^777777Cancel^000000"; next; set .@i, select(.@menu$); if (.@i == getarraysize(.JobList)) close; mes .@n$; mes "Are you sure you want to purchase an entry for the ^0055FF"+jobname(.JobList[.@i])+" ^000000class?"; next; if(select(" ~ I'm sure.: ~ No, wait...") == 2) { mes .@n$; mes "That's perfectly fine."; mes "Come back whenever you'd like."; close; } mes .@n$; set Zeny, Zeny-.Mode[4]; set Class_Mastery, Class_Mastery | pow(2,.@i); specialeffect2 441; mes "There you go, all done!"; message strcharinfo(0),jobname(.JobList[.@i])+" added to Class Manual."; close; case 3: close; } OnPCJobLvUpEvent: if (!.Mode[1]) end; if (@JNull$ == jobname(Class)) end; else set @JNull$,""; if (!@JIndex || .JobList[@JIndex] != Class) { set @JIndex,0; for(set .@i,1; .@i<=getarraysize(.JobList); set .@i,.@i+1) if (Class == .JobList[.@i]) { set @JIndex, .@i; break; } if (!@JIndex) { set @JNull$, jobname(Class); end; } } if ((JobLevel == .JLvlMax[@JIndex]) && !(Class_Mastery & pow(2,@JIndex))) { set Class_Mastery, Class_Mastery | pow(2,@JIndex); atcommand "@allskill"; message strcharinfo(0),jobname(Class)+" added to Class Manual."; for(set .@i,0; .@i<4; set .@i, .@i+1) { specialeffect2 441; sleep2 50; } } end; OnPCLoginEvent: if (.Mode[0] && !countitem(.ManualID)) getitem .ManualID,1; end; OnTimer50: stopnpctimer; setnpctimer 0; close; OnInit: // --------------------- Config --------------------- // Mode: // [0] Manual received automatically upon login? (1: yes / 0: no) // [1] Classes added automatically through leveling up? (1: yes / 0: no) // [2] Enable NPC to purchase manual/classes? (1: yes / 0: no) // [3] Price of manual, in Zeny (if NPC enabled; 0 to disable) // [4] Price per class, in Zeny (if NPC enabled; 0 to disable) setarray .Mode[0],0,1,1,10000000,5000000; // JobList: All the classes (ID) that are available. // JLvlMax: The max job level of classes in JobList. setarray .JobList[1],0, 4008,4009,4010,4011,4012,4013,4015,4016,4017,4018,4019,4020,4021,23,24,25,4046,4047,4049; setarray .JLvlMax[1],10, 70, 70, 70, 70, 70, 70, 70, 70, 70, 70, 70, 70, 70,99,70,70, 50, 50, 50; set .ManualID,3333; // Item ID of manual set .CastTime,4; // Seconds for class change set .Interrupt,1; // Class change is interruptable? (1: yes / 0: no) set .BuildCount,4; // Number of builds and Quick Change options (max 26) set .MaxLevel,99; // Maximum base level (to prevent stat overflow) // -------------------------------------------------- if (!.Mode[2]) hideonnpc "CMSys"; end; } function script Class_Mastery { function Class_Change; function Get_Menu; function Save_Build; function Load_Build; if (!Class_Mastery) { message strcharinfo(0),"The book does not respond."; end; } while(1) { message strcharinfo(0)," ~ Class Mastery System ~ "; switch(select(" > Quick Change: > Set Quick Change Options: > Switch Classes: > Manage Builds: > ^777777Close^000000")) { case 1: message strcharinfo(0),"Quick Change:"; set .@index, Get_Menu(1,getvariableofnpc(.BuildCount,"CMSys")); if (.@index == getvariableofnpc(.BuildCount,"CMSys")+1) break; if (!@QC1[.@index] && (!@QC2[.@index] || BaseLevel < getvariableofnpc(.MaxLevel,"CMSys"))) { message strcharinfo(0),"Class change failed."; close; } if (@QC1[.@index]) Class_Change(@QC1[.@index]); if (@QC2[.@index]) { if (BaseLevel < getvariableofnpc(.MaxLevel,"CMSys")) message strcharinfo(0),"Level requirement not met for build change."; else Load_Build(getd("Build_"+@QC2[.@index]+"$")); } close; case 2: setarray .@ar$[0],"*","a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z"; while(1) { message strcharinfo(0),"Set Quick Change Options:"; set .@index, Get_Menu(1,getvariableofnpc(.BuildCount,"CMSys")); if (.@index == getvariableofnpc(.BuildCount,"CMSys")+1) break; message strcharinfo(0),"Set Quick Change Options > Slot "+.@index+":"; switch(select(" > Edit job ("+((@QC1[.@index])?"^0055FF"+jobname(getvariableofnpc(.JobList[@QC1[.@index]],"CMSys")):"^777777none")+"^000000): > Edit build ("+((@QC2[.@index])?"^0055FF"+@QC2[.@index]:"^777777none")+"^000000): > ^777777Back^000000")) { case 1: message strcharinfo(0),"Set Quick Change Options > Slot "+.@index+" > Edit job:"; set .@i, Get_Menu(2,getarraysize(getvariableofnpc(.JobList,"CMSys"))); if (.@i == getarraysize(getvariableofnpc(.JobList,"CMSys"))) break; set @QC1[.@index], .@i; set QC1$,"_"; for(set .@i,1; .@i<=getvariableofnpc(.BuildCount,"CMSys"); set .@i,.@i+1) set QC1$, QC1$+.@ar$[@QC1[.@i]]; message strcharinfo(0),"Changes saved."; sleep2 250; break; case 2: message strcharinfo(0),"Set Quick Change Options > Slot "+.@index+" > Edit build:"; if (BaseLevel < getvariableofnpc(.MaxLevel,"CMSys")) { message strcharinfo(0),"You must be level "+getvariableofnpc(.MaxLevel,"CMSys")+" to use this."; sleep2 250; break; } set .@build, Get_Menu(3,getvariableofnpc(.BuildCount,"CMSys"),1); if (.@build == getvariableofnpc(.BuildCount,"CMSys")+2) break; if (getd("Build_"+.@build+"$")=="" && .@build != getvariableofnpc(.BuildCount,"CMSys")+1) { message strcharinfo(0),"No build info found."; sleep2 250; break; } else set @QC2[.@index], (((.@build == getvariableofnpc(.BuildCount,"CMSys")+1))?0:.@build); set QC2$,"_"; for(set .@i,1; .@i<=getvariableofnpc(.BuildCount,"CMSys"); set .@i,.@i+1) set QC2$, QC2$+.@ar$[@QC2[.@i]]; message strcharinfo(0),"Changes saved."; sleep2 250; break; case 3: break; } sleep2 250; } break; case 3: message strcharinfo(0),"Switch Classes:"; set .@i, Get_Menu(2,getarraysize(getvariableofnpc(.JobList,"CMSys"))); if (.@i == getarraysize(getvariableofnpc(.JobList,"CMSys"))) break; if (Class == getvariableofnpc(.JobList[.@i],"CMSys")) { message strcharinfo(0),"Class change failed."; close; } message strcharinfo(0),"Select '"+jobname(getvariableofnpc(.JobList[.@i],"CMSys"))+"'?"; if (select("Yes:No") == 2) break; Class_Change(.@i); close; case 4: if (BaseLevel < getvariableofnpc(.MaxLevel,"CMSys")) { message strcharinfo(0),"You must be level "+getvariableofnpc(.MaxLevel,"CMSys")+" to use this."; sleep2 250; break; } while(1) { message strcharinfo(0),"Build Manager:"; switch(select(" > Save Build...: > Load Build...: > Rename Build...: > ^777777Back^000000")) { case 1: message strcharinfo(0),"Build Manager > Save Build:"; set .@build, Get_Menu(3,getvariableofnpc(.BuildCount,"CMSys")); if (.@build == getvariableofnpc(.BuildCount,"CMSys")+1) break; if (getd("Build_"+.@build+"$")!="") { message strcharinfo(0),"Overwrite previous build #"+.@build+"?"; if(select("Save new build:Cancel")==2) break; } Save_Build(.@build); message strcharinfo(0),"Type a name for your build."; input getd("Build_"+.@build+"n$"); message strcharinfo(0),"Build #"+.@build+" ("+getd("Build_"+.@build+"n$")+") saved."; sleep2 250; break; case 2: message strcharinfo(0),"Build Manager > Load Build:"; set .@build, Get_Menu(3,getvariableofnpc(.BuildCount,"CMSys")); if (.@build == getvariableofnpc(.BuildCount,"CMSys")+1) break; if (getd("Build_"+.@build+"$")=="") { message strcharinfo(0),"No build info found."; sleep2 250; break; } Load_Build(getd("Build_"+.@build+"$")); message strcharinfo(0),"Build #"+.@build+" loaded."; sleep2 250; break; case 3: message strcharinfo(0),"Build Manager > Rename Build:"; set .@build, Get_Menu(3,getvariableofnpc(.BuildCount,"CMSys")); if (.@build == getvariableofnpc(.BuildCount,"CMSys")+1) break; if (getd("Build_"+.@build+"$")=="") { message strcharinfo(0),"No build info found."; sleep2 250; break; } message strcharinfo(0),"Type a new name for Build #"+.@build+" ("+getd("Build_"+.@build+"n$")+")."; input getd("Build_"+.@build+"n$"); message strcharinfo(0),"Build #"+.@build+" renamed."; sleep2 250; break; case 4: set .@j,1; break; } if (.@j) { set .@j,0; break; } sleep2 250; } break; case 5: close; } sleep2 250; } function Class_Change { specialeffect2 348; if (getvariableofnpc(.Interrupt,"CMSys")) { message strcharinfo(0),"Casting..."; initnpctimer "CMSys",1; progressbar "", getvariableofnpc(.CastTime,"CMSys"); } else for(set .@i,0; .@i<getvariableofnpc(.CastTime,"CMSys"); set .@i,.@i+1) { message strcharinfo(0),(getvariableofnpc(.CastTime,"CMSys")-.@i)+" seconds remaining..."; sleep2 1000; } jobchange getvariableofnpc(.JobList[getarg(0)],"CMSys"); set JobLevel, getvariableofnpc(.JLvlMax[getarg(0)],"CMSys"); atcommand "@allskill"; set SkillPoint,0; skilleffect 292,0; return; } function Get_Menu { set .@menu$,""; switch(getarg(0)) { case 1: deletearray @QC1[0],getarraysize(@QC1); deletearray @QC2[0],getarraysize(@QC2); setarray .@ar$[0],"*","a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z"; set .@s$,"_"; for(set .@i,1; .@i<=getstrlen(QC1$); set .@i,.@i+1) for(set .@j,0; .@j<27; set .@j,.@j+1) if (compare(QC1$,.@s$+.@ar$[.@j])) { set @QC1[.@i], .@j; set .@s$, .@s$+.@ar$[.@j]; break; } set .@s$,"_"; for(set .@i,1; .@i<=getstrlen(QC2$); set .@i,.@i+1) for(set .@j,0; .@j<27; set .@j,.@j+1) if (compare(QC2$,.@s$+.@ar$[.@j])) { set @QC2[.@i], .@j; set .@s$, .@s$+.@ar$[.@j]; break; } for(set .@i,1; .@i<=getarg(1); set .@i,.@i+1) set .@menu$, .@menu$+" > "+((@QC1[.@i])?"^0055FF"+jobname(getvariableofnpc(.JobList[@QC1[.@i]],"CMSys")):"^777777no job")+"^000000 / build "+((@QC2[.@i])?"^0055FF"+@QC2[.@i]:"^777777empty")+"^000000:"; set .@menu$, .@menu$+" > ^777777Back^000000"; break; case 2: for(set .@i,1; .@i<getarg(1); set .@i,.@i+1) { if (Class_Mastery & pow(2,.@i)) set .@menu$, .@menu$+" > "+jobname(getvariableofnpc(.JobList[.@i],"CMSys")); set .@menu$, .@menu$+":"; } set .@menu$, .@menu$+" > ^777777Back^000000"; break; case 3: for(set .@i,1; .@i<=getarg(1); set .@i,.@i+1) set .@menu$, .@menu$+" > Slot "+.@i+" ("+((getd("Build_"+.@i+"n$")=="")?"^777777empty":"^0055FF"+getd("Build_"+.@i+"n$"))+"^000000):"; if (getarg(2,0)) set .@menu$, .@menu$+" > No build:"; set .@menu$, .@menu$+" > ^777777Back^000000"; break; } return select(.@menu$); } function Save_Build { setarray .@ar$[0],"a","b","c","d","e","f","g"; set .@s$,""; for(set .@i,0; .@i<7; set .@i,.@i+1) set .@s$,.@s$+.@ar$[.@i]+((.@i==6)?StatusPoint:readparam(.@i+13))+"|"; setd "Build_"+getarg(0)+"$", .@s$; return; } function Load_Build { setarray .@num$[0],"0","1","2","3","4","5","6","7","8","9"; setarray .@ar$[0],"a","b","c","d","e","f","g"; ResetStatus; for(set .@j,13; .@j<20; set .@j,.@j+1) { set .@var$,""; set .@s$,.@ar$[.@j-13]; while(1) { for(set .@i,0; .@i<10; set .@i,.@i+1) { if (compare(getarg(0),.@s$+.@num$[.@i])) { set .@var$,.@var$+.@num$[.@i]; set .@s$,.@s$+.@num$[.@i]; break; } } if (compare(getarg(0),.@s$+"|")) break; } if (.@j==19) set StatusPoint, atoi(.@var$); else statusup2 .@j, atoi(.@var$)-1; } return; } } I changed the job list to transcendent 3rd jobs and some minor config modifications. Here's my actual script. //===== eAthena Script ======================================= //= Class Mastery System //===== By: ================================================== //= Euphy //===== Current Version: ===================================== //= 1.2 //===== Description: ========================================= //= An advanced job & build switcher. //== Classes either become available as they are mastered, //== or when purchased from an NPC. //============================================================ prontera,163,174,3 script Class Mastery::CMSys 405,{ set .@n$,"[Class Mastery]"; mes .@n$; mes "How may I assist you?"; next; switch(select(" ~ Purchase a manual: ~ Purchase classes: ~ ^777777Close^000000")) { case 1: mes .@n$; if (!.Mode[3]) { mes "It seems like we're out of stock"; mes "at the moment. My apologies."; close; } if (countitem(.ManualID)) { mes "We only allow one manual per character. Orders, orders..."; close; } mes "Manuals cost ^FF0000"+.Mode[3]+" Zeny^000000."; mes "Would you like one?"; next; switch(select(" ~ Sure!: ~ I'll think about it.")) { case 1: mes .@n$; if (Zeny < .Mode[3]) { mes "You don't appear to have"; mes "enough Zeny... These are very"; mes "valuable books, you know?"; close; } set Zeny, Zeny-.Mode[3]; getitem .ManualID,1; specialeffect2 441; mes "Enjoy!"; close; case 2: mes .@n$; mes "Okay. Take your time."; close; } case 2: mes .@n$; if (!.Mode[4]) { mes "No classes are available for"; mes "purchase. You'll have to earn"; mes "them manually, I suppose..."; close; } if (!countitem(.ManualID)) { mes "You'll need a manual first!"; close; } mes "Entries cost ^FF0000"+.Mode[4]+" Zeny^000000 each."; if (Zeny < .Mode[4]) { mes "Go earn some more!"; close; } set .@menu$,""; for(set .@i,1; .@i<getarraysize(.JobList); set .@i,.@i+1) { if (!(Class_Mastery & pow(2,.@i))) set .@menu$, .@menu$+" ~ "+jobname(.JobList[.@i]); set .@menu$, .@menu$+":"; } set .@menu$, .@menu$+" ~ ^777777Cancel^000000"; next; set .@i, select(.@menu$); if (.@i == getarraysize(.JobList)) close; mes .@n$; mes "Are you sure you want to purchase an entry for the ^0055FF"+jobname(.JobList[.@i])+" ^000000class?"; next; if(select(" ~ I'm sure.: ~ No, wait...") == 2) { mes .@n$; mes "That's perfectly fine."; mes "Come back whenever you'd like."; close; } mes .@n$; set Zeny, Zeny-.Mode[4]; set Class_Mastery, Class_Mastery | pow(2,.@i); specialeffect2 441; mes "There you go, all done!"; message strcharinfo(0),jobname(.JobList[.@i])+" added to Class Manual."; close; case 3: close; } OnPCJobLvUpEvent: if (!.Mode[1]) end; if (@JNull$ == jobname(Class)) end; else set @JNull$,""; if (!@JIndex || .JobList[@JIndex] != Class) { set @JIndex,0; for(set .@i,1; .@i<=getarraysize(.JobList); set .@i,.@i+1) if (Class == .JobList[.@i]) { set @JIndex, .@i; break; } if (!@JIndex) { set @JNull$, jobname(Class); end; } } if ((JobLevel == .JLvlMax[@JIndex]) && !(Class_Mastery & pow(2,@JIndex))) { set Class_Mastery, Class_Mastery | pow(2,@JIndex); atcommand "@allskill"; message strcharinfo(0),jobname(Class)+" added to Class Manual."; for(set .@i,0; .@i<4; set .@i, .@i+1) { specialeffect2 441; sleep2 50; } } end; OnPCLoginEvent: if (.Mode[0] && !countitem(.ManualID)) getitem .ManualID,1; end; OnTimer50: stopnpctimer; setnpctimer 0; close; OnInit: // --------------------- Config --------------------- // Mode: // [0] Manual received automatically upon login? (1: yes / 0: no) // [1] Classes added automatically through leveling up? (1: yes / 0: no) // [2] Enable NPC to purchase manual/classes? (1: yes / 0: no) // [3] Price of manual, in Zeny (if NPC enabled; 0 to disable) // [4] Price per class, in Zeny (if NPC enabled; 0 to disable) setarray .Mode[0],0,1,1,10000000,100000000; // JobList: All the classes (ID) that are available. // JLvlMax: The max job level of classes in JobList. setarray .JobList[1],0, 4060,4061,4062,4063,4064,4065,4073,4074,4075,4076,4077,4078,4079,4190,4215,4211,4212,4047,4049; setarray .JLvlMax[1],10, 120, 120, 120, 120, 120, 120, 120, 120, 120, 120, 120, 120, 120, 120, 120, 120, 120, 120, 120; set .ManualID,30100; // Item ID of manual set .CastTime,4; // Seconds for class change set .Interrupt,1; // Class change is interruptable? (1: yes / 0: no) set .BuildCount,4; // Number of builds and Quick Change options (max 26) set .MaxLevel,300; // Maximum base level (to prevent stat overflow) // -------------------------------------------------- if (!.Mode[2]) hideonnpc "CMSys"; end; } function script Class_Mastery { function Class_Change; function Get_Menu; function Save_Build; function Load_Build; if (!Class_Mastery) { message strcharinfo(0),"The book does not respond."; end; } while(1) { message strcharinfo(0)," ~ Class Mastery System ~ "; switch(select(" > Quick Change: > Set Quick Change Options: > Switch Classes: > Manage Builds: > ^777777Close^000000")) { case 1: message strcharinfo(0),"Quick Change:"; set .@index, Get_Menu(1,getvariableofnpc(.BuildCount,"CMSys")); if (.@index == getvariableofnpc(.BuildCount,"CMSys")+1) break; if (!@QC1[.@index] && (!@QC2[.@index] || BaseLevel < getvariableofnpc(.MaxLevel,"CMSys"))) { message strcharinfo(0),"Class change failed."; close; } if (@QC1[.@index]) Class_Change(@QC1[.@index]); if (@QC2[.@index]) { if (BaseLevel < getvariableofnpc(.MaxLevel,"CMSys")) message strcharinfo(0),"Level requirement not met for build change."; else Load_Build(getd("Build_"+@QC2[.@index]+"$")); } close; case 2: setarray .@ar$[0],"*","a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z"; while(1) { message strcharinfo(0),"Set Quick Change Options:"; set .@index, Get_Menu(1,getvariableofnpc(.BuildCount,"CMSys")); if (.@index == getvariableofnpc(.BuildCount,"CMSys")+1) break; message strcharinfo(0),"Set Quick Change Options > Slot "+.@index+":"; switch(select(" > Edit job ("+((@QC1[.@index])?"^0055FF"+jobname(getvariableofnpc(.JobList[@QC1[.@index]],"CMSys")):"^777777none")+"^000000): > Edit build ("+((@QC2[.@index])?"^0055FF"+@QC2[.@index]:"^777777none")+"^000000): > ^777777Back^000000")) { case 1: message strcharinfo(0),"Set Quick Change Options > Slot "+.@index+" > Edit job:"; set .@i, Get_Menu(2,getarraysize(getvariableofnpc(.JobList,"CMSys"))); if (.@i == getarraysize(getvariableofnpc(.JobList,"CMSys"))) break; set @QC1[.@index], .@i; set QC1$,"_"; for(set .@i,1; .@i<=getvariableofnpc(.BuildCount,"CMSys"); set .@i,.@i+1) set QC1$, QC1$+.@ar$[@QC1[.@i]]; message strcharinfo(0),"Changes saved."; sleep2 250; break; case 2: message strcharinfo(0),"Set Quick Change Options > Slot "+.@index+" > Edit build:"; if (BaseLevel < getvariableofnpc(.MaxLevel,"CMSys")) { message strcharinfo(0),"You must be level "+getvariableofnpc(.MaxLevel,"CMSys")+" to use this."; sleep2 250; break; } set .@build, Get_Menu(3,getvariableofnpc(.BuildCount,"CMSys"),1); if (.@build == getvariableofnpc(.BuildCount,"CMSys")+2) break; if (getd("Build_"+.@build+"$")=="" && .@build != getvariableofnpc(.BuildCount,"CMSys")+1) { message strcharinfo(0),"No build info found."; sleep2 250; break; } else set @QC2[.@index], (((.@build == getvariableofnpc(.BuildCount,"CMSys")+1))?0:.@build); set QC2$,"_"; for(set .@i,1; .@i<=getvariableofnpc(.BuildCount,"CMSys"); set .@i,.@i+1) set QC2$, QC2$+.@ar$[@QC2[.@i]]; message strcharinfo(0),"Changes saved."; sleep2 250; break; case 3: break; } sleep2 250; } break; case 3: message strcharinfo(0),"Switch Classes:"; set .@i, Get_Menu(2,getarraysize(getvariableofnpc(.JobList,"CMSys"))); if (.@i == getarraysize(getvariableofnpc(.JobList,"CMSys"))) break; if (Class == getvariableofnpc(.JobList[.@i],"CMSys")) { message strcharinfo(0),"Class change failed."; close; } message strcharinfo(0),"Select '"+jobname(getvariableofnpc(.JobList[.@i],"CMSys"))+"'?"; if (select("Yes:No") == 2) break; Class_Change(.@i); close; case 4: if (BaseLevel < getvariableofnpc(.MaxLevel,"CMSys")) { message strcharinfo(0),"You must be level "+getvariableofnpc(.MaxLevel,"CMSys")+" to use this."; sleep2 250; break; } while(1) { message strcharinfo(0),"Build Manager:"; switch(select(" > Save Build...: > Load Build...: > Rename Build...: > ^777777Back^000000")) { case 1: message strcharinfo(0),"Build Manager > Save Build:"; set .@build, Get_Menu(3,getvariableofnpc(.BuildCount,"CMSys")); if (.@build == getvariableofnpc(.BuildCount,"CMSys")+1) break; if (getd("Build_"+.@build+"$")!="") { message strcharinfo(0),"Overwrite previous build #"+.@build+"?"; if(select("Save new build:Cancel")==2) break; } Save_Build(.@build); message strcharinfo(0),"Type a name for your build."; input getd("Build_"+.@build+"n$"); message strcharinfo(0),"Build #"+.@build+" ("+getd("Build_"+.@build+"n$")+") saved."; sleep2 250; break; case 2: message strcharinfo(0),"Build Manager > Load Build:"; set .@build, Get_Menu(3,getvariableofnpc(.BuildCount,"CMSys")); if (.@build == getvariableofnpc(.BuildCount,"CMSys")+1) break; if (getd("Build_"+.@build+"$")=="") { message strcharinfo(0),"No build info found."; sleep2 250; break; } Load_Build(getd("Build_"+.@build+"$")); message strcharinfo(0),"Build #"+.@build+" loaded."; sleep2 250; break; case 3: message strcharinfo(0),"Build Manager > Rename Build:"; set .@build, Get_Menu(3,getvariableofnpc(.BuildCount,"CMSys")); if (.@build == getvariableofnpc(.BuildCount,"CMSys")+1) break; if (getd("Build_"+.@build+"$")=="") { message strcharinfo(0),"No build info found."; sleep2 250; break; } message strcharinfo(0),"Type a new name for Build #"+.@build+" ("+getd("Build_"+.@build+"n$")+")."; input getd("Build_"+.@build+"n$"); message strcharinfo(0),"Build #"+.@build+" renamed."; sleep2 250; break; case 4: set .@j,1; break; } if (.@j) { set .@j,0; break; } sleep2 250; } break; case 5: close; } sleep2 250; } function Class_Change { specialeffect2 348; if (getvariableofnpc(.Interrupt,"CMSys")) { message strcharinfo(0),"Casting..."; initnpctimer "CMSys",1; progressbar "", getvariableofnpc(.CastTime,"CMSys"); } else for(set .@i,0; .@i<getvariableofnpc(.CastTime,"CMSys"); set .@i,.@i+1) { message strcharinfo(0),(getvariableofnpc(.CastTime,"CMSys")-.@i)+" seconds remaining..."; sleep2 1000; } jobchange getvariableofnpc(.JobList[getarg(0)],"CMSys"); set JobLevel, getvariableofnpc(.JLvlMax[getarg(0)],"CMSys"); atcommand "@allskill"; set SkillPoint,0; skilleffect 292,0; return; } function Get_Menu { set .@menu$,""; switch(getarg(0)) { case 1: deletearray @QC1[0],getarraysize(@QC1); deletearray @QC2[0],getarraysize(@QC2); setarray .@ar$[0],"*","a","b","c","d","e","f","g","h","i","j","k","l","m","n","o","p","q","r","s","t","u","v","w","x","y","z"; set .@s$,"_"; for(set .@i,1; .@i<=getstrlen(QC1$); set .@i,.@i+1) for(set .@j,0; .@j<27; set .@j,.@j+1) if (compare(QC1$,.@s$+.@ar$[.@j])) { set @QC1[.@i], .@j; set .@s$, .@s$+.@ar$[.@j]; break; } set .@s$,"_"; for(set .@i,1; .@i<=getstrlen(QC2$); set .@i,.@i+1) for(set .@j,0; .@j<27; set .@j,.@j+1) if (compare(QC2$,.@s$+.@ar$[.@j])) { set @QC2[.@i], .@j; set .@s$, .@s$+.@ar$[.@j]; break; } for(set .@i,1; .@i<=getarg(1); set .@i,.@i+1) set .@menu$, .@menu$+" > "+((@QC1[.@i])?"^0055FF"+jobname(getvariableofnpc(.JobList[@QC1[.@i]],"CMSys")):"^777777no job")+"^000000 / build "+((@QC2[.@i])?"^0055FF"+@QC2[.@i]:"^777777empty")+"^000000:"; set .@menu$, .@menu$+" > ^777777Back^000000"; break; case 2: for(set .@i,1; .@i<getarg(1); set .@i,.@i+1) { if (Class_Mastery & pow(2,.@i)) set .@menu$, .@menu$+" > "+jobname(getvariableofnpc(.JobList[.@i],"CMSys")); set .@menu$, .@menu$+":"; } set .@menu$, .@menu$+" > ^777777Back^000000"; break; case 3: for(set .@i,1; .@i<=getarg(1); set .@i,.@i+1) set .@menu$, .@menu$+" > Slot "+.@i+" ("+((getd("Build_"+.@i+"n$")=="")?"^777777empty":"^0055FF"+getd("Build_"+.@i+"n$"))+"^000000):"; if (getarg(2,0)) set .@menu$, .@menu$+" > No build:"; set .@menu$, .@menu$+" > ^777777Back^000000"; break; } return select(.@menu$); } function Save_Build { setarray .@ar$[0],"a","b","c","d","e","f","g"; set .@s$,""; for(set .@i,0; .@i<7; set .@i,.@i+1) set .@s$,.@s$+.@ar$[.@i]+((.@i==6)?StatusPoint:readparam(.@i+13))+"|"; setd "Build_"+getarg(0)+"$", .@s$; return; } function Load_Build { setarray .@num$[0],"0","1","2","3","4","5","6","7","8","9"; setarray .@ar$[0],"a","b","c","d","e","f","g"; ResetStatus; for(set .@j,13; .@j<20; set .@j,.@j+1) { set .@var$,""; set .@s$,.@ar$[.@j-13]; while(1) { for(set .@i,0; .@i<10; set .@i,.@i+1) { if (compare(getarg(0),.@s$+.@num$[.@i])) { set .@var$,.@var$+.@num$[.@i]; set .@s$,.@s$+.@num$[.@i]; break; } } if (compare(getarg(0),.@s$+"|")) break; } if (.@j==19) set StatusPoint, atoi(.@var$); else statusup2 .@j, atoi(.@var$)-1; } return; } } The script run smoothly. I can buy the manual from the NPC, buy job lists, switching my job, etc. The only problem is when my character is on 3rd job (and some expanded classes too, like expanded super novice), I can't trigger the "Class_Mastery" function when double clicking on the item manual. It just doing nothing. Like when we double clicking on unusable item, nothing happened. So which line should I change for the function to be working while we are on 3rd job?

Hello. How exactly we apply this patch? Could you please give detailed steps on how to do it. I'm a total newbie to this topic, so please pardon me. EDIT: Figured it out. Thank you very much! EDIT2: The custom item's sprite strangely couldn't be loaded. I'm using the default script above. -- Load the original file. As you might have guessed you can also load your translated file here instead -- (just make sure the "tbl" array contains your item info) dofile("System/iteminfo.lub") -- Now as a simple example . I am simply going to change name of Red Potion to Crimson Potion. -- But you can add anything in the same way. Format is same as the original one, just -- the table name is different tbl_custom = { [501] = { unidentifiedDisplayName = "Crimson Potion", unidentifiedResourceName = "»¡°£Æ÷¼Ç", unidentifiedDescriptionName = { "A potion made from", "grinded Red Herbs that", "restores ^000088about 45 HP^000000.", "^ffffff_^000000", "Weight: ^7777777^000000" }, identifiedDisplayName = "Crimson Potion", identifiedResourceName = "»¡°£Æ÷¼Ç", identifiedDescriptionName = { "^000088HP Recovery Item^000000", "A potion made from", "grinded Red Herbs that", "restores ^000088about 45 HP^000000.", "^ffffff_^000000", "Weight: ^7777777^000000" }, slotCount = 0, ClassNum = 0 }, } -- Now for a helper function because i hate repetitions -- It adds items from curTable if it is not present in refTable function itemAdder(curTable, refTable) for ItemID,DESC in pairs(curTable) do if refTable == nil or refTable[ItemID] == nil then result, msg = AddItem(ItemID, DESC.unidentifiedDisplayName, DESC.unidentifiedResourceName, DESC.identifiedDisplayName, DESC.identifiedResourceName, DESC.slotCount, DESC.ClassNum) if not result then return false, msg end for k,v in pairs(DESC.unidentifiedDescriptionName) do result, msg = AddItemUnidentifiedDesc(ItemID, v) if not result then return false, msg end end for k,v in pairs(DESC.identifiedDescriptionName) do result, msg = AddItemIdentifiedDesc(ItemID, v) if not result then return false, msg end end end end return true, "good" end -- And the newly designed main function function main() result, msg = itemAdder(tbl_custom, nil) -- add custom items (including official overrides) if result then result, msg = itemAdder(tbl, tbl_custom) -- add non-overridden official items end return result, msg end My client version is 2015-11-04aRagexe.exe EDIT3: Solved. Turns out the script only read the data folder while ignoring GRF files. All of my sprites are in GRF files, that's why the error occured.