Jump to content

Module:Minor planet list link

Permanently protected module
From Wikipedia, the free encyclopedia
This is an old revision of this page, as edited by Tom.Reding (talk | contribs) at 17:58, 26 January 2025 (+preview warning recently added to Module:Minor planet meaning link by User:Hike395; -concat ws). The present address (URL) is a permanent link to this revision, which may differ significantly from the current revision.

local p = {}

function p.LoMP(frame)
	-- For calling from #invoke.
	local pframe = frame:getParent()
	local args = pframe.args
	return p._LoMP(args)
end

function p._LoMP(args)
	local link, result
	-- For calling from other Lua modules.
	local num = tonumber(args[1])
    if not num then
        local warning = require('Module:If preview')._warning
        return warning({'Non-numeric or missing asteroid number'})
    end
	local subsec = string.sub(tostring(num + 1000), -3)
	if (num <= 1000) then
		link = "List of minor planets: 1–1000#"..subsec
	else
		local pagefrom = math.floor((num - 1) / 1000)
		local pageto = pagefrom + 1
		link = "List of minor planets: "..pagefrom.."001–"..pageto.."000#"..subsec
	end
	if (args[2] == nil) then
		result = "[["..link.."]]"
	else
		result = "[["..link.."|"..args[2].."]]"
	end
	return result
end

return p