The error occurs because in the `setupMonitors` function, you're storing the wrapped monitor objects directly in the `regions` table, but later in the code you're trying to wrap them again. Here's the fixed version: -- CONFIGURATION local CLEAR_NBT_ON_START = true local MANUAL_MONITOR_SETUP = true -- Population Settings local MIN_LIBIDO_TO_ROMANCE = 5 -- Minimum libido level to engage in romance (1-10) local MIN_LIBIDO_TO_TRAVEL = 2 -- Maximum libido level to become a traveler (lower = more likely to travel) local MAX_PEOPLE_PER_REGION = 100 -- Maximum number of people allowed in one region local INITIAL_PEOPLE_PER_REGION = 4 -- Number of people to spawn in each region at startup local MAX_CHILDREN_PER_COUPLE = 3 -- Maximum number of children a couple can have -- Lifecycle Settings local MIN_LIFETIME = 145 -- Minimum lifetime in seconds local MAX_LIFETIME = 200 -- Maximum lifetime in seconds local CHILD_AGE = 10 -- Age when child becomes adult (seconds) local LOVE_COOLDOWN = 10 -- Seconds between love checks local TRAVEL_CHANCE = 0.1 -- 10% chance to travel when conditions met local SETTLE_CHANCE = 0.4 -- 40% chance traveler will settle in new region -- === UTILS === local function tableContains(t, val) for _, v in ipairs(t) do if v == val then return true end end return false end local function findPersonByName(regionList, name) for _, p in ipairs(regionList) do if p.name == name then return p end end return nil end local function setupMonitors() local regions = {} local eventMonitors = {} local allMonitors = {} -- Get all monitor peripherals for _, name in ipairs(peripheral.getNames()) do if peripheral.getType(name) == "monitor" then table.insert(allMonitors, name) end end if #allMonitors == 0 then error("No monitors found!") end if MANUAL_MONITOR_SETUP then print("Available monitors: "..table.concat(allMonitors, ", ")) while true do print("\nEnter region name (or 'done' to finish):") local regionName = read() if regionName == "done" then break end print("Enter monitor name for region display:") local regionMonitor = read() if not tableContains(allMonitors, regionMonitor) then print("Invalid monitor!") break end print("Enter monitor name for event display (or 'same'):") local eventMonitor = read() if eventMonitor == "same" then eventMonitor = regionMonitor elseif not tableContains(allMonitors, eventMonitor) then print("Invalid monitor!") break end regions[regionName] = regionMonitor -- Store monitor ID only eventMonitors[regionName] = eventMonitor -- Store monitor ID only print(string.format("Region %s configured: Display=%s, Events=%s", regionName, regionMonitor, eventMonitor)) end else -- Automatic setup (original behavior) for _, name in ipairs(allMonitors) do if name == "front" then -- Front monitor becomes global event display eventMonitors["global"] = name else local regionName repeat regionName = generateName() until not regions[regionName] regions[regionName] = name eventMonitors[regionName] = "front" -- Default to front for events end end end return regions, eventMonitors end -- RNG seed math.randomseed(os.time()) -- Name generation local consonants = {"B","C","D","F","G","H","J","K","L","M","N","P","Q","R","S","T","V","W","X","Y","Z"} local vowels = {"A","E","I","O","U"} local function generateName() local patterns = { function() return consonants[math.random(#consonants)] .. vowels[math.random(#vowels)] end, function() return consonants[math.random(#consonants)] .. vowels[math.random(#vowels)] .. consonants[math.random(#consonants)] end, function() return consonants[math.random(#consonants)] .. vowels[math.random(#vowels)] .. consonants[math.random(#consonants)] .. vowels[math.random(#vowels)] end, function() return consonants[math.random(#consonants)] .. vowels[math.random(#vowels)] .. vowels[math.random(#vowels)] end, function() return vowels[math.random(#vowels)] .. consonants[math.random(#consonants)] .. vowels[math.random(#vowels)] .. vowels[math.random(#vowels)] end } return patterns[math.random(#patterns)]() end -- === JOB SETUP === local travelerJobs = {"adventurer", "bard", "performer", "charlatan", "merchant"} local settlerJobs = { "Stonecutter", "innkeeper", "drunkard", "guard", "shopkeeper", "tailor", "weaver", "fisher", "angler", "chemist", "scientist", "woodcutter", "scholar", "librarian", "student", "acolyte" } -- Message templates with consistent ordering local messages = { travel = { adventurer = { "%s is exploring %s.", "%s sets off on a quest to %s.", "%s journeys to %s seeking adventure.", "%s arrives in %s." }, bard = { "%s travels to %s to perform at inns.", "The wandering bard %s arrives in %s.", "%s comes to %s with songs and stories.", "%s arrives in %s with song." }, performer = { "%s brings entertainment to %s.", "%s arrives in %s to perform.", "%s travels to %s to showcase their skills.", "Crowds gather as %s comes to %s." }, charlatan = { "%s sneaks into %s with dubious intentions!", "The shady %s arrives in %s looking for marks!", "%s comes to %s with a bag of tricks!", "Beware! %s has entered %s with a sly grin!" }, merchant = { "%s is visiting %s to restock.", "%s is selling goods in %s.", "The merchant %s arrives in %s with new wares.", "%s sets up shop in %s to trade with locals." }, default = { "%s has travelled to %s", "%s arrives in %s", "%s comes to %s", "%s journeys to %s" } }, love = { "%s and %s fell in love in %s!", "A romance blossoms between %s and %s in %s!", "%s and %s have become inseparable in %s!", "Love is in the air as %s and %s unite in %s!" }, leadership = { "%s has been chosen as the new leader of %s!", "%s was elected by the people of %s as their leader!", "%s rises to power in %s!", "%s now leads %s with wisdom and strength!", "The people cheer as %s takes leadership of %s!" }, death = { "%s has passed away in %s.", "%s died peacefully in %s.", "%s met an untimely end in %s.", "The people of %s mourn the loss of %s." }, widow = { "%s is now widowed.", "%s mourns the loss of their partner.", "The heartbroken %s must carry on alone.", "%s faces life without their beloved." } } -- === SETUP === local nbt = peripheral.find("nbtStorage") or error("NBT Storage not found!") local worldData = CLEAR_NBT_ON_START and {} or (nbt.read() or {}) local regions, eventMonitors = setupMonitors() local people = {} local leaders = {} -- Find front monitor for logging local frontMonitor = nil -- Discover monitors local allPeripherals = peripheral.getNames() for _, name in ipairs(allPeripherals) do if peripheral.getType(name) == "monitor" then if name == "front" then frontMonitor = name else local regionName repeat regionName = generateName() until not regions[regionName] regions[regionName] = name end end end if next(regions) == nil then print("No monitors found on the network.") return end local function displayName(person, regionName) if person.isLeader then return person.name .. ", leader of " .. regionName else return person.name end end local function logEvent(msg, regionName) print(msg) -- Find which monitor to use local eventMonitorID = frontMonitor -- Default if regionName and eventMonitors[regionName] then eventMonitorID = eventMonitors[regionName] elseif eventMonitors["global"] then eventMonitorID = eventMonitors["global"] end if eventMonitorID then local eventMonitor = peripheral.wrap(eventMonitorID) if eventMonitor then local x, y = eventMonitor.getCursorPos() local width, height = eventMonitor.getSize() if y >= height then eventMonitor.scroll(1) y = height - 1 end eventMonitor.setCursorPos(1, y + 1) eventMonitor.write(msg) end end end local function createPerson(name, isChild, settled) local now = os.clock() return { name = name, birthTime = now, lifetime = math.random(MIN_LIFETIME, MAX_LIFETIME), isLeader = false, libido = math.random(1, 10), partnerName = nil, loveTime = nil, children = 0, profession = isChild and "child" or ((settled and settlerJobs[math.random(#settlerJobs)]) or travelerJobs[math.random(#travelerJobs)]), childUntil = isChild and (now + CHILD_AGE) or nil } end -- Initialize regions with configured population for regionName, monitorID in pairs(regions) do local monitor = peripheral.wrap(monitorID) if monitor then logEvent("Setting up region: " .. regionName .. " on monitor: " .. monitorID) monitor.setTextScale(1) monitor.setBackgroundColor(colors.black) monitor.setTextColor(colors.white) monitor.clear() monitor.setCursorPos(1, 1) people[regionName] = {} for i = 1, INITIAL_PEOPLE_PER_REGION do local name repeat name = generateName() until not findPersonByName(people[regionName], name) local person = createPerson(name, false, true) table.insert(people[regionName], person) monitor.write(name .. " was divinely born") local _, y = monitor.getCursorPos() monitor.setCursorPos(1, y + 1) end if #people[regionName] > 0 then local leaderIndex = math.random(1, #people[regionName]) people[regionName][leaderIndex].isLeader = true leaders[regionName] = people[regionName][leaderIndex] logEvent(string.format(messages.leadership[math.random(#messages.leadership)], people[regionName][leaderIndex].name, regionName)) end else print("Warning: Could not wrap monitor: " .. monitorID) end end worldData.regions = regions worldData.people = people nbt.writeTable(worldData) logEvent("Regions and people initialized.") -- === SIMULATION === local lastLoveCheck = 0 local function tryFormLove() local now = os.clock() if now - lastLoveCheck < LOVE_COOLDOWN then return end lastLoveCheck = now for regionName, list in pairs(people) do local singles = {} for _, p in ipairs(list) do if not p.partnerName and not p.isLeader and p.libido >= MIN_LIBIDO_TO_ROMANCE and (not p.childUntil or now >= p.childUntil) then table.insert(singles, p) end end for i = #singles, 2, -1 do local j = math.random(i) singles[i], singles[j] = singles[j], singles[i] end for i = 1, #singles - 1, 2 do local a, b = singles[i], singles[i + 1] a.partnerName = b.name b.partnerName = a.name a.loveTime = now b.loveTime = now logEvent(string.format(messages.love[math.random(#messages.love)], a.name, b.name, regionName)) end end end local function assignMatureJobs() local now = os.clock() for regionName, list in pairs(people) do for _, p in ipairs(list) do if p.profession == "child" and p.childUntil and now >= p.childUntil then p.childUntil = nil if p.libido <= MIN_LIBIDO_TO_TRAVEL then p.profession = travelerJobs[math.random(#travelerJobs)] else p.profession = settlerJobs[math.random(#settlerJobs)] end logEvent(p.name .. " grew up and became a " .. p.profession .. " in " .. regionName) end end end end local function handleBirths() local now = os.clock() for regionName, list in pairs(people) do if #list >= MAX_PEOPLE_PER_REGION then return end for _, p in ipairs(list) do if p.partnerName and p.loveTime and p.children < MAX_CHILDREN_PER_COUPLE then if now - p.loveTime >= 35 then local partner = findPersonByName(list, p.partnerName) if partner and partner.children < MAX_CHILDREN_PER_COUPLE then local name repeat name = generateName() until not findPersonByName(list, name) local child = createPerson(name, true, true) table.insert(list, child) p.children = p.children + 1 partner.children = partner.children + 1 logEvent(string.format("%s and %s had their %s child %s in %s", p.name, partner.name, p.children == 1 and "first" or (p.children == 2 and "second" or "third"), name, regionName)) end end end end end end local function removeDeadPeople() local now = os.clock() for regionName, list in pairs(people) do for i = #list, 1, -1 do local p = list[i] if now - p.birthTime >= p.lifetime then logEvent(string.format(messages.death[math.random(#messages.death)], p.name, regionName)) if p.partnerName then local partner = findPersonByName(list, p.partnerName) if partner then partner.partnerName = nil partner.loveTime = nil logEvent(string.format(messages.widow[math.random(#messages.widow)], partner.name)) end end if p.isLeader then local found = false for _, candidate in ipairs(list) do if candidate ~= p then candidate.isLeader = true leaders[regionName] = candidate logEvent(string.format(messages.leadership[math.random(#messages.leadership)], candidate.name, regionName)) found = true break end end if not found then leaders[regionName] = nil end end table.remove(list, i) end end end end local function updateMonitors() for regionName, monitorID in pairs(regions) do local mon = peripheral.wrap(monitorID) if mon then mon.setTextScale(1) mon.setBackgroundColor(colors.black) mon.setTextColor(colors.white) mon.clear() mon.setCursorPos(1, 1) mon.write("[Region:" .. regionName .. "]") local _, y = mon.getCursorPos() mon.setCursorPos(1, y + 1) local leader = leaders[regionName] if leader then mon.write("Leader: " .. leader.name .. " [" .. leader.profession .. "]") local _, y2 = mon.getCursorPos() mon.setCursorPos(1, y2 + 1) end local displayed = {} for _, p in ipairs(people[regionName]) do if not displayed[p.name] then local label = p.name .. " [" .. p.profession .. "]" if p.partnerName then local partner = findPersonByName(people[regionName], p.partnerName) if partner then displayed[p.name] = true displayed[p.partnerName] = true label = label .. " <3 " .. partner.name .. " [" .. partner.profession .. "]" end end mon.write(label) local _, y3 = mon.getCursorPos() mon.setCursorPos(1, y3 + 1) end end end end end local function handleTravel() local now = os.clock() for fromRegion, list in pairs(people) do for i = #list, 1, -1 do local person = list[i] if (not person.childUntil or now >= person.childUntil) and not person.isLeader and not person.partnerName and person.libido <= MIN_LIBIDO_TO_TRAVEL then if math.random() < TRAVEL_CHANCE then local possibleRegions = {} for toRegion, _ in pairs(people) do if toRegion ~= fromRegion then table.insert(possibleRegions, toRegion) end end if #possibleRegions > 0 then local toRegion = possibleRegions[math.random(#possibleRegions)] table.remove(list, i) if not tableContains(travelerJobs, person.profession) then person.profession = travelerJobs[math.random(#travelerJobs)] end table.insert(people[toRegion], person) local msgList = messages.travel[person.profession] or messages.travel.default logEvent(string.format(msgList[math.random(#msgList)], person.name, toRegion)) if person.libido > 1 and math.random() < SETTLE_CHANCE then person.profession = "retired" logEvent(person.name .. " settled in " .. toRegion .. " and retired") end end end end end end end -- === MAIN LOOP === while true do removeDeadPeople() tryFormLove() handleBirths() handleTravel() assignMatureJobs() updateMonitors() nbt.writeTable({ people = people, regions = regions }) sleep(1) end The key changes are: 1. Modified `setupMonitors` to store monitor IDs (strings) instead of wrapped monitor objects 2. Updated all monitor-related code to wrap the monitor IDs when needed 3. Added null checks for monitor wrapping operations 4. Fixed the monitor initialization logic to be consistent throughout the code