Module:Sandbox/Thisasia Explained

local p =

local function dateCalculation(dateStr) local year, month, day = dateStr:match("(%d+)[/.,-](%d+)[/.,-](%d+)") if not year then day, month, year = dateStr:match("(%d+)[/.,-](%d+)[/.,-](%d+)") end if not year then return 'Invalid ' end local currentDate = os.date("*t") local age = currentDate.year - tonumber(year) if currentDate.month < tonumber(month) or (currentDate.month

tonumber(month) and currentDate.day < tonumber(day)) then age = age - 1 end local monthName = os.date("%B", os.time) return " ".. monthName .. " "..day..", " .. year.. "
(Age " .. age.. ")"end

--

--❗--Volume conversions local function litersToGallons(liters) local litersValue = tonumber(liters:match("%d+%.?%d*")) if litersValue then local gallons = litersValue * 0.264172 return "".. string.format("%.2f liters (%.2f gallons)", litersValue, gallons) end return litersend

local function gallonsToLiters(gallons) local gallonsValue = tonumber(gallons:match("%d+%.?%d*")) if gallonsValue then local liters = gallonsValue * 3.78541 return string.format("%.2f gallons (%.2f liters)", gallonsValue, liters) end return gallonsend

local function cubicMetersToCubicFeet(cubicMeters) local cubicMetersValue = tonumber(cubicMeters:match("%d+%.?%d*")) if cubicMetersValue then local cubicFeet = cubicMetersValue * 35.3147 return string.format("%.2f cubic meters (%.2f cubic feet)", cubicMetersValue, cubicFeet) end return cubicMetersend

local function cubicFeetToCubicMeters(cubicFeet) local cubicFeetValue = tonumber(cubicFeet:match("%d+%.?%d*")) if cubicFeetValue then local cubicMeters = cubicFeetValue * 0.0283168 return string.format("%.2f cubic feet (%.2f cubic meters)", cubicFeetValue, cubicMeters) end return cubicFeetend

-- Area conversionslocal function squareMetersToSquareFeet(squareMeters) local squareMetersValue = tonumber(squareMeters:match("%d+%.?%d*")) if squareMetersValue then local squareFeet = squareMetersValue * 10.7639 return string.format("%.2f square meters (%.2f square feet)", squareMetersValue, squareFeet) end return squareMetersend

local function squareFeetToSquareMeters(squareFeet) local squareFeetValue = tonumber(squareFeet:match("%d+%.?%d*")) if squareFeetValue then local squareMeters = squareFeetValue * 0.092903 return string.format("%.2f square feet (%.2f square meters)", squareFeetValue, squareMeters) end return squareFeetend

local function hectaresToAcres(hectares) local hectaresValue = tonumber(hectares:match("%d+%.?%d*")) if hectaresValue then local acres = hectaresValue * 2.47105 return string.format("%.2f hectares (%.2f acres)", hectaresValue, acres) end return hectaresend

local function acresToHectares(acres) local acresValue = tonumber(acres:match("%d+%.?%d*")) if acresValue then local hectares = acresValue * 0.404686 return string.format("%.2f acres (%.2f hectares)", acresValue, hectares) end return acresend

-- Time conversionslocal function hoursToMinutes(hours) local hoursValue = tonumber(hours:match("%d+%.?%d*")) if hoursValue then local minutes = hoursValue * 60 return string.format("%.2f hours (%d minutes)", hoursValue, minutes) end return hoursend

local function minutesToHours(minutes) local minutesValue = tonumber(minutes:match("%d+%.?%d*")) if minutesValue then local hours = minutesValue / 60 local decimalPart = minutes:match("%.(%d+)") if decimalPart then hours = hours + tonumber("0." .. decimalPart) end return string.format("%.2f minutes (%.2f hours)", minutesValue, hours) end return minutesend

local function daysToHours(days) local daysValue = tonumber(days:match("%d+%.?%d*")) if daysValue then local hours = daysValue * 24 return string.format("%.2f days (%d hours)", daysValue, hours) end return daysend

local function hoursToDays(hours) local hoursValue = tonumber(hours:match("%d+%.?%d*")) if hoursValue then local days = hoursValue / 24 return string.format("%.2f hours (%.2f days)", hoursValue, days) end return hoursend

