Intel® Fortran Compiler 18.0 Developer Guide and Reference

SETTEXTPOSITION (W*S)

Graphics Subroutine: Sets the current text position to a specified position relative to the current text window.

Module

USE IFQWIN

CALL SETTEXTPOSITION (row,column,t)

row

(Input) INTEGER(2). New text row position.

column

(Input) INTEGER(2). New text column position.

t

(Output) Derived type rccoord. Previous text position. The derived type rccoordis defined in IFQWIN.F90 as follows:

 TYPE rccoord
   INTEGER(2) row ! Row coordinate
   INTEGER(2) col ! Column coordinate
 END TYPE rccoord

Subsequent text output with the OUTTEXT function (as well as standard console I/O statements, such as PRINT and WRITE) begins at the point (row, column).

Example

 USE IFQWIN
 TYPE (rccoord) curpos

 WRITE(*,*) "Original text position"
 CALL SETTEXTPOSITION (INT2(6), INT2(5), curpos)
 WRITE (*,*) 'New text position'
 END

See Also