Module:BassaridMarketActivity

From MicrasWiki
Jump to navigationJump to search

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

---------------------------------------------------------
-- Module:BassaridMarketActivity (Signal-Driven)
--
-- Original behavior:
--  • Daily table of investor "stock" activity with ±30% cap
--  • Randomized buy/sell creating Open/Close values
--  • Unique reasons pulled from increase/decrease pools
--
-- Change (Jan 2026):
--  • Market direction and magnitude are influenced by the same
--    operational signals used in the price modules:
--      - Weather / Ops Alert via Module:BassaridiaForecast
--      - War League tempo via Module:WarLeagueDivisionOpsBVR
--      - Hatch Ministry tempo via Module:HatchMinistryDailyOps
--      - Temple missionary tempo via Module:MissionaryDailyOpsBVR
--      - Public health via Module:BassaridiaOutbreaks
--
-- Performance:
--  • All external modules are called at most ONCE per page render.
--
-- Usage:
--   {{#invoke:BassaridMarketActivity|generateTable}}
--   Optional args:
--     |hub=Vaeringheim   (city used for national signal baselines)
--     |shareprice=30     (default 30 Polis/share)
---------------------------------------------------------
local p = {}

---------------------------------------------------------
-- 1) Date logic (same calendar)
---------------------------------------------------------
local function getDailyDate()
	local startDate = os.time({year = 1999, month = 8, day = 6})
	local secondsInDay = 86400
	local daysPerYear = 183

	local now = os.time()
	local totalDaysElapsed = math.floor((now - 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

	local dateString = string.format("%d/%d/%d PSSC", dayOfMonth, month, psscYear)
	return dateString, dayOfYear, psscYear
end

---------------------------------------------------------
-- 2) Data: Tickers/Companies (unchanged)
---------------------------------------------------------
local companies = {
	{ flag = [[File:VaeringheimDivisionFlag.png|25px]], symbol = "VREG", name = "Vaeringheim Regional Investor (Bassaridia Vaeringheim)", stocks = 16552.80 },
	{ flag = [[File:AlpazkigzDivisionFlag.png|25px]], symbol = "ALPK", name = "Alpazkigz Regional Investor (Bassaridia Vaeringheim)", stocks = 15881.61 },
	{ flag = [[File:OdiferiaFlag.png|25px]], symbol = "ODFR", name = "Odiferia Regional Investor (Bassaridia Vaeringheim)", stocks = 14445.72 },
	{ flag = [[File:HafaanFlag.png|25px]], symbol = "HAFA", name = "Hafaan Regional Investor (Bassaridia Vaeringheim)", stocks = 3630.00 },
	{ flag = [[File:JeseriFlag.png|25px]], symbol = "JESR", name = "Jeseri Regional Investor (Bassaridia Vaeringheim)", stocks = 1870.00 },
	{ flag = [[File:HatchMinistryFlag.png|25px]], symbol = "HMIN", name = "Hatch Ministry Regional Investor (Bassaridia Vaeringheim)", stocks = 7704.57 },
	{ flag = [[File:NewSouthJangsongFlag.png|25px]], symbol = "JANG", name = "New South Jangsong Regional Investor (Bassaridia Vaeringheim)", stocks = 10807.88 },
	{ flag = [[File:HaifaDivisionFlag.png|25px]], symbol = "HBAS", name = "Haifan Bassaridia Regional Investor (Bassaridia Vaeringheim)", stocks = 12243.75 },
	{ flag = [[File:BassaridianNormarkFlagB.png|25px]], symbol = "BSNO", name = "Regional Investor of Bassaridian Normark (Bassaridia Vaeringheim)", stocks = 8254.49 },
	{ flag = [[File:Kingdom of Moorland flag.png|25px]], symbol = "SMOR", name = "Sovereign Moorland Fund (Moorland)", stocks = 10546.00 },
	{ symbol = "SVWF", name = "Sovereign Wealth Fund (Imperial Federation)", stocks = 827.00 },
	{ symbol = "ADRS", name = "Adrestia Wealth Fund (Imperial Federation)", stocks = 7456.00 },
	{ symbol = "HAIF", name = "Haifa Wealth Wealth Fund (Imperial Federation)", stocks = 10183.00 },
	{ symbol = "STRC", name = "Strait of Haifa Corporation (Imperial Federation)", stocks = 4493.00 },
	{ symbol = "BIND", name = "Baicha Heavy Industries (Imperial Federation)", stocks = 21183.00 },
	{ symbol = "GFIF", name = "General Fund of the Imperial Federation (Imperial Federation)", stocks = 876.00 },
	{ symbol = "POCO", name = "Port of Corumia (Bassaridia Vaeringheim)", stocks = 18631.64 },
	{ symbol = "EURA", name = "Port of Euranidom (Bassaridia Vaeringheim)", stocks = 15437.64 },
	{ symbol = "POSK", name = "Port of Southern Keltiania (Bassaridia Vaeringheim)", stocks = 17006.94 },
	{ symbol = "OURN", name = "Regional Investor of the Ouriana (Bassaridia Vaeringheim)", stocks = 9645.77 },
	{ symbol = "NCDA", name = "Northern Caledonia (Bassaridia Vaeringheim)", stocks = 1993.03, tradeStartYear = 54, tradeStartDayOfYear = 1 },
	{ symbol = "SCDA", name = "Southern Caledonia (Bassaridia Vaeringheim)", stocks = 1422.13, tradeStartYear = 54, tradeStartDayOfYear = 1 },

}

---------------------------------------------------------
-- 2.1) Per-investor hub mapping (user-provided)
---------------------------------------------------------
local investorHubs = {
	["VREG"] = "Vaeringheim",
	["ALPK"] = "Erythros",
	["ODFR"] = "Somniumpolis",
	["HAFA"] = "Jogi",
	["JESR"] = "Sufriya",
	["HMIN"] = "Vaeringheim",
	["JANG"] = "Skýrophos",
	["HBAS"] = "Tel-Amin",
	["BSNO"] = "Riddersborg",
	["SMOR"] = "Vaeringheim",
	["SVWF"] = "Vaeringheim",
	["ADRS"] = "Vaeringheim",
	["HAIF"] = "Vaeringheim",
	["STRC"] = "Vaeringheim",
	["BIND"] = "Vaeringheim",
	["GFIF"] = "Vaeringheim",
	["POCO"] = "Vaeringheim",
	["EURA"] = "Vaeringheim",
	["POSK"] = "Vaeringheim",
	["OURN"] = "Ourid",
	["NCDA"] = "Vaeringheim",
	["SCDA"] = "Vaeringheim",
}

local function hubForInvestor(symbol, defaultHub)
	symbol = tostring(symbol or "")
	local h = investorHubs[symbol]
	if h and h ~= "" then return h end
	return tostring(defaultHub or "Vaeringheim")
end


---------------------------------------------------------
-- 3) Reasons (unchanged)
---------------------------------------------------------
local increaseReasons = {
	"Improved logistics at the General Port attracted new investors.",
	"An influx of goods from Delphica boosted trade volume at the port.",
	"High demand for Noctic-Rabrev exports raised investor confidence.",
	"Completion of a new shipping lane connecting Nexa increased activity.",
	"Successful negotiations with Erythros merchants expanded trade.",
	"Festival of Light in Vaeringheim drove significant port activity.",
	"High attendance at the Bassaridia Trade Symposium enhanced reputation.",
	"Discovery of new mineral resources near Acheron increased export potential.",
	"A surge in ceremonial wine exports from the Blood Vineyards bolstered ops.",
	"Efficient cargo handling improvements boosted investor sentiment.",
	"Seasonal agricultural exports from Jogi saw a sharp increase.",
	"High sales of pearl and abalone products boosted port traffic.",
	"Luxury goods from Tel-Amin attracted new high-end investors.",
	"Port capacity expansion in Suncliff improved competitiveness.",
	"Improved relations with Maskmakers Guild stabilized trade routes.",
	"Increased fishing yields around Lake Morovia led to more port activity.",
	"Enhanced security measures at the Port reduced piracy concerns.",
	"Cultural appreciation for Horehound exports boosted confidence.",
	"Trade deals with Saluria expanded port usage significantly.",
	"Demand for silk from the Seamstresses of Rouge improved port revenue.",
	"Moonlit Tide celebrations increased ceremonial goods traffic.",
	"Launch of new Garganid fertilizer shipments attracted agriculture investors.",
	"Global interest in sacred resin exports enhanced shipments.",
	"Marketing campaign highlighted the Port's strategic location.",
	"Completion of high-speed rail connections boosted trade efficiency.",
	"Launch of eco-friendly shipping initiatives attracted global partnerships.",
	"Discovery of rare gemstones near Lake Morovia boosted export activity.",
	"Expansion of refrigerated shipping services opened new perishable markets.",
	"Introduction of automation technology improved cargo processing speeds.",
	"Partnerships with Aurelia’s gold traders expanded high-value exports.",
	"Promotion of Bassaridian craftsmanship increased demand for artisan goods.",
	"Hosting the International Maritime Summit enhanced port prestige.",
	"Revival of ancient trade routes through Nexa increased traffic flow.",
	"Surge in demand for Bassaridian spices and aromatics in global markets.",
	"Successful lobbying for lower tariffs improved competitiveness.",
	"War League convoy escorts established a secure corridor through the Strait of Haifa, lowering insurance rates and drawing fresh capital.",
	"Revived Stripping Path pilgrimages created steady demand for ritual goods logistics and hospitality sailings.",
	"Record Norsolyrian wisp‑rice harvests filled new bulk carriers, lifting throughput and investor interest.",
	"The Maskmakers’ Guild Triennial Veiling drew collectors; premium cargo bookings surged.",
	"Seamstresses of Rouge hosted the Crimson Looms Exposition, spiking silk consignments and forward orders.",
	"Temple auctions of purified relics in Delphica brought in high‑value consignments and buyers.",
	"Thorsalon’s “Red Year” at the Blood Vineyards multiplied ceremonial wine exports and margins.",
	"Reef‑restoration around Lake Morovia improved abalone and pearl quality, boosting luxury cargoes.",
	"A treaty converting Ardclach corsairs into licensed privateers reduced raids and enticed risk‑averse funds.",
	"An auspicious Oracle of Ephyra prophecy forecast strong trade winds, lifting sentiment across maritime markets.",
	"Fishery stewardship raised whitefish and sturgeon yields on Lake Morovia, sustaining cold‑chain volumes.",
	"Guild micro‑insurance pooled storm risks for small exporters, unlocking new capital inflows.",
	"Deep‑draft dredging allowed heavier bullion and ore shipments from Aurelia to call reliably.",
	"Anti‑counterfeit seals from Nexa increased trust in sacred artifacts, strengthening high‑margin trades.",
	"Garganid‑based soil programs lifted Jogi crop output, increasing refrigerated agri‑exports.",
	"The Festival of Red Mirth in Erythros spurred dye, spice, and ceremonial garment shipments.",
	"Acheron canyon routes reopened after landslide clearance, restoring mineral and stone exports.",
	"Eco‑keel retrofits qualified fleets for green‑corridor rebates, attracting sustainability‑focused investors.",
	"Joint littoral patrols with Sufriya and Tel‑Amin suppressed smuggling, raising throughput predictability.",
	"Moon‑aligned schedules optimized tide windows during Moonlit Tide, cutting delays and attracting volume.",
	"An artisan diaspora fair highlighted Bassaridian craft, lifting curio and high‑value small‑parcel traffic.",
	"Suncliff fisheries adopted by‑catch limits, enabling certification premiums on pufferfish and tuna exports.",
	"Lake Morovia ice‑pilot program extended the season, stabilizing quarterly revenues.",
	"Reopening of shrine markets in Lunalis Sancta revived the ceremonial incense trade.",
	"Aurelia’s mint issued guaranteed bullion marks, raising confidence in precious‑cargo consignments.",
	"New reefer rail spurs from Diamandis synchronized diamonds and perishables to maximize vessel utilization.",
	"Academic exchange with Delphica drove books, instruments, and research equipment demand.",
	"Salurian co‑ops scaled ethical horehound cultivation, winning major wellness contracts.",
	"Port‑led mangrove planting improved storm resilience and brand value with ESG funds.",
	"Digital berthing and crane automation trimmed dwell times, enabling premium slot pricing.",
	"Harmonization with Maritime Markets guild codes simplified customs across partner ports.",
	"Reformed Stripping Path processions brought orderly, revenue‑rich pilgrimage sailings.",
	"Sun festivals in Vaeringheim increased seasonal passenger‑freight combo charters.",
	"Private equity backed a second logistics park by the General Port, expanding warehousing and value‑add services.",
	"Abalone hatchery successes delivered consistent volumes for luxury food markets, lifting forward bookings.",
}
local decreaseReasons = {
	"Pirate raids in the Strait of Haifa disrupted shipments to the Port.",
	"Unfavorable weather delayed agriculture exports from Plains of Jogi.",
	"Labor shortages in the Port caused cargo-handling delays.",
	"A major fire in Salurian sacred groves reduced resin exports.",
	"Rising costs of Noctic-Rabrev cultivation hurt confidence.",
	"Unrest in Jangsong Province disrupted camel meat shipments.",
	"Currency fluctuations in Vaeringheim affected stability.",
	"Economic sanctions on neighbors reduced export activity.",
	"Decline in ceremonial artifact production lowered traffic.",
	"Cultural disputes over Horehound caused export delays.",
	"Counterfeit relics in Nexa harmed the port's reputation.",
	"Fishing yields were outpaced by demand, reducing shipments.",
	"Decline in pearl quality from Anterran sources lowered interest.",
	"Shortage of ceremonial wine from Blood Vineyards cut exports.",
	"Unrest among Maskmaker merchants disrupted trade agreements.",
	"Less demand for silk from Seamstresses of Rouge impacted flows.",
	"Collapse of trade agreement with Tel-Amin lowered volume.",
	"Seasonal labor shortages shrank port shipments significantly.",
	"Disruptions in Suncliff Fisheries slowed aquatic exports.",
	"Alternative shipping routes bypassed the Port altogether.",
	"Economic downturn in Lunalis Sancta reduced investor interest.",
	"Lingering piracy concerns in Haifan waters harmed confidence.",
	"Failure at Bassaridia Trade Symposium lowered traffic.",
	"Natural disasters near Acheron destroyed key routes.",
	"Sabotage of port infrastructure caused shipping delays.",
	"Political unrest in Delphica disrupted key supply lines.",
	"Drought in Jogi impacted seasonal agricultural yields.",
	"Industrial disputes in Nexa delayed mineral shipments.",
	"Spread of disease among sea cows affected meat exports.",
	"Loss of a major trade partner due to diplomatic tensions.",
	"Contamination of sacred resin shipments led to export bans.",
	"Competing ports in nearby regions diverted trade flows.",
	"Global recession reduced overall demand for luxury goods.",
	"Infrastructure failure in Vaeringheim caused extended delays.",
	"Disruption of shipping lanes due to geopolitical conflict.",
	"Corruption scandals involving port officials reduced trust.",
	"Collapse of the Ardclach privateer truce spiked insured losses and triggered investor pullback.",
	"Wisp‑rice blight in Norsolyra slashed staple exports, lowering throughput guidance.",
	"Red tide on Lake Morovia caused a sea‑cow die‑off, prompting bans on marine products.",
	"Safety probes after Skýrophos pufferfish poisonings forced emergency export suspensions.",
	"A Stripping Path schism led to boycotts of ritual goods, denting festival cargoes.",
	"A grim Oracle of Ephyra forecast famine risks, depressing forward contracts on grain.",
	"Storm‑driven silt clogged feeder canals, delaying barge traffic to the General Port.",
	"Abalone parasite outbreaks cut luxury seafood exports by a third.",
	"Temple edicts in Thorsalon restricted blood‑wine exports to key markets.",
	"The Maskmakers’ Veiling was postponed amid scandal, shrinking high‑margin artisan flows.",
	"A strike at the Seamstresses of Rouge halted silk output for a fortnight.",
	"A port cyber outage stalled automated gates, increasing vessel idle time.",
	"Arson at a shrine‑warehouse destroyed incense inventories bound for Lunalis Sancta.",
	"A counterfeit bullion scandal tied to Aurelia undermined trust in precious‑cargo manifests.",
	"Ice storms on Lake Morovia closed passages, canceling sailings for a week.",
	"War League redeployments thinned convoy escorts, raising risk premia on all lanes.",
	"Migratory herring shifted offshore, lowering small‑boat landings and cold‑chain loads.",
	"A jellyfish bloom fouled seawater intakes for reefers, limiting perishables capacity.",
	"A cultural boycott of horehound remedies cut Salurian exports in northern markets.",
	"High holy day closures exceeded forecasts, compressing berth availability into fewer windows.",
	"Smuggler drone swarms jammed AIS beacons, triggering precautionary shutdowns.",
	"Earth tremors near Vaeringheim damaged quay cranes, forcing partial closures.",
	"Persistent drought in Jogi curtailed irrigation despite Garganid composting gains.",
	"A maritime insurance strike paused new binders for Haifan waters.",
	"Acheron rockslides again blocked canyon routes, stranding mineral consignments.",
	"Pearl farm disease in coastal coves reduced gem‑quality output.",
	"Sanctions on a partner city choked off intermediate‑goods flows.",
	"A relic‑authentication scandal in Nexa slashed demand for sacred artifacts.",
	"Fuel surtaxes on heavy fuel oil rerouted liners to competing ports.",
	"Anxiety clusters among dockworkers after nightmare seasons increased absenteeism.",
	"Naval exercises in the Strait of Haifa imposed no‑go zones, lengthening voyages.",
	"Eel spawning closures on feeder rivers restricted barge transits at night.",
	"Rogue privateers levied shadow tolls on coastal routes, deterring shippers.",
	"A warehouse fire in the incense quarter contaminated adjacent cargoes.",
	"A court injunction over contested wreck salvage tied up berths for days.",
	"Unexpected monsoon surges sank two coastal lighters, scaring lenders and reinsurers.",
}

    ---------------------------------------------------------
    -- 3.2) Noctic-specific market reasons
    --
    -- These are selected preferentially when the Noctic signal is active.
    ---------------------------------------------------------

    local nocticIncreaseReasons = {
        "Temple Bank reconciliation of Noctic-Rabrev custody ledgers restored confidence in licensed tincture and flower-extract trade.",
        "Noctic Fleet compliance checks separated lawful flower cargo from restricted raw leaves, reassuring high-value buyers.",
        "Hatch Ministry inspections reduced uncertainty around raw Noctic-Rabrev diversion, improving confidence in regulated export lanes.",
        "Temple Alabaster certification of refined nocticine tinctures lifted demand for licensed therapeutic preparations.",
        "Blood Orchard harvest audits confirmed strong lawful flower yields despite raw-leaf restrictions.",
        "Successful seizure of counterfeit nocticine products strengthened investor trust in approved Noctic-Rabrev brands.",
        "General Port seal upgrades reduced document fraud in Noctic-Rabrev consignments, supporting premium cargo bookings.",
        "Cult-health stabilization of registered Noctic patients eased panic in key shrine markets.",
        "Licensed Noctic-Rabrev culinary extracts saw renewed demand after inspectors cleared contaminated vendors.",
        "Temple-supervised Noctic medicine shipments expanded post-trauma treatment markets under strict pharmacological custody.",
        "Hatch Ministry and Temple Bank coordination improved traceability for Noctic cargo, lowering spoilage and fraud risk.",
        "New Noctic custody protocols reassured insurers covering Odiferaen and Gloom Forest consignments.",
        "Controlled Noctic-Rabrev auctions drew strong bids from temple pharmacies, ritual houses, and high-end culinary buyers.",
        "Successful distinction between lawful Noctic products and raw-leaf contraband prevented broader market panic."
    }

    local nocticDecreaseReasons = {
        "Raw Noctic-Rabrev leaf seizures disrupted wetland cargo flows and reduced confidence in Odiferaen consignments.",
        "Noctic Vampirism outbreak advisories forced temporary holds on suspect tinctures and flower-cargo crates.",
        "Counterfeit nocticine tinctures triggered recall costs, vendor suspensions, and emergency Temple Alabaster inspections.",
        "Temple Bank suspended disputed Noctic induction permits, slowing ritual and medical supply orders.",
        "Hatch Ministry small-craft inspections delayed Noctic Fleet cargo moving through canal and lock-gate routes.",
        "Rumors of raw-leaf contamination reduced demand for Noctic-Rabrev culinary extracts in urban markets.",
        "Noctic registry breaches increased privacy concerns and disrupted patient transport services.",
        "Forgery probes into Noctic permissions undermined trust in shrine-market documentation.",
        "Storm damage to Blood Orchard storage sheds forced quarantine of wet leaf material and delayed exports.",
        "Noctic Vampirism panic in several cities increased insurance costs for ritual, medicinal, and culinary cargo.",
        "Smuggling investigations linked counterfeit Noctic products to masked intermediaries, weakening confidence in informal brokers.",
        "Temple inspectors removed suspect Noctic balms and incense batches from several market districts.",
        "Clinic-lane congestion around Noctic evaluations disrupted nearby souks and passenger-freight movement.",
        "Raw-leaf cargo mislabeling forced stricter General Port audits, increasing dwell times for high-value consignments."
    }

