home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
AmigActive 4
/
AACD04.ISO
/
AACD
/
Sound
/
SampleScruncher
/
transfer_new.rexx
< prev
Wrap
OS/2 REXX Batch file
|
1999-06-06
|
898b
|
39 lines
/*
* $VER: transfer_new.rexx 1.01 (4.6.99)
*
* ARexx script for OctaMED Sound Studio
* Written by A Niven-Jenkins © 1999 Cremlin Software
*
* Sample distortion using samplescruncher rather than OctaMED SS directly
* Replaces transfer.rexx with a temporary solution :-)
*
*/
OPTIONS RESULTS
/* needed for DELETE() function */
CALL ADDLIB('rexxsupport.library', 0, -30, 0)
ADDRESS OCTAMED_REXX
/* start timing including the saving and loading of samples to ram: */
CALL TIME('R')
IN_GETNAME
instname=RESULT
IN_SAVE 't:temp.raw' RAW
ADDRESS COMMAND 'Work:Devel/samplescruncher/samplescruncher t:temp.raw t:' || instname || ' OFFSET=256'
IN_LOAD 't:' || instname NOSLIST
CALL DELETE('t:temp.raw')
CALL DELETE('t:' || instname)
SAY 'Time elapsed:' TIME('E')
/* refresh OctaMED SS display */
SA_REFRESH
SA_RANGE 0 255 /* why is this in? selecting the 1st 256 bytes seems pointless */