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