home *** CD-ROM | disk | FTP | other *** search
/ Greatest Childrens Stories Ever Told / Greatest_Stories.iso / demos / funtown / mainmenu.dir / 00161_Script_161 < prev    next >
Text File  |  1994-11-02  |  1KB  |  41 lines
  1. on StartMovie
  2.   put the Text of Cast "Help Text!" into Field "Help Text"
  3.   clearglobals
  4. end StartMovie
  5.  
  6. on PressHelp
  7.   put the name of Cast ( the CastNum of Sprite the ClickOn) into theName
  8.   set the CastNum of Sprite the ClickOn = the number of Cast (theName&", down")
  9.   updateStage
  10.   
  11.   repeat while the StillDown
  12.   end repeat
  13.   
  14.   set the CastNum of Sprite the ClickOn = the number of Cast theName
  15.   updateStage
  16.   
  17.   if RollOver(the ClickOn) then
  18.     if theName = "Previous Screen" then
  19.       if the frame > marker("Help") then 
  20.         go (the frame - 1)
  21.       else
  22.         beep
  23.       end if
  24.     else if theName = "continue" then 
  25.       go marker("Start")
  26.     else 
  27.       if the frame < (marker("Help") + 1) then 
  28.         go (the frame + 1)
  29.       else
  30.         beep
  31.       end if
  32.     end if
  33.   end if
  34. end
  35.  
  36. on PressHelpPic
  37.   put the name of Cast ( the CastNum of Sprite the ClickOn ) into theName
  38.   put the Text of Field (theName&" Text") into Field "Help Text"
  39.   go the frame
  40. end
  41.