home *** CD-ROM | disk | FTP | other *** search
/ Computer Buyer 1995 November / SHOWCASE.ISO / files / vision.dir / 00025_Script_25 < prev    next >
Text File  |  1995-06-14  |  484b  |  13 lines
  1. on mousedown
  2.   set the puppet of sprite the clickon to true
  3.   set the castnum of sprite (the clickon) = ¼
  4.     the number of cast  (the name of cast(the castnum of sprite (the clickon)) && "lit")
  5.   updatestage
  6. end
  7. on mouseUp
  8.   global soundlevel
  9.   set the puppet of sprite 27 to true
  10.   if soundlevel < 6 then set soundlevel = soundlevel + 1
  11.   set the castnum of sprite 27 = the number of cast ("sound level" && soundlevel)
  12.   set the puppet of sprite the clickon to false
  13. end