home *** CD-ROM | disk | FTP | other *** search
/ PC World 2002 December / PCWorld_2002-12_cd.bin / Software / Komercni / Krtek / MOVIE / ROZDILY.DXR / Internal_19_ScriptMravenecBezi.ls < prev    next >
Encoding:
Text File  |  2002-10-07  |  630 b   |  32 lines
  1. property pFrames, pStartFrame
  2. global gMravenecBezi
  3.  
  4. on new me
  5.   pFrames = 81
  6.   sprite(5).visible = 0
  7.   sprite(2).visible = 1
  8.   (the actorList).add(me)
  9.   pStartFrame = 0
  10.   return me
  11. end
  12.  
  13. on stepFrame me
  14.   pStartFrame = pStartFrame + 1
  15.   if pStartFrame = 30 then
  16.     sprite(6).visible = 0
  17.     sprite(7).visible = 0
  18.     sprite(3).visible = 1
  19.     sprite(4).visible = 1
  20.   end if
  21.   if pStartFrame = (pFrames + 30) then
  22.     sprite(3).visible = 0
  23.     sprite(4).visible = 0
  24.     (the actorList).deleteOne(me)
  25.     gMravenecBezi = VOID
  26.   end if
  27.   if pStartFrame = pFrames then
  28.     sprite(2).visible = 0
  29.     sprite(5).visible = 1
  30.   end if
  31. end
  32.