with ada.text_io; with screen; procedure screentst is cursPos : screen.position; begin screen.clearScreen; cursPos.row := 10; cursPos.column := 10; screen.moveCursor(cursPos); ada.text_io.put(item => "hello world"); ada.text_io.new_line; end screentst;