home *** CD-ROM | disk | FTP | other *** search
/ GU Photo: Background 3 / GU.iso / pc / browser_4m_ / browser_4m_.dxr / 00121_sizehv.ls < prev    next >
Encoding:
Text File  |  1994-09-30  |  442 b   |  24 lines
  1. on mouseDown
  2.   pushfield()
  3. end
  4.  
  5. on mouseUp
  6.   set cst to the castNum of sprite clickOn()
  7.   set v to field cst
  8.   if v = "120x90" then
  9.     put "240x180" into field cst
  10.   else
  11.     if v = "240x180" then
  12.       put "640x480" into field cst
  13.     else
  14.       if v = "640x480" then
  15.         put "3072x2048" into field cst
  16.       else
  17.         if v = "3072x2048" then
  18.           put "120x90" into field cst
  19.         end if
  20.       end if
  21.     end if
  22.   end if
  23. end
  24.