PLAGIARISM NPC

[Chaoszinho]

Hello guys i get this npc from @Emistry and i translate to my language 

its a plagiarism npc 

que_qaru05,252,366,5    script    StalkerNpc    757,{
set .@skill_level,getskilllv( "RG_PLAGIARISM" );

    mes "^FF7F00[Plagiador De Skill]^000000";
    mes (gettime(3)>= 6&&gettime(3)<= 12?"Bom-dia":(gettime(3)>=13&&gettime(3)<=18?"Boa-tarde":"Boa-noite"))+", ^008aff"+strcharinfo(0)+"^000000 !";
    mes "Bem-vindo ao Plagiador de Skill.";
    next;
    mes "^FF7F00[Plagiador De Skill]^000000";
    mes "^008aff"+strcharinfo(0)+"^000000, Sou Responsavel por Providenciar Copia da Skill para classe Stalker!!";
    next;
    mes "^FF7F00[Plagiador De Skill]^000000";
    mes "Lembre-se Depois que Tudo Acabar,^FF0000RELOGUE PARA SALVAR A SKILL!!!!^000000";
    mes "Do Contrario, Não Funcionará";
    next;
    mes "^FF7F00[Plagiador De Skill]^000000";
    mes "^008aff"+strcharinfo(0)+"^000000, Em que posso ajudar?";

if( !.@skill_level ){
    mes "Apenas a Classe Stalker com a Habilidade ^FF0000Plagiar^000000 Pode Utilizar deste Serviço.";
}else{
    if( select( ( CLONE_SKILL && CLONE_SKILL_LV )?"^008aff[»]^000000 Desaprender a Skill":"^008aff[»]^000000 Aprender a Skill","^ff0000[»]^000000Cancelar" ) == 1 ){
        if( CLONE_SKILL && CLONE_SKILL_LV ){
            mes "Skill Copiada Desaprendida";
            set CLONE_SKILL_LV,0;
            skill CLONE_SKILL,CLONE_SKILL_LV,0;
            set CLONE_SKILL,0;
        }else{
            mes "Por-favor Selecione as Skills";
            next;
            set .@i,select( .menu$ ) - 1;
            if( .@skill_level > .skill_max_level[.@i] )
                set .@skill_level,.skill_max_level[.@i];
            mes "Skill : ^0055FF"+.skill_name$[.@i]+"^000000";
            mes "Level : ^0055FF"+.@skill_level+"^000000";
            mes "Cost : ^0055FF"+( ( .skill_cost[.@i] )? .skill_cost[.@i]+" Zeny":"Free" )+"^000000";
            mes " ";
            mes "^777777( Skill de Efeito do Plagiar )^000000";
            if( select( "^008aff[»]^000000Confirmar","^ff0000[»]^000000Cancelar" ) == 1 ){
                if( .skill_cost[.@i] ){
                    if( Zeny >= .skill_cost[.@i] ){
                        set Zeny,Zeny - .skill_cost[.@i];
                    }else{
                        mes "Zeny Insuficiente.";
                        close;
                    }
                }
                set CLONE_SKILL,.skill_id[.@i];
                set CLONE_SKILL_LV,.@skill_level;
                mes "Skill Aprendida ^0055FFLv"+CLONE_SKILL_LV+" "+.skill_name$[.@i]+"^000000";
                skill CLONE_SKILL,CLONE_SKILL_LV,0;
            }
        }
    }
}
dispbottom "Skill ID "+CLONE_SKILL+" | Level : "+CLONE_SKILL_LV;
close;

OnInit:
// Skill Display Names
setarray .skill_name$,"Punho Supremo De Asura","Esma","Ataque Mortal","Desperado";
// Skill ID
setarray .skill_id,271,469,544,516;
// Skill Max Learn-able Level
setarray .skill_max_level,4,7,10,10;
// Skill Cost in Zeny
setarray .skill_cost,10000,20000,30000,40000,50000;

set .skill_size,getarraysize( .skill_name$ );
while( .@i < .skill_size ){
    set .menu$,.menu$ + "[ ^0055FFLv "+.skill_max_level[.@i]+"^000000 ] "+ .skill_name$[.@i] +":";
    set .@i,.@i + 1;
}

end;
}

