Module:BassaridiaForecast: Difference between revisions

From MicrasWiki
Jump to navigationJump to search
No edit summary
No edit summary
Line 1: Line 1:
---------------------------------------------------------
---------------------------------------------------------
-- Module:WeatherForecastTable
-- Module:WeatherForecastTable
-- Generates a daily weather forecast table with:
--  * PSSC date system (Atosiel, Thalassiel, Opsitheiel)
--  * spelled-out climates
--  * random daily events (10 per climate-season)
--  * color-coded event cell (by keywords)
--  * High/Low in °C(F)
--  * Humidity, Chance of Rain, Rainfall (mm)
--  * Wind Direction and Wind Speed
--  * Natural Disaster Advisory per city
---------------------------------------------------------
---------------------------------------------------------


Line 56: Line 47:
-- 3. Weather Events (10 per climate-season)
-- 3. Weather Events (10 per climate-season)
---------------------------------------------------------
---------------------------------------------------------
-- (Same data as before — omitted here only for brevity in this comment,
-- but you must paste the entire "climateEvents" table from your final code.)


local climateEvents = {
local climateEvents = {
Line 96: Line 90:
         }
         }
     },
     },
 
     -- ... plus "Oceanic," "Subpolar Oceanic," "Mediterranean (Hot Summer),"
     ["Oceanic"] = {
    -- "Hot Desert," "Cold Steppe," "Hot Steppe," "Subarctic," each with
        Atosiel = {
     -- 10 events per season. (Paste your full data here.)
            "Frequent light rain, cool breezes all day",
            "Foggy dawn, mild midmorning sunshine",
            "Short sunbreaks among passing showers",
            "Consistent drizzle, fresh winds from the sea",
            "Cloudy intervals with a few bright spells",
            "Late-afternoon clearing, crisp evening air",
            "Slow-moving clouds, mild temperatures",
            "Gentle but persistent rain, green foliage thriving",
            "Off-and-on showers, brief sunny interludes",
            "Steady breeze, moderate humidity levels"
        },
        Thalassiel = {
            "Light rain off and on, mild temperatures",
            "Overcast with comfortable breezes throughout",
            "Drizzly morning, partly cloudy afternoon",
            "Soft rains, lush vegetation, stable temps",
            "Cool, damp start, drying toward evening",
            "Frequent cloud cover, gentle summer breeze",
            "Moist air with lingering fog near streams",
            "Rain-laden air, occasional breaks of sun",
            "Maritime winds bringing light spray inland",
            "Cloudy midday, mild sunshine before dusk"
        },
        Opsitheiel = {
            "Overcast skies, cool drizzle through the day",
            "Sporadic showers, chillier in the evening",
            "Low visibility in morning fog, slow clearing",
            "Gray skies, frequent rain squalls, cool wind",
            "Chilly nightfall, damp ground all day",
            "Heavier showers arriving late afternoon",
            "Periodic drizzle, temperatures on the cool side",
            "Morning gloom, occasional pockets of clearing",
            "Evening rainfall pushing in from the coast",
            "Dense cloud cover, breezy and damp"
        }
    },
 
    ["Subpolar Oceanic"] = {
        Atosiel = {
            "Near-freezing dawn, cold drizzle by midday",
            "Mist over melting snow patches, breezy afternoon",
            "Overcast skies, mix of rain and sleet",
            "Cool, damp air, slight warmup after noon",
            "Late-day sleet turning to light rain",
            "Mountaintop flurries, valley drizzle",
            "Cloudy morning, partial clearing in late afternoon",
            "Chilly breeze, scattered showers off and on",
            "Gray skies, some slushy buildup on paths",
            "Snowmelt water raising local streams"
        },
        Thalassiel = {
            "Cool, short days with periodic drizzle",
            "Heavy low clouds, pockets of bright breaks",
            "Gentle rain, evening chill deeper than normal",
            "Intermittent showers, damp wind from hills",
            "Cloud deck lingering, occasional lighter drizzle",
            "Faint sunlight overshadowed by thick cloud",
            "Subdued warmth, sporadic mist across ridges",
            "Surprisingly bright morning, clouding by dusk",
            "Short bursts of rain followed by fog",
            "Late-night chill with drizzle or brief sleet"
        },
        Opsitheiel = {
            "Steady cold rain mixing with wet snow",
            "Freezing drizzle at dawn, raw gusty winds",
            "Snowfall likely at higher elevations, rain below",
            "Cloudy, damp day with potential sleet storms",
            "Early morning frost turning to slush midday",
            "Occasional heavy showers with flurry bursts",
            "Gray gloom, subfreezing nights across valleys",
            "Pelting sleet for an hour, then calm, cold air",
            "Gusty evening, possible snow accumulations",
            "Sun rarely visible, persistent winter gloom"
        }
    },
 
    ["Mediterranean (Hot Summer)"] = {
        Atosiel = {
            "Mild temperatures, bright sunshine, dry air",
            "Morning dew, warming fast under clear skies",
            "Cool breezes off the sea, comfortable afternoon",
            "Sunny midday with a crisp, light wind",
            "Short drizzly spell, then mostly clear",
            "Early bloom across hills, moderate warmth",
            "Mostly sunny, a few scattered clouds late",
            "Light shower possible at sunrise, drying by noon",
            "Warming trend, low humidity, pleasant day",
            "Gradual warming under spotless sky"
        },
        Thalassiel = {
            "Very hot midday sun, minimal clouds",
            "Scorching days, slight breeze at dusk",
            "Parched hillsides, no sign of rainfall",
            "High UV index, bright, glaring sunlight",
            "Coastal dryness, strong midday glare",
            "Overnight relief, but intense heat returns early",
            "Dust in the wind from inland hills",
            "Cloudless sky, near-record high temps",
            "Salt-laden breezes if near the coast, scorching inland",
            "Heatwaves persisting, zero rain expected"
        },
        Opsitheiel = {
            "Cooler spells, brief showery intervals",
            "Cloudy periods bringing mild relief from heat",
            "Pleasant afternoons, occasional dusk rains",
            "Moderate days, crisp mornings, calm nights",
            "Sporadic light rainfall, refreshing breezes",
            "Cloudbanks drifting inland, mild drizzle at times",
            "Patchy overcast, comfortable midday temps",
            "Clear dawn, mild sunshine, gentle wind late",
            "Intervals of cloud cover, potential short rain",
            "Moist sea air, moderate daytime warmth"
        }
    },
 
    ["Hot Desert"] = {
        Atosiel = {
            "Hot afternoons, cooler late nights, wide temp swing",
            "Dry air, bright sunshine, no clouds in sight",
            "Gentle breezes raising light sand by midday",
            "Evening chill setting in after hot daytime",
            "Minor dust devil scouring the dunes",
            "Visibility excellent, stable high pressure",
            "Patchy desert haze, strong sun overhead",
            "No hint of precipitation, cloudless horizon",
            "Daytime warmth, refreshing if slight breeze arrives",
            "Sun-warmed rock surfaces, mild nights"
        },
        Thalassiel = {
            "Extreme heat from mid-morning onward",
            "Blistering midday sun, risk of heat stroke",
            "Near-record highs, swirling dust at times",
            "Virtually no clouds, scorching open sands",
            "Occasional dust storm cutting visibility briefly",
            "Mirage-like shimmer across flat terrain",
            "Sunset brings partial relief, still quite warm",
            "Dry conditions, subpar humidity all day",
            "Baking desert floor, potential for blowing sand",
            "Intense heat building day after day"
        },
        Opsitheiel = {
            "Warm, mostly sunny with cooler nights",
            "Sparse winds carrying fine sand sporadically",
            "Large day-night temperature gap, no precipitation",
            "Stable conditions, sunlit afternoons, brisk evenings",
            "Mildly hot days, star-filled clear skies at night",
            "Shallow dust clouds after brief winds",
            "Occasional gust picking up desert grit",
            "Gentle warmth, dryness prevalent, no clouds",
            "Cool breezes shortly after sunset, mild day overall",
            "Hazy horizon, soft morning glow across dunes"
        }
    },
 
    ["Cold Steppe"] = {
        Atosiel = {
            "Cool mornings, moderate midday warmth, breezy",
            "Light rain passing through grasslands midday",
            "Variable cloud cover, mild temperature swings",
            "Patchy frost at dawn, warming soon after",
            "Crisp air, possible small hail if storms appear",
            "Sunny afternoon, cooler late evening",
            "Gentle breeze, fleeting sun amidst scattered clouds",
            "Slow temperature rise, slight dryness in mid-afternoon",
            "Brief drizzle, otherwise bright and breezy",
            "Day-night difference noticeable, mild but windy"
        },
        Thalassiel = {
            "Warm day, potential for gusty thunderstorms",
            "Hot midday sun, dryness intensifying by late day",
            "Cloud buildup, short but intense showers possible",
            "Clear morning, chance of late afternoon storms",
            "Long daylight hours, rolling thunder near dusk",
            "Slight dryness, patchy heat with limited shade",
            "Periodic storms bringing relief from heat",
            "Warm evening, slight nighttime cooldown",
            "Sky remains mostly clear, grassland shimmering",
            "Thunderheads visible in distance, might pass by"
        },
        Opsitheiel = {
            "Cool to cold days, frosty nights on open steppe",
            "Possible light snowfall, especially overnight",
            "Wind-driven chill under gray skies",
            "Sparse precipitation, dryness persists, cold air",
            "Subfreezing after sunset, sometimes sunny midday",
            "Short bursts of sunshine, otherwise chilly conditions",
            "Occasional dusting of snow, quickly melting by noon",
            "Biting wind, few clouds, stark horizon",
            "Clearing late morning, crisp, cold nightfall",
            "Daytime near freezing, nights well below"
        }
     },
 
    ["Hot Steppe"] = {
        Atosiel = {
            "Hot daytime sun, slight breeze, no rain",
            "Gusty wind with dust swirling near midday",
            "Warm mornings, scorching afternoon, very low humidity",
            "Light breeze after sundown, starry overhead",
            "Some haze from heated ground, minimal cloud cover",
            "Sun intensity rising toward midday peak",
            "Dry soil conditions, no sign of moisture",
            "Sparse vegetation, daily heat climbing gradually",
            "Clear horizon, wind picking up in late evening",
            "Sun exposure high, consistent dryness"
        },
        Thalassiel = {
            "Brutally hot midday sun, patchy dust storms",
            "Scorching conditions, faint breeze offers minimal relief",
            "Occasional swirling wind gusts, drifting dust",
            "Heated ground emits rippling mirages at distance",
            "Persistent dryness, minimal nighttime cooldown",
            "Skies remain cloudless, high evaporation rate",
            "Dust-laden air in late afternoon swirl",
            "Rare cloud can appear but quickly vanishes",
            "Daily highs remain extreme, nights only mild",
            "Lingering warmth through sunset, dryness unwavering"
        },
        Opsitheiel = {
            "Hot days, moderate evenings, stable dryness",
            "Rare short rains if storm fronts approach, mostly none",
            "Daytime heat lingering, nights slightly cooler",
            "Periodically hazy morning from airborne dust",
            "Mild breezes, daytime remains intensely hot",
            "Cloudless skies, gentle drop in temps overnight",
            "Dust devils possible over parched plains",
            "Occasional relief from mild wind, no precipitation",
            "Hot, tranquil afternoon, moderate wind at dusk",
            "Minimal cloud presence, dryness dominating environment"
        }
    },
 
    ["Subarctic"] = {
        Atosiel = {
            "Snow melting, slushy paths, daytime sunshine",
            "Chilly breezes, frequent flurry patches possible",
            "Long nights gradually shortening, crisp mornings",
            "Mixed precipitation, cold rain at lower altitudes",
            "Slush build-up midmorning, partial sun midday",
            "Sunny breaks around noon, subzero by late night",
            "Sporadic storm with sleet or melting snow",
            "Icy patches linger, overall chilly but bright",
            "Early thaw, mild midday, returning chill after dusk",
            "Reluctant spring with freezing nights, slow warm days"
        },
        Thalassiel = {
            "Short, cool days, moderate sunshine at times",
            "Rainy intervals, potential sleet in highest peaks",
            "Snow line retreating, green valleys emerging slowly",
            "Extended twilight, crisp air after sundown",
            "Sudden midafternoon chill despite mid-summer period",
            "Drizzle commonly, heavier rainfall occasionally",
            "Mountain passes remain cool, breezy conditions",
            "Mostly cloudy, occasional glimpses of sun",
            "Brisk wind, earlier nightfall than lower latitudes",
            "Daytime highs remain mild, nights quite cold"
        },
        Opsitheiel = {
            "Early snowfall returning, freezing ground rapidly",
            "Prolonged darkness, bitterness sets in quickly",
            "Gusty winds carrying ice crystals through valleys",
            "Heavy drifts forming, multiple snowfall events",
            "Frequent subzero lows, no hint of thaw",
            "Blizzard-like conditions with large snow accumulations",
            "Icy rivers, widespread frost in daylight",
            "Mountains see near-constant snow, valleys freeze nightly",
            "Rare clear spells, intense wind chill outside",
            "Deep winter mode, swirling snow flurries all day"
        }
    }
}
}


