home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1997 February / WPCFEB97.ISO / multi / acacia / start.dxr / 00072.ls < prev    next >
Encoding:
Text File  |  1996-11-13  |  518 b   |  19 lines
  1. on mouseDown
  2.   global gAcaciaDown
  3.   set gAcaciaDown to 1
  4.   set the memberNum of sprite 2 to 4
  5.   updateStage()
  6. end
  7.  
  8. on mouseUp
  9.   global gAcaciaDown, gTestList, gCursor
  10.   if gAcaciaDown then
  11.     set gAcaciaDown to 0
  12.     set the memberNum of sprite 2 to 5
  13.     updateStage()
  14.     set gTestList to [459901: [1101, 9, 0.0, 0.0], 459902: [1101, 9, 0.0, 0.0], 459903: [1101, 9, 0.0, 0.0], 459904: [1101, 9, 0.0, 0.0], 459905: [1101, 9, 0.0, 0.0], 459906: [1101, 9, 0.0, 0.0]]
  15.     set gCursor to 1
  16.     go("finish")
  17.   end if
  18. end
  19.