share/hedgewars/Data/Maps/CTF_Blizzard/map.lua
changeset 4953 ebd3dae634ca
parent 4871 4a99a45ea886
child 5325 261b79ba22b1
equal deleted inserted replaced
4952:df752b69a142 4953:ebd3dae634ca
     1 --------------------------------
     1 --------------------------------
     2 -- CTF_BLIZZARD 0.6
     2 -- CTF_BLIZZARD 0.8
     3 --------------------------------
     3 --------------------------------
     4 
     4 
     5 ---------
     5 ---------
     6 -- 0.2
     6 -- 0.2
     7 ---------
     7 ---------
    71 -----------
    71 -----------
    72 -- 0.7
    72 -- 0.7
    73 ------------
    73 ------------
    74 
    74 
    75 -- hopefully fixed a bug with the teleporters
    75 -- hopefully fixed a bug with the teleporters
    76 
    76 -- added a fix for crate possibly getting imbedded in land when it was near the water line
    77 -- added a fix for crate possibly getting imbedded in land when it was near
    77 
    78 -- the water line
    78 -----------
       
    79 -- 0.8
       
    80 ------------
       
    81 
       
    82 -- fixed version control fail with missing check on onGearDelete
       
    83 
       
    84 -- changed hog placements code so that they start in the same place for both teams
       
    85 -- and hogs move in the same order, not backwards to each other.
    79 
    86 
    80 loadfile(GetDataPath() .. "Scripts/Locale.lua")()
    87 loadfile(GetDataPath() .. "Scripts/Locale.lua")()
    81 
    88 
    82 ---------------------------------------------------------------
    89 ---------------------------------------------------------------
    83 ----------lots of bad variables and things
    90 ----------lots of bad variables and things
   589 				team1Placed = team1Placed +1
   596 				team1Placed = team1Placed +1
   590 				if team1Placed > 6 then
   597 				if team1Placed > 6 then
   591 					team1Placed = 0
   598 					team1Placed = 0
   592 				end
   599 				end
   593 			elseif GetHogClan(hhs[g]) == 1 then
   600 			elseif GetHogClan(hhs[g]) == 1 then
   594 				SetGearPosition(hhs[g],2230+ ((team2Placed+1)*50),1570)
   601 				SetGearPosition(hhs[g],2691- ((team2Placed+1)*50),1570)
   595 				team2Placed = team2Placed +1
   602 				team2Placed = team2Placed +1
   596 				if team2Placed > 6 then
   603 				if team2Placed > 6 then
   597 					team2Placed = 0
   604 					team2Placed = 0
   598 				end
   605 				end
   599 			end
   606 			end
   705 	SetAmmo(amShotgun, 9, 0, 0, 0)
   712 	SetAmmo(amShotgun, 9, 0, 0, 0)
   706 	SetAmmo(amFlamethrower, 1, 0, 0, 1)
   713 	SetAmmo(amFlamethrower, 1, 0, 0, 1)
   707 
   714 
   708 	SetAmmo(amFirePunch, 9, 0, 0, 0)
   715 	SetAmmo(amFirePunch, 9, 0, 0, 0)
   709 	SetAmmo(amBaseballBat, 2, 0, 0, 0)
   716 	SetAmmo(amBaseballBat, 2, 0, 0, 0)
       
   717 	--SetAmmo(amKamikaze, 2, 0, 0, 0)
       
   718 
   710 
   719 
   711 	SetAmmo(amDynamite,2,0,0,1)
   720 	SetAmmo(amDynamite,2,0,0,1)
   712 	SetAmmo(amSMine,4,0,0,0)
   721 	SetAmmo(amSMine,4,0,0,0)
   713 
   722 
   714 	SetAmmo(amBlowTorch, 9, 0, 0, 0)
   723 	SetAmmo(amBlowTorch, 9, 0, 0, 0)
   786 
   795 
   787 	if GetGearType(gear) == gtRope then
   796 	if GetGearType(gear) == gtRope then
   788 		ropeGear = nil
   797 		ropeGear = nil
   789 	end
   798 	end
   790 
   799 
   791 end
   800 	if GetGearType(gear) == gtHedgehog then
       
   801 		for i = 0, (numhhs-1) do
       
   802 			if gear == hhs[i] then
       
   803 				
       
   804 				for k = 0,1 do
       
   805 					if gear == fThief[k] then
       
   806 						FlagThiefDead(gear)
       
   807 					end
       
   808 				end				
       
   809 				hhs[i] = nil	
       
   810 			end		
       
   811 		end
       
   812 	end
       
   813 
       
   814 end