s{now}!icicl!es; s{n}{ow};
&then(1=>day, you=>awake);
m.ild. =~ winds; s%weet%flower%s;

 @gain{you=>awake};
blistering('heat'); time, 2, s~w~i~m;
 @gain{you=>slumber};

+@gain{you=>awake}
or ange; RED; y/ell/ow/; ! GREEN;
s{now}!icicl!es; s{n}{ow};

__END__

snow icicles snow
and then one day you awake
mild winds sweet flowers

again you awake
blistering heat time to swim
again you slumber

t'again you awake
orange, red, yellow, no green
snow icicles snow

Stanza 2 line 2 alternative:
(b,b,b)-ring('h'.chomp); time, 2, s~w~i~m;