---------------------------------------------------------
---------------------------------------------------------
-- 4. Temperature, Humidity, Rain Ranges (hiMin, hiMax, etc.)
-- 4. Temperature Ranges (climateTemperature)
---------------------------------------------------------
---------------------------------------------------------
-- (Paste your full "climateTemperature" table with hiMin, hiMax, etc.)


local climateTemperature = {
local climateTemperature = {
Line 381: Line 107:
         Opsitheiel  = { hiMin=20, hiMax=28, loMin=12, loMax=18, humMin=50, humMax=75, crMin=15, crMax=40, rfMin=1, rfMax=8  }
         Opsitheiel  = { hiMin=20, hiMax=28, loMin=12, loMax=18, humMin=50, humMax=75, crMin=15, crMax=40, rfMin=1, rfMax=8  }
     },
     },
     ["Oceanic"] = {
     -- ... plus the rest for "Oceanic," "Subpolar Oceanic," etc.
        Atosiel    = { hiMin=10, hiMax=17, loMin=5,  loMax=12, humMin=70, humMax=90, crMin=30, crMax=60, rfMin=2, rfMax=10 },
        Thalassiel  = { hiMin=14, hiMax=21, loMin=9,  loMax=14, humMin=65, humMax=85, crMin=35, crMax=70, rfMin=2, rfMax=12 },
        Opsitheiel  = { hiMin=5,  hiMax=12, loMin=1,  loMax=6,  humMin=70, humMax=90, crMin=40, crMax=80, rfMin=3, rfMax=15 }
    },
    ["Subpolar Oceanic"] = {
        Atosiel    = { hiMin=3,  hiMax=9,  loMin=-2, loMax=3,  humMin=70, humMax=95, crMin=30, crMax=70, rfMin=2, rfMax=10 },
        Thalassiel  = { hiMin=6,  hiMax=12, loMin=1,  loMax=6,  humMin=70, humMax=90, crMin=35, crMax=75, rfMin=2, rfMax=12 },
        Opsitheiel  = { hiMin=-1, hiMax=4,  loMin=-6, loMax=-1, humMin=75, humMax=95, crMin=40, crMax=80, rfMin=3, rfMax=15 }
    },
    ["Mediterranean (Hot Summer)"] = {
        Atosiel    = { hiMin=15, hiMax=21, loMin=7,  loMax=12, humMin=40, humMax=60, crMin=10, crMax=40, rfMin=1, rfMax=6  },
        Thalassiel  = { hiMin=25, hiMax=35, loMin=15, loMax=20, humMin=30, humMax=50, crMin=0,  crMax=10, rfMin=0, rfMax=3  },
        Opsitheiel  = { hiMin=12, hiMax=18, loMin=5,  loMax=10, humMin=45, humMax=65, crMin=10, crMax=40, rfMin=1, rfMax=6  }
    },
    ["Hot Desert"] = {
        Atosiel    = { hiMin=25, hiMax=35, loMin=12, loMax=18, humMin=10, humMax=30, crMin=0, crMax=5,  rfMin=0, rfMax=1  },
        Thalassiel  = { hiMin=35, hiMax=45, loMin=25, loMax=30, humMin=5,  humMax=20, crMin=0, crMax=2,  rfMin=0, rfMax=1  },
        Opsitheiel  = { hiMin=22, hiMax=30, loMin=10, loMax=16, humMin=5,  humMax=25, crMin=0, crMax=10, rfMin=0, rfMax=2  }
    },
    ["Cold Steppe"] = {
        Atosiel    = { hiMin=10, hiMax=18, loMin=2,  loMax=8,  humMin=30, humMax=50, crMin=10, crMax=40, rfMin=1, rfMax=5  },
        Thalassiel  = { hiMin=20, hiMax=28, loMin=10, loMax=15, humMin=25, humMax=45, crMin=10, crMax=40, rfMin=1, rfMax=5  },
        Opsitheiel  = { hiMin=0,  hiMax=7,  loMin=-6, loMax=0,  humMin=35, humMax=55, crMin=10, crMax=30, rfMin=1, rfMax=5  }
    },
    ["Hot Steppe"] = {
        Atosiel    = { hiMin=23, hiMax=30, loMin=12, loMax=18, humMin=20, humMax=40, crMin=0,  crMax=20, rfMin=0, rfMax=3  },
        Thalassiel  = { hiMin=30, hiMax=40, loMin=20, loMax=25, humMin=15, humMax=35, crMin=0,  crMax=10, rfMin=0, rfMax=2  },
        Opsitheiel  = { hiMin=25, hiMax=33, loMin=15, loMax=20, humMin=15, humMax=40, crMin=0,  crMax=20, rfMin=0, rfMax=3  }
    },
    ["Subarctic"] = {
        Atosiel    = { hiMin=0,  hiMax=8,  loMin=-10,loMax=-1, humMin=50, humMax=80, crMin=20, crMax=50, rfMin=1, rfMax=5  },
        Thalassiel  = { hiMin=5,  hiMax=15, loMin=-1, loMax=5,  humMin=50, humMax=85, crMin=20, crMax=60, rfMin=1, rfMax=6  },
        Opsitheiel  = { hiMin=-5, hiMax=0,  loMin=-15,loMax=-5, humMin=60, humMax=90, crMin=30, crMax=70, rfMin=1, rfMax=8  }
    }
}
}


