#define false 0 #define true -1 DECLARE FUNCTION TiOpenSample LIB "TiSound" ALIAS "TiOpenSample" (sFile AS STRING, sAlias AS STRING) AS INTEGER DECLARE FUNCTION TiPlaySample LIB "TiSound" ALIAS "TiPlaySample" (sAlias AS STRING) AS INTEGER DECLARE FUNCTION TiPlaySampleFrom LIB "TiSound" ALIAS "TiPlaySampleFrom" (sAlias AS STRING, sPos AS LONG) AS INTEGER DECLARE FUNCTION TiResumeSample LIB "TiSound" ALIAS "TiResumeSample" (sAlias AS STRING) AS INTEGER DECLARE FUNCTION TiPauseSample LIB "TiSound" ALIAS "TiPauseSample" (sAlias AS STRING) AS INTEGER DECLARE FUNCTION TiStopSample LIB "TiSound" ALIAS "TiStopSample" (sAlias AS STRING) AS INTEGER DECLARE FUNCTION TiCloseSample LIB "TiSound" ALIAS "TiCloseSample" (sAlias AS STRING) AS INTEGER DECLARE FUNCTION TiSampleLength LIB "TiSound" ALIAS "TiSampleLength" (sAlias AS STRING) AS LONG DECLARE FUNCTION TiSampleCurPos LIB "TiSound" ALIAS "TiSampleCurPos" (sAlias AS STRING) AS LONG