home *** CD-ROM | disk | FTP | other *** search
/ A Virtual Reality Guide to Texas / CD.iso / texdata / arcextra / tbits.dir / 00056_fish.ls < prev    next >
Encoding:
Text File  |  1998-06-23  |  183 b   |  10 lines
  1. on mouseUp
  2.   global multilist
  3.   set cnum to the number of member "fish1"
  4.   set x to getOne(multilist, cnum)
  5.   if x <> 0 then
  6.     deleteAt(multilist, x)
  7.   end if
  8.   go("fish jump")
  9. end
  10.