home *** CD-ROM | disk | FTP | other *** search
/ Helix Design System / HELIX_DESIGN_SYSTEM_DEMO.iso / language.dxr / 00178.ls < prev    next >
Encoding:
Text File  |  1996-12-06  |  541 b   |  20 lines
  1. on mouseDown
  2.   set the puppet of sprite 15 to 1
  3.   set the locV of sprite 15 to the locV of sprite 15 + 3
  4.   set the locH of sprite 15 to the locH of sprite 15 + 2
  5.   updateStage()
  6. end
  7.  
  8. on mouseUp
  9.   global Root, Rootlang
  10.   set the locV of sprite 15 to the locV of sprite 15 - 3
  11.   set the locH of sprite 15 to the locH of sprite 15 - 2
  12.   updateStage()
  13.   repeat with i = 10 to 15
  14.     set the puppet of sprite i to 0
  15.   end repeat
  16.   set Root to the pathName
  17.   set Rootlang to the pathName & "Portug/"
  18.   go(3, the pathName & "Portug/Intro.dir")
  19. end
  20.