While True Do not working

side = "back:blue"
m = peripheral.wrap(side)
m.setTextColor(colors.white)
on = false
rednet.open("right")
open = false
Nuiofrd = true
function set_screen()
  m.clear()
  m.setTextScale(2)
  m.setCursorPos(1,1)
  m.write("	 -=[Spawning]=-	")
  m.setCursorPos(1,3)
  m.write(" Spawner  XP  Hactches")
  if on == true and open == true then
	m.setCursorPos(1,4)
	m.write(" [On]		   [Open]")
  end
  if on == true and open == false then
	m.setCursorPos(1,4)
	m.write(" [On]		   [Close]")
  end
  if on == false and open == false then
	m.setCursorPos(1,4)
	m.write(" [Off]		  [Close]")
  end
  if on == false and open == true then
	m.setCursorPos(10,4)
	m.write(" [Off]		  [Open]")
  end
  m.setCursorPos(10,4)
  m.write(xp_levels)
end
function set_rs()
  if on == true and open == true then
	rs.setBundledOutput("bottom",colors.red)
  end
  if on == true and open == false then
	rs.setBundledOutput("bottom",colors.combine(colors.lime,colors.red))
  end
  if on == false and open == false then
	rs.setBundledOutput("bottom",colors.lime)
  end
  if on == false and open == true then
	rs.setBundledOutput("bottom",colors.cyan)
  end
end
function set_states()
  event, side, x, y = os.pullEvent("monitor_touch")
  if (x>=2) and (x<=4) and (y==4) then
	if on == true then
	  on = false
	else
	  on = true
	end
  end
  if (x>=15) and (x<=23) and (y==4) then
	if on == true then
	  open = false
	else
	  open = true
	end
  end
end
function get_xplevels()
  s, message, d = os.pullEvent("rednet_message")
  message = xp_levels
end
while true do
  get_xplevels()
  set_screen()
  set_rs()
  set_states()
end

m=peripheral.wrap("left")
m.setAutoCollect(true)
rednet.open("right")
rnb = 38 --rednet base
while true do
  if m.getLevels() >=30 then
	print("Enchantment Commencing")
	turtle.select(16)
	turtle.transferTo(15,1)
	turtle.select(15)
	m.enchant(30)
	print("Enchantment Done")
	turtle.dropDown()
  else
	sleep(1)
	xp_levels = m.getLevels()
	rednet.send(rnb, xp_levels)
  end
end

side = "back:blue"
m = peripheral.wrap(side)
m.setTextColor(colors.white)
on = false
rednet.open("right")
open = false
m.clear()
m.setTextScale(2)
function set_screen()
  if on == true and open == true then
	m.setCursorPos(1,4)
	m.clearLine()
	m.write(" [On]		   [Open]")
  end
  if on == true and open == false then
	m.setCursorPos(1,4)
	m.clearLine()
	m.write(" [On]		   [Close]")
  end
  if on == false and open == false then
	m.setCursorPos(1,4)
	m.clearLine()
	m.write(" [Off]		  [Close]")
  end
  if on == false and open == true then
	m.setCursorPos(1,4)
	m.clearLine()
	m.write(" [Off]		  [Open]")
  end
  m.setCursorPos(10,4)
  m.write(xp_levels)
end
function set_rs()
  if on == true and open == true then
	rs.setBundledOutput("bottom",colors.red)
  end
  if on == true and open == false then
	rs.setBundledOutput("bottom",colors.combine(colors.lime,colors.red))
  end
  if on == false and open == false then
	rs.setBundledOutput("bottom",colors.lime)
  end
  if on == false and open == true then
	rs.setBundledOutput("bottom",colors.cyan)
  end
end
function set_states(arg1, arg2, arg3)
  if (arg2>=2) and (arg2<=4) and (arg3==4) then
	if on == true then
	  on = false
	else
	  on = true
	end
  end
  if (arg2>=15) and (arg2<=23) and (arg3==4) then
	if on == true then
	  open = false
	else
	  open = true
	end
  end
end

--{base of program
m.setCursorPos(1,1)
m.write("	 -=[Spawning]=-	")
m.setCursorPos(1,3)
m.write(" Spawner  XP  Hactches")
while true do
  event, arg1, arg2, arg3 = os.pullEvent()

  if event == "rednet_message" then
		xp_levels = arg2 -- the message is arg2

  elseif event == "monitor_touch" then
		set_states(arg1, arg2, arg3) -- send the side, x, and y to the function

  end

  set_screen()
  set_rs()
end

-- # define all our main variables at the top, and make them all local
local monSide = 'back'
local rsSide = 'bottom'
local redSide = 'right'
local on = false
local open = false
-- # we can declare nil values in this way
local xp_levels
local m = peripheral.wrap(monSide)

-- # make the term function calls refer to the monitor
term.redirect(m)
-- # see now we can use term calls
term.setTextColor(colors.white)

rednet.open(redSide)

term.clear()
-- # this one still needs to be directly for the monitor though
m.setTextScale(2)

function set_screen()
  term.setCursorPos(1, 4)
  term.clearLine()
  -- #if it is on, it will be [On] or else it will be [Off]
  local onState = on and '[On] ' or '[Off]'
  local openState = open and '[Open] ' or '[Close]'
  write(' '..onState..'			'..openState)
  term.setCursorPos(10,4)
  write(xp_levels)
end

function set_rs()
  local outputCol

  -- # saying on or not on is the same as saying == true and == false respectively
  if on and open then
	outputCol = colors.red
  elseif on and not open then
	outputCol = colors.combine(colors.lime, colors.red)
  elseif not on and not open then
	outputCol = colors.lime
  elseif not on and open then
	outputCol = colors.cyan
  end

  rs.setBundledOutput(rsSide, outputCol)
end

function set_states(arg1, arg2, arg3)
  if (arg2 >= 2) and (arg2 <= 4) and (arg3 == 4) then
	-- # we can toggle in this way
	on = not on
  end
  if (arg2>=15) and (arg2<=23) and (arg3==4) then
	open = not on
  end
end

-- # again we can use term now
term.setCursorPos(1,1)
write("		-=[Spawning]=- ")
term.setCursorPos(1,3)
write(" Spawner  XP  Hactches")

while true do
  local event, arg1, arg2, arg3 = os.pullEvent()

  if event == "rednet_message" then
	xp_levels = arg2 -- # the message is arg2
  elseif event == "monitor_touch" then
	set_states(arg1, arg2, arg3) -- # send the side, x, and y to the function
  end

  set_screen()
  set_rs()
end

-- # give control back to the normal terminal
term.restore()