Set the "current" Shape Object to be a previously initialized Shape Object.
PASS <shape_name> FIELD SHARE? N GOSUB OCD .SHAPE SET CURRENT * Check for error IF OCD .SHAPE SET CURRENT NE
This sets the "current" Shape Object to be a previously initialized Shape Object.
The <shape_name> is a required parameter, and the subroutine will cancel if it is not received.
<shape_name> must refer to a shape you have previously initialized via .SHAPE INITIALIZE.
You can then modify the "current" shape via the .SHAPE SET routines.
Read what other users have said about this page or add your own comments.
-- JeanNeron - 2011-10-20