home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1993 #1 / NN_1993_1.iso / spool / comp / sys / mac / programm / 20757 < prev    next >
Encoding:
Text File  |  1993-01-06  |  4.2 KB  |  121 lines
  1. Newsgroups: comp.sys.mac.programmer
  2. Path: sparky!uunet!zaphod.mps.ohio-state.edu!magnus.acs.ohio-state.edu!usenet.ins.cwru.edu!agate!apple!mumbo.apple.com!gallant.apple.com!NewsWatcher!user
  3. From: REEKES@applelink.apple.com (Jim Reekes)
  4. Subject: Re: help- sound playing w/ bufferCmd
  5. Sender: news@gallant.apple.com
  6. Message-ID: <REEKES-050193163250@90.10.20.67>
  7. Date: Wed, 6 Jan 1993 00:36:46 GMT
  8. Distribution: comp
  9. References: <TMORROW.93Jan2151912@af4hp.oracle.com>
  10. Organization: Apple Computer, Inc.
  11. Followup-To: comp.sys.mac.programmer
  12. Lines: 107
  13.  
  14. In article <TMORROW.93Jan2151912@af4hp.oracle.com>, tmorrow@oracle.com
  15. (Thomas Morrow) wrote:
  16. > 
  17. > 
  18. > I am having trouble using SndDoCommand to play a sampled sound header.
  19. > 
  20. > I do:
  21. >     SndCommand mySndCmd;
  22. >     
  23. >     /* mySndH is a handle to a sound header and data */
  24. >     /* mySndChan is already properly opened */
  25. >     mySndCmd.cmd;
  26. >     mySndCmd.param1 = 0;
  27. >     mySndCmd.param2 = (long)(*mySndH) & 0xffffff;
  28. >     SndDoCommand(mySndChan, mySndCmd, false);
  29. > 
  30. > This does not work for some reason; I can't figure out why because if
  31. > I replace the SndDoCommand with a Snd Play, it works:
  32. > 
  33. >     SndPlay(mySndChan, mySndH, true);
  34. >     
  35. > So the channel and header must be alright.  I am new to Mac
  36. > programming, and wasn't sure exactly how to set param2 (a long) to the
  37. > header address (Ptr)... The IM IV uses ORD4() to do the type
  38. > conversion, but I am using Think C rather than Lisa Pascal. My way
  39. > seems to work, but what is the elegant way?
  40. > 
  41. > Anyway, I use SndChannelStatus to get the status every event loop
  42. > cycle, and the SCStatus returned is blank (zero) in all except CPUload
  43. > (24),  ChannelAttributes (initMono), and ChannelBusy (true).  How can
  44. > the channel be busy if StartTime == endTime == 0?
  45.  
  46. You cannot use the 'snd ' resource for the bufferCmd. You must point to the
  47. SoundHeader within the resource.  Also, the code above didn't set the cmd
  48. to bufferCmd. Here's some code anyone can use to find the sound header in a
  49. 'snd ' resource. Then change your code above into...
  50.  
  51.     mySndCmd.cmd = bufferCmd;
  52.     mySndCmd.param1 = 0;
  53.     mySndCmd.param2 = (long) *mySndH + offset;
  54.     err = SndDoCommand(mySndChan, &mySndCmd, true);
  55.  
  56.  
  57. // find the sound header inside of the given snd handle
  58.  
  59. OSErr GetBufferOffset(Handle sndHandle, long *offset)
  60. {
  61.     short       howManyCmds;
  62.     Ptr         cruisePtr;
  63.     OSErr       result;
  64.  
  65.     if (sndHandle == nil)
  66.         return nilHandleErr;
  67.         
  68.     if (*sndHandle == nil)
  69.         return nilHandleErr;
  70.  
  71.     result = noErr;
  72.     *offset = 0;
  73.  
  74.     // set the pointer past the first two words of the snd
  75.     // this is correct for both format 1 and 2 resources
  76.     cruisePtr = *sndHandle + offsetof(SndListResource, modifierPart);
  77.  
  78.     // if it's a format 1, then point past the modifier parts
  79.     if ( ((SndListPtr)*sndHandle)->format == firstSoundFormat )
  80.         cruisePtr += sizeof(ModRef) *
  81. ((SndListPtr)*sndHandle)->numModifiers;
  82.  
  83.     // now pointing at number of cmds
  84.     howManyCmds = *((short *)cruisePtr);
  85.     cruisePtr += sizeof(howManyCmds);
  86.  
  87.     // cruisePtr is now at the first sound command
  88.     // cruise all commands and find a soundCmd or bufferCmd
  89.     do {
  90.         switch (((SndCmdPtr)cruisePtr)->cmd) {
  91.  
  92.             case (soundCmd | dataOffsetFlag):
  93.             case (bufferCmd | dataOffsetFlag):
  94.                 *offset = ((SndCmdPtr)cruisePtr)->param2;
  95.                 howManyCmds = 0;                // done, get out of loop
  96.                 break;
  97.  
  98.             default:                            // catch any other type of
  99. cmd
  100.                 cruisePtr += sizeof(SndCommand);
  101.                 howManyCmds -= 1;
  102.                 break;
  103.         }
  104.     } while (howManyCmds >= 1);                 // done with all the
  105. commands
  106.  
  107.     if (*offset == 0)                           // never found sound header
  108.         return badFormat;
  109.         
  110.     return(result);
  111. }
  112.  
  113.  
  114.  
  115. -----------------------------------------------------------------------
  116. Jim Reekes, Polterzeitgeist  |     Macintosh Toolbox Engineering
  117.                              |          Sound Manager Expert
  118. Apple Computer, Inc.         | "All opinions expressed are mine, and do
  119. 20525 Mariani Ave. MS: 81-KS |   not necessarily represent those of my
  120. Cupertino, CA 95014          |       employer, Apple Computer Inc."
  121.