local function popUniqueReason(list)
	if #list == 0 then
		return "(No reason: out of reasons!)"
	end
	local i = math.random(#list)
	local r = list[i]
	table.remove(list, i)
	return r
end

---------------------------------------------------------
-- Safe require (cached)
---------------------------------------------------------
local _req = {}
local function safeRequire(name)
	if _req[name] ~= nil then return _req[name] end
	local ok, mod = pcall(require, name)
	if not ok then mod = false end
	_req[name] = mod
	return mod
end

---------------------------------------------------------
-- Signal extraction (once per render)
---------------------------------------------------------
local function parseOutbreakSeverity(outText)
	outText = tostring(outText or "")
	local sev = outText:match('style="background:[^"]+"%s*|%s*([A-Z]+)%s*||')
	if sev == "CRITICAL" or sev == "HIGH" or sev == "MEDIUM" or sev == "LOW" or sev == "NONE" then
		return sev
	end
	return "NONE"
end

local function severityToRisk(sev)
	if sev == "LOW" then return 0.20 end
	if sev == "MEDIUM" then return 0.45 end
	if sev == "HIGH" then return 0.70 end
	if sev == "CRITICAL" then return 0.95 end
	return 0.0
end

---------------------------------------------------------
-- 3.1) Noctic-Rabrev / Noctic Vampirism signal helpers
---------------------------------------------------------

