home *** CD-ROM | disk | FTP | other *** search
/ Computer Buyer 1995 November / SHOWCASE.ISO / files / shared.dir / 05289_Script_5289 < prev    next >
Text File  |  1995-06-14  |  503b  |  15 lines
  1. on mouseUp
  2.   global gpressed
  3.   set the puppet of sprite (the clickon) to true
  4.   set the puppet of sprite the clickon to true
  5.   set caster = the name of cast(the castnum of sprite (the clickon))
  6.   put "down" into word 3 of caster
  7.   set the puppet of sprite (the clickon) to true
  8.   set the castnum of sprite (the clickon) = the number of cast caster 
  9.    repeat with n = 3 to 4
  10.     if n <> the clickon then set the puppet of sprite n to false
  11.   end repeat
  12.   
  13.   set gpressed = the clickon
  14. end
  15.