Module:Module sandbox/sandbox
Appearance
![]() | This is the module sandbox page for Module:Module sandbox (diff). |
Usage
{{#invoke:Module sandbox|function_name}}
Example
{{#invoke:Module sandbox|main}}
yields:
Hello world!
Documentation
Package items
sandbox.hello_world(name)
(function)- Prints hello world
- Parameter:
name
Person to address (string) - Returns: hello world string
- TODO: make it say "Hello, [name]".
sandbox.main(frame)
(function)- Main entrypoint.
- Parameter:
frame
calling frame (table) - Returns: output wikitext
local p = {}
local m={}
local currentYear = tonumber(os.date("%Y"))
local function calculateAge(dateString)
local year = tonumber(dateString:match("%d+")) -- Extract the year from the date string
if year then
return currentYear - year .. " years old"
end
local success, parsedDate = pcall(function() return os.date("%Y", os.time{year=tonumber(dateString)}) end)
if success then
return currentYear - parsedDate .. " years old"
end
return dateString
end
--❗
-- Volume conversions
local function litersToGallons(liters)
local litersValue = tonumber(liters:match("%d+"))
if litersValue then
local gallons = litersValue * 0.264172
return string.format("%d liters (%.2f gallons)", litersValue, gallons)
end
return liters
end
local function gallonsToLiters(gallons)
local gallonsValue = tonumber(gallons:match("%d+"))
if gallonsValue then
local liters = gallonsValue * 3.78541
return string.format("%d gallons (%.2f liters)", gallonsValue, liters)
end
return gallons
end
local function cubicMetersToCubicFeet(cubicMeters)
local cubicMetersValue = tonumber(cubicMeters:match("%d+"))
if cubicMetersValue then
local cubicFeet = cubicMetersValue * 35.3147
return string.format("%d cubic meters (%.2f cubic feet)", cubicMetersValue, cubicFeet)
end
return cubicMeters
end
local function cubicFeetToCubicMeters(cubicFeet)
local cubicFeetValue = tonumber(cubicFeet:match("%d+"))
if cubicFeetValue then
local cubicMeters = cubicFeetValue * 0.0283168
return string.format("%d cubic feet (%.2f cubic meters)", cubicFeetValue, cubicMeters)
end
return cubicFeet
end
-- Area conversions
local function squareMetersToSquareFeet(squareMeters)
local squareMetersValue = tonumber(squareMeters:match("%d+"))
if squareMetersValue then
local squareFeet = squareMetersValue * 10.7639
return string.format("%d square meters (%.2f square feet)", squareMetersValue, squareFeet)
end
return squareMeters
end
local function squareFeetToSquareMeters(squareFeet)
local squareFeetValue = tonumber(squareFeet:match("%d+"))
if squareFeetValue then
local squareMeters = squareFeetValue * 0.092903
return string.format("%d square feet (%.2f square meters)", squareFeetValue, squareMeters)
end
return squareFeet
end
local function hectaresToAcres(hectares)
local hectaresValue = tonumber(hectares:match("%d+"))
if hectaresValue then
local acres = hectaresValue * 2.47105
return string.format("%d hectares (%.2f acres)", hectaresValue, acres)
end
return hectares
end
local function acresToHectares(acres)
local acresValue = tonumber(acres:match("%d+"))
if acresValue then
local hectares = acresValue * 0.404686
return string.format("%d acres (%.2f hectares)", acresValue, hectares)
end
return acres
end
-- Time conversions
local function hoursToMinutes(hours)
local hoursValue = tonumber(hours:match("%d+"))
if hoursValue then
local minutes = hoursValue * 60
return string.format("%d hours (%d minutes)", hoursValue, minutes)
end
return hours
end
local function minutesToHours(minutes)
local minutesValue = tonumber(minutes:match("%d+"))
if minutesValue then
local hours = minutesValue / 60
return string.format("%d minutes (%.2f hours)", minutesValue, hours)
end
return minutes
end
local function daysToHours(days)
local daysValue = tonumber(days:match("%d+"))
if daysValue then
local hours = daysValue * 24
return string.format("%d days (%d hours)", daysValue, hours)
end
return days
end
local function hoursToDays(hours)
local hoursValue = tonumber(hours:match("%d+"))
if hoursValue then
local days = hoursValue / 24
return string.format("%d hours (%.2f days)", hoursValue, days)
end
return hours
end
-- Energy conversions
local function joulesToCalories(joules)
local joulesValue = tonumber(joules:match("%d+"))
if joulesValue then
local calories = joulesValue * 0.000239006
return string.format("%d joules (%.6f calories)", joulesValue, calories)
end
return joules
end
local function caloriesToJoules(calories)
local caloriesValue = tonumber(calories:match("%d+"))
if caloriesValue then
local joules = caloriesValue / 0.000239006
return string.format("%d calories (%.2f joules)", caloriesValue, joules)
end
return calories
end
local function kilowattHoursToJoules(kWh)
local kWhValue = tonumber(kWh:match("%d+"))
if kWhValue then
local joules = kWhValue * 3600000
return string.format("%d kWh (%.2e joules)", kWhValue, joules)
end
return kWh
end
local function joulesToKilowattHours(joules)
local joulesValue = tonumber(joules:match("%d+"))
if joulesValue then
local kWh = joulesValue / 3600000
return string.format("%.2e joules (%d kWh)", joulesValue, kWh)
end
return joules
end
-- Pressure conversions
local function pascalsToPSI(pascals)
local pascalsValue = tonumber(pascals:match("%d+"))
if pascalsValue then
local psi = pascalsValue * 0.000145038
return string.format("%d pascals (%.6f PSI)", pascalsValue, psi)
end
return pascals
end
local function psiToPascals(psi)
local psiValue = tonumber(psi:match("%d+"))
if psiValue then
local pascals = psiValue / 0.000145038
return string.format("%.6f PSI (%d pascals)", psiValue, pascals)
end
return psi
end
local function atmospheresToPascals(atmospheres)
local atmospheresValue = tonumber(atmospheres:match("%d+"))
if atmospheresValue then
local pascals = atmospheresValue * 101325
return string.format("%d atmospheres (%d pascals)", atmospheresValue, pascals)
end
return atmospheres
end
local function pascalsToAtmospheres(pascals)
local pascalsValue = tonumber(pascals:match("%d+"))
if pascalsValue then
local atmospheres = pascalsValue / 101325
return string.format("%d pascals (%.6f atmospheres)", pascalsValue, atmospheres)
end
return pascals
end
-- Frequency conversions
local function hertzToRPM(hertz)
local hertzValue = tonumber(hertz:match("%d+"))
if hertzValue then
local rpm = hertzValue * 60
return string.format("%d Hertz (%d RPM)", hertzValue, rpm)
end
return hertz
end
local function rpmToHertz(rpm)
local rpmValue = tonumber(rpm:match("%d+"))
if rpmValue then
local hertz = rpmValue / 60
return string.format("%d RPM (%.2f Hertz)", rpmValue, hertz)
end
return rpm
end
local function kilohertzToHertz(kHz)
local kHzValue = tonumber(kHz:match("%d+"))
if kHzValue then
local hertz = kHzValue * 1000
return string.format("%d kHz (%d Hertz)", kHzValue, hertz)
end
return kHz
end
local function hertzToKilohertz(hertz)
local hertzValue = tonumber(hertz:match("%d+"))
if hertzValue then
local kHz = hertzValue / 1000
return string.format("%d Hertz (%.2f kHz)", hertzValue, kHz)
end
return hertz
end
-- Power conversions
local function wattsToHorsepower(watts)
local wattsValue = tonumber(watts:match("%d+"))
if wattsValue then
local horsepower = wattsValue * 0.00134102
return string.format("%d watts (%.6f horsepower)", wattsValue, horsepower)
end
return watts
end
local function horsepowerToWatts(horsepower)
local horsepowerValue = tonumber(horsepower:match("%d+"))
if horsepowerValue then
local watts = horsepowerValue / 0.00134102
return string.format("%.6f horsepower (%d watts)", horsepowerValue, watts)
end
return horsepower
end
local function megawattsToHorsepower(megawatts)
local megawattsValue = tonumber(megawatts:match("%d+"))
if megawattsValue then
local horsepower = megawattsValue * 1341.02
return string.format("%d megawatts (%.2f horsepower)", megawattsValue, horsepower)
end
return megawatts
end
local function horsepowerToMegawatts(horsepower)
local horsepowerValue = tonumber(horsepower:match("%d+"))
if horsepowerValue then
local megawatts = horsepowerValue / 1341.02
return string.format("%.2f horsepower (%d megawatts)", horsepowerValue, megawatts)
end
return horsepower
end
-- Add these functions to the p dynamic function to integrate them into the infobox
--❗
local function cmToFeetAndInches(cm)
local cmValue = tonumber(cm:match("%d+"))
if cmValue then
local totalInches = cmValue / 2.54
local feet = math.floor(totalInches / 12)
local inches = math.floor(totalInches % 12)
return string.format("%d centimeters (%d feet %d inches)", cmValue, feet, inches)
end
return cm
end
local function mphToKmh(mph)
local mphValue = tonumber(mph:match("%d+"))
if mphValue then
local kmh = mphValue * 1.60934
return string.format("%d mph (%.2f km/h)", mphValue, kmh)
end
return mph
end
local function kmhToMph(kmh)
local kmhValue = tonumber(kmh:match("%d+"))
if kmhValue then
local mph = kmhValue / 1.60934
return string.format("%d km/h (%.2f mph)", kmhValue, mph)
end
return kmh
end
local function kmToMi(km)
local kmValue = tonumber(km:match("%d+"))
if kmValue then
local miles = kmValue * 0.621371
return string.format("%d kilometers (%.2f mi)", kmValue, miles)
end
return km
end
local function miToKm(mi)
local miValue = tonumber(mi:match("%d+"))
if miValue then
local km = miValue / 0.621371
return string.format("%d miles (%.2f km)", miValue, km)
end
return mi
end
local function hpToKw(hp)
local hpValue = tonumber(hp:match("%d+"))
if hpValue then
local kw = hpValue * 0.735499
return string.format("%d horsepower (%.2f kW)", hpValue, kw)
end
return hp
end
local function kwToHp(kw)
local kwValue = tonumber(kw:match("%d+"))
if kwValue then
local hp = kwValue / 0.735499
return string.format("%d Kilowatt(%.2f hp)", kwValue, hp)
end
return kw
end
local function ftToCm(ft)
local ftValue = tonumber(ft:match("%d+"))
if ftValue then
local cm = ftValue * 30.48
return string.format("%d ft (%.2f cm)", ftValue, cm)
end
return ft
end
local function lbToKg(lb)
local lbValue = tonumber(lb:match("%d+"))
if lbValue then
local kg = lbValue * 0.453592
return string.format("%d lb (%.2f kg)", lbValue, kg)
end
return lb
end
local function kgToPounds(kg)
local kgValue = tonumber(kg:match("%d+"))
if kgValue then
local pounds = kgValue * 2.20462
return string.format("%d kg (%.2f pounds)", kgValue, pounds)
end
return kg
end
local function mmToInches(mm)
local mmValue = tonumber(mm:match("%d+"))
if mmValue then
local inches = mmValue * 0.0393701
return string.format("%d mm (%.2f inches)", mmValue, inches)
end
return mm
end
local function inchesToMm(inches)
local inchesValue = tonumber(inches:match("%d+"))
if inchesValue then
local mm = inchesValue / 0.0393701
return string.format("%d inches (%.2f mm)", inchesValue, mm)
end
return inches
end
local function msToFts(ms)
local msValue = tonumber(ms:match("%d+"))
if msValue then
local fts = msValue * 3.28084
return string.format("%.2f meter per seconds(%.2f ft/s)", msValue, fts)
end
return ms
end
local function ftsToMs(fts)
local ftsValue = tonumber(fts:match("%d+"))
if ftsValue then
local ms = ftsValue / 3.28084
return string.format("%.2f foot per seconds(%.2f m/s)", ftsValue, ms)
end
return fts
end
local function mToFeet(m)
local mValue = tonumber(m:match("%d+"))
if mValue then
local feet = mValue * 3.28084
return string.format("%d meter (%.2f ft)", mValue, feet)
end
-- Check for variations of "m", "meter", and "metre"
local mValueAlt = tonumber(m:match("(%d+)%s*[mM]"))
if mValueAlt then
local feetAlt = mValueAlt * 3.28084
return string.format("%d m (%.2f ft)", mValueAlt, feetAlt)
end
local mValueAlt2 = tonumber(m:match("(%d+)%s*[mM][eE][tT][eE]?[rR]?"))
if mValueAlt2 then
local feetAlt2 = mValueAlt2 * 3.28084
return string.format("%d metre (%.2f ft)", mValueAlt2, feetAlt2)
end
local mValueAlt3 = tonumber(m:match("(%d+)%s*[mM][eE][tT][eE][rR]?"))
if mValueAlt3 then
local feetAlt3 = mValueAlt3 * 3.28084
return string.format("%d meter (%.2f ft)", mValueAlt3, feetAlt3)
end
return m
end
--//m///
local function celsiusToFahrenheit(c)
local cValue = tonumber(c:match("%d+"))
if cValue then
local fahrenheit = cValue * 9/5 + 32
return string.format("%.2f°C (%.2f°F)", cValue, fahrenheit)
end
return c
end
local function fahrenheitToCelsius(f)
local fValue = tonumber(f:match("%d+"))
if fValue then
local celsius = (fValue - 32) * 5/9
return string.format("%.2f°F (%.2f°C)", fValue, celsius)
end
return f
end
function capitalizeFirstLetter(str)
return str:gsub("^%l", string.upper)
end
--[[ local conversionPatterns = {
{ pattern = "%s*kilohertz%s*", convertedValue = kilohertzToHertz},
{ pattern = "%s*kg%s*", conversion = kgToPounds },
{ pattern = "%s*mph%s*", conversion = mphToKmh },
-- Add more conversion patterns as needed
} ]]
local abec='{|'
function p.dynami(frame)
local args = frame:getParent().args
local output = '{| class="infobox biography vcard" style="width: 22em;"\n|-\n'
local firstDescriptionFound = false
local cmProcessed = false
local abvParams = {} -- Store abv parameters separately
for key, value in pairs(args) do
if value ~= "" then
if key:sub(1, 2) == 'up' then
if value ~= "" then
output = output .. '| style="background:lightgray;font-size:20px;text-align: center; background-color: ' .. (args.headcolor or "#f2f2f2") .. '; color: ' .. (args.color or "inherit") .. '; font-weight: bold;" | ' .. value .. '\n|-\n'
firstDescriptionFound = true
end
elseif key:sub(1, 3) == 'abv' then
if value ~= "" then
abvParams[value] = true -- Store abv parameters in a table with value as key to avoid duplicates
end
end
end
end
if args.image then
local caption = args.caption or ""
local imagesize = args.imagesize or ""
output = output .. '|' ..'<div style="text-align:center;">'.. args.image.. '</div>'..'<small style="display: block; text-align: center;">' .. caption .. '</small>\n|-\n'
end
for key, value in pairs(args) do
if value ~= "" then
if key ~= 'image' and key ~= 'imagecaption' and key~=('abv'or'abv1'or'abv2'or' abv3'or'abv4'or'abv5'or'abv6'or'abv7'or'abv8'or' abv9'or'abv10'or'abv11')
and key ~= 'caption' and key ~= 'headcolor' and key ~= 'color' and key ~= 'abvstyle' and key ~= 'abvheadcolor' and key ~= 'abvcolor' and not key:match("^abv%d+$") and key~=abvParams then
if key ~= 'up' and not (key:sub(1, 2) == 'up' and firstDescriptionFound) then
local convertedValue = value
local originalValue = value
if type(value) == "string" then
if value:match("%s*cm#%s*")or value:match("%s*centimeters#%s*")or value:match("%s*centimetres#%s*") or value:match("%s*centimeter#%s*") or value:match("%s*centimetre#%s*") then
convertedValue = cmToFeetAndInches(value)
cmProcessed = true
elseif value:match("%s*kg#%s*") or value:match("%s*kgs#%s*")or value:match("%s*kilograms#%s*") or value:match("%s*kilogram#%s*") then
convertedValue = kgToPounds(value)
elseif value:match("%s*mph#%s*")or value:match("%s*mp/h#%s*")or value:match("%s*miles per hour#%s*")or value:match("%s*mile per hour#%s*") then
convertedValue = mphToKmh(value)
elseif value:match("%s*kmh#%s*")or value:match("%s*km/h#%s*")or value:match("%s*kilometers per hour#%s*")or value:match("%s*kilometer per hour#%s*")or value:match("%s*kilometres per hour#%s*")or value:match("%s*kilometre per hour#%s*") then
convertedValue = kmhToMph(value)
elseif value:match("%s*kms#%s*")or value:match("%s*km#%s*")or value:match("%s*kilometer#%s*")or value:match("%s*kilometers#%s*")or value:match("%s*kilometre#%s*")or value:match("%s*kilometres#%s*") then
convertedValue = kmToMi(value)
elseif value:match("%s*mi#%s*")or value:match("%s*mile#%s*")or value:match("%s*miles#%s*") then
convertedValue = miToKm(value)
elseif value:match("%s*hp#%s*")or value:match("%s*hps#%s*")or value:match("%s*horsepower#%s*")or value:match("%s*horsepowers#%s*") then
convertedValue = hpToKw(value)
elseif value:match("%s*kw#%s*")or value:match("%s*kws#%s*")or value:match("%s*kilowatt#%s*")or value:match("%s*kilowatts#%s*") then
convertedValue = kwToHp(value) elseif value:match("%s*ft#%s*") then elseif value:match("%s*lb#%s*")or value:match("%s*pound#%s*")or value:match("%s*pounds#%s*") then
convertedValue = lbToKg(value)
elseif value:match("%s*mmms#%s*")or value:match("%s*mm#%s*")or value:match("%s*millimeter#%s*")or value:match("%s*millimetre#%s*")or value:match("%s*millimeters#%s*")or value:match("%s*millimetres#%s*") then
convertedValue = mmToInches(value)
elseif value:match("%s*in#%s*")or value:match("%s*ins#%s*")or value:match("%s*inch#%s*")or value:match("%s*inche#%s*")or value:match("%s*inches#%s*") then
convertedValue = inchesToMm(value)
elseif value:match("%s*ms#%s*")or value:match("%s*millisecond#%s*")or value:match("%s*milliseconds#%s*") then
convertedValue = msToFts(value)
elseif value:match("%s*fts#%s*")or value:match("%s*ft/s#%s*")or value:match("%s*fps#%s*")or value:match("%s*footperseconds#%s*") then
convertedValue = ftsToMs(value)
elseif value:match("%s*°c#%s*") or value:match("%s*celsius#%s*") or value:match("%s*Celsius#%s*") then
convertedValue = celsiusToFahrenheit(value)
elseif value:match("%s*°f#%s*") or value:match("%s*fahrenheit#%s*") then
convertedValue = fahrenheitToCelsius(value)
--❗
elseif value:match("%s*liters#%s*")or value:match("%s*litres#%s*")or value:match("%s*litre#%s*")or value:match("%s*liter#%s*") then
convertedValue = litersToGallons(value)
elseif value:match("%s*gallons#%s*")or value:match("%s*gallon#%s*") then
convertedValue = gallonsToLiters(value)
elseif value:match("%s*m³#%s*")or value:match("%s*m3#%s*")or value:match("%s*cubicmeters#%s*")or value:match("%s*cubicmetres#%s*")or value:match("%s*cubicmetre#%s*")or value:match("%s*cubicmeter#%s*") then
convertedValue = cubicMetersToCubicFeet(value)
elseif value:match("%s*ft³#%s*")or value:match("%s*ft3#%s*")or value:match("%s*cubicfeet#%s*")or value:match("%s*cubicfoot#%s*")or value:match("%s*cubicfeets#%s*")or value:match("%s*cubicfoots#%s*") then
convertedValue = cubicFeetToCubicMeters(value) elseif value:match("%s*sqm#%s*")or value:match("%s*sqms#%s*")or value:match("%s*sqmetre#%s*")or value:match("%s*sqmetres#%s*")or value:match("%s*squaremeter#%s*")or value:match("%s*squaremeters#%s*")or value:match("%s*sqmeter#%s*")or value:match("%s*sqmeters#%s*") then
convertedValue = squareMetersToSquareFeet(value)
elseif value:match("%s*sqft#%s*")or value:match("%s*sqfoot#%s*")or value:match("%s*sqfeet#%s*")or value:match("%s*squarefoots#%s*")or value:match("%s*squarefeets#%s*")or value:match("%s*squarefeet#%s*") then
convertedValue = squareFeetToSquareMeters(value)
elseif value:match("%s*hectares#%s*")or value:match("%s*hectare#%s*") then
convertedValue = hectaresToAcres(value)
elseif value:match("%s*acres#%s*")or value:match("%s*acre#%s*") then
convertedValue = acresToHectares(value)
elseif value:match("%s*hours#%s*")or value:match("%s*hour#%s*") then
convertedValue = hoursToMinutes(value)
elseif value:match("%s*minutes#%s*")or value:match("%s*minute#%s*") then
convertedValue = minutesToHours(value)
elseif value:match("%s*days#%s*")or value:match("%s*day#%s*") then
convertedValue = daysToHours(value)
elseif value:match("%s*joules#%s*")or value:match("%s*joule#%s*") then
convertedValue = joulesToCalories(value)
elseif value:match("%s*calories#%s*")or value:match("%s*calorie#%s*") then
convertedValue = caloriesToJoules(value)
elseif value:match("%s*kwh#%s*")or value:match("%s*kilowatthours#%s*")or value:match("%s*kilowatthour#%s*") then
convertedValue = kilowattHoursToJoules(value)
elseif value:match("%s*psi#%s*")or value:match("%s*pounds per square inch#%s*")or value:match("%s*pound per square inches#%s*") then
convertedValue = psiToPascals(value)
elseif value:match("%s*pascals#%s*")or value:match("%s*pascal#%s*") then
convertedValue = pascalsToPsi(value)
elseif value:match("%s*atm#%s*")or value:match("%s*atmospheres#%s*")or value:match("%s*atmosphere#%s*") then
convertedValue = atmospheresToPascals(value)
elseif value:match("%s*rpm#%s*") then
convertedValue = rpmToHertz(value)
elseif value:match("%s*kilohertz#%s*")or value:match("%s*khz#%s*") then
convertedValue = kilohertzToHertz(value)
elseif value:match("%s*hertz#%s*") then
convertedValue = hertzToRPM(value)
elseif value:match("%s*horsepower#%s*") then
convertedValue = horsepowerToWatts(value)
elseif value:match("%s*megawatts#%s*") or value:match("%s*megawatt#%s*")then
convertedValue = megawattsToHorsepower(value)
elseif value:match("%s*watts#%s*") or value:match("%s*watt#%s*")then
convertedValue = wattsToHorsepower(value)
elseif value:match("%s*hp#%s*") then
convertedValue = horsepowerToMegawatts(value)
elseif value:match("%s*m#%s*")or value:match("%s*meters#%s*")or value:match("%s*metres#%s*")or value:match("%s*meter#%s*")or value:match("%s*metre#%s*") then
convertedValue = mToFeet(value)
elseif value:match("%s*ft#%s*") or value:match("%s*feet#%s*")or value:match("%s*feets#%s*")or value:match("%s*foot#%s*")or value:match("%s*foots#%s*") then
convertedValue = ftToCm(value)
elseif value:match("%d%d%d%d/")or value:match("%d%d%d/")or value:match("%d%d/") then -- Check if the value is a date
local age =calculateAge(value)
if age then
convertedValue = value .. ' (' .. age .. ')'
end
end
elseif type(value) == "number" then
local age = calculateAge(tostring(value))
if age then
convertedValue = tostring(value) .. ' (' .. age .. ')'
end
end
-- Capitalize the key before displaying
output = output .. '| style="font-weight:bolder;padding-right:1em;" | ' .. capitalizeFirstLetter(key) .. "'''<br />\n"
if originalValue ~= convertedValue then
output = output .. '| ' .. convertedValue .. '\n|-\n'
else
output = output .. '| ' .. value .. '\n|-\n'
end
end
end
end
end
if not args.abvstyle then
args.abvstyle = "" -- Set default value for abvstyle if not provided
end
for abvParam, _ in pairs(abvParams) do
output = output .. '| style="background:'..(args.abvheadcolor or 'transpaent')..';color:'..(args.abvcolor or'black')..';font-size:18px;text-align:center;' .. args.abvstyle .. '" | ' .. abvParam .. '\n|-\n'
end
output =output.. '|}\n|-\n'
return output
end
--///////
return p