if
                peripheral.getType("right") == "modem" then
                rednet.open("right")
          elseif
                peripheral.getType("left") == "modem" then
                rednet.open("left")
          elseif
                peripheral.getType("top") == "modem" then
                rednet.open("top")
          elseif
                peripheral.getType("bottom") == "modem" then
                rednet.open("bottom")
          elseif
                peripheral.getType("back") == "modem" then
                rednet.open("back")
          elseif
                peripheral.getType("front") == "modem" then
                rednet.open("front")
          end
		  msg = ""
while true do
    local words = {}
	term.clear()

     term.setTextColor(colors.lime)
	 local w, h = term.getSize()
	 term.setCursorPos(math.floor(w-string.len("HE ?"))/2, 4)
     print("HE ?")

	 term.setTextColor(colors.red)
     term.setCursorPos(math.floor(w-string.len(msg))/2, 12)
	 print(msg)

     term.setTextColor(colors.blue)
     term.setCursorPos(20,8)
     input = read()
    for word in input:gmatch('[^%- ]+') do
    table.insert(words, word)
    inp1 = words[1]
    inp2 = tonumber(words[2])
    end

	if inp1==("topla") or inp1==("yerlestir") or inp1==("reset") then
		rednet.send(tonumber(40),inp1)
		rednet.send(tonumber(41),inp1)
		rednet.send(tonumber(42),inp1)
		rednet.send(tonumber(43),inp1)
		rednet.send(tonumber(44),inp1)
		rednet.send(tonumber(45),inp1)
		rednet.send(tonumber(46),inp1)
		rednet.send(tonumber(47),inp1)
		rednet.send(tonumber(48),inp1)
		rednet.send(tonumber(49),inp1)
		rednet.send(tonumber(50),inp1)
		rednet.send(tonumber(51),inp1)
		rednet.send(tonumber(52),inp1)
		rednet.send(tonumber(56),inp1)
	elseif inp1=="cube" then
		rednet.send(tonumber(56),inp1)
	else
   if type(inp2) == "nil" then
    if inp1==("ileri") or inp1==("geri") or inp1==("sag") or inp1==("sol") or inp1==("yukari") or inp1==("asagi") or inp1==("kaz") then
	msg = "Sayi gir ulan !"
	else
	msg = "Yanlis komut hocam"
	end
   else
    msg = ""
    if inp1 == "kaz" then
		for i = 1, inp2 do
		rednet.send(tonumber(40),"kaz")
		rednet.send(tonumber(41),"kaz")
		rednet.send(tonumber(42),"kaz")
		rednet.send(tonumber(43),"kaz")
		rednet.send(tonumber(44),"kaz")
		rednet.send(tonumber(45),"kaz")
		rednet.send(tonumber(46),"kaz")
		rednet.send(tonumber(47),"kaz")
		rednet.send(tonumber(48),"kaz")
		rednet.send(tonumber(49),"kaz")
		rednet.send(tonumber(50),"kaz")
		rednet.send(tonumber(51),"kaz")
		rednet.send(tonumber(52),"kaz")
		rednet.send(tonumber(56),"kaz")
		end

    elseif inp1==("ileri") or inp1==("geri") or inp1==("sag") or inp1==("sol") or inp1==("yukari") or inp1==("asagi") then
		rednet.send(tonumber(40),input)
		rednet.send(tonumber(41),input)
		rednet.send(tonumber(42),input)
		rednet.send(tonumber(43),input)
		rednet.send(tonumber(44),input)
		rednet.send(tonumber(45),input)
		rednet.send(tonumber(46),input)
		rednet.send(tonumber(47),input)
		rednet.send(tonumber(48),input)
		rednet.send(tonumber(49),input)
		rednet.send(tonumber(50),input)
		rednet.send(tonumber(51),input)
		rednet.send(tonumber(52),input)
		rednet.send(tonumber(56),input)

	end
	end
	end
end