Intel® Fortran Libraries Reference

2 Intel Fortran Libraries ReferenceGETTEXTWINDOWGraphics Subroutine: Finds the boundaries of the current text window. This subroutine is onlyavailable on Windows* systems.Module: USE IFQWINSyntaxCALL GETTEXTWINDOW (r1, c1, r2, c2)r1, c1(Output) INTEGER(2). Row and column coordinates for upper-left corner of the text window.r2, c2(Output) INTEGER(2). Row and column coordinates for lower-right corner of the text window.Output from OUTTEXT and WRITE is limited to the text window. By default, this is the entirewindow, unless the text window is redefined by SETTEXTWINDOW.The window defined by SETTEXTWINDOW has no effect on output from OUTGTEXT.CompatibilitySTANDARD GRAPHICS QUICKWIN GRAPHICS LIBSee Also: “GETTEXTPOSITION”, “OUTTEXT”, “SCROLLTEXTWINDOW”,“SETTEXTPOSITION”, “SETTEXTWINDOW”, “WRAPON”, the WRITE statement in theLanguage ReferenceExample! Build as QuickWin or Standard GraphicsUSE IFQWININTEGER(2) top, left, bottom, rightDO i = 1, 10WRITE(*,*) "Hello, world"END DO! Save text window positionCALL GETTEXTWINDOW (top, left, bottom, right)! Scroll text window down seven linesCALL SCROLLTEXTWINDOW (INT2(-7))! Restore text windowCALL SETTEXTWINDOW (top, left, bottom, right)WRITE(*,*) "At beginning again"END2-148