local nocticHubPressure = {
	["Somniumpolis"] = 0.04,
	["Odiferia"]     = 0.06,
	["Erythros"]     = 0.05,
	["Acheron"]      = 0.04,
	["Norsolyra"]    = 0.04,
	["Skøda"]        = 0.03,
	["Vaeringheim"]  = 0.01,
	["Jogi"]         = 0.04,
	["Aurelia"]      = 0.01,
	["Nexa"]         = 0.02,
	["Pyralis"]      = 0.02,
	["Keybir-Aviv"]  = 0.01,
	["Tel-Amin"]     = 0.01,
	["Skýrophos"]    = 0.01,
}

local function baseNocticPressureForHub(hubCity)
	hubCity = tostring(hubCity or "")
	return nocticHubPressure[hubCity] or 0.0
end

local function hasNocticText(txt)
	local s = tostring(txt or ""):lower()
	if s:find("noctic", 1, true) then return true end
	if s:find("nrv", 1, true) then return true end
	if s:find("raw leaf", 1, true) then return true end
	if s:find("raw-leaf", 1, true) then return true end
	return false
end

local function countNocticHits(txt)
	local s = tostring(txt or ""):lower()
	local n = 0

	if s:find("noctic", 1, true) then n = n + 2 end
	if s:find("noctic vampirism", 1, true) then n = n + 2 end
	if s:find("noctic-rabrev", 1, true) then n = n + 2 end
	if s:find("nocticine", 1, true) then n = n + 2 end
	if s:find("nrv", 1, true) then n = n + 1 end
	if s:find("raw leaf", 1, true) or s:find("raw-leaf", 1, true) then n = n + 2 end
	if s:find("tincture", 1, true) then n = n + 1 end
	if s:find("leaf chest", 1, true) or s:find("leaf chests", 1, true) then n = n + 2 end
	if s:find("temple bank", 1, true) and s:find("noctic", 1, true) then n = n + 1 end
	if s:find("hatch", 1, true) and s:find("noctic", 1, true) then n = n + 1 end

	return n
