if New_foo then print('text: new screen line', y, Screen_height, screen_line_starting_pos) end

        if New_foo then print('text: new screen line', y, App.screen.height, screen_line_starting_pos) end

        if y + math.floor(15*Zoom) >= Screen_height then

        if y + math.floor(15*Zoom) >= App.screen.height then

  print('test_draw_text')

function test_pagedown()
  print('test_pagedown')
  App.screen.init{width=120, height=45}
  Lines = load_array{'abc', 'def', 'ghi'}
  Line_width = 120
  Cursor1 = {line=1, pos=1}
  Screen_top1 = {line=1, pos=1}
  Screen_bottom1 = {}
  Zoom = 1
  local screen_top_margin = 15  -- pixels
  local line_height = math.floor(15*Zoom)  -- pixels
  -- initially the first two lines are displayed
  App.draw()
  local y = screen_top_margin
  App.screen.check(y, 'abc', 'F - test_pagedown/baseline/screen:1')
  y = y + line_height
  App.screen.check(y, 'def', 'F - test_pagedown/baseline/screen:2')
  -- after pagedown the bottom line becomes the top
  App.run_after_keychord('pagedown')
  y = screen_top_margin
  App.screen.check(y, 'def', 'F - test_pagedown/screen:1')
  y = y + line_height
  App.screen.check(y, 'ghi', 'F - test_pagedown/screen:2')
end
function test_pagedown_skip_drawings()
  print('test_pagedown_skip_drawings')
  -- some lines of text with a drawing intermixed
  App.screen.init{width=50, height=45}
  Lines = load_array{'abc',
                     '```lines', '```',
                     'def',
                     'ghi'}
  check_eq(Lines[2].mode, 'drawing', 'F - test_pagedown_skip_drawings/baseline/lines')
  Line_width = App.screen.width
  Cursor1 = {line=1, pos=1}
  Screen_top1 = {line=1, pos=1}
  Screen_bottom1 = {}
  Zoom = 1
  local screen_top_margin = 15  -- pixels
  local drawing_height = App.screen.width / 2  -- default
  -- initially the screen displays the first line and part of the drawing
  App.draw()
  local y = screen_top_margin
  App.screen.check(y, 'abc', 'F - test_pagedown_skip_drawings/baseline/screen:1')
  -- after pagedown the screen draws the screen up top
  App.run_after_keychord('pagedown')
  y = screen_top_margin + drawing_height
  App.screen.check(y, 'def', 'F - test_pagedown_skip_drawings/screen:1')
  y = y + line_height
  App.screen.check(y, 'ghi', 'F - test_pagedown_skip_drawings/screen:2')
end

    print('scroll up')

  local y = Screen_height - math.floor(15*Zoom)

  local y = App.screen.height - math.floor(15*Zoom)

New_foo = true

Debug_main = false

  if New_foo then print('== draw') end

  if Debug_main then print('== draw') end

    if New_foo then print('draw:', line_index, y) end

    if Debug_main then print('draw:', line_index, y) end

        if New_foo then print('text') end

        if Debug_main then print('text') end

        if New_foo then print('aa', y) end

        if Debug_main then print('aa', y) end

  New_foo = false

  Debug_main = false

  New_foo = true

--?   Debug_main = true

    print('setting top to', Screen_bottom1.line)

  local i,line = 0, ''

  local i,line,drawing = 0, ''

--?     print(line)

      table.insert(result, load_drawing_from_array(next_line, a, i))

--?       print('inserting drawing')
      i, drawing = load_drawing_from_array(next_line, a, i)
--?       print('i now', i)
      table.insert(result, drawing)

--?       print('inserting text')

--?     print(i)

  return drawing

  return i, drawing

--     App.run_with_keypress('pagedown')

--     App.run_after_keypress('pagedown')

  print('drawing "'..msg..'" at y '..tostring(y))

  App.screen.contents = {}
  App.draw()
end
function App.run_after_keychord(key)
  App.keychord_pressed(key)

  if App.screen.contents[screen_row] == nil then
    error('no text at y '..tostring(y))
  end