Does anyone know what the hexidecimal equivalents are for screen display attributes??? Ie. I know that X'21' = Reverse Image , but I would like to know all of them - especially blink and unerline. Thanks !!!!
Unconfigured Ad Widget
Collapse
Announcement
Collapse
No announcement yet.
Hexidecimal display attributes ???
Collapse
X
-
Hexidecimal display attributes ???
Phil, Try these. Took them from an IBM website. X?01? 1 Blue Normal X?02? 2 Green Normal X?03? 3 Turquoise* Normal X?04? 4 Red High Intensity X?05? 5 Pink Normal X?06? 6 Yellow* High intensity X?07? 7 White High intensity X?11? 17 Blue underscore Normal underscore X?12? 18 Green underscore Normal underscore X?13? 19 Turquoise underscore * Normal underscore X?14? 20 Red underscore High intensity underscore X?15? 21 Pink underscore Normal underscore X?16? 22 Yellow underscore * High intensity underscore X?17? 23 White underscore High intensity underscore X?19? 25 Blue tab Normal tab X?1A? 26 Green tab Normal tab X?1B? 27 Turquoise tab * Normal tab X?1C? 28 Red tab High intensity tab X?1D? 29 Pink tab Normal tab X?1E? 30 Yellow tab * High intensity tab X?1F? 31 White tab Normal underscore tab X?21? 33 Blue underscore tab Normal underscore tab X?22? 34 Green underscore tab Normal underscore tab X?23? 35 Turquoise underscore tab * High intensity underscore tab X?24? 36 Red underscore tab Normal underscore tab X?25? 37 Pink underscore tab High intensity underscore tab X?26? 38 Yellow underscore tab * High intensity underscore tab X?27? 39 White underscore tab Normal reverse image X?31? 49 Blue reverse image Normal reverse image X?32? 50 Green reverse image Normal reverse image X?33? 51 Blue reverse image tab High intensity reverse image X?34? 52 Green reverse image tab Normal reverse image X?35? 53 Turquoise reverse image tab High intensity reverse image X?36? 54 Red reverse image tab High intensity reverse image X?37? 55 Pink reverse image tab Normal reverse image tab X?39? 57 Yellow reverse image tab Normal reverse image tab X?3A? 58 White reverse image tab Normal reverse image tab X?3B? 59 Turquoise reverse image High intensity reverse image tab X?3C? 60 Red reverse image Normal reverse image tab X?3D? 61 Pink reverse image High intensity reverse image tab X?3E? 62 Yellow reverse image High intensity reverse image tab X?3F? 63 White reverse image High intensity tab Hope this helps, Bret
-
Hexidecimal display attributes ???
Phil, If you compile and run this program it should show you.************************************************** ************************ * CRTBNDRPG SRCFILE(&L/&F) SRCMBR(&M) PGM(&L/&M) DBGVIEW(*SOURCE) * * BNDDIR(QC2LE) * ************************************************** ************************ H OPTION(*SRCSTMT) ****************** * Convert to Hex * ****************** DCVTHC PR EXTPROC('cvthc') D PR_HexVal 4096A OPTIONS(*VARSIZE) D PR_ChrVal 2048A CONST OPTIONS(*VARSIZE) D PR_CvtLen 10I 0 VALUE ************************ * Conversion data area * ************************ D DS D Bin 1 2B 0 INZ(*ZEROS) D Char 2 2A DHex S 2A DOut S 20A C* Generate characters x'20' - x'39' and display. C 32 DO 57 Bin C CALLP CVTHC(Hex: Char: 2) C EVAL Out = Char + 'Attribute' + x'20' + C 'x''' + Hex + '''' C Out DSPLY C END C 'Done' DSPLY Char C SETON LR
David Morris
Comment
Comment