Trailing-Edge
-
PDP-10 Archives
-
decuslib20-04
-
decus/20-0125/moveap.for
There is 1 other file named moveap.for in the archive. Click here to see a list.
SUBROUTINE MOVEAP(X, Y)
C************************************************************
C
C THIS ROUTINE IS USED TO MOVE THE AUX. POINTER
C TO USER (X, Y)
C
C POSSIBLE ERRORS:
C ?INVALID REPLY TO A MOVE COMMAND
C
C ROUTINES CALLED:
C MOVFIL - MOVE DISPLAY FILE ROUTINE
C
C************************************************************
INTEGER DISNUM
DISNUM = 5
CALL MOVFIL(DISNUM, X, Y)
RETURN
END