-- Energy conversionslocal function joulesToCalories(joules) local joulesValue = tonumber(joules:match("%d+%.?%d*")) if joulesValue then local calories = joulesValue * 0.000239006 return string.format("%.2f joules (%.6f calories)", joulesValue, calories) end return joulesend

local function caloriesToJoules(calories) local caloriesValue = tonumber(calories:match("%d+%.?%d*")) if caloriesValue then local joules = caloriesValue / 0.000239006 return string.format("%.2f calories (%.2f joules)", caloriesValue, joules) end return caloriesend

local function kilowattHoursToJoules(kWh) local kWhValue = tonumber(kWh:match("%d+%.?%d*")) if kWhValue then local joules = kWhValue * 3600000 return string.format("%.2e kWh (%.2e joules)", kWhValue, joules) end return kWhend

local function joulesToKilowattHours(joules) local joulesValue = tonumber(joules:match("%d+%.?%d*")) if joulesValue then local kWh = joulesValue / 3600000 return string.format("%.2e joules (%d kWh)", joulesValue, kWh) end return joulesend

-- Pressure conversionslocal 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 pascalsend

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 psiend

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 atmospheresend

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 pascalsend

-- Frequency conversionslocal 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 hertzend

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 rpmend

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 kHzend

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 hertzend

-- Power conversionslocal 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 wattsend

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 horsepowerend

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 megawattsend

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 horsepowerend

-- Add these functions to the p dynamic function to integrate them into the infobox--❗local function ftToCm(ft) local ftValue = tonumber(ft:match("%d+%.?%d*")) if ftValue then local cm = ftValue * 30.48 return string.format("%.2f ft (%.2f cm)", ftValue, cm) end return ftend

local function cmToFeetAndInches(cm) local cmValue = tonumber(cm:match("%d+%.?%d*")) if cmValue then local totalInches = cmValue / 2.54 local feet = math.floor(totalInches / 12) local inches = math.floor(totalInches % 12) return string.format("%.2f cm (%d feet %d inches)", cmValue, feet, inches) end return cmend

local function mphToKmh(mph) local mphValue = tonumber(mph:match("%d+%.?%d*")) if mphValue then local kmh = mphValue * 1.60934 return string.format("%.2f mph (%.2f km/h)", mphValue, kmh) end return mphend

local function kmhToMph(kmh) local kmhValue = tonumber(kmh:match("%d+%.?%d*")) if kmhValue then local mph = kmhValue / 1.60934 return string.format("%.2f km/h (%.2f mph)", kmhValue, mph) end return kmhend

local function kmToMi(km) local kmValue = tonumber(km:match("%d+%.?%d*")) if kmValue then local miles = kmValue * 0.621371 return string.format("%.2f km (%.2f mi)", kmValue, miles) end return kmend

local function miToKm(mi) local miValue = tonumber(mi:match("%d+%.?%d*")) if miValue then local km = miValue / 0.621371 return string.format("%.2f miles (%.2f km)", miValue, km) end return miend

local function hpToKw(hp) local hpValue = tonumber(hp:match("%d+%.?%d*")) if hpValue then local kw = hpValue * 0.735499 return string.format("%.2f horsepower (%.2f kW)", hpValue, kw) end return hpend

local function kwToHp(kw) local kwValue = tonumber(kw:match("%d+%.?%d*")) if kwValue then local hp = kwValue / 0.735499 return string.format("%.2f Kilowatt(%.2f hp)", kwValue, hp) end return kwend

local function lbToKg(lb) local lbValue = tonumber(lb:match("%d+%.?%d*")) if lbValue then local kg = lbValue * 0.453592 return string.format("%.2f lb (%.2f kg)", lbValue, kg) end return lbend

local function kgToPounds(kg) --local kgValu = tonumber(kg:match("%d+")) local kgValue = tonumber(kg:match("%d+%.?%d*")) if kgValue>1 then local pounds = kgValue * 2.20462 return string.format("%.2f kgs (%.2f pounds)", kgValue, pounds) else local pounds = kgValue * 2.20462 return string.format("%.2f kg (%.2f pounds)", kgValue, pounds) end return kgend

local function mmToInches(mm) local mmValue = tonumber(mm:match("%d+%.?%d*")) if mmValue then local inches = mmValue * 0.0393701 return string.format("%.2f mm (%.2f inches)", mmValue, inches) end return mmend

local function inchesToMm(inches) local inchesValue = tonumber(inches:match("%d+%.?%d*")) if inchesValue then local mm = inchesValue / 0.0393701 return string.format("%.2f inches (%.2f mm)", inchesValue, mm) end return inchesend

