home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today (BR) Volume 2 #9 / CDRTV2N9.iso / progs / vearth / shared.dir / 00548.ls < prev    next >
Encoding:
Text File  |  1996-04-15  |  330 b   |  12 lines
  1. on mouseUp
  2.   global gChapter, gSection, gPage, gMaxPage, gPicture
  3.   set gPicture to 0
  4.   putOn(the clickOn - 21)
  5.   updateStage()
  6.   cleanChannels(5, 21)
  7.   if the type of sprite 4 = 16 then
  8.     set the controller of cast the castNum of sprite 4 to 0
  9.   end if
  10.   go(string(gChapter) & "." & string(gSection) & "." & string(gPage))
  11. end
  12.