Soul System (Like Shinigami Bleach)

[Zell]

 

Bleach Soul System

 

Descrição: The system allows the player to free your "soul". With this, a player can have 2 chars in one. Skills, Jobs, Equips, Stats, and etc.

 

Creator: Zell

 

(Do not distribute without my concern)

 

Demo:

 

 

Tested Emulators: rAthena and rAthena Mod Cardinal

 

Sample NPC

prontera,150,150,5 Script Rukia 90,{

mes "Hello, What do you want?";

switch(select("- Became a Shinigami:- Became Human")){

case 1:

close2;

callfunc "dreamin";

end; 

 

case 2:

close2;

callfunc "dreamout";

end;

}

end;

}

Warning:

 

The scripts its nos optimized, it's the old version alpha from my backups. If someone wish to optimize this, go ahead. Its a simple script.

 

Any error please, tell me. And give your feedback and I will bring more news.

 

 

 

 

- SQL -

CREATE TABLE IF NOT EXISTS `char_dream` (

  `char_id` int(20) NOT NULL,

  `str` int(20) NOT NULL,

  `agi` int(20) NOT NULL,

  `vit` int(20) NOT NULL,

  `int` int(20) NOT NULL,

  `dex` int(20) NOT NULL,

  `luk` int(20) NOT NULL,

  `class` int(20) NOT NULL,

  `level` int(20) NOT NULL,

  `joblevel` int(20) NOT NULL,

  `arma` int(20) NOT NULL,

  `escudo` int(20) NOT NULL,

  `cima` int(20) NOT NULL,

  `meio` int(20) NOT NULL,

  `baixo` int(20) NOT NULL,

  `robe` int(20) NOT NULL,

  `roupa` int(20) NOT NULL,

  `cabelo` int(20) NOT NULL,

  `StatusPoint` int(10) NOT NULL,

  `skill_point` int(10) NOT NULL

) ENGINE=MyISAM DEFAULT CHARSET=latin1;

 

 

CREATE TABLE IF NOT EXISTS `char_store` (

  `char_id` int(20) NOT NULL,

  `str` int(20) NOT NULL,

  `agi` int(20) NOT NULL,

  `vit` int(20) NOT NULL,

  `int` int(20) NOT NULL,

  `dex` int(20) NOT NULL,

  `luk` int(20) NOT NULL,

  `class` int(20) NOT NULL,

  `level` int(20) NOT NULL,

  `joblevel` int(20) NOT NULL,

  `arma` int(20) NOT NULL,

  `escudo` int(20) NOT NULL,

  `cima` int(20) NOT NULL,

  `meio` int(20) NOT NULL,

  `baixo` int(20) NOT NULL,

  `robe` int(20) NOT NULL,

  `roupa` int(20) NOT NULL,

  `cabelo` int(20) NOT NULL,

  `StatusPoint` int(10) NOT NULL,

  `skill_point` int(10) NOT NULL

) ENGINE=MyISAM DEFAULT CHARSET=latin1;

bleachsoul.txt

[Santafe]

 

Looks and sounds awesome bt it can be SOOO Over powerd by many class combos haha

[Zell]

 

 

Looks and sounds awesome bt it can be SOOO Over powerd by many class combos haha

 

 

, Yes, but the PvP can be more interesting, like "Hmm, i'm can't beat this paladin with my champ 'body', I will change to my Sinx 'bodie' (don't need to log other char or change stats, skills, equips and etc) and kill him!'

 

And thanks 

Edited April 28, 2015 by Zell

[Santafe]

 

 

 

 

 

Looks and sounds awesome bt it can be SOOO Over powerd by many class combos haha

 

 

, Yes, but the PvP can be more interesting, like "Hmm, i'm can't beat this paladin with my champ 'body', I will change to my Sinx 'bodie' (don't need to log other char or change stats, skills, equips and etc) and kill him!'

 

And thanks 

 

WOW so basically u switch classes as easily as u switch builds? :O wow keep up the awesome work

[Zell]

Looks and sounds awesome bt it can be SOOO Over powerd by many class combos haha

