Add this to embperl.cpp
	Code:
	"sub setstat{push(@cmd_queue,{func=>'setstat',args=>join(',',@_)});}"
 Command example :
	Code:
	quest::setstat(6,1);
 This will increase your CHA by 2.
I made first this perl command because i need to way to edit stats ... sad thing, i didnt realise setstats was only increase/decrease command. Note you cant decrease your base stats (dont know why).
Im looking for a way to change stats via a PERL command, or a way to reload baseracestats, if someone has an idea ...