end
local function opsLevelToRisk(level)
	level = tonumber(level) or 0
	if level <= 0 then return 0.0 end
	if level == 1 then return 0.25 end
	if level == 2 then return 0.55 end
	return 0.85
end

local function clamp(x, lo, hi)
	if x < lo then return lo end
	if x > hi then return hi end
	return x
end

local function computeGlobalSignals(psscYear, dayOfYear)
	local sig = { warRisk = 0.0, hatchIntensity = 0.0, templeRedRate = 0.0, nocticPressure = 0.0 }

	-- War League tempo (global)
	local wl = safeRequire("Module:WarLeagueDivisionOpsBVR")
	if wl and type(wl.makeTable) == "function" then
		local outText = tostring(wl.makeTable({ args = { rows = "48", showlegend = "no", seed = tostring(psscYear * 1000 + dayOfYear) } }) or "")
		local rows, high, critical = 0, 0, 0
		for sev in outText:gmatch("||%s*(LOW|MEDIUM|HIGH|CRITICAL)%s*||") do
			rows = rows + 1
			if sev == "HIGH" then high = high + 1 end
			if sev == "CRITICAL" then critical = critical + 1 end
		end
		if rows > 0 then
			local score = (high + 2 * critical) / rows
			sig.warRisk = clamp(score / 2, 0.0, 1.0)
		end
	end

	-- Hatch Ministry tempo (global)
	local hatch = safeRequire("Module:HatchMinistryDailyOps")
	if hatch and type(hatch.dailyReport) == "function" then
		local rep = tostring(hatch.dailyReport({ args = { year = tostring(psscYear), day = tostring(dayOfYear), legend = "no" } }) or "")
		local k = 0
		for _ in rep:gmatch("[Ii]nterdict") do k = k + 1 end
		for _ in rep:gmatch("[Ii]nspect") do k = k + 1 end
		for _ in rep:gmatch("[Ss]eiz") do k = k + 1 end
		for _ in rep:gmatch("blockade") do k = k + 1 end
		sig.hatchIntensity = clamp(k / 40, 0.0, 1.0)
		sig.nocticPressure = math.max(sig.nocticPressure, clamp(countNocticHits(rep) / 18, 0.0, 1.0))
	end

	-- Temple missionary tempo (global)
	local miss = safeRequire("Module:MissionaryDailyOpsBVR")
	if miss and type(miss.makeTable) == "function" then
		local outText = tostring(miss.makeTable({ args = { region = "Core", includeThreat = "no", showEcon = "no", limit = "40", showlegend = "no" } }) or "")
		local red, n = 0, 0
		for sev in outText:gmatch("||%s*(Green|Yellow|Red)%s*$") do
			n = n + 1
			if sev == "Red" then red = red + 1 end
		end
		if n > 0 then sig.templeRedRate = clamp(red / n, 0.0, 1.0) end
		sig.nocticPressure = math.max(sig.nocticPressure, clamp(countNocticHits(outText) / 22, 0.0, 1.0))
	end

	return sig
