The objective is to print lines that do not drop of the page. program test character(200) :: stringin character,dimension(200) :: strgout integer :: single_character stringin = 'the kat kissed the dog and ate his banana. The banana was too big for its mouth so it had to sneeze.' do i = 1, len(stringin), 1 single_character = iachar(stringin(i:i)) strgout(i) = achar(single_character) print *,strgout(i) ! ! I now need code to collate the characters back into an output string ! and to print it after a string length of 40 has been achieved ! and to skip to the next line after the output string has passed ! a length of 40 and encounters a space, so as to not skip in the ! middle of a word. Thank you. ! ! end do end program

Listing code not working

Patrick May 28, 2023, 8:22am 21

Re my post: I changed the coding. No problem left.

Topic		Replies	Views
Best way to read only last two real values in a line using read in Fortran Help	26	4616	July 15, 2022
Is there any reliable way of printing a problematic line in a `namelist` file? Uncategorized	10	412	February 8, 2025
Print and write in same line Help	12	2541	August 29, 2023
Possible gfortran bug? Help	20	855	January 1, 2026
Sharing a classic Fortran 77 utility: A robust string trimming function with quotes protection (itrim) Uncategorized	1	217	June 18, 2026