CURSOR Procedure
The CURSOR procedure is used to read the position of the interactive graphics cursor from the current graphics device. Note that not all graphics devices have interactive cursors. CURSOR enables the graphic cursor on the device and optionally waits for the operator to position it. On devices that have a mouse, CURSOR normally waits until a mouse button is pressed (or already down). If no mouse buttons are present, CURSOR waits for a key on the keyboard to be pressed. The X and Y arguments are named variables that receive the cursor position. Normally, the position is reported in data coordinates, but the DATA, DEVICE, and NORMAL keywords can be used to explicitly specify the coordinate system.
When CURSOR returns, the button
field of the system variable !MOUSE is set to the button status. Each mouse button is assigned a bit in the button field. Bit 0 is the leftmost button (value = 1), bit 1 is the middle button (value = 2), and bit 3 is the rightmost button (value = 4) for the typical three-button mouse.
Examples
Activate the graphics cursor, select a point in the graphics window, and return the position of the cursor in device coordinates. Enter:
CURSOR, X, Y, /DEVICE
Move the cursor over the graphics window and press the mouse button. The position of the cursor in device coordinates is stored in the variables X and Y. To label the location, enter:
XYOUTS, X, Y, 'X marks the spot.', /DEVICE
The following two programs demonstrate simple applications of the interactive graphics cursor and the CURSOR procedure.
The first routine is a simple drawing program. Straight lines are connected to positions marked with the left or middle mouse buttons until the right button is pressed.
PRO EX_DRAW
; Start with a blank screen:
ERASE
; Get the initial point in normalized coordinates:
CURSOR, X, Y, /NORMAL, /DOWN
; Repeat until right button is pressed. Get the second point.
; Draw the line. Make the current second point be the new first.
WHILE (!MOUSE.button NE 4) DO BEGIN
CURSOR, X1, Y1, /NORM, /DOWN
PLOTS,[X,X1], [Y,Y1], /NORMAL
X = X1 & Y = Y1
ENDWHILE
END
The second simple procedure can be used to label plots using the cursor to position the text:
; Text is the string to be written on the screen:
PRO LABEL, TEXT
; Ask the user to mark the position:
PRINT, 'Use the mouse to mark the text position:'
; Get the cursor position after pressing any button:
CURSOR, X, Y, /NORMAL, /DOWN
; Write the text at the specified position.
; The NOCLIP keyword is used to ensure that
; the text will appear even if it is outside
; the plotting region.
XYOUTS, X, Y, TEXT, /NORMAL, /NOCLIP
END
At the command line, set TEXT
equal to the string of text you want to appear in the window. For example, enter,
Text = 'My Sample Text'
Compile and run the program by entering the following at the command line, passing your text string to the procedure:
LABEL, TEXT
Next, move the pointer device to the desired spot in the window and click the locator button. Consider how you might augment the LABEL procedure to allow you to specify the size and font of the annotation text.
Avoid Using CURSOR with Draw Widgets
Note that the CURSOR procedure is only for use with IDL direct graphics windows. It should not be used with draw widgets. To obtain the cursor position and button state information from a draw widget, set the BUTTON_EVENTS and MOTION_EVENTS keywords to WIDGET_DRAW, and examine the X, Y, PRESS, and RELEASE fields in the structures returned by the draw widget in response to cursor events. See WIDGET_DRAW for more information.
Using CURSOR with the TEK Device
Note that for the CURSOR procedure to work properly with Tektronix terminals, you may need to execute the command, DEVICE, GIN_CHARS=6
.
Syntax
CURSOR, X, Y [, Wait | [, /CHANGE | , /DOWN | , /NOWAIT | , /UP | , /WAIT]] [, /DATA | , /DEVICE, | , /NORMAL]
Arguments
X
A named variable to receive the cursor’s current column position.
Y
A named variable to receive the cursor’s current row position.
Wait
An integer that specifies the conditions under which CURSOR returns. This parameter can be used interchangeably with the keyword parameters listed below that specify the type of wait. The default value is 1. The table below describes each type of wait.
Note that not all modes of waiting work with all display devices.
Wait Value |
Corresponding Keyword |
Action |
0 |
NOWAIT |
Return immediately. |
1 |
WAIT |
Return if a button is down. |
2 |
CHANGE |
Return if a button is pressed, released, or the pointer is moved. |
3 |
DOWN |
Return when a button down transition is detected. |
4 |
UP |
Return when a button up transition is detected. |
Keywords
CHANGE
Set this keyword to wait for pointer movement or button transition within the currently selected window.
DATA
Set this keyword to return X and Y in data coordinates.
DOWN
Set this keyword to wait for a button down transition within the currently selected window.
DEVICE
Set this keyword to return X and Y in device coordinates.
NORMAL
Set this keyword to return X and Y in normalized coordinates.
NOWAIT
Set this keyword to read the pointer position and button status and return immediately. If the pointer is not within the currently selected window, the device coordinates -1, -1 are returned.
UP
Set this keyword to wait for a button up transition within the current window.
WAIT
Set this keyword to wait for a button to be depressed within the currently selected window. If a button is already pressed, return immediately.
Version History
Original |
Introduced |
See Also
RDPIX Procedure, TVCRS Procedure, CURSOR_CROSSHAIR (and other CURSOR_ keywords), WIDGET_DRAW, !MOUSE