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

local function setzoom(args)
	zoom = tonumber(args.zoom) or 1
	if zoom == 1 then
		delta = 10000
	elseif zoom == 2 then
		delta = 20000
	elseif zoom == 3 then
		delta = 40000
	end
	return delta
end

function p.nunagis(frame)
	local args = Tools.extractArgs(frame)
	local lat, lon = Geo.setRadCoord(args)
	local desc = args.desc or args.description or 'Visualisation'
	local X, Y = Geo.utm(lat, lon, 24) -- Projection UTM24N
	local delta = setzoom(args)
	local header = '[https://kort.nunagis.gl/portal/apps/webappviewer/index.html?id=3dbbe703d56c49b9821ebc6c16204ba6&hideLayers=Administrative_graenser_3493%3BKortportal_HoejdekurverKystlinje_3458%3BKortportal_TekniskGrundkort_542%3BByer_og_bygder_5692%3BByortofotos_og_teknisk_grundkort_6975%3BByortofotos_og_teknisk_grundkort_6975_13%3BByortofotos_og_teknisk_grundkort_6975_14%3BByortofotos_285%3BByortofotos_285_1%3BByortofotos_285_2%3Bwms_3248%3Bwms_7784%3Bwms_7784_Vandoplande%3Bwms_7784_Grid%3Bwms_7784_Marsk%3Bwms_7784_Graes%3Bwms_7784_Gletscher%3Bwms_7784_Permanent_sne%3Bwms_7784_Stenbrud%3Bwms_7784_Gletscherspalte%3Bwms_7784_Dyrket_areal%3Bwms_7784_Dump%3Bwms_7784_Bebygget_omraade_02%3Bwms_7784_Moraene%3Bwms_7784_Jordoverflade%3Bwms_7784_Overfladebeskrivelse%3Bwms_7784_baggrundskort%3Bwms_7784_Kurver%3Bwms_7784_Hytteforvaltning%3Bwms_7784_IKE1503_SPZ_A13%3Bwms_7784_ILQ1204_SPZ_A13%3Bwms_7784_ILU1200_SPZ_A13%3Bwms_7784_KLK1403_SPZ_A13%3Bwms_7784_NIA1501_SPZ_A13%3Bwms_7784_OQA1201_SPZ_A13%3Bwms_7784_QEQ1400_SPZ_A12%3Bwms_7784_QST1502_SPZ_A13%3Bwms_7784_SQQ1203_SPZ_A13%3Bwms_7784_UUM1500_SPZ_A14%3Bwms_7784_AAS1000_SPZ_A13%3Bwms_7784_AKU1003_SPZ_A12%3Bwms_7784_IKA1101_SPZ_A13%3Bwms_7784_KAT0900_SPZ_A13%3Bwms_7784_QAS1100_SPZ_A13%3Bwms_7784_KUL1804_SPZ_A13%3Bwms_7784_KUM1806_SPZ_A13%3Bwms_7784_SML1802_SPZ_A13%3Bwms_7784_TAS1800_SPZ_A13%3Bwms_7784_TIN1805_SPZ_A13%3Bwms_7784_ISO1803_SPZ_A13%3Bwms_7784_ALP0108_SPZ_A13%3Bwms_7784_AMS0106_SPZ_A12%3Bwms_7784_EQA0202_SPZ_A13%3Bwms_7784_IGA0302_SPZ_D03%3Bwms_7784_NAN0100_SPZ_A12%3Bwms_7784_QAQ0200_SPZ_A13%3Bwms_7784_QSM0204_SPZ_A13%3Bwms_7784_NRS0321_SPZ_A13%3Bwms_5319%3Bwms_5319_Ortofoto%3Bwms_5319_Grid%3Bwms_4818%3Bwms_4818_Bebygget_omraade'
	local url_coord = X-delta .. '%2C' .. Y .. '%2C' .. X+delta .. '%2C' .. Y .. '%2C32624'
	local url = header .. '&extent=' .. url_coord .. ' ' .. desc ..'] sur [https://nunagis-asiaq.hub.arcgis.com/ NunaGIS]' .. Geo.footer(args['consulté le'])
	local url = Geo.noCoord(args) or url
	return url
end

return p