home *** CD-ROM | disk | FTP | other *** search
/ Knitting Made Easy / Knitting.iso / App / less_S1.dxr / Internal_7.ls < prev    next >
Encoding:
Text File  |  2002-03-27  |  565 b   |  19 lines
  1. on exitFrame
  2.   global miStart, miEnd, cuelist, cuelist2, cueMiEnd
  3.   setvolume(sprite(20), -100)
  4.   cueStart = the frameLabel
  5.   cpName = getOne(cuelist, cueStart)
  6.   miStart = getAt(cuelist2, cpName)
  7.   cueMiEnd = the frameLabel & "End"
  8.   cpName = getOne(cuelist, cueMiEnd)
  9.   miEnd = getAt(cuelist2, cpName)
  10.   miEnd = miEnd + 5
  11.   videoplaysegment(sprite(20), miStart, miEnd)
  12.   videoseek(sprite(20), miStart)
  13.   videoplay(sprite(20))
  14.   currentSeconds = the milliSeconds
  15.   repeat while the milliSeconds < (currentSeconds + 100)
  16.   end repeat
  17.   setvolume(sprite(20), 0)
  18. end
  19.