home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Browser - Artopolis 97
/
browser.iso
/
mac
/
artrope
/
artrope.dir
/
00049_Script_menuHandlers
< prev
next >
Wrap
Text File
|
1997-10-08
|
3KB
|
99 lines
global gSep
--=================================
--called from framescripts when the
--cursor is above x locV
-----------------------------------
on installMyMenu
installMenu "menus"
if the frameLabel = "end1" then
set the checkMark of menuItem(4) of menu "navigation" to true
else
set the checkMark of menuItem 2 of menu "navigation" to true
end if
put the soundlevel into xValue
set the checkMark of menuitem (xValue+1) of menu "volume" to true
end
--=================================
--called from pull-down menus
--this handler sets the soundlevel and
--sets the checkmark for that value
-----------------------------------
on soundLeveler xValue
set the soundlevel to xValue
repeat with i = 1 to the number of menuItems in menu "volume"
set the checkMark of menuItem i of menu "volume" to false
end repeat
set the checkMark of menuItem (xValue+1) of menu "volume" to true
end
--=================================
--called from pull-down menus
--this handler sends us to the
--splash screen.
-----------------------------------
on goToChoice
repeat with i = 1 to the number of menuItems in menu "navigation"
set the checkMark of menuItem i of menu "navigation" to false
end repeat
set the checkMark of menuItem 1 of menu "navigation" to true
if the frameLabel = "end1" then
repeat with i = 8 to 12
set the puppet of sprite i to false
end repeat
end if
repeat with i = 1 to 4
puppetsound i,0
end repeat
go to frame "intro"
end
--=================================
--called from pull-down menus
--this handler sends us to the
--interactive.
-----------------------------------
on goToArtrope
repeat with i = 1 to the number of menuItems in menu "navigation"
set the checkMark of menuItem i of menu "navigation" to false
end repeat
set the checkMark of menuItem 2 of menu "navigation" to true
if the frameLabel = "end1" then
repeat with i = 8 to 12
set the puppet of sprite i to false
end repeat
end if
repeat with i = 1 to 4
puppetsound i,0
end repeat
go to frame "choice"
end
--=================================
--sends us to the end/credits movie
-----------------------------------
on goToEnd
makeAlert (string(the pathname & "MIAWS"& gSep & "quit.dir"), [304,228])
end
--=================================
--called from the quit miaw
-----------------------------------
on pleaseDoQuit
cleanUpFrame
go to frame "END"
end
--=================================
--brings up help movie
-----------------------------------
on goToHelp
makeAlert (string(the pathname & "MIAWS"& gSep & "help.dir"),[336,247])
end