blob: d27e8f6f54c0a5fffc24a70e98534cb9ccd8dc3b (
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;
}
|