STALKER PLAGARISM

[Syndicate]

CAn anyone help me with stalker?

when the stalker use plagarism and use PRESERVE ( EXAMPLE : BOWLING BASH ) and use to change his job at NPC. ( EXAMPLE I CHANGE MY JOB TO SINX )

The PRESERVE ( BOWLING BASH ) is still in my new job ( SIN X ) = SKILL OF SINX + BOWLING BASH.. .

How to remove copy skill when changing job

HELP PLS

Edited September 6, 2012 by Virus

[Mystery]

Have you tried relogging?

[Syndicate]

yeah. when they tried to relog. THe copy skill will be removed.

But when they changed their job while has a copy skill. Its gonna be like ( SINX skill + Bowling bash)

*** I want to remove copy skill when they are not stalker anymore***

[Mystery]

yeah. when they tried to relog. THe copy skill will be removed.

But when they changed their job while has a copy skill. Its gonna be like ( SINX skill + Bowling bash)

*** I want to remove copy skill when they are not stalker anymore***

There's no other possible way to avoid it unless the character logs out. What else you could try to do is that make the Job Changer (or swapper) check to see if it's a Stalker Class and if it is, after their swap to another class, use the atcommand kick to kick them so that they relog.

[Syndicate]

I already did that .....

Btw. is there any command that will remove copy skill? instead of using atcommand kick

[Mystery]

Given by the commands given: https://rathena.svn..../atcommands.txt and the permissions stated: https://rathena.svn....permissions.txt I would say thats a no =/ Sorry. Your best bet is to do what I mentioned. Unless.. there's some other way I'm unaware of.. but I had the same issue you did and what I did to my swapper worked best.

[Syndicate]

Anyway thanks mysterious.

How bout this mysterious can u re-script it?

I want to REBIRTH job instead of changing jobs

Example:

Level 500 /120 Paladin ask for rebirth

then changed to High novice 500/1

the job will be reset obviously but the LEVEL REMAINS.

