blob: fbf3b3448e7028f895bd05c7532c2e215ddcfd0b (
plain) (
tree)
|
|
function|script|useScissors
{
getitem "Scissors", 1;
if (rand(3))
goto L_Change;
message strcharinfo(0), "Whoops!";
heal -20 - rand(Hp >> 1), 0;
return;
L_Change:
callfunc "getHeadStyles";
setlook LOOK_HAIR_STYLE, rand(1,getarraysize(@HairStyles$));
return;
}
|