Insert text in a variant (CADTXT)

If you want to use this function to output numerical values from real or integer variables, they must first be converted to text. Use the Convert Number to Text (String) function to do this. See also: Convert number to text (string).

C call:

C     CALL PVB445 (XP,YP,TEXT,IC,RH,RW,IRET)

C     

C     The following variables must be defined beforehand:

C     

C     XP/YP : Text position

C     TEXT  : Text

C     IC    : Text colour (0 = AUTO)

C     RH    : Text height (0 = AUTO)

C     RW    : Text angle

C     IRET  : is not evaluated, but must be specified

C     

C     NOTE: The text variable TEXT must be declared in the program header!

C     CHARACTER *80 TEXT

C     

C     Example:

C     ---------------

C     Add text

C     ---------------

      XP = 100.0

      YP = 100.0

      TEXT = "ABC123"

      IC = 2

      RH = 15.0

      RW = 0.0

      CALL PVB445 (XP,YP,TEXT,IC,RH,RW,IRET)