end

local function computeLocalSignals(hubCity, psscYear, dayOfYear)
	local sig = {
		hub = hubCity,
		wxRisk = 0.0,
		wxLabel = "Green",
		wxCond = "",
		healthRisk = 0.0,
		nocticPressure = baseNocticPressureForHub(hubCity)
	}

	-- Weather / Ops (local)
	local forecast = safeRequire("Module:BassaridiaForecast")
	if forecast and type(forecast.getOpsData) == "function" then
		local op = forecast.getOpsData(hubCity, psscYear, dayOfYear)
		if op and op.alert then
			sig.wxLabel = tostring(op.alert.label or "Green")
			sig.wxCond  = tostring(op.condition or "")
			sig.wxRisk  = opsLevelToRisk(op.alert.level)
			local imp = op.impacts or {}
			if tostring(imp.ground or "") == "Closed" then sig.wxRisk = sig.wxRisk + 0.10 end
			if tostring(imp.sea or "") == "Closed" then sig.wxRisk = sig.wxRisk + 0.10 end
			if tostring(imp.air or "") == "No-Go" then sig.wxRisk = sig.wxRisk + 0.05 end
			sig.wxRisk = clamp(sig.wxRisk, 0.0, 1.0)
		end
	end

	-- Public health (local)
	local outb = safeRequire("Module:BassaridiaOutbreaks")
	if outb and type(outb.outbreaksForCity) == "function" then
		local txt = tostring(outb.outbreaksForCity({ args = { city = hubCity } }) or "")
		local sev = parseOutbreakSeverity(txt)
		sig.healthRisk = severityToRisk(sev)

		if hasNocticText(txt) then
			sig.nocticPressure = clamp(math.max(sig.nocticPressure, sig.healthRisk + 0.20), 0.0, 1.0)
		end
	end

	return sig
