Revise paste Auto-mapper_MC

-- /startup  (central mapper autostart)  CC:Tweaked + Advanced Peripherals
-- Tracks player via Player Detector, builds free-space voxels from movement, renders on a 5x4 advanced monitor.

-- ======= CONFIG =======
local PLAYER_NAME   = "YourPlayerName"
local MONITOR_NAME  = nil            -- nil = auto-find joined advanced monitor wall
local DETECTOR_NAME = nil            -- nil = auto-find player detector
local SAMPLE_SEC    = 0.2            -- seconds
local VOXEL         = 1              -- blocks per voxel
local RADIUS        = 1              -- voxel radius around path
local MAX_POINTS    = 120000
local BG_COL        = colors.black
local FG_COL        = colors.white
-- ======================

-- Open any modems
rednet.close()
for _,side in ipairs(rs.getSides()) do
  if peripheral.getType(side)=="modem" then rednet.open(side) end
end

-- Peripherals
local mon = MONITOR_NAME and peripheral.wrap(MONITOR_NAME) or peripheral.find("monitor")
assert(mon and peripheral.getType(mon)=="monitor","Monitor not found")
mon.setTextScale(0.5)
mon.setBackgroundColor(BG_COL)
mon.setTextColor(FG_COL)
mon.clear()

local pd = DETECTOR_NAME and peripheral.wrap(DETECTOR_NAME) or peripheral.find("playerDetector")
assert(pd,"Advanced Peripherals Player Detector not found")

-- Confirm GPS present (optional fallback)
local function gpsLocate()
  local x,y,z = gps.locate(2,false)
  return x,y,z
end

-- Screen
local W,H = mon.getSize()

-- Camera
local cam = { yaw=math.rad(45), pitch=math.rad(25), dist=48, cx=0, cy=0, cz=0, panx=0, pany=0, panz=0, mouseRotate=false }