---------------------------------------------------------
---------------------------------------------------------
-- 5. Color Coding for Weather Description
-- 5. Color-Coding Weather Description
---------------------------------------------------------
---------------------------------------------------------


local function getEventColor(eventText)
local function getEventColor(eventText)
     local textLower = eventText:lower()
     local textLower = eventText:lower()
    -- Each type of event has a logical color:
     if textLower:find("thunder") or textLower:find("storm") then
     if textLower:find("thunder") or textLower:find("storm") then
         return "#FFD2D2"  -- light red for storms
         return "#FFC0C0"  -- a moderate red/pink for storms
     elseif textLower:find("snow") or textLower:find("sleet") or textLower:find("flurries") then
     elseif textLower:find("snow") or textLower:find("sleet") or textLower:find("flurries") then
         return "#D2ECFF"  -- light blue for snow
         return "#CCE6FF"  -- a moderate blue for snowy
     elseif textLower:find("rain") or textLower:find("drizzle") or textLower:find("downpour") then
     elseif textLower:find("rain") or textLower:find("drizzle") or textLower:find("downpour") then
         return "#D2DFFF"  -- light purple/blue for rain events
         return "#CCEEFF"  -- a soft aqua for rain
     elseif textLower:find("dust") or textLower:find("desert") then
     elseif textLower:find("dust") or textLower:find("desert") then
         return "#FFFACD"  -- lemon chiffon for dust
         return "#FFFACD"  -- lemon chiffon for dust
     elseif textLower:find("hail") then
     elseif textLower:find("hail") then
         return "#E5F6FF"  -- pale for hail
         return "#E0FFFF"  -- light cyan for hail
     else
     else
         return "#F8F8F8" -- default light gray
         return "#F8F8F8"   -- default light gray
     end
     end
