transmit "c1The Wand of Fire Comes to Life..."
if fr=0 then do;transmit "A Stream of Flames shoot across the Room.";end
if fr=1 then do;ef=random(8,18,time('s'));transmit "c2A Stream of Flames Shoot out at the "monster.1;Transmit "c3Doing "ef" Damage";monster.14=monster.14-ef;end