if target of hit then smashme;
if target of throw then smashme;

##smashme:
set $actor's pose = "broken";
print "[$actor] shatters into several pieces";
relook $loc;

##txickloc: runsub showmats;

##showmats:
$mat = $actor's material;
// $mat = value of $mat add "_something_";
replace $mat so "|" is ",";
print "[$actor] mats = $mat";