You are looking at a lightning notes

if target of drop then checkwho;

##checkwho:
$setter = $init_obj;
end;

if reacting to arrives then checkif;

##checkif:
if $init_obj = $setter then blah else maybe;

##maybe:
$hlth = $init_obj's health;
$hlthm = $init_obj's healthmax;
if $hlth > 1 then explode else killit;

##explode:
take 8 from $hlth;
print "As [$init_obj] passes by, [$actor] explodes with tremendous force, blasting [$init_obj] into the air!";
$what = (burned, scorched, torched);
print "[$init_obj] is $what!";
set $init_obj's health to $hlth;

##killit:
set $init_obj's health to 0;
print "[$init_obj] hits the ground hard, and doesn't get up again";