new

local q = 0


function Redstone()
while q > 0 do
mon.setTextScale(2)
mon.setCursorPos(1,1)
mon.write("da machien is bezig")
mon.setCursorPos(1,2)
mon.write("doe ruustig")
redstone.setOutput("left", false)
sleep(0.5)
redstone.setOutput("left", true)
sleep(0.5)
q = q-1
end
end
mon = peripheral.wrap("top")
while true do
while q==0 do

mon.setTextScale(2)
mon.setCursorPos(1,1)
mon.clear()
sleep(0.2)
mon.write("kut joeng")
sleep(0.5)

mon.setCursorPos(1,2)
mon.setTextScale(2)
mon.write("Hoeveel gvd kut joeng")
redstone.setOutput("left", true)
q = io.read()
q = tonumber(q)
  if q < 0 then
  mon.write(" negatief aantal zijt gij loemp ofwa?")
  end
end


mon.clear()

 Redstone()
end