What you ask is impossible In linemode. If you want to exploit fullscreen
CMS, then you can define the color of each character:
Some code extracted from my TSTREX EXEC
... if SET FULLSCREEN ON, then you can issue...
'SET CHARMODE ON'
wvcms='VSCREEN WRITE CMS'
wvcms '0 1 18 (FIELD environment ='
wvcms '0 20 10 (HIGH RED DATA' addrmsg
if fid^='' then wvcms '0 26 20 ( HIGH YeLL DATA' fid
wvcms '0 1 20 (FIELD Go on - try a few...'
wvcms '0 1 1 (FIELD '
txt='To end : "PF3" to dump vars: REXDUMP or DUMP v1 v2 vn or
DUMP v.'
col='YYYPPPYYYYRRRYYYYYYYYYYYYPPPPPPPPPYYRRRRRRRYYYYRRRRRRRRRRRRRYYYYRRRRRRRR'
hig='NNNNNNNNNN222NNNNNNNNNNNNNNNNNNNNNNN2222222NNNN2222222222222NNNN22222222'
/* Colors: 1 2 3 4 5 6 7 0 Exthi: 1 2 4 0
b r p g t y w d b r u d */
wvcms '0 1 75 (FIELD' txt
wvcms '0 2 75 (COLOR' translate(col,'1234567','BRPGTYW')
wvcms '0 2 75 (EXTHI' translate(hig,'0124','NBRU')
txt=' "PF15" or EXTRACT
/xedit-settings'
col='YYYYYYYYYYRRRRYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYYRRRRRRRRRRRRRRRRRRRRRRRRR'
hig='NNNNNNNNNN2222NNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNNN2222222222222222222222222'
wvcms '0 1 75 (FIELD' txt
wvcms '0 2 75 (COLOR' translate(col,'1234567','BRPGTYW')
wvcms '0 2 75 (EXTHI' translate(hig,'0124','NBRU')
You can also define windows in CMS, even without SET FULLSCREEN ON. In
thses windows you can also use whatever color you like. We have some
execs to make it much easier for execs to use such windows. Things like
displaying a "please wait" panel or a selection list become very easy.
Contact me again if you want that code.
Kris,
IBM Belgium, VM customer support
The IBM z/VM Operating System <[email protected]> wrote on
2006-11-28 15:32:15:
> i have the same problem, now i can color an entire line, but i dont know
how
> can i color only the part of the line..
> I look for things at google but i cant find usefull things. Can you help
me?
> (I use z/VM)
> thnx,
> Zolo