-- Voxel store
local vox, order = {}, {}
local function key(ix,iy,iz) return ix..":"..iy..":"..iz end
local function setVoxel(ix,iy,iz)
  local k = key(ix,iy,iz)
  if not vox[k] then
    vox[k]=true
    order[#order+1]=k
    if #order>MAX_POINTS then local old=table.remove(order,1); vox[old]=nil end
  end
end
local function markFreeSphere(px,py,pz,rad)
  for dx=-rad,rad do
    for dy=-rad,rad do
      for dz=-rad,rad do
        if dx*dx+dy*dy+dz*dz<=rad*rad then setVoxel(px+dx,py+dy,pz+pz and pz or 0 + dz) end
      end
    end
  end
end

-- Math
local function rotatePoint(x,y,z, yaw,pitch)
  local cy,sy = math.cos(yaw), math.sin(yaw)
  local cp,sp = math.cos(pitch), math.sin(pitch)
  local xr =  cy*x + sy*z
  local zr = -sy*x + cy*z
  local yr =  cp*y - sp*zr
  zr =  sp*y + cp*zr
  return xr,yr,zr
end

local function project(ix,iy,iz)
  local x = (ix*VOXEL - cam.cx) + cam.panx
  local y = (iy*VOXEL - cam.cy) + cam.pany
  local z = (iz*VOXEL - cam.cz) + cam.panz
  local xr,yr,zr = rotatePoint(x,y,z, cam.yaw, cam.pitch)
  local f,d = 30, cam.dist
  local denom = (zr + d)
  if denom<=0.2 then return nil end
  local sx = math.floor(W/2 + (xr*f)/denom + 0.5)
  local sy = math.floor(H/2 - (yr*f)/denom + 0.5)
  return sx,sy,denom
end

local function clearMon()
  mon.setBackgroundColor(BG_COL)
  mon.setTextColor(FG_COL)
  mon.clear()
end

-- FIXED: use blit with string colors
local function plot(x,y,c)
  if x>=1 and x<=W and y>=1 and y<=H then
    mon.setCursorPos(x,y)
    mon.blit("\127", colors.toBlit(c), colors.toBlit(BG_COL))
  end
end

local function colorByDepth(den)
  if den<10 then return colors.white end
  if den<20 then return colors.lightGray end
  if den<35 then return colors.gray end
  return colors.black
end

local function drawHUD(points,fps)
  mon.setCursorPos(1,1)
  mon.setTextColor(colors.yellow)
  mon.setBackgroundColor(BG_COL)
  mon.write(("pts:%d fps:%.1f yaw:%d pitch:%d zoom:%d     "):format(points,fps, math.deg(cam.yaw), math.deg(cam.pitch), cam.dist))
end

local function render(fps)
  clearMon()
  local count=0
  local bucketNear, bucketFar = {}, {}
  for k,_ in pairs(vox) do
    local ix,iy,iz = k:match("(-?%d+):(-?%d+):(-?%d+)")
    ix,iy,iz = tonumber(ix),tonumber(iy),tonumber(iz)
    local sx,sy,den = project(ix,iy,iz)
    if sx then
      if den<25 then bucketNear[#bucketNear+1]={sx,sy,den} else bucketFar[#bucketFar+1]={sx,sy,den} end
    end
  end
  local function drawB(b) for i=1,#b do local sx,sy,den=b[i][1],b[i][2],b[i][3]; plot(sx,sy,colorByDepth(den)); count=count+1 end end
  drawB(bucketFar); drawB(bucketNear)
  drawHUD(count,fps or 0)
end

-- Input
local function clamp(v,a,b) if v<a then return a elseif v>b then return b else return v end end
local function inputLoop()
  while true do
    local e={os.pullEvent()}
    if e[1]=="key" then
      local k=e[2]
      if k==keys.q then return end
      if k==keys.left then cam.yaw=cam.yaw-math.rad(5) end
      if k==keys.right then cam.yaw=cam.yaw+math.rad(5) end
      if k==keys.up then cam.pitch=clamp(cam.pitch-math.rad(5), math.rad(-80), math.rad(80)) end
      if k==keys.down then cam.pitch=clamp(cam.pitch+math.rad(5), math.rad(-80), math.rad(80)) end
      if k==keys.leftBracket then cam.dist=clamp(cam.dist-2,8,200) end
      if k==keys.rightBracket then cam.dist=clamp(cam.dist+2,8,200) end
      if k==keys.w then cam.pany=cam.pany+1 end
      if k==keys.s then cam.pany=cam.pany-1 end
      if k==keys.a then cam.panx=cam.panx-1 end
      if k==keys.d then cam.panx=cam.panx+1 end
      if k==keys.r then cam.panz=cam.panz+1 end
      if k==keys.f then cam.panz=cam.panz-1 end
      if k==keys.m then cam.mouseRotate=not cam.mouseRotate end
    elseif e[1]=="mouse_drag" and cam.mouseRotate then
      local dx,dy=e[3],e[4]
      cam.yaw=cam.yaw+dx*0.01
      cam.pitch=clamp(cam.pitch+dy*0.01, math.rad(-80), math.rad(80))
    end
  end
end

-- Sampling
local function roundDiv(v,step) return math.floor((v + (v>=0 and step/2 or -step/2))/step) end
local function sampleLoop()
  local last=os.clock()
  while true do
    local pos = pd.getPlayerPos and pd.getPlayerPos(PLAYER_NAME)
    local x,y,z
    if type(pos)=="table" and pos.x then x,y,z=pos.x,pos.y,pos.z else x,y,z=gpsLocate() end
    if x and y and z then
      cam.cx = cam.cx + (x - cam.cx)*0.3
      cam.cy = cam.cy + (y - cam.cy)*0.3
      cam.cz = cam.cz + (z - cam.cz)*0.3
      local ix,iy,iz = roundDiv(x,VOXEL), roundDiv(y,VOXEL), roundDiv(z,VOXEL)
      markFreeSphere(ix,iy,iz,RADIUS)
    end
    local now=os.clock(); local dt=now-last; last=now
    render(1/math.max(dt,1e-3))
    sleep(SAMPLE_SEC)
  end
end

-- Startup screen clear and hint
term.redirect(mon)
clearMon()
mon.setCursorPos(1,2); mon.setTextColor(FG_COL); mon.write("Mapper autostart. Q quits.")
mon.setCursorPos(1,3); mon.write("Arrows rotate  [ ] zoom  WASD pan  R/F elevate  M mouse-rot")

parallel.waitForAny(sampleLoop, inputLoop)

term.redirect(term.native())