--把以下語句加入你的startmovie（）事件處理過程中 set the timeoutlength to 60 * 60 * 5 --這行意思是：一秒分為60個(gè)滴答，60個(gè)滴答×60＝1分鐘，1分鐘×5＝5分鐘。（也就是啟動(dòng)屏保時(shí)間為5分鐘） when timeout then screensaver()
--把以下的語句加入電影腳本中 on screensaver put the frame into gnlastframe put the mouseloc into gllastmouseloc go "loopframe" end screensaver
global gofilewindow, gswindowname, gafilewindowrect, gswindowpath, gssizeofwindow
on startmovie setupwindowspecs() launchmiaw() end startmovie
on stopmovie purgemiaw() unload end stopmovie
on setupwindowspecs -- inits dimensions and origins for miaw object over splash screen -- plug in your own names below -- note you do not have to specify ".dxr" or ".dir" for the path to the external file -- this can really be any name you want; it』s an internal reference set gswindowname to "intro"
-- this is the actual miaw file you want opened by the stub set gswindowpath to ( the pathname & "intro" )
put ( the stageright / 2 ) into nhorizontalcenterofmonitor put ( the stagebottom / 2 ) into nverticalcenterofmonitor
-- set dims for location of window relative to screen size set nwindowwidth = nhorizontalcenterofmonitor + 320 set nwindowheight = nverticalcenterofmonitor + 240 set nhorizorigin = nwindowwidth - 640 set nvertorigin = nwindowheight - 480
set gafilewindowrect = rect ( nhorizorigin, nvertorigin, nwindowwidth, nwindowheight )
end setupwindowspecs
on launchmiaw if objectp ( gofilewindow ) then forget gofilewindow set gofilewindow to window gswindowname set the rect of gofilewindow to gafilewindowrect set the filename of gofilewindow to gswindowpath set the title of window "intro" = "my presentation" set the titlevisible of gofilewindow to true
-- windowtype 5 is draggable on macs; might need tweaking on pcs. experiment. -- take care not to allow the pc version to have a close box in its bar or you might -- run into beaucoup problems later set the windowtype of
