1. PN4000 online help
2. Variant
3. System
4. Variant info
5. Routines
6. Functions for bending lines
7. Add bending line (main definition of the bending line)

Add bending line (main definition of the bending line)

C call:

C     CALL PVB440 (IN,RW,RH,RL,IT,ICL,ICT,R1,R2,R3,I1,I2,I3,BT,IRET)

C     

C     The following variables must be defined beforehand:

C     

C     IN    : Bend number (1,2,3,...)

C     RW    : Bend angle (+90.0,-90.0,...)

C     RH    : Text height for bend angle (0=auto)

C     RL    : Shifting the text (0=central)

C     IT    : Text type for the output

C             Negative = in the line, Positive = beside the line

C              100 = Bend number

C               10 = Bend angle

C                1 = Bend text

C              110 = only bend number + angle

C     ICL   : Colour for bend line (0=auto)

C     ICT   : Colour for text (0=auto)

C     R1-R3 : Addition real (currently not used)

C     I1-I3 : Addition integer

C     BT    : Bend text

C     IRET  : is not evaluated, but must be specified

C     

C     Example:

C     

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

C     BENDING-NR  1

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

C     

      IN = 1

      RW = 90.0

      RH = 10

      RL = 20

      IT = -111

      ICL = 1

      ICT = 5

      R1 = 0.0

      R2 = 0.0

      R3 = 0.0

      I1 = 0

      I2 = 0

      I3 = 0

      BT = ''

      CALL PVB440 (IN,RW,RH,RL,IT,ICL,ICT,R1,R2,R3,I1,I2,I3,BT,IRET)