Intel® Fortran Compiler Classic and Intel® Fortran Compiler Developer Guide and Reference
A newer version of this document is available. Customers should click here to go to the newest version.
MOVETO, MOVETO_W
Graphics Subroutines: Move the current graphics position to a specified point. No drawing occurs. These routines are only available for Windows.
Module
USE IFQWIN
CALL MOVETO (x,y,s)
CALL MOVETO_W (wx,wy,ws)
x, y  |  
      (Input) INTEGER(2). Viewport coordinates of the new graphics position.  |  
     
s  |  
      (Output) Derived type xycoord. Viewport coordinates of the previous graphics position. The derived type xycoordis defined in IFQWIN.F90 as follows:  TYPE xycoord
   INTEGER(2) xcoord  ! x coordinate
   INTEGER(2) ycoord  ! y coordinate
 END TYPE xycoord |  
     
wx, wy  |  
      (Input) REAL(8). Window coordinates of the new graphics position.  |  
     
ws  |  
      (Output) Derived type wxycoord. Viewport coordinates of the previous graphics position. The derived type wxycoordis defined in IFQWIN.F90 as follows:  TYPE wxycoord
   DOUBLE PRECISION WX,WY
   STRUCTURE/WXYCOORD/
     DOUBLE PRECISION WX
     DOUBLE PRECISION WY
   END STRUCTURE
 END TYPE wxycoord
 |  
     
MOVETO sets the current graphics position to the viewport coordinate ( x, y). MOVETO_W sets the current graphics position to the window coordinate ( wx, wy).
MOVETO and MOVETO_W assign the coordinates of the previous position to s.
Example
 ! Build as QuickWin or Standard Graphics ap.
 USE IFQWIN
 INTEGER(2) status, x, y
 INTEGER(4) result
 TYPE (xycoord) xy
 RESULT = SETCOLORRGB(Z'FF0000') ! blue
 x = 60
 ! Draw a series of lines DO y = 50, 92, 3
   CALL MOVETO(x, y, xy)
   status = LINETO(INT2(x + 20), y)
 END DO
 END