Module:Sandbox/BrandonXLF/1: Difference between revisions

Revision as of 03:13, 22 June 2022

Revision as of 14:52, 22 June 2022

Line 1:

local mDate = require('Module:Date')

local Date = mDate._Date

local p = {}

local monthsAbbr = {

'Jan',

'Feb',

'Mar',

'Apr',

'May',

'Jun',

'Jul',

'Aug',

'Sep',

'Oct',

'Nov',

'Dec'

}

local months = {

'January',

'February',

'March',

'April',

'May',

'June',

'July',

'August',

'September',

'October',

'November',

'December'

}

local function getMaxDay(month, year)

local maxDay

if month == 1

or month == 3

or month == 5

or month == 7

or month == 8

or month == 10

or month == 12

then

maxDay = 31

elseif month == 2 then

if year % 400 == 0 then

maxDay = 29

elseif year % 100 == 0 then

maxDay = 28

elseif year % 4 == 0 then

maxDay = 29

else

maxDay = 28

end

else

maxDay = 30

end

return maxDay

end

local function incrementDate(date)

date.day = date.day + 1

if date.day > date.maxDay then

date.day = 1

date.month = date.month + 1

date.maxDay = getMaxDay(date.month, date.year)

if date.month > 12 then

date.month = 1

date.year = date.year + 1

end

end

end

local function createDate(year, month, day)

return {

day = day,

maxDay = getMaxDay(month, year),

month = month,

year = year

}

end

function p.main()

local currentDate = Dateos.date('currentdate!*t')

local date = DatecreateDate('12010, December12, 2010'1)

local out = '<table>'

local currentMonth

local currentYear

while date ~= currentDatetrue do

if date.year > currentDate.year then

break

end

if date.year == currentDate.year

and date.month > currentDate.month

then

break

end

if date.year == currentDate.year

and date.month == currentDate.month

and date.day > currentDate.day

then

break

end

if date.year ~= currentYear then

out = out .. '</td></tr></table><h2>' .. date.year .. '</h2><table>'

Line 16 ⟶ 114:

end

if date.monthabbrmonth ~= currentMonth then

out = out .. '</td></tr><tr><th scope="row" style="text-align:left;">' .. monthsAbbr[date.monthabbrmonth] .. '</th><td>'

currentMonth = date.monthabbrmonth

end

local dateString = date.year .. ' ' .. months[date.month] .. ' ' .. date.day

out = out .. '[[Wikipedia:Main Page history/' .. date:text('%Y %B %-d') .. '|' .. date:text('%-d') .. ']]' .. '/[[Wikipedia:Main Page history/' .. date:text('%Y %B %-d') .. 'b|b]] '

out = out .. '[[Wikipedia:Main Page history/' .. dateString .. '|' .. date.day .. ']]' .. '/[[Wikipedia:Main Page history/' .. dateString .. 'b|b]] '

incrementDate(date)

date = date + 1

end