پودمان:Coordinates: تفاوت میان نسخه‌ها

local current_page = mw.title.getCurrentTitle()

local page_name = mw.uri.encode( current_page.prefixedText, 'WIKI' );

--[[ Helper function, replacement for {{coord/display/title}} ]]

local l = "[[دستگاه مختصات جغرافیایی|مختصات]]: " .. s

local co = '<span id="coordinates">' .. l .. notes .. '</span>';

end

--[[ Helper function, Replacement for {{coord/display/inline}} ]]

local function displayinline(s, notes)

end

Usually geo-nondefault is hidden by CSS, unless a user has overridden this for himself

default is the mode as specificied by the user when calling the {{coord}} template

]]

local function displayDefault(default, mode)

default = "dec"

end

if default == mode then

return "geo-default"

Output formatter.  Takes the structure generated by either parseDec

]]

local function specPrinter(args, coordinateSpec)

if uriComponents == "" then

-- RETURN error, should never be empty or nil

end

if args["name"] then

uriComponents = uriComponents .. "&title=" .. mw.uri.encode(coordinateSpec["name"])

end

local geodmshtml = '<span class="geo-dms" title="نقشه‌ها، عکس‌های هوایی، و دیگر داده‌های این موقعیت">'

local lat = tonumber( coordinateSpec["dec-lat"] ) or 0

geodeclong = '<span dir="ltr">' .. (coordinateSpec["dec-long"] or 0) .. "°</span>شرقی"

end

local geodechtml = '<span class="geo-dec" title="نقشه‌ها، عکس‌های هوایی، و دیگر داده‌های این موقعیت">'

local geonumhtml = '<span class="geo">'

local inner = '<span class="' .. displayDefault(coordinateSpec["default"], "dms" ) .. '">' .. geodmshtml .. '</span>'

.. '<span class="' .. displayDefault(coordinateSpec["default"], "dec" ) .. '">';

if not args["name"] then

else

.. args["name"] .. '</span>)</span></span></span>'

end

end

--[[ Helper function, convert decimal to degrees and minutes ]]

coordinate = math_mod._round( coordinate * 60, 0 );

local m = coordinate % 60;

coordinate = math.floor( (coordinate - m) / 60 );

local d = '<span dir="ltr">' .. coordinate % 360 .."°</span>"

return d .. string.format( '<span dir="ltr">%02d′</span>', m )

end

end

]]

local function convert_dec2dms(coordinate, firstPostfix, secondPostfix, precision)

local minutes = tonumber(minutes_str) or 0

local seconds = tonumber(seconds_str) or 0

local factor = 1

if direction == "S" or direction == "W" then

factor = -1

end

local precision = 0

if seconds_str then

precision = math.max( math_mod._precision(degrees_str), 0 );

end

return string.format( "%." .. precision .. "f", decimal ) -- not tonumber since this whole thing is string based.

end

Checks input values to for out of range errors.

]]

table.insert(errors, {source, "درجه‌های طول جغرافیایی < ۰ با پرچم نیم‌کره"})

end

#coordinates is inconsistent about whether this is an error.  If globe: is

specified, it won't error on this condition, but otherwise it will.

For not simply disable this check.

if long_d > 180 then

table.insert(errors, {source, "درجه‌های طول جغرافیایی > ۱۸۰ با پرچم نیم‌کره"})

end

]]

if lat_d > 90 then

table.insert(errors, {source, "درجه‌های عرض جغرافیایی > ۹۰"})

table.insert(errors, {source, "ثانیه‌های طول جغرافیایی < ۰"})

end

return errors;

end

local coordinateSpec = {}

local errors = {}

if not long then

return nil, {{"parseDec", "طول جغرافیایی وارد نشده‌است"}}

return nil, {{"parseDec", "طول جغرافیایی نمی‌تواند به عنوان یک رقم تجزیه شود: " .. long}}

end

coordinateSpec["dec-lat"]  = lat;

coordinateSpec["dec-long"] = long;

local mode = coordinates.determineMode( lat, long );

coordinateSpec["dms-lat"]  = convert_dec2dms( lat, "شمالی", "جنوبی", mode)  -- {{coord/dec2dms|{{{1}}}|N|S|{{coord/prec dec|{{{1}}}|{{{2}}}}}}}

if format then

coordinateSpec.default = format

parseDMS

into the a structure to be used in displaying coordinates

]]

local function parseDMS( lat_d, lat_m, lat_s, lat_f, long_d, long_m, long_s, long_f, format )

local coordinateSpec, errors, backward = {}, {}

lat_f = lat_f:upper();

long_f = long_f:upper();

-- Check if specified backward

if lat_f == 'E' or lat_f == 'W' then

lat_d, long_d, lat_m, long_m, lat_s, long_s, lat_f, long_f, backward = long_d, lat_d, long_m, lat_m, long_s, lat_s, long_f, lat_f, true;

errors = validate( lat_d, lat_m, lat_s, long_d, long_m, long_s, 'parseDMS', true );

if not long_d then

