home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today - The Disc! 8 / cdrt08.iso / mac / PaperPlanes / Demo / 00055_Script_55 < prev    next >
Text File  |  1994-12-12  |  343b  |  16 lines
  1. -- universal step audio
  2. on exitFrame
  3.   global Plane, Step
  4.   if Step < 10 then
  5.     set theFile = "STEP0"
  6.   else
  7.     set theFile = "STEP"
  8.   end if
  9.   set theFolder = "P" & string(Plane) & ":Audio:"
  10.   set theStep = theFile & string(Step) & ".AIF"
  11.   
  12.   startAnnotTimer()
  13.   sound playFile 1, the pathname & theFolder & theStep
  14.   
  15. end
  16.