home *** CD-ROM | disk | FTP | other *** search
/ Sunday That One Day / STOD_VFS_INVIS.ISO / pc / classr.dxr / 00445.ls < prev    next >
Encoding:
Text File  |  1995-09-15  |  323 b   |  18 lines
  1. on mouseUp
  2.   global SeenBoard
  3.   puppetSprite(37, 0)
  4.   puppetSprite(38, 0)
  5.   puppetSprite(39, 0)
  6.   puppetSprite(40, 0)
  7.   puppetSprite(41, 0)
  8.   puppetSprite(42, 0)
  9.   cursor(200)
  10.   if SeenBoard = 1 then
  11.     puppetSprite(43, 0)
  12.     set SeenBoard to 2
  13.     play frame "EraseBoard"
  14.   else
  15.     play frame "Chalkboard"
  16.   end if
  17. end
  18.