home *** CD-ROM | disk | FTP | other *** search
/ Blender Volume 3 #4 / Blender_3_4.iso / BLENDER / FILES / FONDA.DIR / 00175.ls < prev    next >
Encoding:
Text File  |  1997-01-01  |  390 b   |  21 lines

  1. global gSoundPath, ADSET
  2.  
  3. on exitFrame
  4.   if the timer > 1500 then
  5.     sound playFile 2, gSoundPath & "thfwz.AIF"
  6.     CLEANUP()
  7.     if the shiftDown = 0 then
  8.       if ADSET <> 0 then
  9.         go("OPEN", ADSET)
  10.       else
  11.         go("OPEN", "CONTENTS.DIR")
  12.       end if
  13.     else
  14.       go("OPEN", "CONTENTS.DIR")
  15.     end if
  16.     set ADSET to "CONTENTS.DIR"
  17.   else
  18.     go(the frame)
  19.   end if
  20. end
  21.