Utility: @getskill

[Pneuma]

Allows Administrators to give themself a skill by entering the command @getskill as if it were the "skill" script command.

-    script    getskill    -1,{
    
OnInit:
        bindatcmd "getskill",strnpcinfo(3)+"::OnAtcommand",99,99;

        
OnAtcommand:
        set [email protected], [email protected]_parameters$[0];
        set [email protected], [email protected]_parameters$[1];
        set [email protected], [email protected]_parameters$[2];
    if([email protected]_numparameters < 3) {
        message strcharinfo(0),"Invalid Syntax (usage: @getskill <skill id> <level> <flag>).";
        message strcharinfo(0),[email protected]_command$+" failed.";
    } else  if([email protected] >= 11){
        message strcharinfo(0),"Invalid Syntax (Max Skill level is 10.)";
        message strcharinfo(0),[email protected]_command$+" failed.";
        end;
    } else if([email protected] >=5){
        message strcharinfo(0),"Invalid Syntax (Max Skill flag is 4.)";
        message strcharinfo(0),[email protected]_command$+" failed.";
        end;
    } else {
        skill [email protected],[email protected],[email protected];
    }
    end;
}

I wanted to make it check the skill DB for class only skills..but I don't know how to do that lol..

Edited May 9, 2014 by Pneuma