end

local function mergeSignals(localSig, globalSig)
	local sig = {}
	for k,v in pairs(localSig or {}) do sig[k] = v end
	for k,v in pairs(globalSig or {}) do sig[k] = v end
    local nocticLocal = tonumber((localSig or {}).nocticPressure or 0) or 0
    local nocticGlobal = tonumber((globalSig or {}).nocticPressure or 0) or 0
    sig.nocticPressure = clamp(nocticLocal + (nocticGlobal * 0.02), 0.0, 1.0)

	-- Mood [-1,1]
	local mood = 0.0
	mood = mood - (sig.wxRisk * 0.35)
	mood = mood - (sig.warRisk * 0.30)
	mood = mood - (sig.healthRisk * 0.30)
    mood = mood - (sig.nocticPressure * 0.005)
	mood = mood + (sig.templeRedRate * 0.12)
	mood = mood - (sig.hatchIntensity * 0.05)
	sig.mood = clamp(mood, -1.0, 1.0)

	-- Volatility [0,1]
	local vol = 0.0
	vol = vol + sig.wxRisk * 0.40
	vol = vol + sig.warRisk * 0.35
	vol = vol + sig.hatchIntensity * 0.20
	vol = vol + sig.healthRisk * 0.35
    vol = vol + sig.nocticPressure * 0.007
	sig.vol = clamp(vol, 0.0, 1.0)

	return sig
end

