Module:AutoUpdateServPrices
From MicrasWiki
Documentation for this module may be created at Module:AutoUpdateServPrices/doc
---------------------------------------------------------
-- Module:DailyPriceTable
-- Generates a daily-updated table where each cell
-- refreshes once per day, with random fluctuations
-- stable for that day but new on subsequent days.
-- Rows are colored by price level:
-- • Low => light blue
-- • Standard => light green
-- • High => light red
---------------------------------------------------------
local p = {}
---------------------------------------------------------
-- getCurrentDate
-- Returns today's date in PSSC format,
-- along with dayOfMonth and month for daily logic.
---------------------------------------------------------
local function getCurrentDate()
local startDate = os.time({year = 1999, month = 8, day = 6})
local secondsInDay = 86400
local daysPerYear = 183
local currentDate = os.time()
local totalDaysElapsed = math.floor((currentDate - startDate) / secondsInDay)
local yearFraction = totalDaysElapsed / daysPerYear
local psscYear = math.floor(yearFraction)
local dayOfYear = math.floor((yearFraction - psscYear) * daysPerYear) + 1
local month, dayOfMonth
if dayOfYear <= 61 then
month = 1
dayOfMonth = dayOfYear
elseif dayOfYear <= 122 then
month = 2
dayOfMonth = dayOfYear - 61
else
month = 3
dayOfMonth = dayOfYear - 122
end
return string.format("%d/%d/%d [[PSSC]]", dayOfMonth, month, psscYear), dayOfMonth, month
end
---------------------------------------------------------
-- Product data remains the same
---------------------------------------------------------
local products = {
{"Currency", "Lake Morovia Blockade Fund", 4.05, "stacks"},
{"Plunder", "Lake Morovia Blockade Fund", 3.30, "chests"},
{"Lievs", "Hatch Ministry", 0.32, "units"},
{"Prisoners", "Hatch Ministry", 0.04, "cells"},
{"Faces", "Maritime Guild of the Cult of Maskmakers", 0.03, "masks"},
{"Spies", "Ergonian Spy Agency", 0.01, "assignments"},
{"Missionaries of the Order Aurora Mystica", "Temple Bank of the Reformed Stripping Path", 0.05, "teams"},
{"Missionaries of Harmony Sanctum", "Temple Bank of the Reformed Stripping Path", 0.09, "teams"},
{"Missionaries of Ignis Aeternum", "Temple Bank of the Reformed Stripping Path", 0.09, "teams"},
{"Missionaries of Celestial Harmony Sect", "Temple Bank of the Reformed Stripping Path", 0.08, "teams"},
{"Missionaries of the Guild of Golden Shadows", "Temple Bank of the Reformed Stripping Path", 0.05, "teams"},
{"Missionaries of the Azure Sentinel Sect", "Temple Bank of the Reformed Stripping Path", 0.01, "teams"},
{"Missionaries of Reverie Nebulous", "Temple Bank of the Reformed Stripping Path", 0.10, "teams"},
{"Missionaries of the Eon Fellowship", "Temple Bank of the Reformed Stripping Path", 0.09, "teams"},
{"Missionaries of the Order of the Umbral Oracle", "Temple Bank of the Reformed Stripping Path", 0.07, "teams"},
{"Missionaries of the Mystery of the Verdant Embrace", "Temple Bank of the Reformed Stripping Path", 0.10, "teams"},
{"Missionaries of Conclace Illuminara", "Temple Bank of the Reformed Stripping Path", 0.02, "teams"},
{"Missionaries of Sanctum Vitalis", "Temple Bank of the Reformed Stripping Path", 0.06, "teams"},
{"Missionaries of Temple Alabaster", "Temple Bank of the Reformed Stripping Path", 0.09, "teams"},
{"Missionaries of the Court of the Ironclad", "Temple Bank of the Reformed Stripping Path", 0.06, "teams"},
{"Missionaries of Concord Accordia", "Temple Bank of the Reformed Stripping Path", 0.02, "teams"},
{"Missionaries of the Mystery of the Stygian Veil", "Temple Bank of the Reformed Stripping Path", 0.03, "teams"},
{"Missionaries of the Sylvan Fellowship", "Temple Bank of the Reformed Stripping Path", 0.09, "teams"},
{"Missionaries of the Mystery of Red Mirth", "Temple Bank of the Reformed Stripping Path", 0.06, "teams"},
{"Missionaries of Rex Catonis", "Temple Bank of the Reformed Stripping Path", 0.07, "teams"},
{"Missionaries of Sanctum Delphica", "Temple Bank of the Reformed Stripping Path", 0.09, "teams"},
{"Missionaries of Ordo Amictia", "Temple Bank of the Reformed Stripping Path", 0.06, "teams"},
{"Missionaries of Temple Illuminata", "Temple Bank of the Reformed Stripping Path", 0.05, "teams"},
{"Couriers", "Couriers of the Lizard Queen", 0.04, "dispatches"},
{"Wisp Ward Talismans", "Couriers of the Lizard Queen", 0.10, "amulets"},
{"Credit Hours", "Temple University of Delphica", 3.00, "credits"},
{"Circuses", "La Sái Ebile", 0.24, "venues"},
{"Performances", "La Sái Ebile", 0.11, "acts"},
{"Hellhound (scout)", "Hellhound Breeders of Dragevik", 0.03, "hounds"},
{"Hellhound (soldier)", "Hellhound Breeders of Dragevik", 0.05, "hounds"},
{"Hellhound (spy)", "Hellhound Breeders of Dragevik", 0.15, "hounds"},
{"Priestesses of the Pharmacon Sect (Anti-Parasitic Medicine)", "Pharmacon Sect", 0.07, "doses"},
{"Priestesses of the Pharmacon Sect (Antifungal/Respiratory Medicine)", "Pharmacon Sect", 0.08, "doses"},
{"Priestesses of the Pharmacon Sect (Trauma/Battle Medicine)", "Pharmacon Sect", 0.09, "doses"},
{"Priestesses of the Pharmacon Sect (Memory and Mind Treatment)", "Pharmacon Sect", 0.06, "doses"},
{"Priestesses of the Pharmacon Sect (Immune Boost Medicine)", "Pharmacon Sect", 0.05, "doses"},
{"Priestesses of the Pharmacon Sect (Respiratory Clearing Medicine)", "Pharmacon Sect", 0.05, "doses"},
{"Priestesses of the Pharmacon Sect (Fertility and Childbirth Medicine)", "Pharmacon Sect", 0.04, "doses"},
{"Priestesses of the Pharmacon Sect (Ritual Purification Incense)", "Pharmacon Sect", 0.03, "sticks"},
{"Priestesses of the Pharmacon Sect (Medicinal Alcohol)", "Pharmacon Sect", 0.02, "bottles"},
{"Priestesses of the Pharmacon Sect (Detoxification Medicine)", "Pharmacon Sect", 0.05, "doses"},
{"Security Contractors", "Skyrophian Security Contractors*", 0.03, "Assignments"},
{"Postal Workers", "Haifadora Postal Service*", 0.1, "Assignments"},
{"Recovered Treasure Chests", "Fleet of Rouge Divers", 6, "units"},
{"Antique Pottery", "Fleet of Rouge Divers", 40, "pieces"},
{"Salvaged Artifacts", "Fleet of Rouge Divers", 55, "items"},
{"Driftwood Timber", "Fleet of Rouge Divers", 3.2, "tons"},
{"Recovered Jewelry", "Fleet of Rouge Divers", 12, "sets"},
{"Glassware (Recovered)", "Fleet of Rouge Divers", 90, "pieces"},
{"Metal Ingots (Mixed)", "Fleet of Rouge Divers", 700, "kg"},
}
---------------------------------------------------------
-- Special Date Events
---------------------------------------------------------
local events = {
["1,6"] = "Bayram al-Nur (Festival of Light) [Vaeringheim]",
["1,18"] = "Chag Or Hadash (Festival of New Light) [Luminaria]",
["1,30"] = "Symposion Eirinis (Symposium of Harmony) [Serena]",
["1,43"] = "Alev Günü (Day of Flame) [Pyralis]",
["1,48"] = "Day of Abandonment [Vaeringheim]",
["1,55"] = "Tikkun Tzel (Repair of Shadows) [Symphonara]",
["2,6"] = "Panegyris Chrysou (Golden Gathering) [Aurelia]",
["2,17"] = "Constitution Day [Luminaria]",
["2,19"] = "Mehtap Dalgası (Moonlit Tide) [Vaeringheim]",
["2,31"] = "Oneiro Foteino (Dream of Illumination) [Somniumpolis]",
["2,39"] = "Anniversary of victory in the New South Jangsong Campaign [Nexa]",
["2,44"] = "Erev Galgal (Eve of Cycles) [Nexa]",
["2,45"] = "Bassaridia Festival [Somniumpolis]",
["2,48"] = "Anniversary of victory in the Southern Lake Morovia Campaign [Somniumpolis]",
["2,54"] = "Leilat al-Kamar (Night of the Moon) [Lunalis Sancta]",
["2,61"] = "Taşrakah (Reverence of the Stone) [Luminaria]",
["3,6"] = "Chag Tvuah (Festival of Harvest) [Sylvapolis]",
["3,18"] = "Anagenesis Eirmos (Procession of Rebirth) [Acheron]",
["3,28"] = "Panagia Therizis (Holy Day of the Reaper) [Sylvapolis]",
["3,37"] = "Anniversary of victory in the Morovian Frontier Campaign [Acheron]",
["3,43"] = "Karnavali Thysias (Carnival of Celebration) [Erythros]",
["3,53"] = "Sefar Yashar (Straight Path Celebration) [Catonis Atrium]",
}
---------------------------------------------------------
-- simulatePriceChange
-- Applies a daily random factor; special date events
-- add a small positive boost to the final price.
---------------------------------------------------------
local function simulatePriceChange(basePrice, dayOfMonth, month)
local dateKey = string.format("%d,%d", month, dayOfMonth)
local changeFactor = math.random(-20, 20) / 100
local explanation
if events[dateKey] then
explanation = events[dateKey] .. ": Prices influenced by event dynamics."
changeFactor = changeFactor + 0.05 -- small event-based boost
else
explanation = "General market fluctuations."
end
local newPrice = math.floor((basePrice * (1 + changeFactor)) * 100) / 100
return newPrice, changeFactor, explanation
end
---------------------------------------------------------
-- determinePriceLevel
-- Swapped so that:
-- adjustedPrice > basePrice ⇒ "Low"
-- adjustedPrice < basePrice ⇒ "High"
-- otherwise ⇒ "Standard"
---------------------------------------------------------
local function determinePriceLevel(basePrice, adjustedPrice)
if adjustedPrice > basePrice then
return "Low"
elseif adjustedPrice < basePrice then
return "High"
else
return "Standard"
end
end
---------------------------------------------------------
-- Main function: generateTable
-- Seeds random daily, then builds table with row coloring
---------------------------------------------------------
function p.generateTable()
-- Seed randomness
local localTime = os.date("*t")
local dailySeed = localTime.year * 1000 + localTime.yday
math.randomseed(dailySeed)
-- Retrieve date
local dateString, dayOfMonth, month = getCurrentDate()
-- Table header
local wikitable =
"{| class=\"wikitable\"\n" ..
"! Date (Day/Month/Year [[PSSC]]) !! Product !! Producing Company !! Base Price !! Price Level !! Tier III Price !! Tier II Price !! Tier I Price !! Units !! Explanation\n"
-- Track totals for averages
local totalBase, totalNew, count = 0, 0, 0
-- Iterate products
for _, product in ipairs(products) do
local name, company, basePrice, units = unpack(product)
local newPrice, _, explanation = simulatePriceChange(basePrice, dayOfMonth, month)
local priceLevel = determinePriceLevel(basePrice, newPrice)
-- Choose row color
local rowStyle
if priceLevel == "Low" then
rowStyle = ' style="background-color:lightblue;"'
elseif priceLevel == "Standard" then
rowStyle = ' style="background-color:lightgreen;"'
else
rowStyle = ' style="background-color:#ffcccb;"' -- light red
end
-- Compute tiers
local tierIIIPrice = math.floor((newPrice / 3) * 100) / 100
local tierIIPrice = math.floor((newPrice * 2 / 3) * 100) / 100
local tierIPrice = newPrice
-- Accumulate totals
totalBase = totalBase + basePrice
totalNew = totalNew + newPrice
count = count + 1
-- Insert colored row
wikitable = wikitable .. string.format(
"|-%s\n| %s || %s || %s || %.2f || %s || %.2f || %.2f || %.2f || %s || %s\n",
rowStyle, dateString, name, company, basePrice,
priceLevel, tierIIIPrice, tierIIPrice, tierIPrice, units, explanation
)
end
-- Compute averages
local avgBase = totalBase / count
local avgNew = totalNew / count
local averagePriceLevel
if avgNew > avgBase then
averagePriceLevel = "Low"
elseif avgNew < avgBase then
averagePriceLevel = "High"
else
averagePriceLevel = "Standard"
end
-- Final row
wikitable = wikitable .. string.format(
"|-\n! colspan=\"10\" | Average adjusted price (%.2f) compared to average base price (%.2f) ⇒ **%s**\n",
avgNew, avgBase, averagePriceLevel
)
-- Close table
wikitable = wikitable .. "|}"
return wikitable
end
return p
