if target of light then doit;
if target of blow then doit2;

##doit:
set $actor's material to '_light_';
print "[$actor] begins to shine brightly";
relook $loc;
##doit2:
$mat = $actor's material;
swap $mat take _light_;
set $actor's material to $mat;
print "[$actor] flickers and goes out";
relook $loc;