Tags:
create new tag
view all tags

.PIE SET LBL JN LN W

This subroutine sets the width of the lines that join the pie sector perimeter with the pie sector labels for all pie sectors, a range of pie sectors, an individual pie sector, or the "current" pie sector.


Usage:

      PASS         <line_width>               FIELD            SHARE? N    
      PASS         <beg_sect_no>              FIELD            SHARE? N
      PASS         <end_sect_no>              FIELD            SHARE? N
      GOSUB    0CD .PIE SET LBL JN LN W
      *        Check for error
      IF       0CD .PIE SET LBL JN LN W       NE

Description:

This subroutine sets the width of the lines that join the pie sector perimeter with the pie sector labels for all pie sectors, a range of pie sectors, an individual pie sector, or the "current" pie sector.

If <line_width> is not received or is blank, then the "current" pie sector will be rendered with the default join width

If <beg_sect_no> is "ALL" or "0" and <end_sect_no> is not received or is blank, then <line_width> applies to all pie

sectors.

If <beg_sect_no> and <end_sect_no> are both received and are both numeric integers, then <line_width> applies to the range

of pie sectors from <beg_sect_no> thru <end_sect_no> and is stored in the corresponding pie sector specs.

If <beg_sect_no> is received and is a numeric integer and <end_sect_no> is not received or is blank, then <line_width>

applies only to the <beg_sect_no> pie sector and is stored in the <beg_sect_no> pie sector spec.

If <beg_sect_no> and <end_sect_no> are both not received or are blank, then <line_width> applies to the "current" pie sector and is stored in the "current" pie sector spec.

Any pie sector specs that are referenced but which do not exist are automatically created and initialized so that the <line_width> can be stored.

The last pie sector spec updated becomes the "current" pie sector spec.

Comments:

Read what other users have said about this page or add your own comments.


-- JeanNeron - 2011-10-05

Edit | Attach | Watch | Print version | History: r3 < r2 < r1 | Backlinks | Raw View | Raw edit | More topic actions
Topic revision: r3 - 2012-02-24 - JeanNeron
 
This site is powered by the TWiki collaboration platform Powered by PerlCopyright © 2008-2024 by the contributing authors. All material on this collaboration platform is the property of the contributing authors.
Ideas, requests, problems regarding TWiki? Send feedback