A Perl program, recreating my ancient tivra/komal compositions. These date at least from San Francisco, 1986 or so, and are my best music so far. That is, they sing, at least some of them, and all they need as input is a single number to seed the random numbers generator.
Unfortunately, the Perl version is not of the same quality.

The instructions:

E:
cd komal
perl  droptivra.pl  parm

will produce a score  zparmXY and a playable midi file   zparmXY.mid . The letters XY are generated from the current time value, for a unique identification. The parameter may be:

1. a number
2. a number followed by mes to pick the scale as one of the Messiaen 'modes of limited transposition'
3. a number followed by hec to indicate the 'Hecate' scale, the unique Messiaen 'mode of limited transposition' with nine tones.

The driver droptivra executes:

perl optivra.pl @ARGV > tivra0ut,
perl fradrum.pl tivra0ut > drum5,
copy fracfancy+send8+drum5+tivra0ut $ID,
\\u\\midi $ID,
perl -e exit;