Scanner - With mControl

srcFile = "baseChecker/src"
logFile = "scannerLog"
logStarter = "\nNew logging session started."
time = {m = 0, h = 0, d = 0}
sensor = peripheral.wrap("left")

function fsInteract(message)
  readFile = fs.open(srcFile, "r")
  contents = readFile.readAll()
  readFile.close()
  file = {}
  toFile = message

  for line in contents:gmatch("%S+") do
    table.insert(file, line)
  end

  for i=1,#file - 1 do
    toFile = toFile .. " " .. file[i + 1]
  end

  writeFileInit = fs.open(srcFile,"w")
  writeFileInit.write(toFile)
  writeFileInit.close()
  return file[2]
end

function log(logItem)
  writeLog = fs.open(logFile,"a")
  writeLog.writeLine(logItem)
  writeLog.close()
end

function addMinute()
  time.m = time.m + 1

  if time.m >= 59 then
    time.m = 0
    time.h = time.h + 1
  end

  if time.h >= 23 then
    time.h = 0
    time.d = time.d + 1
  end
end

while true do
  if fsInteract("[" .. time.m .. "/" .. time.h .. "/" .. time.d .. "]") == "stop" then
    break
  end

  playerTable = sensor.getPlayers()

  if playerTable[1] ~= nil then
    if file[1] == "[0/0/0]" then log(logStarter) end

    logMessage = file[1] .. " players nearby: " .. playerTable[1].name

    for i=1, #playerTable - 1 do
      logMessage = logMessage .. ", " .. playerTable[i + 1].name
    end

    log(logMessage)
  end

  addMinute()
  sleep(60)
end