function	script	useScissors	{
        if (rand(3))
                goto L_Change;
        message strcharinfo(0), "Whoops!";
        itemheal -20 - rand(Hp >> 1), 0;
        getitem "Scissors", 1;
        end;

L_Change:
        setlook LOOK_HAIR_STYLE, rand(20);
        getitem "Scissors", 1;
        end;
}