home *** CD-ROM | disk | FTP | other *** search
/ Encyklopedia Omnia / Planeta.iso / data / f_gen.dir / 00017_custom3.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 >= 30) and (angle < 270) then
  5.     if not (fileName contains "f_in04.mov") then
  6.       set the AreaOfInterest of sprite(1) to rect(269, 858, 388, 1037)
  7.       PlayBackBufferMovie(sprite(1), "@\files\f_in04.mov", #loop)
  8.     end if
  9.   else
  10.     if not (fileName contains "f_in04b.mov") then
  11.       set the AreaOfInterest of sprite(1) to rect(101, 2188, 220, 2367)
  12.       PlayBackBufferMovie(sprite(1), "@\files\f_in04b.mov", #loop)
  13.     end if
  14.   end if
  15.   go(the frame)
  16. end
  17.