home *** CD-ROM | disk | FTP | other *** search
/ The Princeton Review - Science Smart / SCIENCE.iso / pc / science / files / cad.dir / 05061.ls < prev    next >
Encoding:
Text File  |  1996-01-26  |  149 b   |  11 lines
  1. on mouseUp
  2.   set res to gencor()
  3.   if res = 4 then
  4.     nextword()
  5.   else
  6.     if (res >= 1) and (res <= 3) then
  7.       beep(1)
  8.     end if
  9.   end if
  10. end
  11.