home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 1997 September / Personal_Computer_World_Sep_97.iso / Democd1 / mx_K0049.dxr / 00001_Strum.ls next >
Encoding:
Text File  |  1997-06-04  |  219 b   |  17 lines
  1. global gCommand
  2.  
  3. on mouseDown
  4.   set gCommand to "Strum"
  5.   set the visible of sprite 10 to 1
  6.   updateStage()
  7. end
  8.  
  9. on mouseUp
  10.   butt_off()
  11.   if gCommand = "Strum" then
  12.     butt_off()
  13.     go("De")
  14.     strum()
  15.   end if
  16. end
  17.