When it makes inside variable ' LCHAR' .TRUE. I paint the polygonal line with a label. Polygonal line with a stated label. Length that has the line segment that I should paint 1 cycle as, Paint the character string that designated the one part to the null part as a null area. ( 2.6.5 section Reference); the height of the character string that the character string that attaches it as a label designates with SGSPLC be ( 2.6.6 section Reference) that designates it with SGSPLS . It is Reference (a 2.4.4 section) the inside variable that signal ground p GET/signal ground p SET controls regarding definition etc. of a cycle.
Furthermore, the effect that made inside variable ' LCHAR' .TRUE. reaches to all the line segment Drawing routines. Therefore, I do not go without returning to .FALSE. without fail after make ' LCHAR' .TRUE. and painted a label attachment line segment.