local mon = peripheral.wrap("top")
--SlowPrint Start
function SlowText(Text)
 for I=1,string.len(Text) do
  NewText=string.sub(Text,I,I)
  mon.write(NewText)
  sleep(0.1)
 end
end
--Slowprint End
--Start
mon.clear()
while true do
 while true do
  sleep(0)
  if redstone.getInput("left") then
   break
  end
 end
mon.setTextScale(1)
mon.clear()
mon.setCursorPos(7,6)
mon.setTextColor(colors.green)
redstone.setOutput("bottom",true)
SlowText("LAUNCH INITIATED!")
sleep(8)
mon.clear()
mon.setCursorPos(10,6)
--Counter
for I=10,1,-1 do
mon.clear()
mon.setCursorPos(4,2)
mon.setTextColor(colors.red)
NewNumber = tostring(I)
mon.setTextScale(4)
mon.write(NewNumber)
sleep(1)
end
--Counter End
mon.setTextScale(2)
mon.clear()
mon.setCursorPos(5,3)
mon.setTextColor(colors.green)
SlowText("LAUNCH!")
redstone.setOutput("right",true)
sleep(10)
redstone.setOutput("right",false)
redstone.setOutput("bottom",false)
sleep(5)
mon.clear()
--End
end