home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 3 / Meeting_Pearls_III.iso / Pearls / mus / Metro / Rexx / example2.rexx < prev    next >
OS/2 REXX Batch file  |  1994-09-17  |  665b  |  29 lines
  1. /*
  2.  * Example Metronome ARexx script.
  3.  *
  4.  * You need to run the Metro first!
  5.  *
  6.  * Plays 4 crotchets then 8 quavers, four times.
  7.  */
  8.  
  9.  
  10. ADDRESS METRO.1
  11.  
  12. tempo 90        /* Set tempo */
  13. note 4            /* Set note type to crotchets */
  14. start            /* Start */
  15. waitticks 3        /* Note: 1 click has already started */
  16.  
  17. note 8            /* Change to quavers */
  18. waitticks 8            /* Wait for 8 quavers */
  19.  
  20. do for 3        /* Do loop 3 times... once has been done already */
  21.     note 4        /* Back to crotchets */
  22.     waitticks 4        /* Wait for 4 crotchets */
  23.  
  24.     note 8        /* Change to quavers */
  25.     waitticks 8            /* Wait for 8 quavers */
  26. end
  27.  
  28. nomoreticks        /* Stop and let last quaver finish playing */
  29.