function script useShockSweet { if (rand(5)) goto L_Change; message strcharinfo(0), "Yuck, this tastes like earwax!"; heal -20 - (Hp >> 2), 0; return; L_Change: setlook LOOK_HAIR_COLOR, 122; message strcharinfo(0), "Gah! That was some strong stuff!"; sc_start SC_POISON, 1, 20; misceffect 15, strcharinfo(0); return; }