Spring RTS Engine

Code: Select all

function gadget:GetInfo()
  return {
    name      = "Fix ropes",
    desc      = "Destroys ropes",
    author    = "wolas",
    date      = "2011",
    license   = "GPL with exception, you must first watch http://www.youtube.com/watch?v=uMs031Eauw8 and click like :P",
    layer     = 0,
    enabled   = true,
  }
end

if (not gadgetHandler:IsSyncedCode()) then
  return false  --  silent removal
end

local DestroyF = Spring.DestroyFeature
local GetDefID	=Spring.GetFeatureDefID
local defID
local hor_b={}
local hor_b_i = 0
local hor_b_d = true --dead? to prevent recursion, but still could be better prevention?
local hor_r={}	    	
local hor_r_i =0	
local hor_r_d = true
local vert_b={}
local vert_b_i =0	
local vert_b_d = true
local vert_r={}
local vert_r_i =0	
local vert_r_d = true
--local allFtres={}

function gadget:GamePreload()

	allFtres = Spring.GetAllFeatures()
	for name, value in pairs(allFtres) do 
		if GetDefID(value) ~= nil then
			if FeatureDefs[GetDefID(value)].name == "rope_horiz_blue" then
				hor_b_i=hor_b_i+1
				hor_b[hor_b_i]=value
			elseif FeatureDefs[GetDefID(value)].name == "rope_horiz_red" then
				hor_r_i=hor_r_i+1
				hor_r[hor_r_i]=value
			elseif FeatureDefs[GetDefID(value)].name == "rope_vert_blue" then
				vert_b_i=vert_b_i+1
				vert_b[vert_b_i]=value
			elseif FeatureDefs[GetDefID(value)].name == "rope_vert_red" then
				vert_r_i=vert_r_i+1
				vert_r[vert_r_i]=value
			end
		end
	end
end	

function gadget:FeatureDestroyed(featureID, allyTeam)
	defID = GetDefID(featureID)
	if FeatureDefs[GetDefID(featureID)].name == "rope_horiz_blue" and hor_b_d  then
		hor_b_d = false
		for i=1,hor_b_i do
				DestroyF(hor_b[i])
		end
	elseif FeatureDefs[GetDefID(featureID)].name == "rope_horiz_red" and hor_r_d  then
		hor_r_d = false
		for i=1,hor_r_i do
				DestroyF(hor_r[i])
		end
	elseif FeatureDefs[GetDefID(featureID)].name == "rope_vert_blue" and vert_b_d  then
		vert_b_d = false
		for i=1,vert_b_i do
				DestroyF(vert_b[i])
		end
	elseif FeatureDefs[GetDefID(featureID)].name == "rope_vert_red" and vert_r_d  then
		vert_r_d = false
		for i=1,vert_r_i do
				DestroyF(vert_r[i])
		end
	end
end