Async Sound Sample Pas

I was trying to get Think Pascal 4.0.2 to play anynchronous sounds (sounds that play while other things are happening). It turns out that you have to remove the [D] Debug compile option or else the machine crashes. On the road to discovering this, I made a 'minimal' anynchronous sound playing program. A sample sound playing program is provided by Jim Reekes in the DTS folder of apple.com, but it is very elaborate and complex. What I offer here is a minimum piece of source code that a beginner could look at to see the essential elements of async sound production, done by-the-book (vol VI of Inside Apple, in this case). -------- Marv Westrom Faculty of Education, UBC Vancouver, B.C. Canada V6T 1Z4