home *** CD-ROM | disk | FTP | other *** search
- global gSoundPath, ADSET
-
- on exitFrame
- if the timer > 1500 then
- sound playFile 2, gSoundPath & "thfwz.AIF"
- CLEANUP()
- if the shiftDown = 0 then
- if ADSET <> 0 then
- go("OPEN", ADSET)
- else
- go("OPEN", "CONTENTS.DIR")
- end if
- else
- go("OPEN", "CONTENTS.DIR")
- end if
- set ADSET to "CONTENTS.DIR"
- else
- go(the frame)
- end if
- end
-