Module:TOC001/sandbox

Module documentationviewedithistorypurge

About

This TOC is meant for numbered lists of minor planets with 1000 entries, namely the List of minor planets and Meanings of minor planet names series.

To be functional for long lists, the list page must have anchors named "001", "101", "201", ..., "901". In a table, this can be done by adding id="001" to a cell's parameters. Outside of a table, this can be done by adding {{Anchor|001}}.

If a list contains only several entries (i.e. for pages containing minor planets numbered above 100,000), this TOC may still be used to navigate ± 5,000 entries in either direction, which is larger than {{MinorPlanetNameMeaningsFooter}}'s succession-box navigation of ± 1,000.

Usage

{{TOC001}}

See also

External link templates for minor planets

• {{AstDys}}
• {{DoMP}}
• {{ESA-SSA}}
• {{JA-BIN}}
• {{JPL}}
• {{JPL small body}}
• {{JPL+CAD}} (two links: JPL main page & "close approach data" section)
• {{LCDB}}
• {{Minor Planet Center}}
• {{NeoDys}}
• {{M+J}} (combines MPC & JPL templates)
• {{WGSBNB}} (bulletin of IAU's WGSBN)

Local link templates for minor planets and on related topics

• {{Minor planet list link}}
• {{Minor planet meaning link}}
• {{Obscode}} (observatory code)
• {{LoMP+M+J}} (combines LoMP, MPC, and JPL templates)
• {{Minor planets navigator}} (footer navbox in articles)

Link templates on Solar System features

• {{GPN}} (inline citations)
• {{WGPSN}} (external links)

Partial list templates (minor planets/meanings/named-MPs)

• Header
  • {{List of minor planets/intro}} (/core) (LoMP lead)
  • {{MinorPlanetNameMeaningsDisclaimer}} (MoMP lead)
  • {{TOC001}} (LoMP & MoMP page navigation)
  • {{TOC LONMP}} (LoNMP alphabetical navigation)
  • {{TOC LONMP2}} (LoNMP numerical navigation)
  • {{List of named minor planets by number header}} (LoNMP lead)
  • {{List of named minor planets by letter header}} (LoNMP lead)
• Body
  • {{List of minor planets/header2}} (LoMP wikitable)
  • {{MinorPlanetNameMeaningsTableHeader}} (MoMP wikitable)
  • {{List of unnumbered minor planets header}} (LoUMP wikitable)
  • {{List of minor planets interloper}} (LoMP wikitable)
  • {{Meanings of minor planet names description available}} (MoMP aid)
• Footer
  • {{List of minor planets/See also}} (LoMP)
  • {{MinorPlanetNameMeanings/See also}} (MoMP)
  • {{List of minor planets/footer}} (LoMP prev–next)
  • {{MinorPlanetNameMeaningsFooter}} (/core) (MoMP prev–next)
  • {{List of minor planets}} (LoMP collapsed navbox)
  • {{Meanings of minor-planet names}} (MoMP collapsed navbox)

The above documentation is transcluded from Module:TOC001/doc. (edit | history)
Editors can experiment in this module's sandbox (edit | diff) and testcases (create) pages.
Add categories to the /doc subpage. Subpages of this module.

local p = {}

function p.TOC001( frame )
	local title = mw.title.getCurrentTitle()
	local pn = title.text
	local pagebase = mw.ustring.match(pn, '^(List of minor planets: )%d') or
					 mw.ustring.match(pn, '^(Meanings of minor[ -]planet names: )%d') or
					 'testcase'
	local parent_from = mw.ustring.match(pn, '(%d+)–') or 0 --en dash; 1, 1001, 2001, ...
	local prefix = (parent_from - 1)/1000 --0, 1, 2, ...
	local left = parent_from - 5000 --left-most navigational 'from'; floor = 1
	local hlist, anchor
	local nav_upper, nav_lower = '', ''
	
	--testcase prep
	if pagebase == 'testcase' then --obsolete parameters allowed only on non-LoMP|MoMP pages
		local args = frame:getParent().args
		if mw.ustring.match(pn, '(TOC001)') or
		   mw.ustring.match(pn, '(MinorPlanetListFooter)')
		then
			args.prefix = 1
		end
		if args.prefix then
			prefix = args.prefix
			if prefix == 0 then parent_from = 1
			else parent_from = prefix..'001' end
			left = parent_from - 5000
			if args.meanings then
				pagebase = 'Meanings of minor planet names: '
			else
				pagebase = 'List of minor planets: '
			end
		else
			return '{{[[Template:TOC001|TOC001]]}} requires a <code>|prefix=</code> outside of [[LoMP]]/[[MoMP]]-space.'
		end
	end
	
	--hlist
	if pagebase == 'List of minor planets: ' then
		hlist = frame:expandTemplate{
					title = 'Hlist',
					args = { 
						'[[LoMP#Main index|Index]]',
						'[[LoMP#100K|100K]]',
						'[[LoMP#200K|200K]]',
						'[[LoMP#300K|300K]]',
						'[[LoMP#400K|400K]]',
						'[[LoMP#500K|500K]]',
						'[[LoMP#600K|600K]]',
						'[[List of minor planets#Orbital groups|color code]]',
					}
				}
	else --MoMP
		hlist = frame:expandTemplate{
					title = 'Hlist',
					args = { 
						'[[MoMP#Index|Index]]',
						'[[MoMP#100K|100K]]',
						'[[MoMP#200K|200K]]',
						'[[MoMP#300K|300K]]',
						'[[MoMP#400K|400K]]',
						'[[MoMP#500K|500K]]',
						'[[MoMP#600K|600K]]',
					}
				}
	end
	
	--TOC top
	local TOC_top = frame:expandTemplate{
						title = 'TOC top',
						args = { 
							align = 'center',
							title = '<div style="background-color: #eaecf0; margin-bottom: 8px; padding: 2px;">'..
							hlist..
							'</div>'
						}
					}
	
	--nav_upper
	if left < 1 then left = 1 end
	local i = 0
	while i <= 10 do
		local from = left   + 1000*i
		local to   = left-1 + 1000*(i+1)
		local sep = ' '
		if from < 1500 then sep = '-' end --TODO: RFM to the correct form
		pagebase = string.gsub(pagebase, '(minor)[ -](planet names)', '%1'..sep..'%2')
		nav_upper = nav_upper..'\n* [['..pagebase..from..'–'..to..'|'..
					mw.getContentLanguage():formatNum(from - 1)..'s]]'
		i = i + 1
	end
	
	--nav_lower
	i = 0
	while i <= 9 do
		anchor = i..'01' --001, 002, ...
		nav_lower = nav_lower..'\n* [[#'..anchor..'|'..
					mw.getContentLanguage():formatNum(tonumber(prefix..anchor))..'…]]'
		i = i + 1
	end
	
	--cleanup nav_ for lowest numbered pages (do this once after the whiles, instead of conditionals inside)
	nav_upper = string.gsub(nav_upper, '|0s]]',   '|1–1000]]')
	nav_lower = string.gsub(nav_lower, '|001…]]', '|1–100]]')
	
	--TOC bottom
	local TOC_bottom = frame:expandTemplate{ title = 'TOC bottom', args = {} }
	
	--concat all
	return TOC_top..nav_upper..'\n<hr />\n<div style="text-align: center">'..nav_lower..'\n</div>'..TOC_bottom
end

return p