ac94b518 ^
89e2ac56 ^
401ff146 ^
1cb0e75c ^
9a2e1a8e ^
414b37ae ^
52e03246 ^
1
2
3
4 5 6
7
8
9 10
11 12
13
14
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; }