/frameengine/mine

os.unloadAPI("/frameengine/frame")
os.loadAPI("/frameengine/frame")

local programPath="frameengine/mine"
local args={...}
local runningProgram=""
local intervalBetweenPulses=0.8

local armFrequencies={
    up=3408,
    down=3407,
    breakers=3409,
    upBreaker=3410
}

if shell~=nil then
    runningProgram=shell.getRunningProgram()
end

function moveArm(freq1, freq2, count)
    for i=1, count do
      frame.pulse(freq1)
      sleep(intervalBetweenPulses)
      frame.pulse(freq2)
      sleep(intervalBetweenPulses)
      frame.yield()
    end
end

function mine(layers)
    moveArm(armFrequencies.breakers, armFrequencies.down, layers)
    moveArm(armFrequencies.upBreaker, armFrequencies.up, layers)
end

function run()
    if #args>0 then
        mine(tonumber(args[1]))
    else
        print("mine [number of layers]")
    end
end

if runningProgram==programPath then
    run()
end