Find
You are looking at a skill setter
Created by
thorn
, last updated 03 Nov 2008
Code
##setskill:
$skillvals = $skiller's skillvals;
$skills = $skiller's skills;
manipulate $skillvals get $skillname to $valstring;
$valstring = "svalue=$skillvalue}2{smod=0}2{spoints=0}2{scap=$skillcap}2{stipobj=$skilltipobj";
manipulate $skillvals set $skillname to $valstring by 1;
swap $skills add $skillname;
set $skiller's skills to $skills;
set $skiller's skillvals to $skillvals;