home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 November / Chip_2000-11_cd1.iso / DATA / INF.Z / BIT16 / MC16.EXE / MC16.DXR / 00023.ls < prev    next >
Encoding:
Text File  |  1998-02-20  |  322 b   |  23 lines
  1. on mouseDown
  2.   case the mouseCast of
  3.     22:
  4.       swapCast(4, 25)
  5.       wait(10)
  6.       swapCast(4, 22)
  7.       updateStage()
  8.   end case
  9. end
  10.  
  11. on mouseUp
  12.   global gDeveloping
  13.   case the mouseCast of
  14.     22:
  15.       deleteSwapFile()
  16.       if gDeveloping then
  17.         halt()
  18.       else
  19.         quit()
  20.       end if
  21.   end case
  22. end
  23.