Wireless control

i = left
function redstone()
 if rs.getInput(i) true do
 file = fs.open(log316".save","w")
 file.write("1")
 file.close()
 pastebin put log316
end
function redstoneinv()
 if rs.getInput(i) true do
 file=fs.open(log317".save","w"
 file.write("0")
 file.close()
 pastebin put log317
end
function sleep()
 sleep(6000)
end
 while true do
  redstone()
  redstoneinv()
  sleep()