, Yes, but the PvP can be more interesting, like "Hmm, i'm can't beat this paladin with my champ 'body', I will change to my Sinx 'bodie' (don't need to log other char or change stats, skills, equips and etc) and kill him!'

And thanks

WOW so basically u switch classes as easily as u switch builds? :O wow keep up the awesome work

Yes, the purpose is to be a "soul" system. Buts basically it's 2 chars in One. You can have 2 different jobs, stats, skills, hair, style in seconds like I show on demo video.

And thank you!

Edited April 29, 2015 by Zell

[Sekai RO]

How can you have two jobs when you dreamwalk and your job still the same?

[Zell]

How can you have two jobs when you dreamwalk and your job still the same?

 

Just the first time when you talk with NPC you haven't change the Job.

 

You can use this in your server when player login with a char the first time.

OnPcLoginEvent:
if(soul==1) end;
callfunc "dreamin";
callfunc "dreamout";
end;

Now the player can change the 2 player bodie are Newbies, so he can change both.

Edited May 2, 2015 by Zell

[Sekai RO]

 

How can you have two jobs when you dreamwalk and your job still the same?

 

Just the first time when you talk with NPC you haven't change the Job.

 

You can use this in your server when player login with a char the first time.

OnPcLoginEvent:
if(soul==1) end;
callfunc "dreamin";
callfunc "dreamout";
end;

Now the player can change the 2 player bodie are Newbies, so he can change both.

 

Already solved it. Thanks anyway. Im using your script.

Here's my own revision. Not a good scripter. Just figured it out on my own

 

