-- Module to build tables for standings in Sports

-- See documentation for details



require('strict')



local p = {}



-- Main function

function p.main(frame)

	-- Declare locals

	local getArgs = require('Module:Arguments').getArgs

	local Args = getArgs(frame, {parentFirst = true})

	local ii_start, ii_end, N_rows_res = 0

	local text_field_result

	local notes_exist = false

	local t = {}

	local t_footer = {}

	local t_return = {}

	local team_list = {}

	local jj, jjj

	local table_anchor = mw.ustring.gsub(Args'section' and 'sports-table-' .. Args'section' or '', ' ', '_')

	

	-- Exit early if we are using section transclusion for a different section

	local tsection = frame:getParent().args'transcludesection' or frame:getParent().args'section' or ''

	local bsection = frame.args'section' or ''

	if( tsection ~= '' and bsection ~= '' ) then

		if( tsection ~= bsection ) then

			return ''

		end

	end



	local templatestyles = frame:extensionTag{

		name = 'templatestyles', args = { src = 'Module:Sports table/styles.css' }

	}

	

	-- Edit links if requested

	local baselink = frame:getParent():getTitle()

	if baselink == 'Module:Excerpt' then baselink = '' end

	if mw.title.getCurrentTitle().text == baselink then	baselink = '' end

	local template_name = (baselink ~= '' and (':' .. baselink .. (table_anchor ~= '' and '#' .. table_anchor or '')))

		or ''



	-- Get the custom start point for the table (most will start by default at 1)

	local top_pos = tonumber(Args'highest_pos']) or 1

	-- Get the custom end point for the table (unrestricted if bottom_pos is < top_pos)

	local bottom_pos = tonumber(Args'lowest_pos']) or 0

	local N_teams = top_pos - 1 -- Default to 0 at start, but higher number needed to skip certain entries

	

	-- Load modules

	local yesno = require('Module:Yesno')

	-- Load style and (sub) modules

	local style_def = Args'style' or 'WDL'

	-- Historically 'football' exists as style, this is now forwarded to WDL

	if style_def == 'football' then style_def = 'WDL' end

	local p_style = require('Module:Sports table/'..style_def)

	local p_sub = require('Module:Sports table/sub')

	

	-- Random value used for uniqueness

	math.randomseed( os.clock() * 10^8 )

	local rand_val = math.random()

	

	-- Declare colour scheme

	local result_col = {}

	result_col = {green1='#BBF3BB', green2='#CCF9CC', green3='#DDFCDD', green4='#EEFFEE',

		blue1='#BBF3FF', blue2='#CCF9FF', blue3='#DDFCFF', blue4='#EEFFFF',

		yellow1='#FFFFBB', yellow2='#FFFFCC', yellow3='#FFFFDD', yellow4='#FFFFEE',

		red1='#FFBBBB', red2='#FFCCCC', red3='#FFDDDD', red4='#FFEEEE',

		black1='#BBBBBB', black2='#CCCCCC', black3='#DDDDDD', black4='#EEEEEE',

		orange1='#FEDCBA', orange2='#FEEAD5',

		white1='inherit',[''='inherit'

	}

	

	-- Show all stats in table or just matches played and points

	local full_table = true

	local hide_results = yesno(Args'hide_results' or 'no')

	local hide_footer = yesno(Args'hide_footer' or 'no')

	local pld_pts_val = string.lower(Args'only_pld_pts' or 'no')

	local show_class_rules = yesno(Args'show_class_rules' or 'yes') and true or false

	-- True if par doesn't exist, false otherwise

	if yesno(pld_pts_val) then

		full_table = false

	elseif pld_pts_val=='no_hide_class_rules' then

		full_table = true

		show_class_rules = false

	end

	

	-- Declare results column header

	local results_header = {}

	results_header = {Q='Qualification', QR='Qualification or relegation',

		P='Promotion', PQR='Promotion, qualification or relegation',

		PR='Promotion or relegation', PQ='Promotion or qualification', 

		R='Relegation'}

	local results_defined = false -- Check whether this would be needed

	-- Possible prefix for result fields

	local respre = (Args'result_prefix' or '') .. '_'

	respre = (respre == '_') and '' or respre

	-- Now define line for column header (either option or custom)

	local local_res_header = results_headerArgsrespre..'res_col_header']] or Argsrespre..'res_col_header'  or ''

	-- Check whether it includes a note

	local res_head_note = Args'note_header_res'

	local res_head_note_text = ''

	if full_table and res_head_note then

		notes_exist = true

		res_head_note_text = frame:expandTemplate{ title = 'efn', args = { group='lower-alpha',  res_head_note} }

	end

	local results_header_txt = '! scope="col" |'..local_res_header..res_head_note_text..'\n'

	

	-- Get status option

	local t_status = p_style.status(Args)

	

	-- Alternative syntax for team list

	if Args'team_order' and Args'team_order' ~= '' then

		local team_order_offset = (tonumber(Args'team_order_start']) or 1) - 1

		local tlist = mw.text.split(Args'team_order'], '%s*[;,]%s*')

		for k, tname in ipairs(tlist) do

			if tname ~= '' then

				Args'team' .. (k + team_order_offset)] = tname

			end

		end

	end

	

	-- Read in number of consecutive teams (ignore entries after skipping a spot)

	while Args'team'..N_teams+1 ~= nil and (bottom_pos < top_pos or N_teams < bottom_pos) do

		N_teams = N_teams+1

		-- Sneakily add it twice to the team_list parameter, once for the actual

		-- ranking, the second for position lookup in sub-tables

		-- This is possible because Lua allows both numbers and strings as indices.

		team_listN_teams = Args'team'..N_teams -- i^th entry is team X

		team_listArgs'team'..N_teams]] = N_teams -- team X entry is position i

	end



	-- Optional totals

	local total_row_name = 'SPORTS_TABLE_TOTAL'

	if yesno(Args'show_totals' or 'no') then

		N_teams = N_teams+1

		Args'team' .. N_teams = total_row_name

		Args'name_' .. total_row_name = 'Total'

		Args'result' .. N_teams = total_row_name

		Args'col_' .. total_row_name = '#eee'

		team_listN_teams = Args'team' .. N_teams

		team_listArgs'team'..N_teams]] = N_teams

	end



	-- Show position

	local position_col = yesno(Args'show_positions' or 'yes') and true or false

	

	-- Show groups or note

	local group_col = yesno(Args'show_groups' or 'no') and true or false



	-- Show match_table or not

	local match_table = yesno(Args'show_matches' or 'no') and true or false

	local p_matches = match_table and 

		(style_def == 'Chess' and require('Module:Sports results/'..style_def) or require('Module:Sports results'))

	

	-- Custom position column label or note

	local pos_label = Args'postitle' or '<abbr title="Position">Pos</abbr>'

	if position_col == false then pos_label = nil end

	

	-- Show status or not

	local show_status = yesno(Args'show_status' or 'yes') and true or false



	-- Get VTE button text (but only for non-empty text)

	local VTE_text = ''

	if (template_name ~= '') then

		VTE_text = require('Module:Navbar')._navbar({

			template_name,

			mini=1,

			style='float:right',

			brackets=1

		})

		

		-- remove the next part if https://en.wikipedia.org/?oldid=832717047#Sortable_link_disables_navbar_links?

		-- is ever fixed

		if yesno(Args'sortable_table' or 'no') then

			VTE_text = mw.ustring.gsub(VTE_text, '<%/?abbr[^<>]*>', ' ')

		end

	end

	

	-- Add source to title if specified and possible

	local title_source = false

	if Args'title' and Args'title_source' then

		Args'title' = Args'title' .. Args'title_source'

		title_source = true

	elseif Args'table_header' and Args'table_header_source' then

		Args'table_header' = Args'table_header' .. Args'table_header_source'

		title_source = true

	end



	-- Add a table anchor

	if table_anchor ~= '' then

		table.insert(t, '<span class="anchor" id="' .. table_anchor .. '"></span>\n')

	end



	-- Write column headers

	t_return = p_style.header(t,Args,p_sub,pos_label,group_col,VTE_text,full_table,results_header_txt)

	if match_table then

		-- Add empty column header

		t_return.count = t_return.count+1

		table.insert(t_return.tab_text,'! scope="row" class="unsortable" style="background-color:white;border-top:white;border-bottom:white;line-width:3pt;"| \n')

		

		-- Add rest of header

		t_return = p_matches.header(t_return,Args,p_sub,N_teams,team_list,tonumber(Args'legs']) or 1)

	end

	t = t_return.tab_text

	local N_cols = t_return.count

	

	-- Determine what entries go into table

	-- Find out which team to show (if any)

	local ii_show = team_listArgs'showteam' or nil -- nil if non-existant

	-- Start and end positions to show

	local n_to_show = tonumber(Args'show_limit']) or N_teams

	-- Check for "legal value", if not legal (or non declared), then show all

	local check_n = ((n_to_show>=(N_teams-top_pos+1)) or (n_to_show<=1) or (n_to_show~=math.floor(n_to_show)))

	-- Also check whether there is a valid ii_show

	if check_n or (not ii_show) then

		ii_start = top_pos

		ii_end = N_teams

	else

		-- It's a proper integer between top_pos+1 and N_teams-1

		-- If it is in the middle show the same number above and below

		-- If it is in the top or bottom, show the exact number

		-- How many to show on the side

		local n_show_side = math.floor(n_to_show/2)

		if (ii_show-top_pos+1)<=n_show_side then

			-- Top team

			ii_start = top_pos

			ii_end = top_pos+n_to_show-1

		elseif ii_show>=(N_teams+1-n_show_side) then

			-- Bottom team

			ii_start = N_teams+1-n_to_show

			ii_end = N_teams

		else

			-- Normal case

			ii_start = ii_show-n_show_side

			ii_end = ii_show+n_show_side

		end

	end

	

	-- For results column

	local new_res_ii = ii_start

	-- Pre-check for existence of column

	if not hide_results then

		for ii = ii_start, ii_end do

			if Argsrespre..'result'..ii and Argsrespre..'text_' .. Argsrespre..'result'..ii]] then results_defined = true end

		end

	end

	-- Remove results header if it is unused

	if full_table and not results_defined then

		-- First get it as one string, then use string replace to replace that header by empty string

		local t_str = tostring(table.concat(t))

		t_str = mw.ustring.gsub( t_str, results_header_txt, '' )

		N_cols = N_cols-1 -- There is actually one column less

		t = {}

		table.insert(t, t_str)

	end

	

	-- Write rows

	local team_name, team_code_ii, team_code_jj, pos_num, group_txt, note_local

	local note_string, note_local, note_local_num, note_id

	local note_id_list = {}

	local hth_id_list = {}

	for ii = ii_start, ii_end do

		-- First get code

		team_code_ii = team_listii

		-- Now read values

		pos_num = Args'pos_'..team_code_ii			or ii

		group_txt = Args'group_'..team_code_ii		or ' '

		team_name = Args'name_'..team_code_ii		 	or team_code_ii

		note_local = Args'note_'..team_code_ii 		or nil

		

		-- Does it need a promotion/qualification/relegation tag

		local result_local = Argsrespre..'result'..ii or nil

		local bg_col = nil

		-- Get local background colour

		if result_local then

			bg_col = result_colArgsrespre..'col_'..result_local]] or Argsrespre..'col_'..result_local or 'inherit'

            if bg_col == 'inherit' then bg_col = bg_col .. '; color: inherit' end

			bg_col = 'background-color:'..bg_col..';' 	-- Full style tag

		end

		if not bg_col then bg_col = 'background-color:transparent; color: inherit;' end -- Becomes default if undefined

		

		-- Bold this line or not

		local ii_fw = ii == ii_show and 'font-weight: bold;' or 'font-weight: normal;'

		if yesno(Args'show_totals' or 'no') and team_code_ii == total_row_name then

			ii_fw = 'font-weight: bold;'

		end

		

		-- Check whether there is a note or not, if so get text ready for it

		if note_local and full_table then

			-- Set global check for notes to true

			notes_exist = true

			-- There are now 3 options for notes

			-- 1) It is a full note

			-- 2) It is a referal to another note (i.e. it's just a team code; e.g. note_AAA=Text, note_BBB=AAA) in which the note for BBB should link to the same footnote as AAA, with

			-- 2a) The other linked note exist in the part of the table shown

			-- 2b) The part of the note does not exist in the part of the table shown

			if not Args'note_'..note_local then

				-- Option 1

				-- Now define the identifier for this

				note_id = '"table_note_'..team_code_ii..rand_val..'"' -- Add random end for unique ID if more tables are present on article (which might otherwise share an ID)

				note_id_listteam_code_ii = note_id

				

				-- Call refn template

				note_string = frame:expandTemplate{ title = 'efn', args = { group='lower-alpha',  name=note_id, note_local} }

			else 

				-- Option 2

				-- It is option 2a in either one if either the main note is inside the sub-table

				--                                  or another ref to that note is inside the sub-table

				-- Basically when it either has been defined, or the main link will be in the table

				note_local_num = team_listnote_local

				if note_id_listnote_local or ((note_local_num >= ii_start) and (note_local_num <= ii_end)) then

					-- Option 2a

					note_id = '"table_note_'..note_local..rand_val..'"'

					note_string = frame:extensionTag{ name = 'ref', args = { group = 'lower-alpha', name = note_id} }

				else

					-- Option 2b

					-- Now define the identifier for this

					note_id = '"table_note_'..note_local..rand_val..'"' -- Add random end for unique ID

					note_id_listnote_local = note_id

					

					-- Call refn template

					note_string = frame:expandTemplate{ title = 'efn', args = { group='lower-alpha',  name=note_id, Args'note_'..note_local]} }

				end

			end

		else

			note_string = '';

		end

		

		-- Insert status when needed

		local status_string = ''

		local status_local = show_status and Argsrespre .. 'status_'..team_code_ii or nil

		local status_let_first = true

		local curr_letter

		-- Only if it is defined

		if status_local then

			-- Take it letter by letter

			for jjj = 1,mw.ustring.len(status_local) do

				curr_letter = mw.ustring.upper(mw.ustring.sub(status_local,jjj,jjj))

				-- See whether it exist

				if t_status.codecurr_letter then

					-- Depending on whether it is the first letter of not

					if status_let_first then

						status_string = curr_letter

						t_status.calledcurr_letter = true

						status_let_first = false

					else

						status_string = status_string..', '..curr_letter

						t_status.calledcurr_letter = true

					end

				end

			end

			-- Only add brackets/dash and bolding if it exist

			if not status_let_first then 

				if t_status.position == 'before' then

					status_string = '<span style="font-weight:bold">'..string.lower(status_string)..' &ndash;</span> ' 

				else

					status_string = ' <span style="font-weight:bold">('..status_string..')</span>' 

				end

			end

		end

		

		-- Now build the rows

		if yesno(Args'show_totals' or 'no') and team_code_ii == total_row_name then

			table.insert(t,'|- class="sortbottom"\n')											-- New row

		else

			table.insert(t,'|- \n')																-- New row

		end

		if position_col then

			table.insert(t,'| style="text-align: center;'..ii_fw..bg_col..'"| '..pos_num..'\n')	-- Position number

		end

		if full_table and group_col then

			table.insert(t,'| style="'..ii_fw..bg_col..'" |'..group_txt..'\n') 							-- Group number/name

		end

		-- Build the team string order based on status position

		local team_string

		if t_status.position == 'before' then

			team_string = status_string..team_name..note_string

		else

			team_string = team_name..note_string..status_string

		end

		table.insert(t,'! scope="row" style="text-align: left; white-space:nowrap;'..ii_fw..bg_col..'"| '..team_string..'\n')-- Team (with possible note)

		-- Call to subfunction

		t_return = p_style.row(frame,t,Args,p_sub,notes_exist,hth_id_list,full_table,rand_val,team_list,team_code_ii,ii_start,ii_end,ii_fw,bg_col,N_teams,ii,ii_show)

		t = t_return.t

		notes_exist = t_return.notes_exist

		hth_id_list = t_return.hth_id_list

		

		-- Now check what needs to be added inside the results column

		if full_table then

			local res_jjj

			if ii == new_res_ii then

				-- First check how many rows you need for this

				N_rows_res = 1

				jjj = ii+1

				result_local = Argsrespre..'result'..ii or ''

				local cont_loop = true

				while (jjj<=ii_end) and cont_loop do

					if Args'split'..tostring(jjj-1)] then

						cont_loop = false

						new_res_ii = jjj

					else

						res_jjj = Argsrespre..'result'..jjj or ''

						if result_local == res_jjj then 

							N_rows_res = N_rows_res+1 

						else

							cont_loop = false

							new_res_ii = jjj

						end

					end

					jjj = jjj+1

				end

				-- Now create this field (reuse ii_fw and bg_col)

				-- Bold (if in range) or not

				if ii_show and (ii_show>=ii) and (ii_show<=(ii+N_rows_res-1)) then

					ii_fw = 'font-weight: bold;'

				else

					ii_fw = 'font-weight: normal;'

				end

				-- Get background colour

				bg_col = nil

				if Argsrespre..'result'..ii then

					bg_col = result_colArgsrespre..'col_'..result_local]] or Argsrespre..'col_'..result_local or 'inherit'

					if bg_col == 'inherit' then bg_col = bg_col .. '; color: inherit' end

					bg_col = 'background-color:'..bg_col..';' 	-- Full style tag

				end

				if not bg_col then bg_col = 'background-color:transparent; color: inherit;' end -- Becomes default if undefined

				-- Check for notes

				local note_res_string, note_ref, note_text = '', '', ''

				if Args'note_res_'..result_local then

					notes_exist = true

					local note_res_local = Args'note_res_'..result_local

					

					-- Split the note_res_local into a table if all the entries are valid

					local multiref = 1

					local note_res_local_table = mw.text.split(note_res_local, '%s*,%s*')

					if (#note_res_local_table > 1) then

						for k, note_res_loc in ipairs(note_res_local_table) do

							multiref = multiref * (Args'note_res_' .. note_res_loc and 1 or 0)

						end

					else

						multiref = 0

					end



					-- Split failed, so make a single entry table with hth_local inside

					if multiref < 1 then

						note_res_local_table = { note_res_local }

					end



					for k,note_res_local in ipairs(note_res_local_table) do

						if not Args'note_res_'..note_res_local then

							-- It does not point to another result note

							note_ref = respre..'res_'..result_local

							note_id = '"table_note_res_'..result_local..rand_val..'"' -- Identifier

							note_text = note_res_local

						else

							-- It does point to another result note

							note_ref = respre..'res_'..note_res_local

							note_id = '"table_note_res_'..note_res_local..rand_val..'"' -- Identifier

							note_text = Args'note_res_'..note_res_local

						end

						-- Check whether it is already printed

						if not note_id_listnote_ref then

							-- Print it

							note_id_listnote_ref = note_id

							note_res_string = note_res_string .. frame:expandTemplate{ title = 'efn', args = { group='lower-alpha',  name=note_id, note_text} }

						else

							-- Refer to it

							note_res_string = note_res_string .. frame:extensionTag{ name = 'ref', args = { group = 'lower-alpha', name = note_id} }

						end

					end

				end

				-- Get text

				local text_result = Argsrespre..'text_'..result_local or ''

				if text_result:match('fbmulticomp') then

					ii_fw = 'padding:0;' .. ii_fw

					if text_result:match('fbmulticompefn') then

						notes_exist = true

					end

				end

				text_field_result = '| style="'..ii_fw..bg_col..'" rowspan="'..tostring(N_rows_res)..'" |'..text_result..note_res_string..'\n'

				-- See whether it is needed (only when blank for all entries)

				if results_defined then table.insert(t,text_field_result) end

			end

		end

	

		-- Insert match row if needed

		if match_table then

			local legs = tonumber(Args'legs']) or 1

			-- Add empty cell

			table.insert(t,'| style="background-color:white;border-top:white;border-bottom:white;"| \n')

			

			-- Now include note to match results if needed 

			for jj=top_pos,N_teams do

				team_code_jj = team_listjj

				if ii == jj then

					-- Nothing

				else

					for l=1,legs do

						local m = (legs == 1) and 'match_' or 'match' .. l .. '_'

						local match_note = Argsm..team_code_ii..'_'..team_code_jj..'_note'

						if match_note then

							notes_exist = true

							-- Only when it exist

							-- First check for existence of reference for note

							if not (Args'note_'..match_note or Argsm..match_note..'_note']) then

								-- It's the entry

								note_id = '"table_note_'..team_code_ii..'_'..team_code_jj..rand_val..'"' -- Add random end for unique ID if more tables are present on article (which might otherwise share an ID)

								note_id_listteam_code_ii..'_'..team_code_jj = note_id

								

								note_string = frame:expandTemplate{ title = 'efn', args = { group='lower-alpha', name=note_id,  match_note} }

							else 

								-- Check for existence elsewhere

								note_local_num = team_listmatch_note or ii_end + 1

								if note_id_listmatch_note or ((note_local_num >= ii_start) and (note_local_num <= ii_end)) then

									-- It exists

									note_id = '"table_note_'..match_note..rand_val..'"' -- Identifier

									note_string = frame:extensionTag{ name = 'ref', args = { group = 'lower-alpha', name = note_id} }

								else

									-- Now define the identifier for this

									note_id = '"table_note_'..match_note..rand_val..'"' -- Add random end for unique ID

									note_id_listmatch_note = note_id

									-- Call refn template

									note_string = frame:expandTemplate{ title = 'efn', args = { group='lower-alpha', name=note_id, Args'note_'..match_note]} }

								end

							end



							-- Now append this to the match result string

							Argsm..team_code_ii..'_'..team_code_jj = (Argsm..team_code_ii..'_'..team_code_jj or '')..note_string

						end

					end

				end

			end

			

			-- Add rest of match row

			t = p_matches.row(t,Args,N_teams,team_list,ii,ii_show,legs)

		end

	

		-- Now, if needed, insert a split (solid line to indicate split in standings, but only when it is not at the last shown position)

		if Args'split'..ii and (ii<ii_end) then

			-- Base size on N_cols (it needs 2*N_cols |)

			table.insert(t,'|- style="background-color:'..result_col'black1'..'; line-height:3pt;"\n')

			table.insert(t,string.rep('|',2*N_cols)..'\n')

		end

	end

	

	-- Close table

	table.insert(t, '|}')

	

	-- Get info for footer

	local update = Args'update'			or 'unknown'

	local start_date = Args'start_date' 	or 'unknown'

	local source = Args'source'			or (title_source == true and '')

		or frame:expandTemplate{ title = 'citation needed', args = { reason='No source parameter defined', date=os.date('%B %Y') } }

	local class_rules = Args'class_rules'	or nil

	

	-- Create footer text

	-- Date updating

	local matches_text = Args'matches_text' or 'match(es)'

	if string.lower(update)=='complete' or hide_footer then

		-- Do nothing

	elseif update=='' then

		-- Empty parameter

		table.insert(t_footer,'Updated to '..matches_text..' played on unknown. ')

	elseif string.lower(update)=='future' then

		-- Future start date

		table.insert(t_footer,'First '..matches_text..' will be played: '..start_date..'. ')

	else

		table.insert(t_footer,'Updated to '..matches_text..' played on '..update..'. ')

	end

	

	-- Stack footer or not

	local footer_break = yesno(Args'stack_footer' or 'no') and true or false

	

	-- Variable for linebreak

	local stack_string = '<br>'

	

	if footer_break and (not (string.lower(update)=='complete')) and not hide_footer then table.insert(t_footer,stack_string) end

	

	if source ~= '' and not hide_footer then

		table.insert(t_footer,'Source: '..source)

	end

	if class_rules and full_table and show_class_rules and not hide_footer then

		if (#t_footer > 0) then table.insert(t_footer,'<br>') end

		table.insert(t_footer,'Rules for classification: '..class_rules)

	end

	

	-- Now for the named status

	local status_exist = false

	local status_string = ''

	local curr_letter

	for jjj = 1,mw.ustring.len(t_status.letters) do

		curr_letter = mw.ustring.upper(mw.ustring.sub(t_status.letters,jjj,jjj))

		if t_status.calledcurr_letter then

			if (footer_break and status_exist) then

				status_string = status_string..stack_string

			end

			if t_status.position == 'before' then

				status_string = status_string..'<span style="font-weight:bold">'..string.lower(curr_letter)..' &ndash;</span> '..t_status.codecurr_letter..'; '

			else

				status_string = status_string..'<span style="font-weight:bold">('..curr_letter..')</span> '..t_status.codecurr_letter..'; '

			end

			status_exist = true

		end

	end

	-- Now if it contains entries the '; ' needs to be removed

	if status_exist and not hide_footer then

		if (#t_footer > 0) then table.insert(t_footer,'<br>') end

		status_string = mw.ustring.sub(status_string,1,mw.ustring.len(status_string)-2)

		table.insert(t_footer,status_string)

	end

	

	-- Add notes (if applicable)

	if notes_exist then

		if (#t_footer > 0) then table.insert(t_footer,'<br>') end

		table.insert(t_footer,'Notes:')

		-- As reflist size text

		t_footer = '<div class="sports-table-notes">'..table.concat(t_footer)..'</div>'

		t_footer = t_footer..frame:expandTemplate{ title = 'notelist', args = { group='lower-alpha'} }

	else

		-- As reflist size text

		t_footer = '<div class="sports-table-notes">'..table.concat(t_footer)..'</div>'

	end

	

	-- Add footer to main text table

	table.insert(t,t_footer)

	

	-- Rewrite anchor links

	for k=1,#t do

		if tk]:match('%[%[#[^%[%]]*%|') then

			tk = mw.ustring.gsub(tk], '(%[%[)(#[^%[%]]*%|)', '%1' .. baselink .. '%2')

		end

	end

	

	-- Generate tracking

	if not Args'notracking' then

		local getTracking = require('Module:Sports table/argcheck').check

		local warning_categories, tracking_categories = getTracking(Args, frame:getParent().args)

		if #warning_categories > 0 then

			if frame:preprocess( "{{REVISIONID}}" ) == "" then

				for k=1,#warning_categories do

					warning_categoriesk = mw.ustring.gsub(warning_categoriesk], '^%[%[Category:Pages using sports table with (.*)|(.*)%]%]$', '<div style="color:red">Warning: %1 = %2</div>')

				end

			end

		end

		for k=1,#warning_categories do

				table.insert(t, warning_categoriesk])

		end

		for k=1,#tracking_categories do

				table.insert(t, tracking_categoriesk])

		end

		

		if(Args'showteam' == nil) then

			local getWarnings = require('Module:Sports table/totalscheck').check

			local total_warnings = getWarnings(Args, team_list, ii_start, ii_end)

			if #total_warnings > 0 then

				if frame:preprocess( "{{REVISIONID}}" ) == "" then

					for k=1,#total_warnings do

						table.insert(t, '<div style="color:green">Possible problem: ' .. total_warningsk .. '</div>')

					end

				end

			end

		end

	else

		table.insert(t, '[[Category:Pages using sports table with notracking]]')

	end

	

	if Args'float' then

		return frame:expandTemplate{ title = 'stack begin', args = {clear = 'true', margin = '1', float = Args'float']} }

			.. templatestyles .. '\n' .. table.concat(t) .. frame:expandTemplate{ title = 'stack end'}

	end



	return templatestyles .. '\n' .. table.concat(t)

end

 

return p