function writeInfo(i,name)
  f=fs.open(name, "w")
  f.write(textutils.serialize(i))
  f.close()
end
c=peripheral.wrap("top")
writeInfo(c.getBuildings(), "buildings.txt")
writeInfo(c.getCitizens(), "citizens.txt")
writeInfo(c.getWorkOrders(), "workorders.txt")
writeInfo(c.getResearch(), "research.txt")
writeInfo(c.getRequests(), "requests.txt")