Tags:
create new tag
view all tags

.WIDGET CNV RGB TO CLR

This subroutine converts a decimal color code to alpha/hex.


Usage:

      PASS         <clr_alpha>                FIELD            SHARE? Y
      PASS         <clr_binary>                FIELD            SHARE? N
      GOSUB    --- .WIDGET CNV RGB TO CLR
      *        Check for errors
      IF       --- .WIDGET CNV RGB TO CLR     NE

Description:

This subroutine converts a decimal color code to alpha/hex. This is useful for converting colors in the --- WIDGET file (255, 255, 0, 0) format to web or hex color codes (ie, #FFFF0000). Both parameters are required, and the subroutine will cancel if they are not received.

<clr_alpha> is the hex color code returned (Required). This must be PASSed with Share "Y" to return the value. This will be in the format '#RRGGBBTT' or '#RRGGBB' where RR is the hex value for Red, GG is the hex value for Green, BB is the hex value for Blue and TT is the transparency. Other values for TT are 2-255 where 2 is nearaly fully transparent and 255 is fully opaque.

The transparency is optional, and will be blank if zero or one in <clr_binary>.

<clr_binary> is the color value to be converted (Required). This should be a Group Header field, where the group consists of 4 numeric fields, 9(3), binary format. This corresponds to the layout of the various color fields in the --- WIDGET file, so you may use them directly. The fields are:

  • WIDGET COLOR EN FG
  • WIDGET COLOR EN BG
  • WIDGET COLOR DB FG
  • WIDGET COLOR DB BG
  • WIDGET COLOR RO FG
  • WIDGET COLOR RO BG
  • WIDGET COLOR WP BG
To convert from alpha/hex format to decimal, see .WIDGET CNV CLR TO RGB

Comments:

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


-- JeanNeron - 2012-02-06

Edit | Attach | Watch | Print version | History: r4 < r3 < r2 < r1 | Backlinks | Raw View | Raw edit | More topic actions
Topic revision: r4 - 2020-05-12 - 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