Tek-Tips is the largest IT community on the Internet today!
Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!
-
Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!
-
flexible Progressbar with Fortran
Hi, thanks for the little program. One last question - can you replace the number of tabulators T32 by a variable??? -
flexible Progressbar with Fortran
Yes, now we are talking about the same thing. Could you just give an example with a variable x-position. How do you copy the x-position into the print-statement??? I think I will have no problems with blanking since I want to write [ 1% ], [ 10% ], [ 100% ]. As you can see the text is getting... -
flexible Progressbar with Fortran
Excuse me, but I think we are still talking about different things. Again, I am writing a line with write(*,*) "..." on the screen. The subroutine GOTOX shall print in the same line (wherever it is) at position xhlp=X-len_trim(str) the string str. For instance X may be 90 and str="100%". This... -
flexible Progressbar with Fortran
Is there an opportunity to get the maximum number of columns? -
flexible Progressbar with Fortran
Ok, here is my example. The subroutine gotox(..,..) shall print a string at position X=X-LEN_TRIM(str). Unfortunately, I cannot replace the characters "81" by // strhlp(1:LEN_TRIM(strhlp)) // ... SUBROUTINE GOTOX(X, STR) ! INTEGER, INTENT(in) :: x CHARACTER (LEN=*), INTENT(in) :: str... -
flexible Progressbar with Fortran
and if I need to jump to column x=90 (and I do not know the number of characters/signs which I have already written in the line...)? -
flexible Progressbar with Fortran
I am using Linux. Intel Fortran Compiler... -
flexible Progressbar with Fortran
Hi, I want to write a progressbar. The vertical position depends on what has been written in the shell before the program prints the following line. The progress shall be described with a bar and number (50%). Therefore I need to jump with the cursor.... Example: ** Copying dataset to ...
