slederer/Tridora-CPU
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages 3 Wiki Activity Actions

pcmaudio: add routine/external procedure to read sample file

Browse source
This commit is contained in:
slederer 2026-03-30 00:43:31 +02:00
parent 819c808c50
commit 0d9db023a1
3 changed files with 23 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

1
lib/pcmaudio.inc
View file

@ -1,6 +1,7 @@
type SndBuf = string[32768];
type SndBufPtr = ^SndBuf;
procedure ReadSample(aFile:file;buf:SndBufPtr); external;
procedure PlaySample(buf:SndBufPtr;sampleRate:integer); external;
procedure SampleQStart(buf:SndBufPtr;loop:boolean;sampleRate:integer); external;
procedure SampleQStop; external;