home *** CD-ROM | disk | FTP | other *** search
/ PC go! 1996 July / Image.iso / mrmore / mrmore.dir / 00011.ls < prev    next >
Encoding:
Text File  |  1996-04-11  |  297 b   |  15 lines

  1. on mouseDown
  2.   global glLastFrames, gbPopIsOn
  3.   if CheckForPopup() then
  4.     exit
  5.   end if
  6.   ClickButton(the clickOn)
  7.   set l to glLastFrames
  8.   set n to count(l)
  9.   set glLastFrames to list()
  10.   repeat with i = 1 to n - 1
  11.     append(glLastFrames, getAt(l, i))
  12.   end repeat
  13.   GoFrame(getAt(l, n))
  14. end
  15.