path: root/world/map/npc/items/scissors.txt

function|script|useScissors
{
    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;
}