redstone to http request

local redstats_left
local redstats_front
local redstats_right
local redstats_back

while true do
  local event = os.pullEvent("redstone")
  if rs.getInput("left") ~= redstats_left then
    redstats_left = rs.getInput("left")
    if redstats_left == true then
      http.request("http://192.168.1.18/1/HIGH")
    else
      http.request("http://192.168.1.18/1/LOW")
    end
  end
  if rs.getInput("front") ~= redstats_front then
    redstats_front = rs.getInput("front")
    if redstats_front == true then
      http.request("http://192.168.1.18/2/HIGH")
    else
      http.request("http://192.168.1.18/2/LOW")
    end
  end
  if rs.getInput("right") ~= redstats_right then
    redstats_right = rs.getInput("right")
    if redstats_right == true then
      http.request("http://192.168.1.18/3/HIGH")
    else
      http.request("http://192.168.1.18/3/LOW")
    end
  end
  if rs.getInput("back") ~= redstats_back then
    redstats_back = rs.getInput("back")
    if rs.getInput("back") == true then
      http.request("http://192.168.1.18/4/HIGH")
    else
      http.request("http://192.168.1.18/4/LOW")
    end
  end
  print("---------------")
  print(redstats_left)
  print(redstats_front)
  print(redstats_right)
  print(redstats_back)
end