8/7 水平采矿 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

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 fs.exists("conf") == false 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")

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, block, _, _, _, type, metadata, resistance = 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)

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

        if distance < safedist then
            print("Target is too Close! Shield Disabled!")
            shield.enable(false)
            speaker.speak("Target Dis: " .. tostring(distance))
            speaker.speak("Offset Coordinates: x=" .. tostring(t1x) .. ", y=" .. tostring(t1y) .. ", z=" .. tostring(t1z))
            speaker.speak("Laser Coordinates: x=" .. tostring(lastLx) .. ", y=" .. tostring(lastLy) .. ", z=" .. tostring(lastLz))
        elseif distance > safedist then
            shield.translation(tx, ty, tz)
            speaker.speak("Target Dis: " .. tostring(distance))
            speaker.speak("Offset Coordinates: x=" .. tostring(t1x) .. ", y=" .. tostring(t1y) .. ", z=" .. tostring(t1z))
            speaker.speak("Laser Coordinates: x=" .. tostring(lastLx) .. ", y=" .. tostring(lastLy) .. ", z=" .. tostring(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
            shield.enable(false)
            print("Target is too Close! Shield Disabled!")
        elseif on < 5 then
            shield.enable(false)
        end
    elseif event == "key" and laserName == 46 then
        print("C key pressed, running 'conf' script...")
        shell.run("conf")
    end
end