---------------------------------------------------------
-- Company-specific sensitivity (small, bounded)
---------------------------------------------------------
    local function companyBias(co, sig)
        local sym = tostring(co.symbol or "")
        local name = tostring(co.name or ""):lower()
        local noctic = tonumber(sig.nocticPressure or 0) or 0

        -- Hatch Ministry benefits from enforcement tempo, including Noctic cargo
        -- inspections, raw-leaf seizures, forged-permit sweeps, and privateering
        -- actions under Hatch Command.
        if sym == "HMIN" or name:find("hatch ministry", 1, true) then
            return clamp(
                (sig.hatchIntensity * 0.10)
                + (sig.warRisk * 0.06)
                + (noctic * 0.07)
                - (sig.wxRisk * 0.04)
                - (sig.healthRisk * 0.03),
                -0.20, 0.20
            )
        end

        -- Odiferia is highly exposed to Noctic-Rabrev market conditions.
        -- Lawful audits and Temple clearance can help, but outbreaks and
        -- contamination scares still hurt confidence.
        if sym == "ODFR" then
            return clamp(
                (noctic * 0.05)
                + (sig.templeRedRate * 0.04)
                + (sig.hatchIntensity * 0.03)
                - (sig.healthRisk * 0.08)
                - (sig.wxRisk * 0.04),
                -0.20, 0.20
            )
        end

        -- Alpazkigz / Erythros-linked capital is sensitive to sacred Noctic
        -- trade, pilgrimage, registry disputes, and Alperkin ritual legitimacy.
        if sym == "ALPK" then
            return clamp(
                (noctic * 0.04)
                + (sig.templeRedRate * 0.04)
                - (sig.healthRisk * 0.06)
                - (sig.wxRisk * 0.03),
                -0.18, 0.18
            )
        end

        -- New South Jangsong is affected when Norsolyra or marshland Noctic
        -- cargo routes generate inspection delays, patient escorts, or
        -- Noctic medical-supply movements.
        if sym == "JANG" then
            return clamp(
                (sig.templeRedRate * 0.03)
                - (noctic * 0.04)
                - (sig.healthRisk * 0.04)
                - (sig.wxRisk * 0.03),
                -0.16, 0.16
            )
        end

        -- Haifan Bassaridia is more exposed to downstream contamination scares
        -- and cargo-confidence shocks when Noctic materials move into the
        -- Haifan trade belt.
        if sym == "HBAS" or sym == "HAFA" then
            return clamp(
                (sig.hatchIntensity * 0.03)
                - (noctic * 0.05)
                - (sig.healthRisk * 0.04)
                - (sig.wxRisk * 0.03),
                -0.18, 0.18
            )
        end

        if sym == "SMOR" or name:find("moorland", 1, true) then
            return clamp(
                -(sig.warRisk * 0.08)
                - (sig.hatchIntensity * 0.06)
                - (sig.healthRisk * 0.05)
                - (noctic * 0.02),
                -0.20, 0.20
            )
        end

        if name:find("port of", 1, true) or sym == "STRC" then
            return clamp(
                -(sig.wxRisk * 0.08)
                - (sig.healthRisk * 0.04)
                - (noctic * 0.04)
                + (sig.templeRedRate * 0.03)
                + (sig.hatchIntensity * 0.02),
                -0.20, 0.20
            )
        end

        return clamp(
            (sig.templeRedRate * 0.02)
            - (sig.wxRisk * 0.03)
            - (sig.warRisk * 0.02)
            - (sig.healthRisk * 0.02)
            - (noctic * 0.01),
            -0.12, 0.12
        )
    end

local function companyVolScale(co)
	local name = tostring(co.name or ""):lower()
	if name:find("port of", 1, true) then return 1.15 end
	if name:find("fund", 1, true) then return 0.90 end
	return 1.0
end

