home *** CD-ROM | disk | FTP | other *** search
/ Set of Apple II Hard Drive Images / hard.hdv / HARD / FORTH / RHYTHMS.WRD < prev    next >
Encoding:
Text File  |  1991-03-07  |  5.5 KB  |  187 lines  |  [04] ASCII Text (0x0000)

  1. MASC DEFINITIONS
  2.  
  3.  
  4. ( RHYTHMS - DISCO, ROCK )                                                      
  5.  
  6. : DISCO1 EN ROOT 5TH O+ 2 CD ROOT 7 +      
  7.    5TH O+ 2 CD ;                       
  8.  
  9. : DISCO2 EN ROOT 5TH O+ 2 CD ROOT 7 +      
  10.    3RD O++ 2 CD ;                      
  11.  
  12. : DISCO3 ROOT 5TH O+ DOWN DOWN SN WAIT     
  13.    5TH O+ UP 5TH O+ DOWN SN WAIT ROOT UP   
  14.    ROOT 7 + DOWN SN WAIT 5TH O+ UP 5TH     
  15.    O+ DOWN SN WAIT ROOT 7 + UP       
  16.    5TH O+ UP ;   
  17.  
  18. : DISCO4 ROOT 5TH O+ DOWN DOWN EN WAIT 
  19.     ROOT UP ROOT 7 + DOWN EN WAIT ROOT      
  20.     7 + UP 5TH O+ UP ;                  
  21.  
  22. : DISCO0 EN ROOT KK ;
  23.  
  24.                                         
  25. : ROCK1                                
  26.     EN ROOT KK SN ROOT O+ KK 3RD O+ KK ; 
  27.  
  28. : ROCK2 EN 5TH O+ KK 5TH 3RD O+        
  29.     DOWN DOWN EN WAIT 3RD O+ UP ;        
  30.  
  31. : ROCK3  EN ROOT O++ KK 3RD O+ KK      
  32.     5TH UP ;                             
  33.  
  34. : ROCK4 EN 3RD 5TH O+ 2 CD ROOT 3RD O+ 2 CD ;  
  35.  
  36. : ROCK0 EN ROOT KK ;                                                
  37.                                                                        
  38.  
  39.  
  40. ( RHYTHMS - WALTZ )                   
  41.                            
  42. : WALTZ1                                   
  43.    SN ROOT DOWN 5TH O+ KK ROOT O++ KK
  44.    3RD O++ KK 5TH O++ KK ROOT UP ;     
  45.  
  46. : WALTZ2                                
  47.    SN 5TH DOWN 3RD O++ KK ROOT O++ KK      
  48.    5TH O+ KK ROOT O++ KK 5TH UP ;       
  49.  
  50. : WALTZ3                                   
  51.    SN 5TH DOWN 5TH O+ KK ROOT O++ KK       
  52.    5TH O+ KK ROOT O++ KK 5TH UP ;       
  53.  
  54. : WALTZ0     
  55.    ROOT QN KK ;                        
  56.                                                                                 
  57. ( RHYTHMS - SWING, 4BEAT ) 
  58.              
  59. : SWING1 ROOT 5TH O+ DOWN DOWN QN WAIT 5TH O+ UP ;             
  60.              
  61. : SWING2  EN 3RD O+ KK ROOT UP ROOT 5TH    
  62.    DOWN DOWN EN WAIT ROOT UP ;          
  63.  
  64. : SWING3  ROOT DOWN EN WAIT 5TH UP 5TH     
  65.    O+ DOWN EN WAIT 5TH O+ ROOT UP UP ;  
  66.  
  67. : SWING4  ROOT DOWN EN WAIT 5TH O+ DOWN    
  68.    SN WAIT ROOT UP ROOT DOWN SN WAIT       
  69.    ROOT 5TH O+ UP UP ;                  
  70.  
  71. : SWING0 ROOT QN KK ; 
  72.  
  73.              
  74. : 4BEAT1 ROOT DOWN EN3 WAIT ROOT O+ KK     
  75.    3RD O+ KK ROOT UP ;     
  76.              
  77. : 4BEAT2 5TH DOWN ROOT O+ DUP 5 + KK       
  78.    6 + KK 5TH O+ KK 5TH UP ;
  79.             
  80. : 4BEAT3 QN ROOT 3RD O++ 2 CD ;         
  81.  
  82. : 4BEAT4 QN 3RD ROOT O++ 2 CD ;         
  83.  
  84. : 4BEAT0 ROOT QN KK ;                                                                         
  85.                                     
  86.  
  87. ( RHYTHMS - RHUMBA )                    
  88. : RHUMBA1                                  
  89.    ROOT DOWN EN ROOT O+ KK 3RD O+ KK   
  90.    5TH O+ KK ROOT UP ROOT 7 + DOWN         
  91.    ROOT O++ KK ;                        
  92.  
  93. : RHUMBA2                                  
  94.    EN 3RD O++ KK ROOT O++ KK 5TH UP       
  95.    ROOT DOWN 5TH O+ KK 3RD O+ KK           
  96.    ROOT UP ; 
  97.  
  98. : RHUMBA3                                   
  99.    ROOT DOWN ROOT O+ EN KK 5TH O+ KK     
  100.    ROOT UP ROOT DOWN ROOT O++ KK           
  101.    3RD O++ KK ROOT UP ;                 
  102.  
  103. : RHUMBA4                                  
  104.    ROOT DOWN ROOT O+ EN KK 3RD O+ KK 5TH  O+ KK ROOT O++ KK ROOT UP ;
  105.  
  106. : RHUMBA0 ROOT QN KK ;                  
  107.                                                                               
  108.  
  109. ( RHYTHMS - BOSSA NOVA )                   
  110.  
  111. : BOSSA1                                   
  112.    EN ROOT DOWN 3RD O+ KK 5TH O+ KK    
  113.    ROOT O++ KK ROOT UP ROOT 7 + 3RD O++    
  114.    2 CD ;                              
  115.  
  116. : BOSSA2                                   
  117.    EN ROOT 7 + DOWN ROOT O++ KK 5TH O+ 
  118.    KK 3RD O++ KK ROOT 7 + UP ROOT O+       
  119.    5TH O+ 2 CD ;                       
  120.  
  121. : BOSSA3                                   
  122.    EN ROOT O+ DOWN 3RD O+ KK 5TH O+ KK 
  123.    ROOT O++ KK ROOT O+ UP 5TH 3RD O++      
  124.    2 CD ;                              
  125.  
  126. : BOSSA4                                   
  127.    EN 3RD O+ KK 5TH 5TH O+ 2 CD
  128.    ROOT O++ KK 5TH 3RD O++ 2 CD ;                
  129.  
  130. : BOSSA0 ROOT QN KK ;                  
  131.                                                                 
  132.  
  133. ( RHYTHMS - SAMBA, SLOW ROCK )          
  134. : SAMBA1                                 
  135.    EN ROOT 5TH O+ 2 CD 5TH O++ DOWN SN WAIT   
  136.    5TH DOWN SN WAIT 5TH UP 5TH O++ UP ; 
  137.  
  138. : SAMBA2                                   
  139.    5TH DOWN 5TH O++ DOWN EN WAIT           
  140.    5TH O++ UP 5TH O+ EN  KK 5TH UP ;    
  141.  
  142. : SAMBA3                                   
  143.    ROOT 5TH O+ DOWN DOWN SN WAIT 5TH O+    
  144.    UP 5TH O++ DOWN SN WAIT ROOT UP SN      
  145.    WAIT 5TH O++ UP 5TH 5TH O++ 2 CD ;
  146.    
  147. : SAMBA4                                   
  148.    5TH DOWN 5TH O++ EN KK 5TH O+ KK 5TH UP ;
  149.  
  150. : SAMBA0 ROOT QN KK ;                   
  151.  
  152.                          
  153. : SLOW0 ROOT 5TH O+ QN 2 CD ;           
  154.  
  155. : SLOW1 
  156.    ROOT DOWN 5TH O+ EN KK ROOT        
  157.    O++ KK  3RD O++ KK ;
  158.                  
  159. : SLOW2      
  160.    ROOT 5TH O++ EN KK 3RD O++ KK ROOT UP   
  161.    ROOT ROOT O++ 2 CD ;                                                           
  162.  
  163. ( RHYTHMS - POPS, MARCH )  
  164.              
  165. : POPS1                                    
  166.    ROOT 5TH DOWN DOWN EN WAIT 5TH UP       
  167.    ROOT O+ DOWN EN WAIT ROOT O+ UP ;    
  168.  
  169. : POPS2                                   
  170.    EN 3RD O+ KK ROOT UP EN ROOT 5TH O+ 2 CD ;                  
  171.              
  172. : POPS3 ROOT DOWN QN WAIT ;             
  173.  
  174. : POPS4                    
  175.    EN 3RD O++ KK ROOT O++ KK ROOT UP ;  
  176.  
  177. : POPS0 QN ROOT KK ;       
  178.  
  179.  
  180. : MARCH1                   
  181.    ROOT DOWN 3RD O+ SN KK 5TH O+ KK EN ROOT O++ DOWN WAIT ROOT UP ;      
  182.  
  183. : MARCH2 EN WAIT ROOT O++ UP ROOT O++ EN KK ; 
  184.  
  185. : MARCH0  ROOT QN KK ;            
  186.              
  187.