end
end


---------------------------------------------------------
---------------------------------------------------------
-- 6. City-Specific Natural Disaster Risks
-- 6. Map Climate Name -> Background Color
--    According to the table you provided:
--      Cfa (Humid Subtropical) -> #FFE4C4
--      Cfb (Oceanic) -> #CCE5FF
--      Cfc (Subpolar Oceanic) -> #CCFFFF
--      Csa (Mediterranean, hot summer) -> #FFE4C4
--      BSh (Hot Steppe) -> #FFDFAF
--      BWh (Hot Desert) -> #FFD1DC
--      BSk (Cold Steppe) -> #FFECB3
--      Dfc (Subarctic) -> #CAB3FF
--
--  We'll create a function that returns these based on the spelled-out name.
---------------------------------------------------------
 
local function getClimateBGColor(climateName)
    -- We'll define a small map from spelled-out to the color in your table.
    -- e.g. if the spelled-out "Humid Subtropical" => "Cfa" => #FFE4C4
    local map = {
        ["Humid Subtropical"]        = "#FFE4C4", -- cfa
        ["Oceanic"]                  = "#CCE5FF", -- cfb
        ["Subpolar Oceanic"]          = "#CCFFFF", -- cfc
        ["Mediterranean (Hot Summer)"]= "#FFE4C4", -- csa
        ["Hot Steppe"]                = "#FFDFAF", -- bsh
        ["Hot Desert"]                = "#FFD1DC", -- bwh
        ["Cold Steppe"]              = "#FFECB3", -- bsk
        ["Subarctic"]                = "#CAB3FF"  -- dfc
    }
    return map[climateName] or "#F8F8F8"
end
 
---------------------------------------------------------
-- 7. City-Specific Disaster Profiles
---------------------------------------------------------
---------------------------------------------------------


Line 485: Line 209:


---------------------------------------------------------
---------------------------------------------------------
-- 7. Disaster Advisory Logic
-- 8. Advisory Logic
--    If triggered, color code cell in red
---------------------------------------------------------
---------------------------------------------------------


Line 545: Line 270:


---------------------------------------------------------
---------------------------------------------------------
-- 8. Random Weather Stats (wind direction + wind speed)
-- 9. Random Weather Stats (including wind speed)
---------------------------------------------------------
---------------------------------------------------------


Line 555: Line 280:
         return {
         return {
             highC="N/A", lowC="N/A", humidity="N/A",
             highC="N/A", lowC="N/A", humidity="N/A",
             chanceOfRain="N/A", predictedRain="N/A", windDir="N/A", windSpeed="N/A"
             chanceOfRain="N/A", predictedRain="N/A",
            windDir="N/A", windSpeed="N/A"
         }
         }
     end
     end
Line 563: Line 289:
     local hum = math.random(data.humMin, data.humMax)
     local hum = math.random(data.humMin, data.humMax)


    -- chance of rain
     local cRain = math.random(data.crMin, data.crMax)
     local cRain = math.random(data.crMin, data.crMax)
     local pRain = 0
     local pRain = 0
