4-25-25水平采矿

local OffsetValue = 3
local shield = peripheral.find("warpdriveForceFieldProjector")
local lasers = peripheral.getNames()
local speaker = peripheral.find("warpdriveSpeaker")
local lever = "front"
local safedist = 15
local lastLx, lastLy, lastLz = 0, 0, 0

-- Helper: only speak if a speaker is present
local function trySpeak(msg)
    if speaker then speaker.speak(msg) end
end

function shieldOffset(lx, ly, lz, fx, fy, fz)
    local dx = lx - fx
    local dy = ly - fy
    local dz = lz - fz
    local distance = math.sqrt(dx * dx + dy * dy + dz * dz)
    dx = dx / distance
    dy = dy / distance
    dz = dz / distance
    local t1x = lx + dx * OffsetValue
    local t1y = ly + dy * OffsetValue
    local t1z = lz + dz * OffsetValue
    return t1x, t1y, t1z, distance
end

if not fs.exists("conf") then
    shell.run("pastebin get 38M5cNbZ conf")
    term.clear()
end

for i = #lasers, 1, -1 do
    if peripheral.getType(lasers[i]) ~= "warpdriveLaserCamera" then
        table.remove(lasers, i)
    else
        peripheral.wrap(lasers[i]).beamFrequency(1420)
    end
end

print("Control System Online, Toggle Redstone To Toggle Shields, Press C to Configure")
trySpeak("Control System Online")

local _, upgrades = shield.getUpgrades()
local Size
if upgrades:match("1/4 x Range") then
    Size = 16
elseif upgrades:match("2/4 x Range") then
    Size = 32
elseif upgrades:match("3/4 x Range") then
    Size = 48
elseif upgrades:match("4/4 x Range") then
    Size = 64
elseif upgrades:match("0/4 x Range") then
    Size = 0
end

while true do
    local event, laserName, lx, ly, lz = os.pullEvent()
    if event == "laserScanning" then
        lastLx, lastLy, lastLz = tonumber(lx), tonumber(ly), tonumber(lz)
        local fx, fy, fz = shield.getLocalPosition()
        local t1x, t1y, t1z, distance = shieldOffset(lastLx, lastLy, lastLz, fx, fy, fz)

        local tx = (t1x - fx) / Size
        local ty = (t1y - fy) / Size
        local tz = (t1z - fz) / Size

        -- round once for speaking
        local rd = math.floor(distance + 0.5)
        local rt1x = math.floor(t1x + 0.5)
        local rt1y = math.floor(t1y + 0.5)
        local rt1z = math.floor(t1z + 0.5)

        if distance < safedist then
            print("Target is too Close! Shield Disabled!")
            trySpeak("Target is too Close! Shield Disabled!")
            shield.enable(false)
            trySpeak("Target Dis: " .. rd)
            trySpeak("Offset Coordinates: x=" .. rt1x .. ", y=" .. rt1y .. ", z=" .. rt1z)
            trySpeak("Laser Coordinates: x=" .. lastLx .. ", y=" .. lastLy .. ", z=" .. lastLz)
        else
            shield.translation(tx, ty, tz)
            trySpeak("Target Dis: " .. rd)
            trySpeak("Offset Coordinates: x=" .. rt1x .. ", y=" .. rt1y .. ", z=" .. rt1z)
            trySpeak("Laser Coordinates: x=" .. lastLx .. ", y=" .. lastLy .. ", z=" .. lastLz)
        end

    elseif event == "redstone" then
        local fx, fy, fz = shield.getLocalPosition()
        local _, _, _, distance = shieldOffset(lastLx, lastLy, lastLz, fx, fy, fz)
        local on = redstone.getAnalogInput(lever)
        if on > 6 and distance > safedist then
            shield.enable(true)
        elseif on > 6 and distance < safedist then
            print("Target is too Close! Shield Disabled!")
            trySpeak("Target is too Close! Shield Disabled!")
            shield.enable(false)
        else
            shield.enable(false)
        end

    elseif event == "key" and laserName == 46 then
        print("C key pressed, running 'conf' script...")
        shell.run("conf")
    end
end