; procedure eveplus_section if (current_direction = forward) then eve$move_by_screen(1); else eve$move_by_screen(-1); endif; endprocedure