Line 571: Line 296:


     local wDir  = windDirections[math.random(#windDirections)]
     local wDir  = windDirections[math.random(#windDirections)]
    -- e.g., wind speeds from 0–50 km/h. Adjust as you see fit:
     local wSpd  = math.random(0, 50) -- 0..50 km/h
     local wSpd  = math.random(0, 50)


     return {
     return {
         highC = hiC,
         highC = hiC,
         lowC = loC,
         lowC = loC,
         humidity = hum,
         humidity     = hum,
         chanceOfRain = cRain,
         chanceOfRain = cRain,
         predictedRain = pRain,
         predictedRain= pRain,
         windDir = wDir,
         windDir     = wDir,
         windSpeed = wSpd
         windSpeed   = wSpd
     }
     }
end
end


---------------------------------------------------------
---------------------------------------------------------
-- 9. Celsius to Fahrenheit
-- 10. Celsius to Fahrenheit
---------------------------------------------------------
---------------------------------------------------------


Line 594: Line 318:


---------------------------------------------------------
---------------------------------------------------------
-- 10. Full City List (No abbreviations)
-- 11. Full City List
---------------------------------------------------------
---------------------------------------------------------


local cityData = {
local cityData = {
    -- Major Cities in Bassaridia Vaeringheim
     {city = "Vaeringheim",      climate = "Humid Subtropical"},
     {city = "Vaeringheim",      climate = "Humid Subtropical"},
     {city = "Luminaria",        climate = "Humid Subtropical"},
     {city = "Luminaria",        climate = "Humid Subtropical"},
Line 610: Line 333:
     {city = "Sylvapolis",        climate = "Humid Subtropical"},
     {city = "Sylvapolis",        climate = "Humid Subtropical"},


    -- Minor Cities in Bassaridia Vaeringheim
     {city = "Saluria",          climate = "Oceanic"},
     {city = "Saluria",          climate = "Oceanic"},
     {city = "Aetherium",        climate = "Subarctic"},
     {city = "Aetherium",        climate = "Subarctic"},
Line 621: Line 343:
     {city = "Aureum",            climate = "Mediterranean (Hot Summer)"},
     {city = "Aureum",            climate = "Mediterranean (Hot Summer)"},


    -- Major Cities in New South Jangsong
     {city = "Skýrophos",        climate = "Oceanic"},
     {city = "Skýrophos",        climate = "Oceanic"},
     {city = "Bjornopolis",      climate = "Oceanic"},
     {city = "Bjornopolis",      climate = "Oceanic"},
Line 628: Line 349:
     {city = "Thorsalon",        climate = "Oceanic"},
     {city = "Thorsalon",        climate = "Oceanic"},


    -- Minor Cities in New South Jangsong
     {city = "Pelagia",          climate = "Hot Steppe"},
     {city = "Pelagia",          climate = "Hot Steppe"},
     {city = "Myrene",            climate = "Oceanic"},
     {city = "Myrene",            climate = "Oceanic"},
Line 635: Line 355:
     {city = "Halicarn",          climate = "Mediterranean (Hot Summer)"},
     {city = "Halicarn",          climate = "Mediterranean (Hot Summer)"},


    -- Major Cities in Haifan Bassaridia
     {city = "Keybir-Aviv",      climate = "Humid Subtropical"},
     {city = "Keybir-Aviv",      climate = "Humid Subtropical"},
     {city = "Tel-Amin",          climate = "Mediterranean (Hot Summer)"},
     {city = "Tel-Amin",          climate = "Mediterranean (Hot Summer)"},
Line 642: Line 361:
     {city = "Lewisburg",        climate = "Humid Subtropical"},
     {city = "Lewisburg",        climate = "Humid Subtropical"},


    -- Minor Cities in Haifan Bassaridia
     {city = "Thermosalem",      climate = "Oceanic"},
     {city = "Thermosalem",      climate = "Oceanic"},
     {city = "Akróstadium",      climate = "Cold Steppe"},
     {city = "Akróstadium",      climate = "Cold Steppe"},
Line 650: Line 368:


---------------------------------------------------------
---------------------------------------------------------
-- 11. Main Weather Forecast Table Function
-- 12. Main Weather Forecast Table Function
---------------------------------------------------------
---------------------------------------------------------


Line 656: Line 374:
     local dateInfo  = getCurrentDateInfo()
     local dateInfo  = getCurrentDateInfo()
     local dayOfYear = dateInfo.dayOfYear
     local dayOfYear = dateInfo.dayOfYear
     local yearNumber= dateInfo.psscYear
     local yearNum  = dateInfo.psscYear


     local seasonName= getSeasonName(dayOfYear)
     local seasonName= getSeasonName(dayOfYear)


     local output = {}
     local out = {}
     table.insert(output, "== Daily Weather Forecast ==\n")
     table.insert(out, "== Daily Weather Forecast ==\n")
     table.insert(output, string.format(
     table.insert(out, string.format(
         "''(Day %d of Year %d PSSC, %s)''\n\n",
         "''(Day %d of Year %d PSSC, %s)''\n\n",
         dayOfYear, yearNumber, seasonName
         dayOfYear, yearNum, seasonName
     ))
     ))


     -- Start table
     -- Start table
     table.insert(output, '{| class="wikitable sortable" style="width:100%; text-align:left;"\n')
     table.insert(out, '{| class="wikitable sortable" style="width:100%; text-align:left;"\n')
     table.insert(output,
     table.insert(out,
        "! City !! Climate !! Season !! High °C (°F) !! Low °C (°F) !! Humidity (%) !! Chance of Rain (%) !! Rainfall (mm) !! Wind Dir !! Wind Speed (km/h) !! Today's Weather !! Advisory\n"
[[! City !! Climate !! Season !! High °C (°F) !! Low °C (°F) !! Humidity (%) !! Chance of Rain (%) !! Rainfall (mm) !! Wind Dir !! Wind Speed (km/h) !! Today's Weather !! Advisory
]]
     )
     )


Line 677: Line 396:
         local climateName = cityEntry.climate
         local climateName = cityEntry.climate


         -- (A) Pick random event
         -- (A) Random event pick
         local climateTable = climateEvents[climateName]
         local cTable  = climateEvents[climateName]
         local seasonTable = climateTable and climateTable[seasonName]
         local sTable = cTable and cTable[seasonName]
         local forecastStr  = "No data"
         local forecast= "No data"
         if seasonTable and #seasonTable > 0 then
         if sTable and #sTable > 0 then
             local rndIndex = math.random(#seasonTable)
             forecast = sTable[math.random(#sTable)]
            forecastStr = seasonTable[rndIndex]
         end
         end


         -- (B) Color coding for event cell
         -- (B) Weather cell color
         local rowColor = getEventColor(forecastStr)
         local weatherColor = getEventColor(forecast)


         -- (C) Random stats
         -- (C) Stats
         local stats = getRandomWeatherStats(climateName, seasonName)
         local stats = getRandomWeatherStats(climateName, seasonName)
         local highC  = stats.highC
         local hiC  = stats.highC
         local lowC   = stats.lowC
         local loC   = stats.lowC
         local hum   = stats.humidity
         local hum   = stats.humidity
         local cRain = stats.chanceOfRain
         local cRain = stats.chanceOfRain
         local pRain = stats.predictedRain
         local pRain = stats.predictedRain
         local wDir   = stats.windDir
         local wDir = stats.windDir
         local wSpd   = stats.windSpeed
         local wSpd = stats.windSpeed
         local highF  = (type(highC)=="number") and cToF(highC) or "N/A"
         local hiF  = (type(hiC)=="number") and cToF(hiC) or "N/A"
         local lowF   = (type(lowC)=="number") and cToF(lowC) or "N/A"
         local loF   = (type(loC)=="number") and cToF(loC) or "N/A"


         -- (D) Natural Disaster Advisory
         -- (D) Advisory
         local advisory = getDisasterAdvisory(
         local advisory = getDisasterAdvisory(
             cityName, forecastStr, cRain, pRain,
             cityName, forecast, cRain, pRain,
             (type(highC)=="number" and highC or 0)
             (type(hiC)=="number" and hiC or 0)
        )
        -- If there's an advisory, color it red
        local advisoryCell
        if advisory ~= "No Advisory" then
            advisoryCell = 'style="background-color:#FFBABA" | ' .. advisory
        else
            advisoryCell = advisory
        end
 
        -- (E) Climate cell color
        local climateBG = getClimateBGColor(climateName)
        local climateCell = string.format(
            'style="background-color:%s" | %s',
            climateBG, climateName
         )
         )


         table.insert(output, "|-\n")
         table.insert(out, "|-\n")
         table.insert(output, string.format(
         table.insert(out, string.format(
            '| %s || %s || %s || %s (%s) || %s (%s) || %s || %s || %s || %s || %s || style="background-color:%s" | %s || %s\n',
[[| %s || %s || %s || %s (%s) || %s (%s) || %s || %s || %s || %s || %s || style="background-color:%s" | %s || %s
             cityName, climateName, seasonName,
]],
             tostring(highC), tostring(highF),
             cityName,
             tostring(lowC), tostring(lowF),
            climateCell,
            seasonName,
             tostring(hiC), tostring(hiF),
             tostring(loC), tostring(loF),
             tostring(hum),
             tostring(hum),
             tostring(cRain),
             tostring(cRain),
Line 718: Line 453:
             wDir,
             wDir,
             tostring(wSpd),
             tostring(wSpd),
             rowColor, forecastStr,
             weatherColor, forecast,
             advisory
             advisoryCell
         ))
         ))
     end
     end


     table.insert(output, "|}\n")
     table.insert(out, "|}\n")
     return table.concat(output)
     return table.concat(out)
end
end


return p
return p

Revision as of 03:47, 26 December 2024

Documentation for this module may be created at Module:BassaridiaForecast/doc 

---------------------------------------------------------
-- Module:WeatherForecastTable
---------------------------------------------------------

local p = {}

---------------------------------------------------------
-- 1. Calendar System
---------------------------------------------------------

local function getCurrentDateInfo()
    local startDate = os.time({year = 1999, month = 8, day = 6})
    local secondsInDay = 86400
    local daysPerYear = 183

    local currentTime = os.time()
    local totalDaysElapsed = math.floor((currentTime - startDate) / secondsInDay)

    local yearFraction = totalDaysElapsed / daysPerYear
    local psscYear = math.floor(yearFraction)
    local dayOfYear = math.floor((yearFraction - psscYear) * daysPerYear) + 1

    return {
        psscYear = psscYear,
        dayOfYear = dayOfYear
    }
end

---------------------------------------------------------
-- 2. Determine the Season
--    1..61       => Atosiel
--    62..122     => Thalassiel
--    123..183    => Opsitheiel
---------------------------------------------------------

local function getSeasonName(dayOfYear)
    if dayOfYear <= 61 then
        return "Atosiel"
    elseif dayOfYear <= 122 then
        return "Thalassiel"
    else
        return "Opsitheiel"
    end
end

---------------------------------------------------------
-- 3. Weather Events (10 per climate-season)
---------------------------------------------------------

-- (Same data as before — omitted here only for brevity in this comment,
-- but you must paste the entire "climateEvents" table from your final code.)

local climateEvents = {
    ["Humid Subtropical"] = {
        Atosiel = {
            "Morning drizzle and warm afternoon sunshine",
            "Mild thunderstorm building by midday",
            "Patchy fog at dawn, clearing toward lunch",
            "Light rain with sunny breaks after noon",
            "Gentle breezes, blossoming warmth, low humidity",
            "Scattered clouds with a brief shower by dusk",
            "Humid sunrise, comfortable high around midday",
            "Overcast for part of the day, mild temperatures",
            "Warm breezes carrying faint floral scents",
            "Partial sun, warm with a slight chance of rain"
        },
        Thalassiel = {
            "Hot, steamy day with intense midday heat",
            "Tropical-like humidity, afternoon thunder possible",
            "Intermittent heavy downpours, muggy evenings",
            "High humidity and patchy thunderstorms late",
            "Sun-scorched morning, scattered storms by dusk",
            "Hazy sunshine, extremely warm all day",
            "Thick humidity, chance of lightning late evening",
            "Sticky air, short downpours in isolated spots",
            "Heat advisory with only brief cooling at night",
            "Nighttime storms lingering into early morning"
        },
        Opsitheiel = {
            "Warm daytime, gentle evening breezes",
            "Occasional rain, otherwise mild temperatures",
            "Late-season warmth, scattered rain after sunset",
            "Cooler mornings, returning to warmth by midday",
            "Sparse cloud cover, tranquil weather overall",
            "Fog at dawn, warm midday, pleasant night",
            "Partial sun, comfortable humidity levels",
            "Evening drizzle with mild breezes",
            "Patchy haze, moderate warmth throughout the day",
            "Short-lived shower, then clearing skies"
        }
    },
    -- ... plus "Oceanic," "Subpolar Oceanic," "Mediterranean (Hot Summer),"
    -- "Hot Desert," "Cold Steppe," "Hot Steppe," "Subarctic," each with
    -- 10 events per season. (Paste your full data here.)
}

---------------------------------------------------------
-- 4. Temperature Ranges (climateTemperature)
---------------------------------------------------------

-- (Paste your full "climateTemperature" table with hiMin, hiMax, etc.)

local climateTemperature = {
    ["Humid Subtropical"] = {
        Atosiel     = { hiMin=18, hiMax=26, loMin=10, loMax=16, humMin=60, humMax=80, crMin=20, crMax=50, rfMin=1, rfMax=10 },
        Thalassiel  = { hiMin=25, hiMax=34, loMin=19, loMax=24, humMin=65, humMax=90, crMin=30, crMax=70, rfMin=2, rfMax=15 },
        Opsitheiel  = { hiMin=20, hiMax=28, loMin=12, loMax=18, humMin=50, humMax=75, crMin=15, crMax=40, rfMin=1, rfMax=8  }
    },
    -- ... plus the rest for "Oceanic," "Subpolar Oceanic," etc.
}

---------------------------------------------------------
-- 5. Color-Coding Weather Description
---------------------------------------------------------

local function getEventColor(eventText)
    local textLower = eventText:lower()
    -- Each type of event has a logical color:
    if textLower:find("thunder") or textLower:find("storm") then
        return "#FFC0C0"  -- a moderate red/pink for storms
    elseif textLower:find("snow") or textLower:find("sleet") or textLower:find("flurries") then
        return "#CCE6FF"  -- a moderate blue for snowy
    elseif textLower:find("rain") or textLower:find("drizzle") or textLower:find("downpour") then
        return "#CCEEFF"  -- a soft aqua for rain
    elseif textLower:find("dust") or textLower:find("desert") then
        return "#FFFACD"  -- lemon chiffon for dust
    elseif textLower:find("hail") then
        return "#E0FFFF"  -- light cyan for hail
    else
        return "#F8F8F8"   -- default light gray
    end
end

---------------------------------------------------------
-- 6. Map Climate Name -> Background Color
--    According to the table you provided:
--      Cfa (Humid Subtropical) -> #FFE4C4
--      Cfb (Oceanic) -> #CCE5FF
--      Cfc (Subpolar Oceanic) -> #CCFFFF
--      Csa (Mediterranean, hot summer) -> #FFE4C4
--      BSh (Hot Steppe) -> #FFDFAF
--      BWh (Hot Desert) -> #FFD1DC
--      BSk (Cold Steppe) -> #FFECB3
--      Dfc (Subarctic) -> #CAB3FF
--
--  We'll create a function that returns these based on the spelled-out name.
---------------------------------------------------------

local function getClimateBGColor(climateName)
    -- We'll define a small map from spelled-out to the color in your table.
    -- e.g. if the spelled-out "Humid Subtropical" => "Cfa" => #FFE4C4
    local map = {
        ["Humid Subtropical"]         = "#FFE4C4", -- cfa
        ["Oceanic"]                   = "#CCE5FF", -- cfb
        ["Subpolar Oceanic"]          = "#CCFFFF", -- cfc
        ["Mediterranean (Hot Summer)"]= "#FFE4C4", -- csa
        ["Hot Steppe"]                = "#FFDFAF", -- bsh
        ["Hot Desert"]                = "#FFD1DC", -- bwh
        ["Cold Steppe"]               = "#FFECB3", -- bsk
        ["Subarctic"]                 = "#CAB3FF"  -- dfc
    }
    return map[climateName] or "#F8F8F8"
end

---------------------------------------------------------
-- 7. City-Specific Disaster Profiles
---------------------------------------------------------

local cityDisasterProfiles = {
    ["Vaeringheim"]       = {"flood", "heatwave", "thunderstorm"},
    ["Luminaria"]         = {"flood", "landslide"},
    ["Serena"]            = {"snowstorm", "landslide"},
    ["Pyralis"]           = {"forest fire", "heatwave"},
    ["Symphonara"]        = {"landslide", "flood"},
    ["Aurelia"]           = {"drought", "heatwave"},
    ["Somniumpolis"]      = {"flood"},
    ["Nexa"]              = {"landslide"},
    ["Lunalis Sancta"]    = {"flood"},
    ["Sylvapolis"]        = {"flood"},
    ["Saluria"]           = {"flood"},
    ["Aetherium"]         = {"snowstorm", "blizzard"},
    ["Ferrum Citadel"]    = {"dust storm", "heatwave"},
    ["Acheron"]           = {"flood", "landslide"},
    ["Erythros"]          = {"flood"},
    ["Catonis Atrium"]    = {"landslide"},
    ["Delphica"]          = {"flood"},
    ["Koinonía"]          = {"landslide"},
    ["Aureum"]            = {"drought", "heatwave"},
    ["Skýrophos"]         = {"landslide", "coastal storm"},
    ["Bjornopolis"]       = {"flood"},
    ["Aegirheim"]         = {"snowstorm", "blizzard"},
    ["Norsolyra"]         = {"flood", "dust storm"},
    ["Thorsalon"]         = {"coastal storm", "flood"},
    ["Pelagia"]           = {"dust storm", "drought"},
    ["Myrene"]            = {"flood"},
    ["Thyrea"]            = {"flood", "thunderstorm"},
    ["Ephyra"]            = {"snowstorm"},
    ["Halicarn"]          = {"drought", "landslide"},
    ["Keybir-Aviv"]       = {"flood", "heatwave"},
    ["Tel-Amin"]          = {"drought", "heatwave"},
    ["Diamandis"]         = {"drought", "heatwave"},
    ["Jogi"]              = {"flood"},
    ["Lewisburg"]         = {"flood", "landslide"},
    ["Thermosalem"]       = {"flood"},
    ["Akróstadium"]       = {"dust storm", "landslide"},
    ["Sufriya"]           = {"flood", "dust storm"},
    ["Lykopolis"]         = {"flood"}
}

---------------------------------------------------------
-- 8. Advisory Logic
--    If triggered, color code cell in red
---------------------------------------------------------

local function getDisasterAdvisory(cityName, eventText, chanceOfRain, predictedRain, highC)
    local disasterList = cityDisasterProfiles[cityName] or {}
    local textLower = eventText:lower()
    local advisories = {}

    for _, disasterType in ipairs(disasterList) do
        if disasterType == "flood" then
            if chanceOfRain > 60 or textLower:find("heavy downpours") then
                table.insert(advisories, "Flood Advisory")
            end
        elseif disasterType == "heatwave" then
            if highC >= 32 then
                table.insert(advisories, "Heatwave Warning")
            end
        elseif disasterType == "thunderstorm" then
            if textLower:find("thunder") or textLower:find("storm") then
                table.insert(advisories, "Thunderstorm Alert")
            end
        elseif disasterType == "snowstorm" then
            if textLower:find("snow") or textLower:find("sleet") then
                table.insert(advisories, "Snowstorm Warning")
            end
        elseif disasterType == "landslide" then
            if chanceOfRain > 50 or textLower:find("heavy rain") or textLower:find("thunderstorm") then
                table.insert(advisories, "Landslide Risk")
            end
        elseif disasterType == "forest fire" then
            if textLower:find("hot") or chanceOfRain < 10 then
                table.insert(advisories, "Forest Fire Risk")
            end
        elseif disasterType == "drought" then
            if chanceOfRain < 5 then
                table.insert(advisories, "Drought Alert")
            end
        elseif disasterType == "blizzard" then
            if textLower:find("snow") or textLower:find("flurries") then
                table.insert(advisories, "Blizzard Warning")
            end
        elseif disasterType == "dust storm" then
            if textLower:find("dust") then
                table.insert(advisories, "Dust Storm Advisory")
            end
        elseif disasterType == "coastal storm" then
            if textLower:find("storm") then
                table.insert(advisories, "Coastal Storm Alert")
            end
        end
    end

    if #advisories == 0 then
        return "No Advisory"
    else
        return table.concat(advisories, "; ")
    end
end

---------------------------------------------------------
-- 9. Random Weather Stats (including wind speed)
---------------------------------------------------------

local windDirections = {"N", "NE", "E", "SE", "S", "SW", "W", "NW"}

local function getRandomWeatherStats(climate, season)
    local data = climateTemperature[climate] and climateTemperature[climate][season]
    if not data then
        return {
            highC="N/A", lowC="N/A", humidity="N/A",
            chanceOfRain="N/A", predictedRain="N/A",
            windDir="N/A", windSpeed="N/A"
        }
    end

    local hiC = math.random(data.hiMin, data.hiMax)
    local loC = math.random(data.loMin, data.loMax)
    local hum = math.random(data.humMin, data.humMax)

    local cRain = math.random(data.crMin, data.crMax)
    local pRain = 0
    if cRain > 0 then
        pRain = math.random(data.rfMin, data.rfMax)
    end

    local wDir  = windDirections[math.random(#windDirections)]
    local wSpd  = math.random(0, 50)  -- 0..50 km/h

    return {
        highC = hiC,
        lowC  = loC,
        humidity     = hum,
        chanceOfRain = cRain,
        predictedRain= pRain,
        windDir      = wDir,
        windSpeed    = wSpd
    }
end

---------------------------------------------------------
-- 10. Celsius to Fahrenheit
---------------------------------------------------------

local function cToF(c)
    return math.floor(c * 9/5 + 32 + 0.5)
end

---------------------------------------------------------
-- 11. Full City List
---------------------------------------------------------

local cityData = {
    {city = "Vaeringheim",       climate = "Humid Subtropical"},
    {city = "Luminaria",         climate = "Humid Subtropical"},
    {city = "Serena",            climate = "Subpolar Oceanic"},
    {city = "Pyralis",           climate = "Humid Subtropical"},
    {city = "Symphonara",        climate = "Oceanic"},
    {city = "Aurelia",           climate = "Humid Subtropical"},
    {city = "Somniumpolis",      climate = "Humid Subtropical"},
    {city = "Nexa",              climate = "Humid Subtropical"},
    {city = "Lunalis Sancta",    climate = "Oceanic"},
    {city = "Sylvapolis",        climate = "Humid Subtropical"},

    {city = "Saluria",           climate = "Oceanic"},
    {city = "Aetherium",         climate = "Subarctic"},
    {city = "Ferrum Citadel",    climate = "Hot Desert"},
    {city = "Acheron",           climate = "Cold Steppe"},
    {city = "Erythros",          climate = "Oceanic"},
    {city = "Catonis Atrium",    climate = "Oceanic"},
    {city = "Delphica",          climate = "Oceanic"},
    {city = "Koinonía",          climate = "Oceanic"},
    {city = "Aureum",            climate = "Mediterranean (Hot Summer)"},

    {city = "Skýrophos",         climate = "Oceanic"},
    {city = "Bjornopolis",       climate = "Oceanic"},
    {city = "Aegirheim",         climate = "Subarctic"},
    {city = "Norsolyra",         climate = "Oceanic"},
    {city = "Thorsalon",         climate = "Oceanic"},

    {city = "Pelagia",           climate = "Hot Steppe"},
    {city = "Myrene",            climate = "Oceanic"},
    {city = "Thyrea",            climate = "Humid Subtropical"},
    {city = "Ephyra",            climate = "Subpolar Oceanic"},
    {city = "Halicarn",          climate = "Mediterranean (Hot Summer)"},

    {city = "Keybir-Aviv",       climate = "Humid Subtropical"},
    {city = "Tel-Amin",          climate = "Mediterranean (Hot Summer)"},
    {city = "Diamandis",         climate = "Mediterranean (Hot Summer)"},
    {city = "Jogi",              climate = "Oceanic"},
    {city = "Lewisburg",         climate = "Humid Subtropical"},

    {city = "Thermosalem",       climate = "Oceanic"},
    {city = "Akróstadium",       climate = "Cold Steppe"},
    {city = "Sufriya",           climate = "Humid Subtropical"},
    {city = "Lykopolis",         climate = "Oceanic"}
}

---------------------------------------------------------
-- 12. Main Weather Forecast Table Function
---------------------------------------------------------

function p.weatherForecast(frame)
    local dateInfo  = getCurrentDateInfo()
    local dayOfYear = dateInfo.dayOfYear
    local yearNum   = dateInfo.psscYear

    local seasonName= getSeasonName(dayOfYear)

    local out = {}
    table.insert(out, "== Daily Weather Forecast ==\n")
    table.insert(out, string.format(
        "''(Day %d of Year %d PSSC, %s)''\n\n",
        dayOfYear, yearNum, seasonName
    ))

    -- Start table
    table.insert(out, '{| class="wikitable sortable" style="width:100%; text-align:left;"\n')
    table.insert(out,
[[! City !! Climate !! Season !! High °C (°F) !! Low °C (°F) !! Humidity (%) !! Chance of Rain (%) !! Rainfall (mm) !! Wind Dir !! Wind Speed (km/h) !! Today's Weather !! Advisory
]]
    )

    for _, cityEntry in ipairs(cityData) do
        local cityName    = cityEntry.city
        local climateName = cityEntry.climate

        -- (A) Random event pick
        local cTable  = climateEvents[climateName]
        local sTable  = cTable and cTable[seasonName]
        local forecast= "No data"
        if sTable and #sTable > 0 then
            forecast = sTable[math.random(#sTable)]
        end

        -- (B) Weather cell color
        local weatherColor = getEventColor(forecast)

        -- (C) Stats
        local stats = getRandomWeatherStats(climateName, seasonName)
        local hiC   = stats.highC
        local loC   = stats.lowC
        local hum   = stats.humidity
        local cRain = stats.chanceOfRain
        local pRain = stats.predictedRain
        local wDir  = stats.windDir
        local wSpd  = stats.windSpeed
        local hiF   = (type(hiC)=="number") and cToF(hiC) or "N/A"
        local loF   = (type(loC)=="number") and cToF(loC) or "N/A"

        -- (D) Advisory
        local advisory = getDisasterAdvisory(
            cityName, forecast, cRain, pRain,
            (type(hiC)=="number" and hiC or 0)
        )
        -- If there's an advisory, color it red
        local advisoryCell
        if advisory ~= "No Advisory" then
            advisoryCell = 'style="background-color:#FFBABA" | ' .. advisory
        else
            advisoryCell = advisory
        end

        -- (E) Climate cell color
        local climateBG = getClimateBGColor(climateName)
        local climateCell = string.format(
            'style="background-color:%s" | %s',
            climateBG, climateName
        )

        table.insert(out, "|-\n")
        table.insert(out, string.format(
[[| %s || %s || %s || %s (%s) || %s (%s) || %s || %s || %s || %s || %s || style="background-color:%s" | %s || %s
]],
            cityName,
            climateCell,
            seasonName,
            tostring(hiC), tostring(hiF),
            tostring(loC), tostring(loF),
            tostring(hum),
            tostring(cRain),
            tostring(pRain),
            wDir,
            tostring(wSpd),
            weatherColor, forecast,
            advisoryCell
        ))
    end

    table.insert(out, "|}\n")
    return table.concat(out)
end

return p
Retrieved from "https://micras.org/wiki/index.php?title=Module:BassaridiaForecast&oldid=350216"