home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today (BR) Volume 2 #9 / CDRTV2N9.iso / progs / vearth / shared.dir / 00565_Script_565 < prev    next >
Text File  |  1996-04-15  |  426b  |  18 lines
  1. on mouseUp
  2.   global gChapter, gSection, gPage, gMaxPage, gPicture, gSeparator
  3.   set gPicture = 0
  4.   
  5.   set gPage = gPage -1 
  6.   
  7.   if gPage  >= 1 then putOn(gPage)
  8.   set the blend of sprite (the clickOn) to 30
  9.   cleanChannels(5,21)
  10.   updateStage  
  11.   if  (gPage >= 1) then ¼
  12. go frame string(gChapter) & "." & string(gSection) & "." & string(gPage)
  13.   else
  14.     go movie   string(gChapter) & "-0"
  15.   end if
  16.   
  17.   
  18. end