home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1994 November: Tool Chest / Dev.CD Nov 94.toast / Sample Code / Newton Sample Code 1.2 / Sound / Sound Advice-2 / Project Data next >
Encoding:
Text File  |  1994-02-28  |  365 b   |  10 lines  |  [TEXT/ttxt]
  1. // Open the resource file that contains the sound, and assign the
  2. // file ID to a temporary variable rf
  3. // NOTE: specify the full pathname from your hard drive down...
  4. rf := OpenResFileX(home & "resources"); 
  5.  
  6. // Read in the 11KHz sampled sound
  7. boingSound := GetSound11("Boing") ;
  8.  
  9. // close up any resource files that were opened (VERY important)
  10. CloseResFileX(rf);