home *** CD-ROM | disk | FTP | other *** search
/ Amiga ACS 1998 #4 / amigaacscoverdisc1998-041998.iso / utilities / shareware / music / sfx-030m / sfx-data / _rexx / test.rexx < prev    next >
Encoding:
OS/2 REXX Batch file  |  1998-03-08  |  505 b   |  24 lines
  1. /* SFX External Operator Test */
  2.  
  3. OPTIONS RESULTS
  4.  
  5. ADDRESS REXX_SFX
  6.  
  7. GetActiveBuffer
  8. buf1=RESULT
  9. IF buf1>-1 THEN DO
  10.     SelOperator 'Amplify'
  11.     SetOperatorParam 'Amplify' 'P1S' '"200 %"'
  12.     SetOperatorParam 'Amplify' 'P1E' '"10 %"'
  13.     SetOperatorParam 'Amplify' 'P1ModShape' 'Linear'
  14.     ProcessSample buf1
  15.     IF RC=0 THEN DO
  16.         buf2=RESULT
  17.         RenameBuffer buf2 '"Amplified sample"'
  18.     END
  19.     ELSE Message '"Operator Amplify failed !"'
  20. END
  21. ELSE Message '"No sample to operate on !"'
  22. ActivateSFX                                                /* fertig */
  23. EXIT
  24.