Just in case you have a TU78, have fun: http://www.google.com/search?q=cache:sNZF1nPeHg8:www.mit.edu/afs/sipb/user/… -Gunther ---------------------------------------------------------------- Index of /afs/sipb/user/jtkohl/hacks/makesong Name Last modified Size Description Parent Directory 11-Jun-91 14:25 - NOTES 07-Sep-89 17:39 1k Songs/ 07-Sep-89 17:39 - makesong 07-Sep-89 17:39 1k "Makesong"* is a shell script which turns your TU78 tape-drive into a musical marvel... It is just a quick hack, so do not expect anything close to perfection. The numbers found in the "NOTES" file are approximate and could be a lot better, but I don't have the time to do it. See the example songs in the Songs/ directory... Format for a song file should be obvious from the examples... Songfiles are run through the C Preprocessor (/lib/cpp), so feel free to include comments, #defines, #includes, etc. Improvements/Bugs - the values for the notes should be tuned - more notes should be added - rests should be implemented a different way - as it stands, higher-pitched notes are shorter in duration than lower notes - the correct value for DURATION (now a constant 1000) should be a function of pitch. - different length notes (whole, half, quarter, etc.) should also be added - something other than /etc/termcap should be used as dd's if=, preferably something with unlimited size -- maybe /usr/ucb/yes "XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX" or a variant - due to the implementation of the MUSIC variable, there is probably a sh-imposed limit on the number of notes in a Songfile Interesting effects may be achieved by combining 'mt fsf' with 'mt bsf' commands - 'bsf' produces a richer "timber" of sound than does 'fsf'. Please let me know about changes and improvements you make -- also any songs you teach your TU78 to play! :-) [* Note, "makesong" works the tape drive pretty hard, so be nice. . .] Enjoy! Craig Fri Aug 25 11:12:17 CDT 1989 --- Craig D. Rice UNIX Systems Specialist cdr(a)stolaf.edu Academic Computer Center, St. Olaf College +1 507 663-3631 Northfield, MN 55057 USA