Module:WMSViewer

Cette page fait l’objet d’une mesure de semi-protection étendue.
Une page de Wikipédia, l'encyclopédie libre.

 Documentation[créer] [purger]
local Tools = require('Module:Outils')
local Geo = require("Module:Géoréférencement")
local p = {}


local function process(frame, zoom, url, site, typmap, version)
	local args = Tools.extractArgs(frame)
	local lat, lon = Geo.setCoord(args)
	local desc = args.desc or args.description or 'Visualisation'
	local url_coord = lon .. ',' .. lat
	local version = version or 'mapviewer'
	if version == 'mapviewer' then
		baseUrl = 'https://www.arcgis.com/apps/mapviewer/index.html?'
	elseif version == 'webmap' then
		baseUrl = 'https://www.arcgis.com/home/webmap/viewer.html?'
	end
	local header = '[' .. baseUrl .. typmap .. '=' .. url .. '&center='
	local url = header .. url_coord .. '&level=' .. zoom .. ' ' .. desc .. '] ' .. site .. Geo.footer(args['consulté le'])
	local url = Geo.noCoord(args) or url
	return url
end
	
function p.usgs(frame)
	local url = 'https://services.arcgisonline.com/arcgis/rest/services/USA_Topo_Maps/MapServer'
	local site = 'sur l\'[[Institut d\'études géologiques des États-Unis|USGS]].'
	return process(frame, 14, url, site, 'basemapUrl')
end

function p.IDEAndorra(frame)
	local args = Tools.extractArgs(frame)
	local scale = args.scale or args.echelle or 10000
	local site = 'sur le géoportail de l\'Andorre.'
	if tonumber(scale) == 25000 then
		local url = 'https://www.ideandorra.ad/Serveis/wmscarto25kraster_1989/wms?'
		return process(frame, 15, url, site, 'url')
	else
		local url = 'https://www.ideandorra.ad/Serveis/wms_10k2003raster/wms?'
		return process(frame, 16, url, site, 'url')
	end
end

return p