-- NjjN5BCh

local args = { ... }

if #args ~= 1 then
	error("Please provide the channel to listen on")
end

local monitor = peripheral.find("monitor")
local modem = peripheral.find("modem")

if monitor == nil then
	error("Please connect a monitor to the computer")
end

if modem == nil or not modem.isWireless() then
	error("Please connect a wireless modem to the computer")
end

local channel = tonumber(args[1])

modem.open(channel)

monitor.setPaletteColor(colors.orange, 0x48464D) -- discord light
monitor.setPaletteColor(colors.magenta, 0x232427) -- discord darker
monitor.setPaletteColor(colors.lightBlue, 0x5D5A63) -- discord lighter
monitor.setPaletteColor(colors.yellow, 0xA09DA6) -- discord lightest

monitor.setPaletteColor(colors.lime, 0xe5e57b) -- discord lightest
monitor.setPaletteColor(colors.pink, 0x85818D)
monitor.setPaletteColor(colors.gray, 0x07C8F9) -- scanning
monitor.setPaletteColor(colors.lightGray, 0x5CB270) -- found ore

monitor.setPaletteColor(colors.cyan, 0xf94144) -- bad
monitor.setPaletteColor(colors.purple, 0xc77dff) -- storing
monitor.setPaletteColor(colors.blue, 0x6A6771) --

monitor.setPaletteColor(colors.brown, 0x7C7A81) --
monitor.setPaletteColor(colors.green, 0x817F86) --

local signaled = false
local mapsx, mapsz
local mnsx, mnsy

while true do
	local _, _, senderChannel, _, message = os.pullEvent("modem_message")

	if senderChannel == channel then
		local map = message[1]
		local pos = message[2]
		local dir = message[3]
		local aim = { x = pos.x + dir.x, z = pos.z + dir.z }
		local status = message[4]

		local sx = #map[pos.y]
		local sz = #map[pos.y][0]

		local msx, msy = monitor.getSize()

		if signaled == false or mapsz ~= sz or mapsx ~= sx or mnsx ~= msx or mnsy ~= msy then
			signaled = true
			monitor.clear()
			monitor.setBackgroundColor(colors.magenta)

			local sc = 1

			monitor.setTextScale(sc)
			while msx < sx or msy < sz and sc > 0.5 do
				monitor.setTextScale(sc)
				sc = sc - 0.1
				msx, msy = monitor.getSize()
			end

			if msx < sx or msy < sz then
				monitor.clear()
				monitor = term

				monitor.setPaletteColor(colors.orange, 0x48464D) -- discord light
				monitor.setPaletteColor(colors.magenta, 0x232427) -- discord darker
				monitor.setPaletteColor(colors.lightBlue, 0x5D5A63) -- discord lighter
				monitor.setPaletteColor(colors.yellow, 0xA09DA6) -- discord lightest

				monitor.setPaletteColor(colors.lime, 0xe5e57b) -- discord lightest
				monitor.setPaletteColor(colors.pink, 0x85818D)
				monitor.setPaletteColor(colors.gray, 0x07C8F9) -- scanning
				monitor.setPaletteColor(colors.lightGray, 0x5CB270) -- found ore

				monitor.setPaletteColor(colors.cyan, 0xf94144) -- bad
				monitor.setPaletteColor(colors.purple, 0xc77dff) -- storing
				monitor.setPaletteColor(colors.blue, 0x6A6771) --

				monitor.setPaletteColor(colors.brown, 0x7C7A81) --
				monitor.setPaletteColor(colors.green, 0x817F86) --

				monitor.clear()
				monitor.setBackgroundColor(colors.magenta)

				msx, msy = monitor.getSize()
			end

			mapsx = sx
			mapsz = sz
			mnsy = msy
			mnsx = msx
		end

		monitor.setCursorPos((msx - sx) * 0.5, (msy - sz) * 0.5)

		local smap = {}

		for i = 0, sz do
			local str = ""
			for j = 0, sx do
				if i == pos.z and j == pos.x then
					if status == 0 then
						str = str .. "5"
					elseif status == 1 then
						str = str .. "7"
					elseif status == 2 then
						str = str .. "8"
					elseif status == 3 then
						str = str .. "9"
					elseif status == 4 then
						str = str .. "a"
					end
				elseif i == aim.z and j == aim.x and map[pos.y][j][i] == 0 then
					str = str .. "b"
				elseif i == aim.z and j == aim.x then
					str = str .. "6"
				else
					-- c is darker mined
					-- 4 is lighter mined
					-- 1 is darker solid
					-- 3 is lighter solid
					if map[pos.y - 1] ~= nil then --
						if map[pos.y][j][i] == 0 then
							if map[pos.y - 1][j][i] == 1 then
								str = str .. "3"
							else
								str = str .. "1"
							end
						else
							if map[pos.y - 1][j][i] == 1 then
								str = str .. "c"
							else
								str = str .. "4"
							end
						end
					else
						if map[pos.y][j][i] == 1 then
							str = str .. "4"
						else
							str = str .. "3"
						end
					end
				end
			end
			smap[i + 1] = str
		end

		for i = 1, #smap do
			monitor.setCursorPos((msx - sx) * 0.5 + 1, (msy - sz) * 0.5 + i)
			monitor.blit(string.rep(" ", #smap[i]), smap[i], smap[i])
		end

		monitor.setCursorPos(2, #smap + 1)
	end
end