pulse

local tArgs = { ... }
if #tArgs ~= 1 then
    print( "Usage: pulse <length>" )
    return
end

local waitOne = 4
local waitTwo = 50
local current = 1

local length = tonumber( tArgs[1] )
if length < 1 then
    print( "Mining distance must be positive" )
    return
end



term.clear()
term.setCursorPos(1,1)
print( "Welcome to S.M.A.U.G." )
print( " (Strategic Mining and" )
print( "  Allied Universal Gobbler)" )
print( "Prepare for extreme sorting" )
print( "  system overflow." )
for i = 1, length do
  rs.setOutput("front", true)
  sleep(waitOne)
  rs.setOutput("front", false)
  rs.setOutput("front", true)
  sleep(1)
  rs.setOutput("front", false)
    term.setCursorPos(1,7)
    print( "Mining ")
    term.setCursorPos(9,7)
    print( current )
    term.setCursorPos(14,7)
    print( "/" )
    term.setCursorPos(15,7)
    print( length )
    term.setCursorPos(21,7)
    print( " meters..." )

    --"/" length " meters...")
  rs.setOutput("back", true)
  sleep(waitOne)
  rs.setOutput("back", false)
  sleep(waitTwo)
  current = current + 1
end