home *** CD-ROM | disk | FTP | other *** search
/ Encyklopedia Omnia / Planeta.iso / data / f_gen.dir / 00050_custom12.ls < prev    next >
Encoding:
Text File  |  2000-11-09  |  580 b   |  17 lines
  1. on exitFrame
  2.   set angle to the PanAngle of sprite(1)
  3.   set fileName to the BackBufferMovie of sprite(1)
  4.   if (angle >= 310) or (angle <= 100) then
  5.     if not (fileName contains "f_in12.mov") then
  6.       set the AreaOfInterest of sprite(1) to rect(286, 104, 405, 343)
  7.       PlayBackBufferMovie(sprite(1), "@\files\f_in12.mov", #loop)
  8.     end if
  9.   else
  10.     if not (fileName contains "f_in12b.mov") then
  11.       set the AreaOfInterest of sprite(1) to rect(334, 1296, 513, 1535)
  12.       PlayBackBufferMovie(sprite(1), "@\files\f_in12b.mov", #loop)
  13.     end if
  14.   end if
  15.   go(the frame)
  16. end
  17.