function script S_JobM {
mes "^ff0000[Job Master]^000000";
mes "Hi, I'm the Ultimate Job Master";
mes "What would you want to do?";
menu "Change my job",cjob,"Turn me into a baby",cbaby;
end;
Cbaby:
next;
if (class == 0) goto makebaby;
if (class == 4023) goto Go1st;
if (class == 4024 || class == 4025 || class == 4026 || class == 4027 || class == 4028 || class == 4029) goto Go2nd;
if (class >= 4030) goto ur2nd;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Sorry You are not a Baby Novice or a Baby First Jobclass, please use the normal Job Changer.";
close;
ur2nd:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "What do you want from me? You have allready reached a baby secondclass job.";
close;
makebaby:
if(joblevel>1) goto Lbabyjobone;
if(baselevel>1) goto Lbabybaseone;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "I'm a baby jobchanger for Titan! You want to become a baby?";
menu "Yeah, sure!",Lyes,"No!",Lno;
Lbabyjobone:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "You are not Level 1/1!";
close;
Lbabybaseone:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "You are not Level 1/1!";
close;
Lyes:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Ok  here you go my cute Baby xD!";
jobchange 4023;// Job: Baby_Novice
close;
Lno:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes " Ok go away you Bigman! >.> ";
close;
Go1st:
if(joblevel<10) goto Lbabyjobten;
if(SkillPoint != 0) goto Lbabyskillpt;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "I'm a baby jobchanger for Titan! First of all, what baby class would you like to change into?";
mes "Please choose your first job...";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Pick a job, any job!";
menu "Swordsman",LbabySword,"Mage",LbabyMage,"Thief",LbabyThief,"Merchant",LbabyMerc,"Acolyte",LbabyAco,"Archer",LbabyArch,"Super Novice",LbabySupNovi,"Cancel",LCancel;
Lbabyjobten:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Ugh, you need to have at least a Job Level of 10 before changing into the first class... go kill some porings or something.. >.>'";
cutin "kafra_01",255;
close;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Please use up all your skill points before changing into the next job! ";
cutin "kafra_01",255;
close;
LbabySupNovi:
mes "[ ^0065DFBaby Jobra^000000 ]";
if(baselevel<35) goto LReqnovi;
mes "You dont want to be a mainstream Dude? Than Super Novice is the right choise, enyo!!!";
cutin "kafra_01",255;
jobchange 4045;// Job: Super_Novice
close;
LReqnovi:
mes "You need to be level 35,";
mes "to be a Super Novice";
close;

LbabySword:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Wow, fantastic! Doesn't all that hard work feel like its paid off? *kekeke* I see the ^B70004BLOOD of Porings^000000 on your hands! You truly are fit for the ^0005CESwordsman^000000 job! ";
cutin "kafra_01",255;
jobchange 4024;// Job: Job_BabySwordman
close;
LbabyMage:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Nice, now you can finally wield the power of ^2200DFM^7600F9A^AF00FBN^DA00DFA^000000, your spiritual energy!!!";
cutin "kafra_01",255;
jobchange 4025;// Job: Job_BabyMage
close;
LbabyThief:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Those devious hand of yours really look like they need to grab something (no comment)..... go forth and steal!!";
cutin "kafra_01",255;
jobchange 4029;// Job: Job_BabyThief
close;
LbabyMerc:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Oh yeah, Mr. Moneybags, SOMEBODY here just loves the sound of coins jinglin'...";
mes "Well its not me!.. >_>..... ... bah.. ";
cutin "kafra_01",255;
jobchange 4028;// Job: Job_BabyMerchant
close;
LbabyAco:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Yay.. go read a Bible.. or whatever.. er..yeah";
cutin "kafra_01",255;
jobchange 4027;// Job: Job_BabyAcolyte
close;
LbabyArch:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "I used to poke things with a stick when I was a child..";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "I guess you're like me! You hurl pointed sticks at things! Kekeke...";
cutin "kafra_01",255;
jobchange 4026;// Job: Job_BabyArcher
close;

Go2nd:
if(SkillPoint != 0) goto Lbabyskillpt;
if(joblevel<40) goto Lbabyjobforty;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "I'm a baby jobchanger for Titan! First of all, what baby class would you like to change into?";
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Please choose your second job...";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "What would you like to be? (Please be the preliminary job)";
menu "Knight",LbabyKnight,"Wizard",LbabyWizard,"Hunter",LbabyHunter,"Blacksmith",LbabyBlacksmith,"Assassin",LbabyAssassin,"Priest",LbabyPriest,"Crusader",LbabyCrusader,"Sage",LbabySage,"Dancer/Bard",LbabyDancerbard,"Alchemist",LbabyAlchemist,"Rogue",LbabyRogue,"Monk",LbabyMonk,"Cancel",LCancel;
Lbabyjobforty:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "You must be at least Job Level 40 before even thinking about changing into the Second Job.";
cutin "kafra_01",255;
close;

LbabyHunter:
if(class != 4026) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Oh goodie, you've met all the requirements... did you have fun hurling pointed sticks at monsters? Well guess what?";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Now you can hurl pointed sticks at monsters AND keep them in one place! w00t, yea! Traps are a great thing...";
jobchange 4034;// Job: Job_Hunter
close;
LbabyKnight:
if(class != 4024) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "w00t w00t! You are Job Level 40, you've been a Swordie all your life...";
mes "Alrite, you are ready to become the doer of Justice, the embodiment of Heroism, the very soul and life of Valor! ";
mes "...";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Yes! You are ready to become... a Baby Knight! ";
mes "Go save a Damsel in Distress or something..";
cutin "kafra_01",255;
jobchange 4030;// Job: Job_Knight
close;
LbabyBlacksmith:
if(class != 4028) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Oooo~~ Goodie goodie gumdrops! You meet allll the requirements! Guess what I'm gonna do ...";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "YUP! You guessed it! I turned you into a Blacksmith! Aren't you PROUD of yourself... Go and make a few weapons! Open up shops across the nation! Yea yea yea! Go go go! w00t! Ho yeah! ";
jobchange 4033;// Job: Job_Blacksmith
close;
LbabyAssassin:
if(class != 4029) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Did you know I used to be a male Assassin? Well, I had a few things done to my hair, got a face lift, some implants here and there...";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Oh my, too much information, right? Kekeke, okay, go off and become the most sinister of all Jobs in this world... ^6500BFAssassin...";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Poof! Kekeke... ";
jobchange 4035;// Job: Job_Assassin
close;
LbabyPriest:
if(class != 4027) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "I bet you are GODDAMNED TIRED of NOT having Sp Recovery, right? Well I am tired of hearing little Jesus-Hugging Acolytes scream this every time they're low on Sp... ";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Yay! You've now reached Priesthood! It's sorta like Manhood.. but not really, see with Manhood, you get this little thingy between your legs.. WHOOPs, I am getting so off topic..";
jobchange 4031;// Job: Job_Priest
close;
LbabyWizard:
if(class != 4025) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Weeee, doesn't it feel great to finally become a Wizard? It's like a warm bath.... ahhhhhhh......";
jobchange 4032;// Job: Job_Wizard
close;
LbabyCrusader:
if(class != 4024) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Mmmmm, I always liked Crusaders.. their Broad Shoulders always turned me on....";
next;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Oooo~~~ yeah, thats it... yummy...";
jobchange 4037;// Job: Job_Crusader
close;
LbabyDancerbard:
if(class != 4026) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
if(sex==1) mes "Yay! Go play some ballads for some Dancers or something, I just can't stand your clothes... ewww.";
if(sex==1) jobchange 4042;// Job: Job_Bard
if(sex==0) mes "Uh-huh, swivel those hips girl ^_~ Dancers are sooo sexy.. too bad I'm stuck in this ugly Kafra dress.. blah, if only I could strip down to a little thong too... *sigh*";
if(sex==0) jobchange 4043;// Job: Job_Dancer
close;
LbabyAlchemist:
if(class != 4028) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Cool! Go make some potions! Open a Pharmacy! yeah yeah yeah! ";
jobchange 4041;// Job: Job_Alchem
close;
LbabyRogue:
if(class != 4029) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Wow!  You.. are.. SOOOOO COOOL!! KYAAHH XD!! *drools*";
jobchange 4040;// Job: Job_Rogue
close;
LbabyMonk:
if(class != 4027) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Nice.... Monks are pretty darn cool!";
jobchange 4038;// Job: Job_Monk
close;
LbabySage:
if(class != 4025) goto wrong1stjob;
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Ahhhh, soo cool! I'll never get tired of seeing people turn into those new 2-2 sprites.. KYAHH XD!!";
mes "Go forth Sage! Show those wizzies what a real mana-wielder can do! Mwahaha...";
jobchange 4039;// Job: Job_Sage
close;
wrong1stjob:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "You have the wrong first job, so please choose a other second job.";
close;
Lbabyskillpt:
mes "[ ^0065DFJobra^000000 ]";
mes "Please use up all your skill points before changing into the next job! ";
cutin "kafra_01",255;
close;

LCancel:
mes "[ ^0065DFBaby Jobra^000000 ]";
mes "Blah.. be that way.. >_>..";
cutin "kafra_01",255;
close;
cjob:
next;
 //== DO NOT EDIT THE FOLLOWING:
deletearray @ejc[0],getarraysize(@ejc);
//== The following can be edited:
set @npcname$,"[ ^000088Job Master^000000 ]";
set @ejc[0],40; // Super Novice Job Change Base Level.
set @ejc[1],10; // Novice to First Class Minimum Job Level.
set @ejc[2],90; // First to Second Class Minimum Job Level.
set @ejc[3],90; // Rebirth Job Level.
set @ejc[4],99; // Rebirth Base Level.
set @ejc[5],1; // Delete Extra Skill Points: 0 - No, 1 - Yes.
set @ejc[6],1; // Check for basic skills: 0 - No, 1 - Yes.
set @ejc[7],1; // Restrict Job Tree: 0 - No, 1 - Yes.
set @ejc[8],1; // Enable Ninja and Gunslinger: 0 - No, 1 - Yes.
set @ejc[9],1; // Get Platinum Skills: 0 - No, 1 - Yes.
set @ejc[10],1; // Enable New Platinum Skills: 0 - No, 1 - Yes.
set @ejc[11],1; // Enable Choice for Sage/Professor Elemental Charge: 0 - Give All, 1 - Choose One.
set @ejc[12],1; // Enable Baby Classes: 0 - No, 1 - Yes.
set @ejc[13],0; // Enable Rebirth Class Skipping: 0 - No, 1 - First High, 2 - Second Advanced.
set @ejc[14],1; // Reset Status during Rebirth: 0 - No, 1 - Yes. Note: To be used with @ejc[13].
//if(Joblevel == 500 && (Class >= Job_Lord_Knight && Class <= Job_Paladin2) || (Class >= 4047 && Class <= 4049) || (Class >= 4030 && Class <= 4045) || Class >= 22 && Class <= 26)) goto reroll;
if(Joblevel == 120 && (Class >= Job_Lord_Knight && Class <= Job_Paladin2) || (Class >= 4047 && Class <= 4049) || (Class >= 4030 && Class <= 4045) || Class >= 22 && Class <= 26){
mes "So you wish to change class.";
mes "Please choose what class you want to change to.";
menu "Lord Knight",lk,"Assassin Cross",asx,"Whitesmith",ws,"High Wizard",hw,"Sniper",sn,"High Priest",hpr,"Paladin",pa,"Stalker",stalk,"Creator",cr,"Professor",pr,"Clown/Gypsy",cg,"Champion",ch;
close;
}else if(!@ejc[12] && Upper == 2){
 mes @npcname$;
 mes "I am sorry, I can not change the job classes of Babies.";
 close;
}else if(@ejc[6] && getskilllv(1) < 9){
  mes @npcname$;
  mes "It appears you do not have your ^FF0000Basic Skills^000000.";
  next;
  mes @npcname$;
  mes "Please return when you have attained them.";
  close;
}else if(@ejc[5] && SkillPoint){
 mes @npcname$;
 mes "Please be aware that when changing classes, all extra skill points that have not been used will be deleted.";
 next;
 mes "^880000You presently have [^FF0000"+SkillPoint+"^880000] unused skill point(s)."; mes " ";
 mes "Proceed?^000000";
 next;
 menu "Yes",-, "No",-;
  if(@menu == 2){ L_Finito:
  mes @npcname$;
  mes "Come again.";
  close;
 }
}
if(Class >= Job_Knight && Class <= Job_Crusader2){
 if(BaseLevel < @ejc[4] || JobLevel < @ejc[3]){ callfunc "JBLevel",3,5; goto L_Finito; }
 mes "^880000You may now be reborn into a ^FF0000Transcendent Class^880000,"; mes " ";
 mes "Proceed?^000000";
 next;
 menu "Yes",-, "No",L_Finito;
 set @ejc[99],1;
 if(!@ejc[13]) callfunc "JChange",4001;
 getitem 1101,1;
 if(@ejc[13] == 1) goto L_FChoice;
 }
if((Class >= Job_Swordman_High && Class <= Job_Thief_High) || (Class >= Job_Swordman && Class <= Job_Thief) || (Class >= Job_Baby_Swordman && Class <= Job_Baby_Thief) || Class == 4046 || @ejc[99]){
 mes @npcname$;
 if(!@ejc[99]) mes "Do you wish to change your ^FF0000Job^000000?";
 if(@ejc[99]) mes "Do you wish to proceed with the Rebirth Process?";
 next;
 menu "Yes",-, "No",L_Finito;
 if(!@ejc[99] && JobLevel < @ejc[2]){ callfunc "JBLevel",2,0; goto L_Finito; }
 if((Upper == 1 && SJob) || (@ejc[99] && @ejc[7])){ if(!SJob){ set @ejc[100],4001+Class; }else if(SJob){ set @ejc[100],4001+SJob; } callfunc "JChange",@ejc[100]; }
 mes @npcname$;
 mes "Please choose which class you wish to change to:";
 next;
  switch(Class){
case Job_Knight: case Job_Crusader: case Job_Swordman: case Job_Swordman_High: case Job_Baby_Swordman:
 if(Upper == 1 || @ejc[99]){ set .@cmenu,select("Lord Knight:Paladin"); setarray @ejc[80],4008,4015; }else if(Upper == 2){ set .@cmenu,select("Baby Knight:Baby Crusader"); setarray @ejc[80],4030,4037; }else if(!Upper){ set .@cmenu,select("Knight:Crusader"); setarray @ejc[80],7,14; }
 break;
case Job_Wizard: case Job_Sage: case Job_Mage: case Job_Mage_High: case Job_Baby_Mage:
 if(Upper == 1 || @ejc[99]){ set .@cmenu,select("High Wizard:Professor"); setarray @ejc[80],4010,4017; }else if(Upper == 2){ set .@cmenu,select("Baby Wizard:Baby Sage"); setarray @ejc[80],4032,4039; }else if(!Upper){ set .@cmenu,select("Wizard:Sage"); setarray @ejc[80],9,16; }
 break;
case Job_Hunter: case Job_Dancer: case Job_Bard: case Job_Archer: case Job_Archer_High: case Job_Baby_Archer:
 if(Sex == 0){ if(Upper == 1 || @ejc[99]){ set .@cmenu,select("Sniper:Clown"); setarray @ejc[80],4012,4021; }else if(Upper == 2){ set .@cmenu,select("Baby Hunter:Baby Dancer"); setarray @ejc[80],4034,4043; }else if(!Upper){ set .@cmenu,select("Hunter:Dancer"); setarray @ejc[80],11,20; }}
 if(Sex == 1){ if(Upper == 1 || @ejc[99]){ set .@cmenu,select("Sniper:Gypsy"); setarray @ejc[80],4012,4020; }else if(Upper == 2){ set .@cmenu,select("Baby Hunter:Baby Bard"); setarray @ejc[80],4034,4042; }else if(!Upper){ set .@cmenu,select("Hunter:Bard"); setarray @ejc[80],11,19; }}
 break;
case Job_Priest: case Job_Monk: case Job_Acolyte: case Job_Acolyte_High: case Job_Baby_Acolyte:
 if(Upper == 1 || @ejc[99]){ set .@cmenu,select("High Priest:Champion"); setarray @ejc[80],4009,4016; }else if(Upper == 2){ set .@cmenu,select("Baby Priest:Baby Monk"); setarray @ejc[80],4031,4038; }else if(!Upper){ set .@cmenu,select("Priest:Monk"); setarray @ejc[80],8,15; }
 break;
case Job_Blacksmith: case Job_Alchem: case Job_Merchant: case Job_Merchant_High: case Job_Baby_Merchant:
 if(Upper == 1 || @ejc[99]){ set .@cmenu,select("Whitesmith:Creator"); setarray @ejc[80],4011,4019; }else if(Upper == 2){ set .@cmenu,select("Baby Merchant:Baby Alchemist"); setarray @ejc[80],4033,4041; }else if(!Upper){ set .@cmenu,select("Blacksmith:Alchemist"); setarray @ejc[80],10,18; }
 break;
case Job_Assassin: case Job_Rogue: case Job_Thief: case Job_Thief_High: case Job_Baby_Thief:
 if(Upper == 1 || @ejc[99]){ set .@cmenu,select("Assassin Cross:Stalker"); setarray @ejc[80],4013,4018; }else if(Upper == 2){ set .@cmenu,select("Baby Assassin:Baby Rogue"); setarray @ejc[80],4035,4040; }else if(!Upper){ set .@cmenu,select("Assassin:Rogue"); setarray @ejc[80],12,17; }
 break;
case Job_Taekwon:
 set .@cmenu,select("Star Gladiator:Soul Linker"); setarray @ejc[80],4047,4049;
 break;
  }
 switch(.@cmenu){
  case 1: callfunc "JChange",@ejc[80]; goto L_Finito;
  case 2: callfunc "JChange",@ejc[81]; goto L_Finito;
  }
}
if(!BaseClass){
L_FChoice:
 mes @npcname$;
 mes "Do you wish to change your ^FF0000Job^000000?";
 next;
 menu "Yes",-, "No",L_Finito;
 if(JobLevel < @ejc[1]){ callfunc "JBLevel",1,0; goto L_Finito; }
 if((Upper == 1 && FJob) || @ejc[99]) callfunc "JChange",4001+FJob;
 if(Class == Job_Novice && !@ejc[8]) set .@cmenu,select("Swordman:Mage:Archer:Acolyte:Merchant:Thief:Super Novce:Taekwon");
 if(Class == Job_Novice && @ejc[8]) set .@cmenu,select("Swordman:Mage:Archer:Acolyte:Merchant:Thief:Super Novce:Taekwon:Ninja:Gunslinger");
 if(Class == Job_Baby) set .@cmenu,select("Baby Swordman:Baby Mage:Baby Archer:Baby Acolyte:Baby Merchant:Baby Thief:Super Baby");
 if(Upper == 1 || @ejc[99]) set .@cmenu,select("Swordman High:Mage High:Archer High:Acolyte High:Merchant High:Thief High");
  switch(.@cmenu){
case 1: if(!Class){ callfunc "JChange",1; }else if(Upper == 1){ callfunc "JChange",4002; }else{ callfunc "JChange",4024; }
case 2: if(!Class){ callfunc "JChange",2; }else if(Upper == 1){ callfunc "JChange",4003; }else{ callfunc "JChange",4025; }
case 3: if(!Class){ callfunc "JChange",3; }else if(Upper == 1){ callfunc "JChange",4004; }else{ callfunc "JChange",4026; }
case 4: if(!Class){ callfunc "JChange",4; }else if(Upper == 1){ callfunc "JChange",4005; }else{ callfunc "JChange",4027; }
case 5: if(!Class){ callfunc "JChange",5; }else if(Upper == 1){ callfunc "JChange",4006; }else{ callfunc "JChange",4028; }
case 6: if(!Class){ callfunc "JChange",6; }else if(Upper == 1){ callfunc "JChange",4007; }else{ callfunc "JChange",4029; }
case 7: if(BaseLevel < @ejc[0]){ callfunc "JBLevel",1,1; goto L_Finito; }
 if(!Class){ callfunc "JChange",23; }else{ callfunc "JChange",4045; }
case 8: callfunc "JChange",4046;
case 9: callfunc "JChange",25;
case 10: callfunc "JChange",24;
default: mes "ERROR"; close;
}
 }
close;


stalk:
next;
mes "Are you sure you want to change your Job to ^3355FFStalker^000000?";
mes "You will be disconnected after changing job";
menu "Yes",-;
set SkillPoint,0;
jobchange Job_Stalker;
set SkillPoint, SkillPoint+190;
set .@name$, strcharinfo(0);
atcommand "@kick " + .@name$;
close;
lk:
next;
mes "Are you sure you want to change your Job to ^3355FFLord Knight^000000?";
mes "You will be disconnected after changing job";
menu "Yes",-;
set SkillPoint,0;
jobchange Job_Lord_Knight;
set SkillPoint, SkillPoint+190;
set .@name$, strcharinfo(0);
atcommand "@kick " + .@name$;
close;
asx:
next;
mes "Are you sure you want to change your Job to ^3355FFAssassin Cross^000000?";
mes "You will be disconnected after changing job";
menu "Yes",-;
set SkillPoint,0;
jobchange Job_Assassin_Cross;
set SkillPoint, SkillPoint+190;
set .@name$, strcharinfo(0);
atcommand "@kick " + .@name$;
close;
ws:
next;
mes "Are you sure you want to change your Job to ^3355FFWhite Smith^000000?";
mes "You will be disconnected after changing job";
menu "Yes",-;
set SkillPoint,0;
jobchange Job_Whitesmith;
set SkillPoint, SkillPoint+190;
set .@name$, strcharinfo(0);
atcommand "@kick " + .@name$;
close;
hw:
next;
mes "Are you sure you want to change your Job to ^3355FFHigh Wizard^000000?";
mes "You will be disconnected after changing job";
menu "Yes",-;
set SkillPoint,0;
jobchange Job_High_Wizard;
set SkillPoint, SkillPoint+190;
set .@name$, strcharinfo(0);
atcommand "@kick " + .@name$;
close;
sn:
next;
mes "Are you sure you want to change your Job to ^3355FFSniper^000000?";
mes "You will be disconnected after changing job";
menu "Yes",-;
set SkillPoint,0;
jobchange Job_Sniper;
set SkillPoint, SkillPoint+190;
set .@name$, strcharinfo(0);
atcommand "@kick " + .@name$;
close;
hpr:
next;
mes "Are you sure you want to change your Job to ^3355FFHigh Priest^000000?";
mes "You will be disconnected after changing job";
menu "Yes",-;
set SkillPoint,0;
jobchange Job_High_Priest;
set SkillPoint, SkillPoint+190;
set .@name$, strcharinfo(0);
atcommand "@kick " + .@name$;
close;
pa:
next;
mes "Are you sure you want to change your Job to ^3355FFPaladin^000000?";
mes "You will be disconnected after changing job";
menu "Yes",-;
set SkillPoint,0;
jobchange Job_Paladin;
set SkillPoint, SkillPoint+190;
set .@name$, strcharinfo(0);
atcommand "@kick " + .@name$;
close;
cr:
next;
mes "Are you sure you want to change your Job to ^3355FFCreator^000000?";
mes "You will be disconnected after changing job";
menu "Yes",-;
set SkillPoint,0;
jobchange Job_Creator;
set SkillPoint, SkillPoint+190;
set .@name$, strcharinfo(0);
atcommand "@kick " + .@name$;
close;
pr:
next;
mes "Are you sure you want to change your Job to ^3355FFProfessor^000000?";
mes "You will be disconnected after changing job";
menu "Yes",-;
set SkillPoint,0;
jobchange Job_Professor;
set SkillPoint, SkillPoint+190;
set .@name$, strcharinfo(0);
atcommand "@kick " + .@name$;
close;
cg:
next;
mes "Are you sure you want to change your Job to ^3355FFClown^000000?";
mes "You will be disconnected after changing job";
menu "Yes",-;
set SkillPoint,0;
jobchange Job_Clown;
set SkillPoint, SkillPoint+190;
set .@name$, strcharinfo(0);
atcommand "@kick " + .@name$;
close;
ch:
next;
mes "Are you sure you want to change your Job to ^3355FFChampion^000000?";
mes "You will be disconnected after changing job";
menu "Yes",-;
set SkillPoint,0;
jobchange Job_Champion;
set SkillPoint, SkillPoint+190;
set .@name$, strcharinfo(0);
atcommand "@kick " + .@name$;
close;

}
function script JBLevel {
set @ejc[60],@ejc[getarg(0)]-JobLevel;
if(getarg(1)){ set @ejc[61],@ejc[getarg(1)-1]-BaseLevel; }
if(@ejc[60] < 0) set @ejc[60],0;
if(@ejc[61] < 0) set @ejc[61],0;
mes @npcname$;
mes "You are currently missing the following levels to advance:";
mes "^FF0000"+@ejc[60]+"^000000 x Job Levels,";
if(getarg(1)) mes "^FF0000"+@ejc[61]+"^000000 x Base Levels.";
next;
return;
}
function script JChange {
mes @npcname$;
if(!@ejc[99]) mes "Last chance to cancel job change.";
if(@ejc[99]) mes "Last chance to cancel rebirth.	  You will be ^3355FFDISCONNECTED^000000 after rebirth job";
next;
menu "Proceed",-, "Cancel",-;
if(@menu == 2) close;
if(@ejc[7] || @ejc[13] == 1){
 if(Class == Job_Novice) set FJob,getarg(0);
 if(Class >= Job_Swordman && Class <= Job_Thief) set SJob,getarg(0);
 }
if(@ejc[5]) set SkillPoint,0;
if(@ejc[99]) atcommand "@option 0 0 0";
jobchange getarg(0);
if(@ejc[14] && Class == Job_Novice_High) resetlvl(1);
if(FJob && Upper && (Class >= Job_Swordman_High && Class <= Job_Thief_High)) set FJob,0;
if(SJob && Upper && (Class >= Job_Lord_Knight && Class <= Job_Paladin2)) set SJob,0;
if(@ejc[9]) callfunc "PSkills";
close;
}
function script PSkills {
skill 142,1,0; if(BaseJob == 0) skill 143,1,0;
if(BaseClass == 1){ setarray .@psk[0],144,145,146; }else if(BaseClass == 2){ setarray .@psk[0],157; }else if(BaseClass == 3){ setarray .@psk[0],147,148; }else if(BaseClass == 4){ setarray .@psk[0],156; }else if(BaseClass == 5){ setarray .@psk[0],153,154,155; }else if(BaseClass == 6){ setarray .@psk[0],149,150,151,152; }
for(set .@ps,0; .@ps < getarraysize(.@psk); set .@ps,.@ps+1){
 skill .@psk[.@ps],1,0;
}
deletearray .@psk[0],getarraysize(.@psk);
if(@ejc[10]){
 if(BaseJob == 16 && @ejc[11] && (!getskilllv(1008) && !getskilllv(1017) && !getskilllv(1018) && !getskilllv(1019))){
  mes @npcname$;
  mes "Please choose which ^FF0000Platinum Skill^000000 you wish to obtain:";
  next;
  menu "Elemental Charge Water",-, "Elemental Charge Earth",-, "Elemental Charge Fire",-, "Elemental Charge Wind",-;
  if(@menu == 1) set .@psk[1],1008;
  if(@menu == 2) set .@psk[1],1017;
  if(@menu == 3) set .@psk[1],1018;
  if(@menu == 4) set .@psk[1],1019;
 }else if(!@ejc[10]){ setarray .@psk[1],1008,1017,1018,1019; }
switch(BaseJob){
 case 7: setarray .@psk[0],1001; break;
 case 8: setarray .@psk[0],1014; break;
 case 9: setarray .@psk[0],1006; break;
 case 10: setarray .@psk[0],1012,1013; break;
 case 11: setarray .@psk[0],1009; break;
 case 12: setarray .@psk[0],1003,1004; break;
 case 14: setarray .@psk[0],1002; break;
 case 15: setarray .@psk[0],1015,1016; break;
 case 16: setarray .@psk[0],1007; break;
 case 17: setarray .@psk[0],1005; break;
 case 19: setarray .@psk[0],1010; break;
 case 20: setarray .@psk[0],1011; break;
}
for(set .@ps,0; .@ps < getarraysize(.@psk[0]); set .@ps,.@ps+1){
 skill .@psk[.@ps],1,0;
 }
}
mes @npcname$;
mes "Platinum skills obtained.";
mes "You will be disconnected after rebirth";
set .@name$, strcharinfo(0);
atcommand "@kick " + .@name$;
return;
}

Edited September 8, 2012 by Mysterious
Use [codebox] for content longer than 10 lines.