local function msToFts(ms) local msValue = tonumber(ms:match("%d+%.?%d*")) if msValue then local fts = msValue * 3.28084 return string.format("%.2f m/s(%.2f ft/s)", msValue, fts) end return msend

local function ftsToMs(fts) local ftsValue = tonumber(fts:match("%d+%.?%d*")) if ftsValue then local ms = ftsValue / 3.28084 return string.format("%.2f ft/s(%.2f m/s)", ftsValue, ms) end return ftsend

local function mToFeet(m) local mValue = tonumber(m:match("%d+%.?%d*")) if mValue then local feet = mValue * 3.28084 return string.format("%.2f meter (%.2f ft)", mValue, feet) end -- Check for variations of "m", "meter", and "metre" local mValueAlt = tonumber(m:match("(%d+%.?%d*)%s*[mM]")) if mValueAlt then local feetAlt = mValueAlt * 3.28084 return string.format("%.2f m (%.2f ft)", mValueAlt, feetAlt) end local mValueAlt2 = tonumber(m:match("(%d+%.?%d*)%s*[mM][eE][tT][eE]?[rR]?")) if mValueAlt2 then local feetAlt2 = mValueAlt2 * 3.28084 return string.format("%.2f metre (%.2f ft)", mValueAlt2, feetAlt2) end local mValueAlt3 = tonumber(m:match("(%d+%.?%d*)%s*[mM][eE][tT][eE][rR]?")) if mValueAlt3 then local feetAlt3 = mValueAlt3 * 3.28084 return string.format("%.2f meter (%.2f ft)", mValueAlt3, feetAlt3) end return mend--//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 fendfunction capitalizeFirstLetter(str) return str:gsub("^%l", string.upper)end

-- Function to generate contrasting text color for a given background colorlocal function getContrastingTextColor(bgColor) -- Convert hex color to RGB local r = tonumber(bgColor:sub(2, 3), 16) local g = tonumber(bgColor:sub(4, 5), 16) local b = tonumber(bgColor:sub(6, 7), 16)

-- Calculate relative luminance local luminance = (0.299 * r + 0.587 * g + 0.114 * b) / 255

-- Choose white or black text color based on luminance if luminance > 0.5 then return "#000000" -- Black text for light backgrounds else return "#FFFFFF" -- White text for dark backgrounds endend

-- Function to generate even lighter colorsfunction generateEvenLighterColor1 local r = math.random(0xF0, 0xFF) -- Red component local g = math.random(0xF0, 0xFF) -- Green component local b = math.random(0xF0, 0xFF) -- Blue component return string.format("#%02X%02X%02X", r, g, b) -- Format as hexadecimal colorend

-- Function to generate a very light colorfunction generateVeryLightColor2 local r = math.random(0xE0, 0xFF) -- Red component local g = math.random(0xE0, 0xFF) -- Green component local b = math.random(0xE0, 0xFF) -- Blue component return string.format("#%02X%02X%02X", r, g, b) -- Format as hexadecimal colorend

-- Function to generate a random light colorfunction generateLightColor3 local r = math.random(0xB0, 0xFF) -- Red component local g = math.random(0xB0, 0xFF) -- Green component local b = math.random(0xB0, 0xFF) -- Blue component return string.format("#%02X%02X%02X", r, g, b) -- Format as hexadecimal colorend

-- Functions to generate mixed light-dark colorsfunction generateDarkColor4 local r = math.random(0x60, 0x80) -- Red component local g = math.random(0x60, 0x80) -- Green component local b = math.random(0x60, 0x80) -- Blue component return string.format("#%02X%02X%02X", r, g, b) -- Format as hexadecimal colorend

function generateDarkColor5 local r = math.random(0x50, 0x70) -- Red component local g = math.random(0x50, 0x70) -- Green component local b = math.random(0x50, 0x70) -- Blue component return string.format("#%02X%02X%02X", r, g, b) -- Format as hexadecimal colorend

function generateDarkColor6 local r = math.random(0x40, 0x60) -- Red component local g = math.random(0x40, 0x60) -- Green component local b = math.random(0x40, 0x60) -- Blue component return string.format("#%02X%02X%02X", r, g, b) -- Format as hexadecimal colorend

