share/hedgewars/Data/Scripts/Animate.lua
changeset 7245 53f73f4ae203
parent 7213 fce7de71742f
child 7255 93cf6b3b89be
equal deleted inserted replaced
7243:9ae9178c525e 7245:53f73f4ae203
    53   animPos = 1
    53   animPos = 1
    54   lastx = 0
    54   lastx = 0
    55   lasty = 0
    55   lasty = 0
    56   jumpTypes = {long = gmLJump, high = gmHJump, back = gmHJump}
    56   jumpTypes = {long = gmLJump, high = gmHJump, back = gmHJump}
    57   jumpTimes = {long = 500, high = 500, back = 300, backback = 500} 
    57   jumpTimes = {long = 500, high = 500, back = 300, backback = 500} 
    58   moveDirs = {right = gmRight, left = gmLeft}
    58   moveDirs = {Right = gmRight, Left = gmLeft}
    59   jumpStarted = false
    59   jumpStarted = false
    60   backJumped = false
    60   backJumped = false
    61   jTimer = 0
    61   jTimer = 0
    62   awTime = 0
    62   awTime = 0
    63   globalWait = 0
    63   globalWait = 0
   180 function AnimDisappear(gear, destX, destY)
   180 function AnimDisappear(gear, destX, destY)
   181 	AddVisualGear(GetX(gear)-5, GetY(gear)-5, vgtSmoke, 0, false)
   181 	AddVisualGear(GetX(gear)-5, GetY(gear)-5, vgtSmoke, 0, false)
   182 	AddVisualGear(GetX(gear)+5, GetY(gear)+5, vgtSmoke, 0, false)
   182 	AddVisualGear(GetX(gear)+5, GetY(gear)+5, vgtSmoke, 0, false)
   183 	AddVisualGear(GetX(gear)-5, GetY(gear)+5, vgtSmoke, 0, false)
   183 	AddVisualGear(GetX(gear)-5, GetY(gear)+5, vgtSmoke, 0, false)
   184 	AddVisualGear(GetX(gear)+5, GetY(gear)-5, vgtSmoke, 0, false)
   184 	AddVisualGear(GetX(gear)+5, GetY(gear)-5, vgtSmoke, 0, false)
       
   185   PlaySound(sndExplosion)
   185 	SetGearPosition(gear, destX, destY)
   186 	SetGearPosition(gear, destX, destY)
   186   return true
   187   return true
   187 end
   188 end
   188 
   189 
   189 function AnimOutOfNowhere(gear, destX, destY)
   190 function AnimOutOfNowhere(gear, destX, destY)
   190   SetGearPosition(gear, destX, destY)
   191   SetGearPosition(gear, destX, destY)
   191   AddVisualGear(destX, destY, vgtBigExplosion, 0, false)
   192   AddVisualGear(destX, destY, vgtBigExplosion, 0, false)
       
   193   PlaySound(sndExplosion)
   192   AnimGearWait(gear, 50)
   194   AnimGearWait(gear, 50)
   193   return true
   195   return true
   194 end
   196 end
   195 
   197 
   196 function AnimTeleportGear(gear, destX, destY)
   198 function AnimTeleportGear(gear, destX, destY)
   198 	AddVisualGear(GetX(gear)+5, GetY(gear)+5, vgtSmoke, 0, false)
   200 	AddVisualGear(GetX(gear)+5, GetY(gear)+5, vgtSmoke, 0, false)
   199 	AddVisualGear(GetX(gear)-5, GetY(gear)+5, vgtSmoke, 0, false)
   201 	AddVisualGear(GetX(gear)-5, GetY(gear)+5, vgtSmoke, 0, false)
   200 	AddVisualGear(GetX(gear)+5, GetY(gear)-5, vgtSmoke, 0, false)
   202 	AddVisualGear(GetX(gear)+5, GetY(gear)-5, vgtSmoke, 0, false)
   201 	SetGearPosition(gear, destX, destY)
   203 	SetGearPosition(gear, destX, destY)
   202 	AddVisualGear(GetX(gear), GetY(gear), vgtBigExplosion, 0, false)
   204 	AddVisualGear(GetX(gear), GetY(gear), vgtBigExplosion, 0, false)
       
   205   PlaySound(sndExplosion)
   203   FollowGear(gear)
   206   FollowGear(gear)
   204   AnimGearWait(gear, 50)
   207   AnimGearWait(gear, 50)
   205   return true
   208   return true
   206 end
   209 end
   207 
   210