function script dreamin {

 

if(dreamwalk!=0){

return;

}

set @14,Class;

set @15,BaseLevel;

set @16,JobLevel;

set @cabelo,getlook(6);

set @hroupa,getlook(7);

set @CID,getcharid(0);

if(dreamer==0){

query_sql "INSERT char_dream VALUES ('"+@CID+"','"+readparam(bStr)+"','"+readparam(bAgi)+"','"+readparam(bVit)+"','"+readparam(bInt)+"','"+readparam(bDex)+"','"+readparam(bLuk)+"','"+@14+"','"+@15+"','"+@16+"','"+getequipid(EQI_HAND_R)+"','"+getequipid(EQI_HAND_L)+"','"+getequipid(EQI_HEAD_TOP)+"','"+getequipid(EQI_HEAD_MID)+"','"+getequipid(EQI_HEAD_LOW)+"','"+getequipid(EQI_GARMENT)+"','"+@hroupa+"','"+@cabelo+"', '"+StatusPoint+"', '"+SkillPoint+"')";

query_sql "INSERT char_store VALUES ('"+@CID+"','"+readparam(bStr)+"','"+readparam(bAgi)+"','"+readparam(bVit)+"','"+readparam(bInt)+"','"+readparam(bDex)+"','"+readparam(bLuk)+"','"+@14+"','"+@15+"','"+@16+"','"+getequipid(EQI_HAND_R)+"','"+getequipid(EQI_HAND_L)+"','"+getequipid(EQI_HEAD_TOP)+"','"+getequipid(EQI_HEAD_MID)+"','"+getequipid(EQI_HEAD_LOW)+"','"+getequipid(EQI_GARMENT)+"','"+@hroupa+"','"+@cabelo+"', '"+StatusPoint+"', '"+SkillPoint+"')";

set dreamer,1;

}

if(dreamwalk==0){

query_sql ("UPDATE `char_store` SET `char_id`='"+@CID+"',`str`='"+readparam(bStr)+"',`agi`='"+readparam(bAgi)+"',`vit`='"+readparam(bVit)+"',`int`='"+readparam(bInt)+"',`dex`='"+readparam(bDex)+"',`luk`='"+readparam(bLuk)+"',`class`='"+@14+"',`level`='"+@15+"',`joblevel`='"+@16+"',`arma`='"+getequipid(EQI_HAND_R)+"',`escudo`='"+getequipid(EQI_HAND_L)+"',`cima`='"+getequipid(EQI_HEAD_TOP)+"',`meio`='"+getequipid(EQI_HEAD_MID)+"',`baixo`='"+getequipid(EQI_HEAD_LOW)+"',`robe`='"+getequipid(EQI_GARMENT)+"',`roupa`='"+getlook(7)+"',`cabelo`='"+getlook(6)+"',`StatusPoint`='"+StatusPoint+"',`skill_point`='"+SkillPoint+"' WHERE `char_id`='"+@CID+"'");

sleep2 500;

sleep2 900;

query_sql "SELECT `char_id`, `str`, `agi`, `vit`, `int`, `dex`, `luk`, `class`, `level`, `joblevel`, `arma`, `escudo`, `cima`, `meio`, `baixo`, `robe`, `roupa`, `cabelo`, `StatusPoint`, `skill_point` FROM `char_dream` WHERE char_id = '"+@CID+"' ",@1,@2,@3,@4,@5,@6,@7,@8,@9,@10,@11,@12,@13,@14,@15,@16,@hroupa,@cabelo,@19,@20;

nude;

sleep2 300;

set .@atual,getlook(4);

changelook 4,471;

set BaseLevel,BaseLevel-BaseLevel;

set BaseLevel,@9;

statusup2 bStr,-readparam(bStr);

statusup2 bAgi,-readparam(bAgi);

statusup2 bVit,-readparam(bVit);

statusup2 bInt,-readparam(bInt);

statusup2 bDex,-readparam(bDex);

statusup2 bLuk,-readparam(bLuk);

set StatusPoint,@19;

sleep2 300;

statusup2 bStr,@2-1;

statusup2 bAgi,@3-1;

statusup2 bVit,@4-1;

statusup2 bInt,@5-1;

statusup2 bDex,@6-1;

statusup2 bLuk,@7-1;

percentheal 100,100;

getmapxy(mapclone$,cmapx,cmapy,0);

set cloneid,clone(mapclone$,cmapx,cmapy,"OnNothing",@CID,0,64,1,0);

changelook 4,.@atual;

if(claws==0){

jobchange 0;

set BaseLevel,1;

set JobLevel,1;

}

if(claws==1){

jobchange @8;

}

set JobLevel,JobLevel-JobLevel;

set JobLevel,@10;

set SkillPoint,SkillPoint-SkillPoint;

set SkillPoint,@20;

setlook 7,@hroupa;

setlook 6,@cabelo;

unitskilluseid getcharid(3),150,1;

specialeffect2 617;

if(@11>0) equip @11;

if(@12>0) equip @12;

if(@13>0) equip @13;

if(@14>0) equip @14;

if(@15>0) equip @15;

if(@16>0) equip @16;

set dreamwalk,1;

set claws,1;

return;

}

end;

}

 

