home *** CD-ROM | disk | FTP | other *** search
/ The Princeton Review - Science Smart / SCIENCE.iso / mac / files / CAD.DiR / 05064.ls < prev    next >
Encoding:
Text File  |  1995-12-08  |  266 b   |  19 lines
  1. on mouseUp
  2.   global dactive
  3.   if dactive = 1 then
  4.     exit
  5.   end if
  6.   set res to gencor()
  7.   if res = 1 then
  8.     prevcard()
  9.   else
  10.     if res = 3 then
  11.       nextcard()
  12.     else
  13.       if (res = 2) or (res = 4) then
  14.         beep(1)
  15.       end if
  16.     end if
  17.   end if
  18. end
  19.