Module:WikidataCoords

Қолданылуы

Шақырғанда

{{wikidata-coords|Foo
|01 = Bar
|a = b
|c = d
}}

нәтижесі

{{Foo
|Bar
|a = b
|c = d
|lat_deg = <белгі>
|lat_min = <белгі>
|lat_sec = <белгі>
|lat_dir = <белгі>
|lon_deg = <белгі>
|lon_min = <белгі>
|lon_sec = <белгі>
|lon_dir = <белгі>
}}

---

local p = {};

-- Әдепкі қалпы бойынша дәлелдердің мағынасы
local defaultArgs = {
	['lat_deg'] = '',
	['lat_min'] = '0',
	['lat_sec'] = '0',
	['lat_dir'] = 'N',
	['lon_deg'] = '',
	['lon_min'] = '0',
	['lon_sec'] = '0',
	['lon_dir'] = 'E'
};

-- Аталған және сандық параметрлердің ара қатынасы
local argsMap = {
	'lat_deg',
	'lat_min',
	'lat_sec',
	'lat_dir',
	'lon_deg',
	'lon_min',
	'lon_sec',
	'lon_dir'
};

-- Уикимағлұматтан координаттар параметрін қосады
function p.execTplWithCoords( frame )
	local moduleWikidata = require( 'Module:Wikidata' );

	local pFrame = frame:getParent();
	local args = mw.clone( pFrame.args );
	setmetatable( args, nil );

	local template = mw.text.trim( args[1] );
	args[1] = nil;
	
	local coord = args['coord'] or nil;
	if coord == ''  then coord = nil end

	-- Шығудың форматы
	local outType = args[2]
	if outType then
		outType = mw.text.trim( outType );
	end

	-- 1 және 2 параметрді анықтау
	if args['01'] then
		args[1] = args['01'];
		args['01'] = nil;
	end
	if args['02'] then
		args[2] = args['02'];
		args['02'] = nil;
	end

	if not args.lat_deg or args.lat_deg == '' and not coord then
		-- Уикимағлұматтан координаттарды алу
		frame.args = {
			['property'] = 'p625',
			['plain'] = true
		};
		local coords = moduleWikidata.formatProperty( frame );
		coords = string.gsub( coords, ''', '\'' );
		coords = string.gsub( coords, '"', '"' );

		-- Басқа параметрлерден координаттардың өзгеруі
		coords = mw.text.split( coords, ', ', true );
		local lat = coords[1];
		local lon = coords[2];
		if lat and lat ~= '' then
			args.lat_deg = string.match( lat, '%d+°' );
			args.lat_min = string.match( lat, '%d+\'' );
			args.lat_sec = string.match( lat, '[0-9%.]+"' );
			args.lat_dir = string.match( lat, '[NS]' );
		end
		if lon and lon ~= '' then
			args.lon_deg = string.match( lon, '%d+°' );
			args.lon_min = string.match( lon, '%d+\'' );
			args.lon_sec = string.match( lon, '[0-9%.]+"' );
			args.lon_dir = string.match( lon, '[EW]' );
		end
	end

	-- Әдепкі қалпы бойынша белгілерді қою
	for name, value in pairs( defaultArgs ) do
	    if not args[name] or args[name] == '' then
	    	args[name] = value;
	    end
    	args[name] = mw.text.trim( args[name], '°\'" ' );
	end

	-- Егер параметр бос болса, үлгі шықпайды
	if (args.lat_deg == '' and args.lon_deg == '') and not coord then
		return '';
	end
	
	-- Егер де екінші параметрде шығу форматы көрсетілсе
	if outType and not coord then
		-- n-нен бастап параметрлердің нумерациясы
		if outType == '12345678' or outType == '23456789' or outType == '345678910' then
			local n = 0;
			if outType == '23456789' then
				n = 1;
			elseif outType == '345678910' then
				n = 2;
			end

			for i, name in ipairs( argsMap ) do
				args[i + n] = args[name];
				args[name] = nil;
			end
		end
		if outType == 'coord' then
			args['coord'] = args.lat_deg .. '/' .. args.lat_min .. '/' .. args.lat_sec .. '/' .. args.lat_dir .. '/' ..	args.lon_deg .. '/' ..	args.lon_min .. '/' .. args.lon_sec .. '/' .. args.lon_dir
		end
	end

	return frame:expandTemplate{ title = template, args = args };
end

return p;