function script dreamout {

 

if(dreamwalk!=1){

return;

}

set @14,Class;

set @15,BaseLevel;

set @16,JobLevel;

set @cabelo,getlook(6);

set @hroupa,getlook(7);

set @CID,getcharid(0);

if(dreamwalk==1){

sleep2 500;

set @blass,Class;

query_sql ("UPDATE `char_dream` SET `char_id`='"+@CID+"',`str`='"+readparam(bStr)+"',`agi`='"+readparam(bAgi)+"',`vit`='"+readparam(bVit)+"',`int`='"+readparam(bInt)+"',`dex`='"+readparam(bDex)+"',`luk`='"+readparam(bLuk)+"',`class`='"+@14+"',`level`='"+@15+"',`joblevel`='"+@16+"',`arma`='"+getequipid(EQI_HAND_R)+"',`escudo`='"+getequipid(EQI_HAND_L)+"',`cima`='"+getequipid(EQI_HEAD_TOP)+"',`meio`='"+getequipid(EQI_HEAD_MID)+"',`baixo`='"+getequipid(EQI_HEAD_LOW)+"',`robe`='"+getequipid(EQI_GARMENT)+"',`roupa`='"+getlook(7)+"',`cabelo`='"+getlook(6)+"',`StatusPoint`='"+StatusPoint+"', `skill_point`='"+SkillPoint+"' WHERE `char_id`='"+@CID+"'");

sleep2 500;

query_sql ("SELECT `char_id`, `str`, `agi`, `vit`, `int`, `dex`, `luk`, `class`, `level`, `joblevel`, `arma`, `escudo`, `cima`, `meio`, `baixo`, `robe`, `roupa`, `cabelo`, `StatusPoint`, `skill_point` FROM `char_store` WHERE char_id = '"+@CID+"' "),@1,@2,@3,@4,@5,@6,@7,@8,@9,@10,@11,@12,@13,@14,@15,@16,@hroupa,@cabelo,@19,@20;

nude;

sleep2 300;

set BaseLevel,BaseLevel-BaseLevel;

set BaseLevel,@9;

if(BaseLevel!=@9) atcommand "@lvup -1";

if(JobLevel!=@10) atcommand "@joblvup -1";

statusup2 bStr,-readparam(bStr);

statusup2 bAgi,-readparam(bAgi);

statusup2 bVit,-readparam(bVit);

statusup2 bInt,-readparam(bInt);

statusup2 bDex,-readparam(bDex);

statusup2 bLuk,-readparam(bLuk);

set StatusPoint,@19;

sleep2 300;

statusup2 bStr,@2-1;

statusup2 bAgi,@3-1;

statusup2 bVit,@4-1;

statusup2 bInt,@5-1;

statusup2 bDex,@6-1;

statusup2 bLuk,@7-1;

unitkill cloneid;

set cloneid,0;

setlook 7,@hroupa;

setlook 6,@cabelo;

warp mapclone$,cmapx,cmapy;

jobchange @8;

set JobLevel,JobLevel-JobLevel;

set JobLevel,@10;

set SkillPoint,SkillPoint-SkillPoint;

set SkillPoint,@20;

percentheal -99,-99;

if(@11>0) equip @11;

if(@12>0) equip @12;

if(@13>0) equip @13;

if(@14>0) equip @14;

if(@15>0) equip @15;

if(@16>0) equip @16;

set dreamwalk,0;

set dwemblem,0;

return;

}

end;

}

[Zell]

 

 

How can you have two jobs when you dreamwalk and your job still the same?

 

Just the first time when you talk with NPC you haven't change the Job.

 

You can use this in your server when player login with a char the first time.

OnPcLoginEvent:
if(soul==1) end;
callfunc "dreamin";
callfunc "dreamout";
end;

Now the player can change the 2 player bodie are Newbies, so he can change both.

 

Already solved it. Thanks anyway. Im using your script.

Here's my own revision. Not a good scripter. Just figured it out on my own

