home *** CD-ROM | disk | FTP | other *** search
/ The Princeton Review - Science Smart / SCIENCE.iso / mac / files / shared.dir / 07764_sresults.ls < prev    next >
Encoding:
Text File  |  1995-12-08  |  616 b   |  26 lines
  1. on mouseUp
  2.   global gscardon, gframe
  3.   if the puppet of sprite 48 = 1 then
  4.     exit
  5.   end if
  6.   set gframe to EMPTY
  7.   set gscardon to the mouseLine
  8.   if line gscardon of field 7764 = EMPTY then
  9.     exit
  10.   end if
  11.   cursor(4)
  12.   hilite line gscardon of field 7764
  13.   set frameref to line gscardon of the text of field 7764
  14.   set numref to the number of words in frameref
  15.   set frameref to word 2 to numref of frameref
  16.   set frameref to frametonum(frameref)
  17.   setoff(0)
  18.   cunload()
  19.   go(frameref)
  20.   puppetSprite(43, 1)
  21.   set the visible of sprite 42 to 1
  22.   set the visible of sprite 43 to 1
  23.   searchword()
  24.   cursor(0)
  25. end
  26.