home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 1995 September / macformat-028.iso / mac / Demos / UNZIP-DEMO / ZIPFILES / net00 / 00005.ls < prev    next >
Encoding:
Text File  |  1995-05-24  |  121 b   |  10 lines
  1. on mouseUp
  2.   global secretr
  3.   BUT(10, 3)
  4.   if secretr = 5 then
  5.     set secretr to 0
  6.     go("demo")
  7.     exit
  8.   end if
  9. end
  10.