Moon Base

mon = peripheral.wrap("top")
mon.setTextScale(1)
while true do
mon.clear()
mon.setCursorPos(1,1)
  if rs.getInput("left") then
   for i = 0,1 do
     rs.setBundledOutput("bottom", colors.green)
     sleep(0.5)
     rs.setBundledOutput("bottom", 0)
     sleep(0.5)
   end

   mon.setTextColor(colors.orange)
   mon.write("Tank fåBCllt sich mit Sauerstoff")
   sleep(5)
   for i = 0,1 do
     rs.setBundledOutput("bottom", colors.white)
     sleep(0.5)
     rs.setBundledOutput("bottom", 0)
     sleep(0.5)
   end
   mon.setTextColor(colors.red)
   for i = 0,100, 10 do
     mon.setCursorPos(6,2)
     if i > 30 then
       mon.setTextColor(colors.orange)
     end
     if i > 60 then
       mon.setTextColor(colors.green)
     end
     mon.write(i.."% voll")
     sleep(0.5)
   end
   mon.setCursorPos(1,1)
   mon.clearLine()
   mon.setTextColor(colors.orange)
   mon.write("Sie koennen ihren Helm ablegen")
   for i = 0, 1 do
     rs.setBundledOutput("bottom", colors.yellow)
     sleep(0.5)
     rs.setBundledOutput("bottom", 0)
     sleep(0.5)
   end
   sleep(5)
   for i = 0, 1 do
     rs.setBundledOutput("bottom", colors.black)
     sleep(0.5)
     rs.setBundledOutput("bottom", 0)
     sleep(0.5)
  end
  --RIGHT
  elseif rs.getInput("right")
    for i = 0,1 do
     rs.setBundledOutput("bottom", colors.yellow)
     sleep(0.5)
     rs.setBundledOutput("bottom", 0)
     sleep(0.5)
   end

   mon.setTextColor(colors.orange)
   mon.write("Setzen Sie Ihren Helm auf")
   sleep(5)
   for i = 0,1 do
     rs.setBundledOutput("bottom", colors.black)
     sleep(0.5)
     rs.setBundledOutput("bottom", 0)
     sleep(0.5)
   end
   mon.setTextColor(colors.red)
   for i = 100,0,-10 do
     mon.setCursorPos(6,2)
     if i > 30 then
       mon.setTextColor(colors.orange)
     end
     if i > 60 then
       mon.setTextColor(colors.green)
     end
     mon.write(i.."% voll")
     sleep(0.5)
   end
   mon.setCursorPos(1,1)
   mon.clearLine()
   mon.setTextColor(colors.orange)
   mon.write("Viel Spass auf dem Mond")
   for i = 0, 1 do
     rs.setBundledOutput("bottom", colors.green)
     sleep(0.5)
     rs.setBundledOutput("bottom", 0)
     sleep(0.5)
   end
   sleep(5)
   for i = 0, 1 do
     rs.setBundledOutput("bottom", colors.white)
     sleep(0.5)
     rs.setBundledOutput("bottom", 0)
     sleep(0.5)
  end
  end
sleep(0.1)
end