return nil, {{"parseDMS", "طول جغرافیایی نمی‌تواند به عنوان یک رقم تجزیه شود:" .. long_d }}

end

if math_mod._precision( lat_d ) > 0 or math_mod._precision( long_d ) > 0 then

lat_d = '-' .. lat_d;

end

long_d = '-' .. long_d;

return parseDec( lat_d, long_d, format );

end

-- تابع زیر جهت فارسی‌کردن رشته‌های مربوط به شمال، غرب، جنوب، و شرق نوشته شده‌است.

local function persianChars(enChar)

end

end

coordinateSpec["dms-lat"]  = '<span dir="ltr">' .. lat_d.."°"..optionalArg(lat_m,"′") .. optionalArg(lat_s,"″") .. '</span>' .. persianChars(lat_f)

coordinateSpec["dms-long"] = '<span dir="ltr">' .. long_d.."°"..optionalArg(long_m,"′") .. optionalArg(long_s,"″") .. '</span>' .. persianChars(long_f)

else

coordinateSpec.default = "dms"

return coordinateSpec, errors, backward

end

Check the input arguments for coord to determine the kind of data being provided

and then make the necessary processing.

return table.concat(ret, '_')

end

if not args[1] then

-- no lat logic

if not result then

return errorPrinter(errors);

elseif dmsTest(args[4], args[8]) then

-- dms logic

args[5], args[6], args[7], args[8], args.format)

if args[10] then

elseif dmsTest(args[3], args[6]) then

-- dm logic

args[4], args[5], nil, args[6], args['format'])

if args[8] then

elseif dmsTest(args[2], args[4]) then

-- d logic

args[3], nil, nil, args[4], args.format)

if args[6] then

table.insert(errors, {'formatTest', 'پارامترهای اضافی غیر منتظره'})

if not result then

return errorPrinter(errors)

end

result.name = args.name

local extra_param = {'dim', 'globe', 'scale', 'region', 'source', 'type'}

for _, v in ipairs(extra_param) do

table.insert(errors, {'formatTest', 'پارامتر: «' .. v .. '=» باید «' .. v .. ':»' })

end

end

local ret = specPrinter(args, result)

if #errors > 0 then

Generate Wikidata tracking categories.

]]

local ret

if mw.wikibase and current_page.namespace == 0 then

if entity and entity.claims and entity.claims.P625 and entity.claims.P625[1] then

local snaktype = entity.claims.P625[1].mainsnak.snaktype

Usage:

{{#invoke:Coordinates | link }}

]]

function coordinates.link(frame)

Usage:

negative_suffix | precision }}

decimal_coordinate is converted to DMS format.  If positive, the positive_suffix

is appended (typical N or E), if negative, the negative suffix is appended.  The

return 'dms';

end

--[[

{{#invoke:Coordinates | dms2dec | direction_flag | degrees |

minutes | seconds }}

Converts DMS values specified as degrees, minutes, seconds too decimal format.

positive (i.e. N and E) or negative (i.e. S and W).

]]

{{#invoke:Coordinates | coord | lat | lat_flag | long | long_flag }}

...

configuration options.

Note: This function provides the visual display elements of {{coord}}.  In

function must also be called, this is done automatically in the Lua

version of {{coord}}.

coordinates.coord = makeInvokeFunc('_coord')

function coordinates._coord(args)

args[3] = args[1]; args[1] = nil

and entity.claims

and entity.claims.P625

then

local precision = entity.claims.P625[1].mainsnak.datavalue.value.precision

if precision then

end

end

end

-- پایان بومی‌سازی

local contents, backward = formatTest(args)

local Notes = args.notes or ''

return s:find('title') ~= nil or s == 't' or s == 'it' or s == 'ti'

end

local function coord_wrapper(in_args)

-- Calls the parser function {{#coordinates:}}.

return mw.getCurrentFrame():callParserFunction('#coordinates', in_args) or ''

end

local text = ''

if isInline(Display) then

text = text

.. displaytitle(contents, Notes)

end

if not args.nosave then

while count <= 9 do args[count] = (args[count] or ''); count = count+1 end

end

args.notes, args.format, args.display = nil

text = text .. coord_wrapper(args)

if frame.args[1] == '' or frame.args[2] == '' or not frame.args[2] then return nil end

frame.args[2] = mw.text.trim(frame.args[2])

if frame.args[2] == 'lat' or frame.args[2] == 'long' then

local result, negative = mw.text.split((mw.ustring.match(frame.args[1],'[%.%d]+°[NS] [%.%d]+°[EW]') or ''), ' ')

for i, v in ipairs(frame.args) do

if i ~= 1 then

frame.args[1] = mw.ustring.gsub(frame.args[1], '(params=.-)_? ', '%1_'..frame.args[i]..' ')

end

if not mw.ustring.find(frame.args[1], '<span class="vcard">') then

local namestr = frame.args.name

frame.args[1] = mw.ustring.gsub(frame.args[1], '(&params=[^&"<>%[%] ]*) ', '%1&title=' .. mw.uri.encode(namestr) .. ' ')

end