Spring RTS Engine

Code: Select all

else -- UnSynced

function IsTerrainHidden(x1,y1,z1)
	local xs,ys=Spring.WorldToScreenCoords(x1,y1,z1)
	local _,pos=Spring.TraceScreenRay(xs,ys,true,false)
	if pos then
		local x2,y2,z2=unpack(pos)
		if math.sqrt((x2-x1)^2+(y2-y1)^2+(z2-z1)^2)>30 then
			return true
		end
	else
		return nil
	end
	return false
end

function IsxzTerrainHidden(x1,z1)
	return IsTerrainHidden(x1,Spring.GetGroundHeight(x1,z1),z1)
end

function gadget:DrawWorldPreUnit()
	if (not Spring.GetMapOptions()) or (not Spring.GetMapOptions()["palladium_draw_ground_quad"]) or (Spring.GetMapOptions()["palladium_draw_ground_quad"]=="1") or (Spring.GetMapOptions()["palladium_draw_ground_quad"]=="2") then
		local per_square = (Spring.GetMapOptions() and Spring.GetMapOptions()["palladium_draw_ground_quad"] and Spring.GetMapOptions()["palladium_draw_ground_quad"]=="2")
		if SYNCED.PalladiumMap then
			gl.ResetState()
			gl.Texture("maps/32x32kpybs.png")
			-- After synced -> unsynced the table # is zero
			-- and ipair doesn't find any element
			-- which is why sipairs must be used
			for _,a in sipairs(SYNCED.PalladiumMap.ReTexturedAreaList) do
				if Spring.IsAABBInView(a.x1,Spring.GetGroundHeight(a.x1,a.z1),a.z1,a.x2,Spring.GetGroundHeight(a.x2,a.z2),a.z2) then
					if IsxzTerrainHidden(a.x1,a.z1) or IsxzTerrainHidden(a.x1,a.z2) or IsxzTerrainHidden(a.x2,a.z1) or IsxzTerrainHidden(a.x2,a.z2) then
						if per_square then
							for x=a.x1+32,a.x2,32 do
								for z=a.z1+32,a.z2,32 do
									if IsxzTerrainHidden(x-32,z-32) or IsxzTerrainHidden(x-32,z) or IsxzTerrainHidden(x,z-32) or IsxzTerrainHidden(x,z) then
										gl.DepthTest(true)
									else
										gl.DepthTest(false)
									end
									gl.DrawGroundQuad(x-32,z-32,x,z,true,0,0,1,1)
								end
							end
						else
							gl.DepthTest(true)
							gl.DrawGroundQuad(a.x1,a.z1,a.x2,a.z2,true,a.u1,a.v1,a.u2,a.v2)
						end
					else
						gl.DepthTest(false)
						gl.DrawGroundQuad(a.x1,a.z1,a.x2,a.z2,true,a.u1,a.v1,a.u2,a.v2)
					end
				end
			end
			gl.Texture(false)
			gl.DepthTest(false)
		end
	end
end

end