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