local data = {}
function readPorts()
	local address = memoryReadInt(getProc(), addresses.playerCraftLevelBase + 0x1C ) + 0x698
	local proc = getProc()
	data = {}
	for c = 1, 0x2000 do
		data[c] = memoryReadByte(proc, address + (c-1))
	end
end

function comparePorts()
	local address = memoryReadInt(getProc(), addresses.playerCraftLevelBase + 0x1C ) + 0x698
	printf("\nBase address is 0x%X\n",address)
	local proc = getProc()
	for c = 1, 0x2000 do
		local tmp = memoryReadByte(proc, address + (c-1))
		if tmp ~= data[c] then
			print("Location: ".. RoMScript("\tGetZoneName()..\", \"..GetZoneLocalName(GetZoneID())"))
			printf("\tAddress: 0x%X, Bit: %d\n",address + (c-1),tmp-data[c])
		end
	end
	printf("\n")
end