// Open the resource file that contains the sound, and assign the // file ID to a temporary variable rf // NOTE: specify the full pathname from your hard drive down... rf := OpenResFileX(home & "resources"); // Read in the 11KHz sampled sound boingSound := GetSound11("Boing") ; // close up any resource files that were opened (VERY important) CloseResFileX(rf); // ---- End Project Data ---- // ---- File soundAdvice.t ---- // Before Script for "_view000" // Copyright 1993-1994 Apple Computer, Inc. All rights reserved. _view000 := {title: "Sound Advice", viewBounds: {left: 4, top: 42, right: 185, bottom: 151}, _proto: protoApp }; _view001 := /* child of _view000 */ {text: "Boinggggg", buttonClickScript: func() begin PlaySound(mySound); end, viewBounds: {left: 43, top: 42, right: 139, bottom: 66}, mySound: boingSound, _proto: protoTextButton }; // ---- Beginning of section for non used Layout files ---- // End of output