Intel® Fortran Libraries Reference
Intel® Fortran Libraries Reference Intel® Fortran Libraries Reference
2 Intel Fortran Libraries ReferenceSETTEXTPOSITIONGraphics Subroutine: Sets the current text position to a specified position relative to the currenttext window. This subroutine is only available on Windows* systems.Module: USE IFQWINSyntaxCALL 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 rccoord is defined inIFQWIN.F90 as follows:TYPE rccoordINTEGER(2) row ! Row coordinateINTEGER(2) col ! Column coordinateEND TYPE rccoordSubsequent 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).CompatibilitySTANDARD GRAPHICS QUICKWIN GRAPHICS LIBSee Also: “CLEARSCREEN”, “GETTEXTPOSITION”, “OUTTEXT”,“SCROLLTEXTWINDOW”, “SETTEXTWINDOW”, “WRAPON”ExampleUSE IFQWINTYPE (rccoord) curposWRITE(*,*) "Original text position"CALL SETTEXTPOSITION (INT2(6), INT2(5), curpos)WRITE (*,*) 'New text position'END2-426
Descriptions of the Library Routines 2SETTEXTWINDOWGraphics Subroutine: Sets the current text window. This subroutine is only available onWindows* systems.Module: USE IFQWINSyntaxCALL SETTEXTWINDOW (r1, c1, r2, c2)r1, c1(Input) INTEGER(2). Row and column coordinates for upper-left corner of the text window.r2, c2(Input) INTEGER(2). Row and column coordinates for lower-right corner of the text window.SETTEXTWINDOW specifies a window in row and column coordinates where text output to thescreen using OUTTEXT, WRITE, or PRINT will be displayed. You set the text location withinthis window with SETTEXTPOSITION.Text is output from the top of the window down. When the window is full, successive linesoverwrite the last line.SETTEXTWINDOW does not affect the output of the graphics text routine OUTGTEXT. Use theSETVIEWPORT function to control the display area for graphics output.CompatibilitySTANDARD GRAPHICS QUICKWIN GRAPHICS LIBSee Also: “GETTEXTPOSITION”, “GETTEXTWINDOW”, “GRSTATUS”, “OUTTEXT”,“SCROLLTEXTWINDOW”, “SETTEXTPOSITION”, “SETVIEWPORT”, “WRAPON”ExampleUSE IFQWINTYPE (rccoord) curposCALL SETTEXTWINDOW(INT2(5), INT2(1), INT2(7), &INT2(40))CALL SETTEXTPOSITION (INT2(5), INT2(5), curpos)WRITE(*,*) "Only two lines in this text window"WRITE(*,*) "so this line will be overwritten"WRITE(*,*) "by this line"END2-427
- Page 428 and 429: 2 Intel Fortran Libraries Reference
- Page 430 and 431: 2 Intel Fortran Libraries Reference
- Page 432 and 433: 2 Intel Fortran Libraries Reference
- Page 434 and 435: 2 Intel Fortran Libraries Reference
- Page 436 and 437: 2 Intel Fortran Libraries Reference
- Page 438 and 439: 2 Intel Fortran Libraries Reference
- Page 440 and 441: 2 Intel Fortran Libraries Reference
- Page 442 and 443: 2 Intel Fortran Libraries Reference
- Page 444 and 445: 2 Intel Fortran Libraries Reference
- Page 446 and 447: 2 Intel Fortran Libraries Reference
- Page 448 and 449: 2 Intel Fortran Libraries Reference
- Page 450 and 451: 2 Intel Fortran Libraries Reference
- Page 452 and 453: 2 Intel Fortran Libraries Reference
- Page 454 and 455: 2 Intel Fortran Libraries Reference
- Page 456 and 457: 2 Intel Fortran Libraries Reference
- Page 458 and 459: 2 Intel Fortran Libraries Reference
- Page 460 and 461: 2 Intel Fortran Libraries Reference
- Page 462 and 463: 2 Intel Fortran Libraries Reference
- Page 464 and 465: 2 Intel Fortran Libraries Reference
- Page 466 and 467: 2 Intel Fortran Libraries Reference
- Page 468 and 469: 2 Intel Fortran Libraries Reference
- Page 470 and 471: 2 Intel Fortran Libraries Reference
- Page 472 and 473: 2 Intel Fortran Libraries Reference
- Page 474 and 475: 2 Intel Fortran Libraries Reference
- Page 476 and 477: 2 Intel Fortran Libraries Reference
- Page 480 and 481: 2 Intel Fortran Libraries Reference
- Page 482 and 483: 2 Intel Fortran Libraries Reference
- Page 484 and 485: 2 Intel Fortran Libraries Reference
- Page 486 and 487: 2 Intel Fortran Libraries Reference
- Page 488 and 489: 2 Intel Fortran Libraries Reference
- Page 490 and 491: 2 Intel Fortran Libraries Reference
- Page 492 and 493: 2 Intel Fortran Libraries Reference
- Page 494 and 495: 2 Intel Fortran Libraries Reference
- Page 496 and 497: 2 Intel Fortran Libraries Reference
- Page 498 and 499: 2 Intel Fortran Libraries Reference
- Page 500 and 501: 2 Intel Fortran Libraries Reference
- Page 502 and 503: 2 Intel Fortran Libraries Reference
- Page 504 and 505: 2 Intel Fortran Libraries Reference
- Page 506 and 507: 2 Intel Fortran Libraries Reference
- Page 508 and 509: 2 Intel Fortran Libraries Reference
- Page 510 and 511: 2 Intel Fortran Libraries Reference
- Page 512 and 513: 2 Intel Fortran Libraries Reference
- Page 514 and 515: 2 Intel Fortran Libraries Reference
- Page 516 and 517: 2 Intel Fortran Libraries Reference
- Page 518 and 519: 2 Intel Fortran Libraries Reference
- Page 520 and 521: 2 Intel Fortran Libraries Reference
- Page 522 and 523: 2 Intel Fortran Libraries Reference
- Page 524 and 525: 2 Intel Fortran Libraries Reference
- Page 526 and 527: 2 Intel Fortran Libraries Reference
2 Intel <strong>Fortran</strong> <strong>Libraries</strong> <strong>Reference</strong>SETTEXTPOSITIONGraphics Subroutine: Sets the current text position to a specified position relative to the currenttext window. This subroutine is only available on Windows* systems.Module: USE IFQWINSyntaxCALL 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 rccoord is defined inIFQWIN.F90 as follows:TYPE rccoordINTEGER(2) row ! Row coordinateINTEGER(2) col ! Column coordinateEND TYPE rccoordSubsequent 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).CompatibilitySTANDARD GRAPHICS QUICKWIN GRAPHICS LIBSee Also: “CLEARSCREEN”, “GETTEXTPOSITION”, “OUTTEXT”,“SCROLLTEXTWINDOW”, “SETTEXTWINDOW”, “WRAPON”ExampleUSE IFQWINTYPE (rccoord) curposWRITE(*,*) "Original text position"CALL SETTEXTPOSITION (INT2(6), INT2(5), curpos)WRITE (*,*) 'New text position'END2-426