kd = {}

kd["nl"] = {["left"] = 0, ["back"] = 0}
kd["ns"] = {["left"] = 0, ["back"] = 1}
kd["nr"] = {["left"] = 1, ["back"] = 0}

kd["wl"] = {["left"] = 1, ["back"] = 1}
kd["ws"] = {["left"] = 0, ["back"] = 0}
kd["wr"] = {["left"] = 0, ["back"] = 1}

kd["sl"] = {["left"] = 1, ["back"] = 1}
kd["ss"] = {["left"] = 0, ["back"] = 1}
kd["sr"] = {["left"] = 1, ["back"] = 0}

kd["el"] = {["left"] = 1, ["back"] = 1}
kd["es"] = {["left"] = 1, ["back"] = 0}
kd["er"] = {["left"] = 0, ["back"] = 0}



m = peripheral.wrap("back")
while true do
    st = io.read()
    
    term.clear()
    print(kd[st])
    m.transmit(23000,1,kd[st])
end