this script works fine but sometimes show this erro  

the only thing I know is that the skill I copied has a -8 lvl in db. 

even if i put the correct level in the script show me  -8

Edited June 10, 2021 by Mael
Use a codebox

[Emistry]

use this https://github.com/rathena/rathena/pull/7394

[Mael]

I use this, it is much simpler.

prontera,190,213,3	script	Plagearism Master	4_M_TWMASKMAN,{
mes "[ ^FF0000Fu^000000 ]";
mes "I have the ability of many Jobs, I am a Master!";
mes "What Skill do you need to copy?";
set .@SkillID,select( implode( .SkillName$,":" ) ) - 1;
mes "Selected "+.Skillname$[.@SkillID];
close2;
unitskilluseid getnpcid(0),.SkillID[.@SkillID],10,getcharid(3);
end;

OnInit:
setarray .SkillID[0],14,19,20,90,84,89,535,537,540,62,379;
setarray .SkillName$[0],"Cold Bolt","Fire Bolt","Lightning Bolt","Earth Spike","Jupitel Thunder","Storm Gust","Crimson Fire Formation","Lightning Spear of Ice","Wind Blade","Bowling Bash","Soul Breaker";
end;
}

 

[Chaoszinho]

@Mael 

que_qaru05,246,345,3    script    Plagearism Master    4_M_TWMASKMAN,{
mes "Which skill you need me to cast on you ?";
set .@SkillID,select( implode( .SkillName$,":" ) ) - 1;
mes "Selected "+.Skillname$[.@SkillID];
close2;
unitskilluseid getnpcid(0),.SkillID[.@SkillID],.SkillLv[.@SkillID],getcharid(3);    
sleep 3000;
movenpc strnpcinfo(0),246,345;
end;

OnInit:
setarray .SkillID[0],271,19,20,421;
setarray .SkillLv[0],4,5,10,5;
setarray .SkillName$[0],"Asura","Fire Bolt","Lightning Bolt","Fly Kick";
end;
}

this one i made is fine to me now Thanks i edit some Things

thanks !!

Edited June 10, 2021 by Mael
Use a codebox

[iraciz]

Any Idea why Bowling Bash always misses?

[kalabasa]

can anyone update this one? aint working anymore thanks

[hendra814]

On 2/28/2019 at 8:15 PM, Mael said:

I use this, it is much simpler.

prontera,190,213,3	script	Plagearism Master	4_M_TWMASKMAN,{
mes "[ ^FF0000Fu^000000 ]";
mes "I have the ability of many Jobs, I am a Master!";
mes "What Skill do you need to copy?";
set .@SkillID,select( implode( .SkillName$,":" ) ) - 1;
mes "Selected "+.Skillname$[.@SkillID];
close2;
unitskilluseid getnpcid(0),.SkillID[.@SkillID],10,getcharid(3);
end;

OnInit:
setarray .SkillID[0],14,19,20,90,84,89,535,537,540,62,379;
setarray .SkillName$[0],"Cold Bolt","Fire Bolt","Lightning Bolt","Earth Spike","Jupitel Thunder","Storm Gust","Crimson Fire Formation","Lightning Spear of Ice","Wind Blade","Bowling Bash","Soul Breaker";
end;
}

 

Is it possible add passive skill like triple attack skill

[hendra814]

1 hour ago, Emistry said:

use this https://github.com/rathena/rathena/pull/7394

Thsnks Emistry, i will try it

 

Edit:

Working as i want, thanks again @Emistry

Edited March 23, 2023 by hendra814