ICBM Missile turtle

rednet.open("right")

x,y = term.getSize()



missiles = {}

function display()
	term.clear()
	term.setBackgroundColor(colors.black)
	for i = 1, 13, 2 do
		for v = 1, x do
			term.setCursorPos(v, i)
			term.write(" ")
		end
	end
	term.setBackgroundColor(colors.blue)
	for i = 2, 13, 2 do
		for v = 1, x do
			term.setCursorPos(v, i)
			term.write(" ")
		end
	end
	for i = 1, 12 do
		for k,v in pairs(missiles[i]) do
			if bit.band(i, 1) == 0 then
				term.setBackgroundColor(colors.blue)
			else
				term.setBackgroundColor(colors.black)
			end
			if k == "name" then
				term.setCursorPos(x/4, i)
				term.write(v..":")
			elseif k == "count" then
				term.setCursorPos(x/3*2, i)
				term.write(tostring(v))
			end
		end
	end
end


if fs.exists("panel") then
  file = fs.open("panel","r")
  panel = tonumber(file.readAll())
  file.close()
else
  term.clear()
  term.setCursorPos(1,1)
  write("Enter the ID of the computer connected to the touch screen: ")
  id = tonumber(read())
  file = fs.open("panel", "w")
  file.write(id)
  file.close()
  term.clear()
  term.setCursorPos(1,1)
end

if fs.exists("missiles") then
	file = fs.open("missiles", "r")
	missiles = textutils.unserialize(file.readAll())
	file.close()
else
	missiles = {}
	for i = 1, 12 do
		table.insert(missiles, i, {name = "Unidentified", count = turtle.getItemCount(i)})
	end
end

while true do
	term.setBackgroundColor(colors.black)
	term.clear()
	term.setCursorPos(x/2-string.len("Screen Saver")/2, y/2)
--	term.write("screen saver")
	event, param1,param2,param3,param4 = os.pullEvent()
	for i = 1, 12 do
		count = turtle.getItemCount(i)
		for k,v in pairs(missiles[i]) do
			if k == "name" then
			missiles[i] = nil
				table.insert(missiles, i , {name = v, count = count})
			end
		end
		file = fs.open("missiles", "w")
		file.write(textutils.serialize(missiles))
		file.close()
	end
	if event == "modem_message" and param3 == tonumber(panel) and param4 == "getList" then
	print("got message")
	term.clear()
	term.setCursorPos(1,1)
		rednet.send(panel, textutils.serialize(missiles))
	elseif event == "modem_message" and param3 == tonumber(panel) and param4 == "setName" then
		id, slot = rednet.receive()
		rednet.send(panel, "ready")
		id, mName = rednet.receive()
		rednet.send(panel, "ready")
		id, slot = rednet.receive()
		if mName == "" then
			mName = "Unidentified"
		end
		missiles[slot] = nil
		table.insert(missiles, tonumber(slot) , {name = mName, count = turtle.getItemCount(slot)})
		file = fs.open("missiles", "w")
		file.write(textutils.serialize(missiles))
		file.close()
	elseif event == "modem_message" and param3 == tonumber(panel) then
		turtle.suckDown()
		sleep(.5)
		turtle.select(tonumber(param4))
		turtle.dropDown()
	end
	display()
end