function generateDarkColor7 local r = math.random(0x20, 0x40) -- Red component local g = math.random(0x20, 0x40) -- Green component local b = math.random(0x20, 0x40) -- Blue component return string.format("#%02X%02X%02X", r, g, b) -- Format as hexadecimal colorend

function generateDarkColor8 local r = math.random(0x30, 0x70) -- Red component local g = math.random(0x30, 0x70) -- Green component local b = math.random(0x30, 0x70) -- Blue component return string.format("#%02X%02X%02X", r, g, b) -- Format as hexadecimal colorend

function generateDarkColor9 return string.format("#%02x%02x%02x", math.random(0x30, 0x50), math.random(0x40, 0x70), math.random(0x50, 0x70))end

function generateDarkColor10 return string.format("#%06x", math.random(0x30, 0x70))end

-- Function to generate a random colorlocal function generateRandomColor local r = math.random(0, 255) local g = math.random(0, 255) local b = math.random(0, 255) return string.format("#%02X%02X%02X", r, g, b)end

function p.dynamic(frame) local args = frame:getParent.args local output = '

\n|-\n' -- local firstDescriptionFound = false local cmProcessed = false local abvParams = -- Store abv parameters separately local abvProcessed = false local upProcessed = false local imageProcessed =false --

local values =

for key, value in pairs(args) do if key:sub(1, 2)

'up' and value ~= "" then table.insert(values,) endendtable.sort(values, function(a, b) return a.key < b.key end)for _, entry in ipairs(values) do local key = entry.key local value = entry.value value = value:gsub("^%l", string.upper) local first_char = value:match("%a") -- Find the first alphabet character if first_char then value = value:gsub("^" .. first_char, string.upper) -- Capitalize the first alphabet character end output = output .. '' .. value .. '\n\n'end

-- local hasImage = falsefor key, _ in pairs(args) do if key:sub(1, 5)

"image" then hasImage = true break endend

if not hasImage then local defaultImage = "\n" output = output .. defaultImageend

if args.image then local processedKeys = local processedSizeCaption = local images = local div = '

'

for key, value in pairs(args) do if key:sub(1, 5)

"image" and value ~= "" and not processedKeys[key] then processedKeys[key] = true local captionKey = "caption" .. key:sub(6) local sizeKey = "size" .. key:sub(6)

if not processedSizeCaption[captionKey] and not processedSizeCaption[sizeKey] then processedSizeCaption[captionKey] = true processedSizeCaption[sizeKey] = true

local caption = args[captionKey] or "" local imagesize = args[sizeKey] or "" local isFrameless = string.match(value, '|frameless') local imageExtension = value:match("%.([^.]+)$")

if not imageExtension then value = value:gsub("|", "".. ".jpg|").. ".jpg" end local grid ="" local wikiMarkup = if isFrameless then local remo = value:gsub("(%[%[.-|)File:", "%1") wikiMarkup = wikiMarkup .. '|' .. '<div style="text-align:center;">' .. remo .. ']

' .. '' .. caption .. '\n|-\n' else local imageName, imageSize = value:match("%[%[File:(.-)|([^|%]]+)]]") if imageName then wikiMarkup = wikiMarkup .. "" else local imageSizeMarkup = "" if imagesize ~= "" then imageSizeMarkup = "|" .. imagesize end wikiMarkup = wikiMarkup .. "" end wikiMarkup = '

' .. wikiMarkup .. '' .. caption .. '

\n' end

-- Store the image markup along with its key table.insert(images,) end end end

-- Sort the images based on their keys to maintain the insertion order --table.sort(images, function(a, b) return a.key < b.key end)

-- Generate the output markuplocal columnCount = 0local gridOpen = falsefor _, imageData in ipairs(images) do local wikiMarkup = imageData.markup if imageData.key:sub(-1)

"+" then if not gridOpen then output = output .. '|

' .. div.. '

\n|-\n' -- Open the grid container if it's not already open gridOpen = true end --output = output ..'|'.. wikiMarkup .. '\n|-\n' -- For keys not ending with '+', display normally

output = output .. '|

' .. wikiMarkup .. '

\n' columnCount = (columnCount + 1) % 2 else if gridOpen then output = output .. '

\n|-\n' -- Close the grid container if it's open gridOpen = false end output = output ..''.. wikiMarkup .. '\n|-\n' -- For keys not ending with '+', display normally endend

-- If there are unclosed div tags, close themif gridOpen then output = output .. '