home *** CD-ROM | disk | FTP | other *** search
/ Set of Apple II Hard Drive Images / hard.hdv / HARD / FORTH / SEQUENCE.WRD < prev    next >
Encoding:
Text File  |  1991-03-13  |  339 b   |  23 lines  |  [04] ASCII Text (0x0000)
  1. ( SEQUENCER AND PLAYBACK )
  2.  
  3. MASC DEFINITIONS
  4.  
  5. VARIABLE SENDNOTES
  6. 150 ALLOT
  7. ( MAKE ROOM FOR MACHINE LANG CODE )
  8. ( YOU MUST MANUALLY ADJUST CFA OF SENDNOTES )
  9.  
  10. VARIABLE KLR
  11. 40 ALLOT
  12.  
  13. : SEQUENCE
  14.    CREATE INIT 64 VOL QN DOES>   
  15.    [ HEX ] 19 ! SENDNOTES KLR
  16.    1B C@ ' SENDNOTES 1+ [COMPILE] LITERAL C! 
  17. ;
  18.  
  19. HEX
  20. : END-SEQ
  21.    0 , FFFF , 
  22. ;
  23. DEC