function script dreamin {

 

if(dreamwalk!=0){

return;

}

set @14,Class;

set @15,BaseLevel;

set @16,JobLevel;

set @cabelo,getlook(6);

set @hroupa,getlook(7);

set @CID,getcharid(0);

if(dreamer==0){

query_sql "INSERT char_dream VALUES ('"+@CID+"','"+readparam(bStr)+"','"+readparam(bAgi)+"','"+readparam(bVit)+"','"+readparam(bInt)+"','"+readparam(bDex)+"','"+readparam(bLuk)+"','"+@14+"','"+@15+"','"+@16+"','"+getequipid(EQI_HAND_R)+"','"+getequipid(EQI_HAND_L)+"','"+getequipid(EQI_HEAD_TOP)+"','"+getequipid(EQI_HEAD_MID)+"','"+getequipid(EQI_HEAD_LOW)+"','"+getequipid(EQI_GARMENT)+"','"+@hroupa+"','"+@cabelo+"', '"+StatusPoint+"', '"+SkillPoint+"')";

query_sql "INSERT char_store VALUES ('"+@CID+"','"+readparam(bStr)+"','"+readparam(bAgi)+"','"+readparam(bVit)+"','"+readparam(bInt)+"','"+readparam(bDex)+"','"+readparam(bLuk)+"','"+@14+"','"+@15+"','"+@16+"','"+getequipid(EQI_HAND_R)+"','"+getequipid(EQI_HAND_L)+"','"+getequipid(EQI_HEAD_TOP)+"','"+getequipid(EQI_HEAD_MID)+"','"+getequipid(EQI_HEAD_LOW)+"','"+getequipid(EQI_GARMENT)+"','"+@hroupa+"','"+@cabelo+"', '"+StatusPoint+"', '"+SkillPoint+"')";

set dreamer,1;

}

if(dreamwalk==0){

query_sql ("UPDATE `char_store` SET `char_id`='"+@CID+"',`str`='"+readparam(bStr)+"',`agi`='"+readparam(bAgi)+"',`vit`='"+readparam(bVit)+"',`int`='"+readparam(bInt)+"',`dex`='"+readparam(bDex)+"',`luk`='"+readparam(bLuk)+"',`class`='"+@14+"',`level`='"+@15+"',`joblevel`='"+@16+"',`arma`='"+getequipid(EQI_HAND_R)+"',`escudo`='"+getequipid(EQI_HAND_L)+"',`cima`='"+getequipid(EQI_HEAD_TOP)+"',`meio`='"+getequipid(EQI_HEAD_MID)+"',`baixo`='"+getequipid(EQI_HEAD_LOW)+"',`robe`='"+getequipid(EQI_GARMENT)+"',`roupa`='"+getlook(7)+"',`cabelo`='"+getlook(6)+"',`StatusPoint`='"+StatusPoint+"',`skill_point`='"+SkillPoint+"' WHERE `char_id`='"+@CID+"'");

sleep2 500;

sleep2 900;

query_sql "SELECT `char_id`, `str`, `agi`, `vit`, `int`, `dex`, `luk`, `class`, `level`, `joblevel`, `arma`, `escudo`, `cima`, `meio`, `baixo`, `robe`, `roupa`, `cabelo`, `StatusPoint`, `skill_point` FROM `char_dream` WHERE char_id = '"+@CID+"' ",@1,@2,@3,@4,@5,@6,@7,@8,@9,@10,@11,@12,@13,@14,@15,@16,@hroupa,@cabelo,@19,@20;

nude;

sleep2 300;

set .@atual,getlook(4);

changelook 4,471;

set BaseLevel,BaseLevel-BaseLevel;

set BaseLevel,@9;

statusup2 bStr,-readparam(bStr);

statusup2 bAgi,-readparam(bAgi);

statusup2 bVit,-readparam(bVit);

statusup2 bInt,-readparam(bInt);

statusup2 bDex,-readparam(bDex);

statusup2 bLuk,-readparam(bLuk);

set StatusPoint,@19;

sleep2 300;

statusup2 bStr,@2-1;

statusup2 bAgi,@3-1;

statusup2 bVit,@4-1;

statusup2 bInt,@5-1;

statusup2 bDex,@6-1;

statusup2 bLuk,@7-1;

percentheal 100,100;

getmapxy(mapclone$,cmapx,cmapy,0);

set cloneid,clone(mapclone$,cmapx,cmapy,"OnNothing",@CID,0,64,1,0);

changelook 4,.@atual;

if(claws==0){

jobchange 0;

set BaseLevel,1;

set JobLevel,1;

}

if(claws==1){

jobchange @8;

}

set JobLevel,JobLevel-JobLevel;

set JobLevel,@10;

set SkillPoint,SkillPoint-SkillPoint;

set SkillPoint,@20;

setlook 7,@hroupa;

setlook 6,@cabelo;

unitskilluseid getcharid(3),150,1;

specialeffect2 617;

if(@11>0) equip @11;

if(@12>0) equip @12;

if(@13>0) equip @13;

if(@14>0) equip @14;

if(@15>0) equip @15;

if(@16>0) equip @16;

set dreamwalk,1;

set claws,1;

return;

}

end;

}

 

