share/hedgewars/Data/Scripts/Multiplayer/Racer.lua
changeset 13024 a568bc16a99a
parent 12967 e32fff07b8d7
child 13027 625d5a45f267
equal deleted inserted replaced
13023:acba432d34b1 13024:a568bc16a99a
   135 -------
   135 -------
   136 -- racer vars
   136 -- racer vars
   137 --------
   137 --------
   138 
   138 
   139 local cGear = nil
   139 local cGear = nil
       
   140 local cameraGear = nil -- gear created to center the cameera on
   140 
   141 
   141 local bestClan = 10
   142 local bestClan = 10
   142 local bestTime = 1000000
   143 local bestTime = 1000000
   143 
   144 
   144 local gameBegun = false
   145 local gameBegun = false
   824                             minO, maxO = 164, 224
   825                             minO, maxO = 164, 224
   825                             flashing = 10
   826                             flashing = 10
   826                         end
   827                         end
   827                         SetVisualGearValues(wpCirc[i], nil, nil, minO, maxO, nil, flashing, nil, nil, nil, wpCol[i])
   828                         SetVisualGearValues(wpCirc[i], nil, nil, minO, maxO, nil, flashing, nil, nil, nil, wpCol[i])
   828                 end
   829                 end
       
   830 
       
   831                 if cameraGear then
       
   832                         DeleteGear(cameraGear)
       
   833                 end
       
   834                 -- Move camera to first waypoint
       
   835 		-- We use a dummy gear to feed FollowGear. It does not affect the race.
       
   836                 cameraGear = AddGear(wpX[0], wpY[0], gtGenericFaller, 0, 0, 0, 5000)
       
   837                 SetState(cameraGear, bor(GetState(cameraGear), gstNoGravity+gstInvisible))
       
   838                 FollowGear(cameraGear)
   829         end
   839         end
   830 
   840 
   831         if gameOver == true then
   841         if gameOver == true then
   832                 gameBegun = false
   842                 gameBegun = false
   833                 racerActive = false -- newadd
   843                 racerActive = false -- newadd
   836         AddAmmo(CurrentHedgehog, amTardis, 0)
   846         AddAmmo(CurrentHedgehog, amTardis, 0)
   837         AddAmmo(CurrentHedgehog, amDrillStrike, 0)
   847         AddAmmo(CurrentHedgehog, amDrillStrike, 0)
   838         AddAmmo(CurrentHedgehog, amMineStrike, 0)
   848         AddAmmo(CurrentHedgehog, amMineStrike, 0)
   839         AddAmmo(CurrentHedgehog, amNapalm, 0)
   849         AddAmmo(CurrentHedgehog, amNapalm, 0)
   840         AddAmmo(CurrentHedgehog, amPiano, 0)
   850         AddAmmo(CurrentHedgehog, amPiano, 0)
   841 
       
   842 end
   851 end
   843 
   852 
   844 function onGameTick20()
   853 function onGameTick20()
   845 
   854 
   846         -- airstrike detected, convert this into a potential waypoint spot
   855         -- airstrike detected, convert this into a potential waypoint spot
   965 
   974 
   966 function onGearDelete(gear)
   975 function onGearDelete(gear)
   967 
   976 
   968         if GetGearType(gear) == gtAirAttack then
   977         if GetGearType(gear) == gtAirAttack then
   969                 cGear = nil
   978                 cGear = nil
       
   979         elseif gear == cameraGear then
       
   980                 cameraGear = nil
   970         end
   981         end
   971 
   982 
   972 end
   983 end
   973 
   984 
   974 function onAttack()
   985 function onAttack()