local function signalPrefix(direction, co, sig)
	local parts = {}

	if sig.wxRisk >= 0.60 then parts[#parts+1] = "Weather/ops constraints" end
	if sig.warRisk >= 0.55 then parts[#parts+1] = "War League posture" end
	if sig.healthRisk >= 0.55 then parts[#parts+1] = "Public health pressure" end
	if (sig.nocticPressure or 0) >= 0.65 then parts[#parts+1] = "Noctic-Rabrev pressure" end
	if sig.hatchIntensity >= 0.55 then parts[#parts+1] = "Hatch enforcement tempo" end
	if sig.templeRedRate >= 0.35 then parts[#parts+1] = "Temple mission tempo" end

	if (co.symbol == "HMIN" or tostring(co.name or ""):lower():find("hatch ministry", 1, true)) and sig.hatchIntensity >= 0.40 then
		parts[#parts+1] = "Enforcement rents"
	end

	if (co.symbol == "HMIN" or tostring(co.name or ""):lower():find("hatch ministry", 1, true)) and (sig.nocticPressure or 0) >= 0.65 then
		parts[#parts+1] = "Noctic cargo enforcement"
	end

	if #parts == 0 then
		return "Signals: routine conditions."
	end

	return "Signals: " .. table.concat(parts, "; ") .. "."
end

local function isBeforeTradeStart(co, psscYear, dayOfYear)
	local startYear = tonumber(co.tradeStartYear)
	if not startYear then return false end

	local startDay = tonumber(co.tradeStartDayOfYear or 1) or 1

	if psscYear < startYear then return true end
	if psscYear == startYear and dayOfYear < startDay then return true end

	return false
end

---------------------------------------------------------
-- Main function: produce the table (signal-driven)
---------------------------------------------------------
function p.generateTable(frame)
	local args = (frame and frame.args) or {}
	local hub = tostring(args.hub or "Vaeringheim")
	local sharePrice = tonumber(args.shareprice or 30) or 30

	local dateString, dayOfYear, psscYear = getDailyDate()
	local localTime = os.date("*t")
	local dailySeed = localTime.year * 1000 + localTime.yday
	math.randomseed(dailySeed)

	-- Copy reasons
	local incPool, decPool = {}, {}
	for _, r in ipairs(increaseReasons) do incPool[#incPool+1] = r end
	for _, r in ipairs(decreaseReasons) do decPool[#decPool+1] = r end

	local nocticIncPool, nocticDecPool = {}, {}
	for _, r in ipairs(nocticIncreaseReasons) do nocticIncPool[#nocticIncPool+1] = r end
	for _, r in ipairs(nocticDecreaseReasons) do nocticDecPool[#nocticDecPool+1] = r end


	-- Signals once
	-- Signals: global once; local per-investor hub (cached)
	local globalSig = computeGlobalSignals(psscYear, dayOfYear)
	local localCache = {} -- hubCity -> localSig
	local function sigForHub(hubCity)
		local s = localCache[hubCity]
		if s then return s end
		s = computeLocalSignals(hubCity, psscYear, dayOfYear)
		localCache[hubCity] = s
		return s
	end

	local out = {}
	table.insert(out, '{| class="wikitable" style="text-align:center; width:100%;"')
	table.insert(out, '|-')
	table.insert(out, '! Date !! Symbol !! Company !! Open (Polis) !! Close (Polis) !! Volume !! Change !! Change % !! Reason')

	for _, co in ipairs(companies) do
		local coHub = hubForInvestor(co.symbol, hub)
		local localSig = sigForHub(coHub)
		local sig = mergeSignals(localSig, globalSig)
		local stocksStart = tonumber(co.stocks) or 1
		if stocksStart < 1 then stocksStart = 1 end

		local openVal = stocksStart * sharePrice
		local closeVal
		local volume
		local changeVal
		local pctChange
		local reason

		if isBeforeTradeStart(co, psscYear, dayOfYear) then
			closeVal = openVal
			volume = 0
			changeVal = 0
			pctChange = 0
			reason = string.format(
				"Trading not yet active. %s begins market activity on 1/1/54 PSSC.",
				co.symbol
			)
		else
			local bias = companyBias(co, sig)
			local pInc = clamp(0.50 + (sig.mood * 0.18) + bias, 0.12, 0.88)
			local direction = (math.random() < pInc) and "Inc" or "Dec"
			local volScale = companyVolScale(co)
			local volFactor = clamp(0.55 + sig.vol * 0.90 * volScale, 0.45, 1.30)
			local maxDelta = math.floor(stocksStart * 0.30 * volFactor)
			if maxDelta < 1 then maxDelta = 1 end

			local buy, sell = 0, 0
			if direction == "Inc" then
				buy  = math.random(1, maxDelta)
				sell = math.random(0, buy - 1)
			else
				sell = math.random(1, maxDelta)
				buy  = math.random(0, sell - 1)
			end

			local stocksEnd = stocksStart + buy - sell

			closeVal = stocksEnd * sharePrice
			volume = buy + sell
			changeVal = closeVal - openVal

			pctChange = 0
			if openVal > 0 then
				pctChange = (changeVal / openVal) * 100
			end

			local baseReason
			if changeVal > 0 then
				baseReason = popUniqueReason(incPool)
			elseif changeVal < 0 then
				baseReason = popUniqueReason(decPool)
			else
				baseReason = popUniqueReason(incPool)
			end

			-- Noctic-Rabrev appears only as an occasional secondary note.
			-- It does not replace the main market event.
			local nocticNote = ""
			local nocticPressure = sig.nocticPressure or 0
			local nocticChance = 0.00
			if nocticPressure >= 0.80 then
				nocticChance = 0.10
			elseif nocticPressure >= 0.65 then
				nocticChance = 0.05
			elseif nocticPressure >= 0.50 then
				nocticChance = 0.02
			end

			if math.random() < nocticChance then
				if changeVal >= 0 and #nocticIncPool > 0 then
					nocticNote = " Secondary Noctic-Rabrev factor: " .. popUniqueReason(nocticIncPool)
				elseif changeVal < 0 and #nocticDecPool > 0 then
					nocticNote = " Secondary Noctic-Rabrev factor: " .. popUniqueReason(nocticDecPool)
				end
			end

			reason = signalPrefix(direction, co, sig) .. " " .. baseReason .. nocticNote
		end

		table.insert(out, table.concat({
			'|-',
			string.format('| %s || %s || %s || %.2f || %.2f || %d || %+.2f || %.2f%% || %s',
				dateString,
				co.symbol,
				co.name,
				openVal,
				closeVal,
				volume,
				changeVal,
				pctChange,
				reason
			)
		}, '\n'))
	end

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

function p.getEmploymentSignals(hubCity)
	local _, dayOfYear, psscYear = getDailyDate()

	hubCity = tostring(hubCity or "Vaeringheim")

	local globalSig = computeGlobalSignals(psscYear, dayOfYear)
	local localSig = computeLocalSignals(hubCity, psscYear, dayOfYear)
	local sig = mergeSignals(localSig, globalSig)

	-- compact employment-facing score:
	-- positive = stronger labor demand
	-- negative = weaker labor demand / disruption
	local marketScore = 0
	marketScore = marketScore + (sig.templeRedRate or 0) * 0.10
	marketScore = marketScore + (sig.hatchIntensity or 0) * 0.06
	marketScore = marketScore - (sig.wxRisk or 0) * 0.10
	marketScore = marketScore - (sig.healthRisk or 0) * 0.12
    marketScore = marketScore - (sig.nocticPressure or 0) * 0.05
	marketScore = marketScore - (sig.warRisk or 0) * 0.08

	return {
		hub = hubCity,
		marketScore = clamp(marketScore, -0.20, 0.20),
		volatility = sig.vol or 0,
		wxRisk = sig.wxRisk or 0,
		warRisk = sig.warRisk or 0,
		hatchIntensity = sig.hatchIntensity or 0,
		templeRedRate = sig.templeRedRate or 0,
        healthRisk = sig.healthRisk or 0,
        nocticPressure = sig.nocticPressure or 0
	}
end

return p