function script dreamout {

 

if(dreamwalk!=1){

return;

}

set @14,Class;

set @15,BaseLevel;

set @16,JobLevel;

set @cabelo,getlook(6);

set @hroupa,getlook(7);

set @CID,getcharid(0);

if(dreamwalk==1){

sleep2 500;

set @blass,Class;

query_sql ("UPDATE `char_dream` SET `char_id`='"+@CID+"',`str`='"+readparam(bStr)+"',`agi`='"+readparam(bAgi)+"',`vit`='"+readparam(bVit)+"',`int`='"+readparam(bInt)+"',`dex`='"+readparam(bDex)+"',`luk`='"+readparam(bLuk)+"',`class`='"+@14+"',`level`='"+@15+"',`joblevel`='"+@16+"',`arma`='"+getequipid(EQI_HAND_R)+"',`escudo`='"+getequipid(EQI_HAND_L)+"',`cima`='"+getequipid(EQI_HEAD_TOP)+"',`meio`='"+getequipid(EQI_HEAD_MID)+"',`baixo`='"+getequipid(EQI_HEAD_LOW)+"',`robe`='"+getequipid(EQI_GARMENT)+"',`roupa`='"+getlook(7)+"',`cabelo`='"+getlook(6)+"',`StatusPoint`='"+StatusPoint+"', `skill_point`='"+SkillPoint+"' WHERE `char_id`='"+@CID+"'");

sleep2 500;

query_sql ("SELECT `char_id`, `str`, `agi`, `vit`, `int`, `dex`, `luk`, `class`, `level`, `joblevel`, `arma`, `escudo`, `cima`, `meio`, `baixo`, `robe`, `roupa`, `cabelo`, `StatusPoint`, `skill_point` FROM `char_store` WHERE char_id = '"+@CID+"' "),@1,@2,@3,@4,@5,@6,@7,@8,@9,@10,@11,@12,@13,@14,@15,@16,@hroupa,@cabelo,@19,@20;

nude;

sleep2 300;

set BaseLevel,BaseLevel-BaseLevel;

set BaseLevel,@9;

if(BaseLevel!=@9) atcommand "@lvup -1";

if(JobLevel!=@10) atcommand "@joblvup -1";

statusup2 bStr,-readparam(bStr);

statusup2 bAgi,-readparam(bAgi);

statusup2 bVit,-readparam(bVit);

statusup2 bInt,-readparam(bInt);

statusup2 bDex,-readparam(bDex);

statusup2 bLuk,-readparam(bLuk);

set StatusPoint,@19;

sleep2 300;

statusup2 bStr,@2-1;

statusup2 bAgi,@3-1;

statusup2 bVit,@4-1;

statusup2 bInt,@5-1;

statusup2 bDex,@6-1;

statusup2 bLuk,@7-1;

unitkill cloneid;

set cloneid,0;

setlook 7,@hroupa;

setlook 6,@cabelo;

warp mapclone$,cmapx,cmapy;

jobchange @8;

set JobLevel,JobLevel-JobLevel;

set JobLevel,@10;

set SkillPoint,SkillPoint-SkillPoint;

set SkillPoint,@20;

percentheal -99,-99;

if(@11>0) equip @11;

if(@12>0) equip @12;

if(@13>0) equip @13;

if(@14>0) equip @14;

if(@15>0) equip @15;

if(@16>0) equip @16;

set dreamwalk,0;

set dwemblem,0;

return;

}

end;

}

 

 

 

Oh, I see, the first time used you are reseting the Job. On future I optimize this.

 

And hope you and your players are Enjoying the system

Edited May 4, 2015 by Zell

[Archetype Saber]

would you mind sharing your SKIN ? I like your skill tab skin

[Zell]

would you mind sharing your SKIN ? I like your skill tab skin

If I remembered well, I founded it in Google, something like "medieval ragnarok skin", but I haven't more the grf uncrypt

[t3quila]

this is like a switch job system in final fantasy xiv, cool!  

i hope it can be used for more than two jobs someday.. hehe

[Stolao]

this is like a switch job system in final fantasy xiv, cool!

i hope it can be used for more than two jobs someday.. hehe

Try my ex job master that's basically what it does but all jobs

[kingpro008]

it doesnt work

pls someone give me a complete script