home *** CD-ROM | disk | FTP | other *** search
/ The Games Machine 165 / XENIATGM165.ISO / cddata / main.dxr / 00011_videopresenta.ls < prev    next >
Encoding:
Text File  |  2003-05-29  |  463 b   |  23 lines
  1. property sp, presenta
  2.  
  3. on new me
  4.   presenta = 0
  5.   sp = me.spriteNum
  6.   sprite(50).visible = 0
  7. end
  8.  
  9. on mouseDown me
  10.   global main_l, volgen, channel, svolgen
  11.   if presenta = 1 then
  12.     return 
  13.   end if
  14.   presenta = 1
  15.   sprite(29).locH = 816
  16.   member("videompg").file = the moviePath & main_l[1].film
  17.   updateStage()
  18.   sprite(54).visible = 0
  19.   sound(channel).volume = 0
  20.   sendSprite(44, #mSetConstrainPos, 1 - (sound(channel).volume / 255.0), 0)
  21.   go("update3")
  22. end
  23.