Re: writing color enhanced messes from rexx execs

2006-12-04 Thread Phil Smith III
Zoltan_Balogh [EMAIL PROTECTED] wrote:
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?

And I replied:
You cannot do this in XEDIT, or in linemode.  You must use a program that 
knows how to do extended attributes, specifically the SA 3270 orders.  XMENU, 
IOS3270 (maybe), DMS/CMS (maybe), and a host of others.  Warning: writing such 
code yourself is non-trivial!

Stanley Rarick [EMAIL PROTECTED] wrote:
Au contraire - XEDIT is easy
snip

Perhaps I  misunderstood the intent of Zoltan's question.  Stanley is of course 
correct that you can use SET RESERVED and SET CTLCHAR to define multiple fields 
on a single line, but they are separate 3270 fields, with field marks between 
them.  What I was referring to is the ability to define a line:

byrg

Where b is blue, y is yellow, r is reg, and g is green--with nothing between 
the characters.

Apologies for the confusion.

...phsiii


Re: writing color enhanced messes from rexx execs

2006-12-02 Thread Alan Altmark
On Thursday, 11/30/2006 at 08:49 EST, Ray Mansell [EMAIL PROTECTED] wrote:
 Long ago one could indeed use other codes, but this proved to be a
 security hole. (One could send non-displayable messages containing
 privileged commands to a privileged user such that the next time that
 user pressed the ENTER key, the command would be executed. Not that *I*
 ever did anything like that, of course... well, except perhaps for pure
 research purposes.)  The fix for that was to filter only the
 highlighting codes.  The ESAY program I mentioned a couple of days ago
 allows you to generate colourful linemode output, but only under control
 of CP, so there are no explicit attribute codes involved.

Just in case anyone cares, the only 3270 order CP allows in linemode I/O 
is Start Field (0x1D).  All others are converted to blanks (tab is 
converted to 0x6A).  And you're right, CP allows you to manipulate only 
bits 4  5 in the attribute byte that follows the SF. (Note: If you set 
your output to 'invisible' it will still be visible in a console log.)

Your program takes advantage of the fact that CP constructs the 3270 
datastream at the time the virtual I/O is performed, not when it is 
displayed, and is what also allows mixed red  black on the same line on 
the 3215.  :-)

Alan Altmark
z/VM Development
IBM Endicott


Re: writing color enhanced messes from rexx execs

2006-12-01 Thread Schuh, Richard
In the olden days, when I was in school, the textbooks in mathematics
teemed with statements that proofs were either trivial or non-trivial.
The non-trivial proofs were of things like Fermat's Last Theorem or
Tarsky's 7 Test Problems, all open problems, conjectures that had not
yet been proved at that time. The ones called trivial were any, no
matter how complex the proof, that were left as exercises for the
student. 


-Original Message-
From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED] On
Behalf Of Phil Smith III
Sent: Thursday, November 30, 2006 5:51 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: writing color enhanced messes from rexx execs

Wakser, David [EMAIL PROTECTED] wrote:
I believe you meant: NOT trivial - not non-trivial!

Um, no...if I'd meant NOT trivial I would have written that.
Non-trivial is a litotes, and as such makes the case more strongly.

...phsiii


Re: writing color enhanced messes from rexx execs

2006-12-01 Thread Stanley Rarick

Au contraire - XEDIT is easy
   QUEUE 'SET CTLCHAR ! ESCAPE';
  QUEUE 'SET CTLCHAR R PROTECT RED  '
  QUEUE 'SET CTLCHAR W PROTECT WHITE'
  QUEUE 'SET CTLCHAR B PROTECT BLUE '
  text_left   = '!R'LEFT(netid,8)
  text_middle = '!W'bar 'Query Names Extended' bar
  text_right  = '!B'd_a_t_e TIME()
  text = '!R'LEFT(netid,8) '!W'bar 'Query Names' bar '!B'd_a_t_e TIME()
  text = text_left text_middle text_right
  QUEUE 'SET RESERVED 1 HIGH' text

Phil Smith III wrote:


Zoltan_Balogh [EMAIL PROTECTED] wrote:
 


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?
   



You cannot do this in XEDIT, or in linemode.  You must use a program that knows 
how to do extended attributes, specifically the SA 3270 orders.  XMENU, IOS3270 
(maybe), DMS/CMS (maybe), and a host of others.  Warning: writing such code 
yourself is non-trivial!

...phsiii

 



Re: writing color enhanced messes from rexx execs

2006-12-01 Thread Stanley Rarick

For entire lines:
  CALL SETCOLOR  'VMOUT', 'PINK ', 'BLINK'
SETCOLOR:
  PARSE ARG color_area, color_hue, color_ext;
  'EXECIO 0 CP ( STRING  SCREEN ' color_area color_hue color_ext
(written before PIPES existed)

For the individual order codes, refer to the Data Stream Programmer's 
Reference. GA23-0059,
available here:   
http://www-1.ibm.com/support/docview.wss?uid=pub1ga23005907

(And it's not that difficult)



Fran Hensler wrote:


I found the codes for hilite and normal in an EXEC that I did not
write.  I have tried codes like these to do color but I was not
successful.

/Fran
---
On Thu, 30 Nov 2006 13:46:33 +0100 Zoltan Balogh said:
 


where can i find 'codes' like this? I mean this is hilight, but it should be
more..

Other: if i define a window and vscreen. Can i redirect an exec output to
there?

On 11/30/06, Fran Hensler [EMAIL PROTECTED] wrote:
   


Hilighting part of a line in REXX is pretty simple.

/* */
hilite = '1de8'x
normal = '1d60'x
copyxref = hilite || 'COPYXREF' || normal
Say Don't forget to use the copyxref command.
exit

/Fran Hensler at Slippery Rock University of Pennsylvania USA for 43 years
[EMAIL PROTECTED] +1.724.738.2153
   Yes, Virginia, there is a Slippery Rock

 



 



Re: writing color enhanced messes from rexx execs

2006-11-30 Thread Rob van der Heij

On 11/30/06, Phil Smith III [EMAIL PROTECTED] wrote:


You cannot do this in XEDIT, or in linemode.  You must use a program that knows 
how to do extended attributes, specifically the SA 3270 orders.  XMENU, IOS3270 
(maybe), DMS/CMS (maybe), and a host of others.  Warning: writing such code 
yourself is non-trivial!


And for sure deity has meant it to be very hard ;-)  You don't want
just any programmer to be able to do this... I still have to see the
first line mode application that is improved by yelling at me in
different colors. It's bad enough to be trapped by someone's PROFILE
XEDIT that uses all combinations of color and hilighting. Note that
the differences would not show in your console log, so if it is really
important you may need to think of another way to clarify the output.

You could have an argument for using the CP SCREEN command to identify
output lines unrelated to your program that get merged in the output.
Whenever I run into someone who has set different style for various
forms of output, I can't resist asking the person whether he knows
which color is what, and what value it provides...  I do like to have
MSGs hilighted, but that's about it.

Rob

PS Lacking a dozen different editors for CMS, we need at least
something to fight religious wars about.

PS/2 And I do like the QDI XEDIT that the Piper did for us.


Re: writing color enhanced messes from rexx execs

2006-11-30 Thread Fran Hensler
Hilighting part of a line in REXX is pretty simple.

/* */
hilite = '1de8'x
normal = '1d60'x
copyxref = hilite || 'COPYXREF' || normal
Say Don't forget to use the copyxref command.
exit

/Fran Hensler at Slippery Rock University of Pennsylvania USA for 43 years
 [EMAIL PROTECTED] +1.724.738.2153
Yes, Virginia, there is a Slippery Rock


Re: writing color enhanced messes from rexx execs

2006-11-30 Thread Zoltan Balogh

where can i find 'codes' like this? I mean this is hilight, but it should be
more..

Other: if i define a window and vscreen. Can i redirect an exec output to
there?

On 11/30/06, Fran Hensler [EMAIL PROTECTED] wrote:


Hilighting part of a line in REXX is pretty simple.

/* */
hilite = '1de8'x
normal = '1d60'x
copyxref = hilite || 'COPYXREF' || normal
Say Don't forget to use the copyxref command.
exit

/Fran Hensler at Slippery Rock University of Pennsylvania USA for 43 years
 [EMAIL PROTECTED] +1.724.738.2153
Yes, Virginia, there is a Slippery Rock



Re: writing color enhanced messes from rexx execs

2006-11-30 Thread Fran Hensler
I found the codes for hilite and normal in an EXEC that I did not
write.  I have tried codes like these to do color but I was not
successful.

/Fran
---
On Thu, 30 Nov 2006 13:46:33 +0100 Zoltan Balogh said:
where can i find 'codes' like this? I mean this is hilight, but it should be
more..

Other: if i define a window and vscreen. Can i redirect an exec output to
there?

On 11/30/06, Fran Hensler [EMAIL PROTECTED] wrote:

 Hilighting part of a line in REXX is pretty simple.

 /* */
 hilite = '1de8'x
 normal = '1d60'x
 copyxref = hilite || 'COPYXREF' || normal
 Say Don't forget to use the copyxref command.
 exit

 /Fran Hensler at Slippery Rock University of Pennsylvania USA for 43 years
  [EMAIL PROTECTED] +1.724.738.2153
 Yes, Virginia, there is a Slippery Rock



Re: writing color enhanced messes from rexx execs

2006-11-30 Thread Ray Mansell
Long ago one could indeed use other codes, but this proved to be a 
security hole. (One could send non-displayable messages containing 
privileged commands to a privileged user such that the next time that 
user pressed the ENTER key, the command would be executed. Not that *I* 
ever did anything like that, of course... well, except perhaps for pure 
research purposes.)  The fix for that was to filter only the 
highlighting codes.  The ESAY program I mentioned a couple of days ago 
allows you to generate colourful linemode output, but only under control 
of CP, so there are no explicit attribute codes involved.


Ray Mansell...

Fran Hensler wrote:

I found the codes for hilite and normal in an EXEC that I did not
write.  I have tried codes like these to do color but I was not
successful.
  


Re: writing color enhanced messes from rexx execs

2006-11-30 Thread Stracka, James (GTI)
Yes, just like flammable and inflammable.

-Original Message-
From: The IBM z/VM Operating System
[mailto:[EMAIL PROTECTED] On Behalf Of Schuh, Richard
Sent: Wednesday, November 29, 2006 7:01 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: writing color enhanced messes from rexx execs


Aren't not trivial and non-trivial synonymous?

  _  

From: The IBM z/VM Operating System
[mailto:[EMAIL PROTECTED] On Behalf Of Wakser, David
Sent: Wednesday, November 29, 2006 3:10 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: writing color enhanced messes from rexx execs



I believe you meant: NOT trivial - not non-trivial! 

David Wakser 

-Original Message- 
From: Phil Smith III [mailto:[EMAIL PROTECTED] 
Sent: Wednesday, November 29, 2006 6:15 PM 
To: IBMVM@LISTSERV.UARK.EDU 
Subject: Re: writing color enhanced messes from rexx execs 

Zoltan_Balogh [EMAIL PROTECTED] wrote: 
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? 

You cannot do this in XEDIT, or in linemode.  You must use a
program that knows how to do extended attributes, specifically the SA
3270 orders.  XMENU, IOS3270 (maybe), DMS/CMS (maybe), and a host of
others.  Warning: writing such code yourself is non-trivial!

...phsiii 
Confidentiality Note: This e-mail, including any attachment to
it, may contain material that is confidential, proprietary, privileged
and/or Protected Health Information, within the meaning of the
regulations under the Health Insurance Portability  Accountability Act
of 1996. If it is not clear that you are the intended recipient, you are
hereby notified that you have received this transmittal in error, and
any review, dissemination, distribution or copying of this e-mail,
including any attachment to it, is strictly prohibited. If you have
received this e-mail in error, please immediately return it to the
sender and delete it from your system. Thank you.


If you are not an intended recipient of this e-mail, please notify the sender, 
delete it and do not read, act upon, print, disclose, copy, retain or 
redistribute it. Click here for important additional terms relating to this 
e-mail. http://www.ml.com/email_terms/



Re: writing color enhanced messes from rexx execs

2006-11-30 Thread Stracka, James (GTI)
That only works if you have set screen vmout default.  Setting it to a
color does not work.

-Original Message-
From: The IBM z/VM Operating System
[mailto:[EMAIL PROTECTED] On Behalf Of Zoltan Balogh
Sent: Thursday, November 30, 2006 7:47 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: writing color enhanced messes from rexx execs


where can i find 'codes' like this? I mean this is hilight, but
it should be more.. 

Other: if i define a window and vscreen. Can i redirect an exec
output to there?


On 11/30/06, Fran Hensler [EMAIL PROTECTED] wrote: 

Hilighting part of a line in REXX is pretty simple.

/* */
hilite = '1de8'x
normal = '1d60'x
copyxref = hilite || 'COPYXREF' || normal
Say Don't forget to use the copyxref command. 
exit

/Fran Hensler at Slippery Rock University of
Pennsylvania USA for 43 years
 [EMAIL PROTECTED] +1.724.738.2153
Yes, Virginia, there is a Slippery Rock


If you are not an intended recipient of this e-mail, please notify the sender, 
delete it and do not read, act upon, print, disclose, copy, retain or 
redistribute it. Click here for important additional terms relating to this 
e-mail. http://www.ml.com/email_terms/



Re: writing color enhanced messes from rexx execs

2006-11-30 Thread Phil Smith III
Wakser, David [EMAIL PROTECTED] wrote:
I believe you meant: NOT trivial - not non-trivial!

Um, no...if I'd meant NOT trivial I would have written that.  Non-trivial 
is a litotes, and as such makes the case more strongly.

...phsiii


Re: writing color enhanced messes from rexx execs

2006-11-29 Thread Ray Mansell

Gonen Shoham wrote:

So where is this Assemble pgm

  
It's on my A-disk, of course. I guess I should bundle it up and make it 
available as-is...


Re: writing color enhanced messes from rexx execs

2006-11-29 Thread Don Russell

Ray Mansell wrote:

Gonen Shoham wrote:

So where is this Assemble pgm

  
It's on my A-disk, of course. I guess I should bundle it up and make 
it available as-is...
I would d/l it from the VM download page if it were available there 
I hope you can make it available, or if that's too formal, I'd 
appreciate a copy of the source just sent as an e-mail attachment... no 
warranty, as-is, blah blah blah... I don't mind putting air in the tire, 
I just don't want to re-invent the whole wheel. :-)


Cheers,
Don Russell


Re: writing color enhanced messes from rexx execs

2006-11-29 Thread McKown, John
 -Original Message-
 From: The IBM z/VM Operating System 
 [mailto:[EMAIL PROTECTED] On Behalf Of Zoltan Balogh
 Sent: Tuesday, November 28, 2006 2:41 PM
 To: IBMVM@LISTSERV.UARK.EDU
 Subject: Re: writing color enhanced messes from rexx execs
 
 
 First of all thank you for your help, and i'd like to see those execs
 if it is possible.
 Btw what is the variable  fid^ ? Sorry if i should know, i started to
 learn rexx only some weeks ago. Is there a special meaning of the
 variable with ^?

^= is the symbol for not equal. I always use  because I've noticed
that it is available on all REXX variants, including Regina and the 
and  symbols appear on all Latin keyboards, regardless of other symbols
used by other countries. Also, the code points for  and  are always
the same, regardless of the locale. Just more portable, IMO.

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

This message (including any attachments) contains confidential
information intended for a specific individual and purpose, and its
content is protected by law.  If you are not the intended recipient, you
should delete this message and are hereby notified that any disclosure,
copying, or distribution of this transmission, or taking any action
based on it, is strictly prohibited. 
 


Re: writing color enhanced messes from rexx execs

2006-11-29 Thread Mike Walter
For the same reasons (different emulators/keyboards/translate tables) I 
have pretty much abandoned use if the otherwise much appreciated IBM 
Logical Not symbol, using rexx's  instead. 

But  does not work for Boolean tests, such as:
?broken=1  /* Boolean true */
If  ?broken? then  ...  /* This will cause a rexx error */.

Instead, use the alternative not true comparison operator '\'  The 
back-slash is on all keyboards (PCs use it heavily).

If  \?broken then  ...   /* This works just fine */

Rather than  you could also use \=, but there are some intricacies 
between the two which I've never fully researched/understood.


Mike Walter 
Hewitt Associates 
Any opinions expressed herein are mine alone and do not necessarily 
represent the opinions or policies of Hewitt Associates.



McKown, John [EMAIL PROTECTED] 

Sent by: The IBM z/VM Operating System IBMVM@LISTSERV.UARK.EDU
11/29/2006 10:15 AM
Please respond to
The IBM z/VM Operating System IBMVM@LISTSERV.UARK.EDU



To
IBMVM@LISTSERV.UARK.EDU
cc

Subject
Re: writing color enhanced messes from rexx execs






 -Original Message-
 From: The IBM z/VM Operating System 
 [mailto:[EMAIL PROTECTED] On Behalf Of Zoltan Balogh
 Sent: Tuesday, November 28, 2006 2:41 PM
 To: IBMVM@LISTSERV.UARK.EDU
 Subject: Re: writing color enhanced messes from rexx execs
 
 
 First of all thank you for your help, and i'd like to see those execs
 if it is possible.
 Btw what is the variable  fid^ ? Sorry if i should know, i started to
 learn rexx only some weeks ago. Is there a special meaning of the
 variable with ^?

^= is the symbol for not equal. I always use  because I've noticed
that it is available on all REXX variants, including Regina and the 
and  symbols appear on all Latin keyboards, regardless of other symbols
used by other countries. Also, the code points for  and  are always
the same, regardless of the locale. Just more portable, IMO.

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

This message (including any attachments) contains confidential
information intended for a specific individual and purpose, and its
content is protected by law.  If you are not the intended recipient, you
should delete this message and are hereby notified that any disclosure,
copying, or distribution of this transmission, or taking any action
based on it, is strictly prohibited. 
 




 
The information contained in this e-mail and any accompanying documents may 
contain information that is confidential or otherwise protected from 
disclosure. If you are not the intended recipient of this message, or if this 
message has been addressed to you in error, please immediately alert the sender 
by reply e-mail and then delete this message, including any attachments. Any 
dissemination, distribution or other use of the contents of this message by 
anyone other than the intended recipient 
is strictly prohibited.


Re: writing color enhanced messes from rexx execs

2006-11-29 Thread Phil Smith III
Zoltan_Balogh [EMAIL PROTECTED] wrote:
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?

You cannot do this in XEDIT, or in linemode.  You must use a program that knows 
how to do extended attributes, specifically the SA 3270 orders.  XMENU, IOS3270 
(maybe), DMS/CMS (maybe), and a host of others.  Warning: writing such code 
yourself is non-trivial!

...phsiii


Re: writing color enhanced messes from rexx execs

2006-11-29 Thread Wakser, David
I believe you meant: NOT trivial - not non-trivial!

David Wakser 

-Original Message-
From: Phil Smith III [mailto:[EMAIL PROTECTED] 
Sent: Wednesday, November 29, 2006 6:15 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: writing color enhanced messes from rexx execs

Zoltan_Balogh [EMAIL PROTECTED] wrote:
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?

You cannot do this in XEDIT, or in linemode.  You must use a program that
knows how to do extended attributes, specifically the SA 3270 orders.
XMENU, IOS3270 (maybe), DMS/CMS (maybe), and a host of others.  Warning:
writing such code yourself is non-trivial!

...phsiii
Confidentiality Note: This e-mail, including any attachment to it, may
contain material that is confidential, proprietary, privileged and/or
Protected Health Information, within the meaning of the regulations under
the Health Insurance Portability  Accountability Act of 1996. If it is not
clear that you are the intended recipient, you are hereby notified that you
have received this transmittal in error, and any review, dissemination,
distribution or copying of this e-mail, including any attachment to it, is
strictly prohibited. If you have received this e-mail in error, please
immediately return it to the sender and delete it from your system. Thank
you. 


Re: writing color enhanced messes from rexx execs

2006-11-29 Thread Schuh, Richard
Aren't not trivial and non-trivial synonymous?



From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED] On
Behalf Of Wakser, David
Sent: Wednesday, November 29, 2006 3:10 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: writing color enhanced messes from rexx execs



I believe you meant: NOT trivial - not non-trivial! 

David Wakser 

-Original Message- 
From: Phil Smith III [mailto:[EMAIL PROTECTED] 
Sent: Wednesday, November 29, 2006 6:15 PM 
To: IBMVM@LISTSERV.UARK.EDU 
Subject: Re: writing color enhanced messes from rexx execs 

Zoltan_Balogh [EMAIL PROTECTED] wrote: 
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? 

You cannot do this in XEDIT, or in linemode.  You must use a program
that knows how to do extended attributes, specifically the SA 3270
orders.  XMENU, IOS3270 (maybe), DMS/CMS (maybe), and a host of others.
Warning: writing such code yourself is non-trivial!

...phsiii 
Confidentiality Note: This e-mail, including any attachment to it, may
contain material that is confidential, proprietary, privileged and/or
Protected Health Information, within the meaning of the regulations
under the Health Insurance Portability  Accountability Act of 1996. If
it is not clear that you are the intended recipient, you are hereby
notified that you have received this transmittal in error, and any
review, dissemination, distribution or copying of this e-mail, including
any attachment to it, is strictly prohibited. If you have received this
e-mail in error, please immediately return it to the sender and delete
it from your system. Thank you. 



Re: writing color enhanced messes from rexx execs

2006-11-29 Thread Wakser, David
I guess so - but I don't like the sound of it! :)
 
David Wakser



From: Schuh, Richard [mailto:[EMAIL PROTECTED] 
Sent: Wednesday, November 29, 2006 7:01 PM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: writing color enhanced messes from rexx execs


Aren't not trivial and non-trivial synonymous?
Confidentiality Note: This e-mail, including any attachment to it, may
contain material that is confidential, proprietary, privileged and/or
Protected Health Information, within the meaning of the regulations under
the Health Insurance Portability  Accountability Act of 1996. If it is not
clear that you are the intended recipient, you are hereby notified that you
have received this transmittal in error, and any review, dissemination,
distribution or copying of this e-mail, including any attachment to it, is
strictly prohibited. If you have received this e-mail in error, please
immediately return it to the sender and delete it from your system. Thank
you. 


Re: writing color enhanced messes from rexx execs

2006-11-28 Thread Zoltan Balogh
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


Re: writing color enhanced messes from rexx execs

2006-11-28 Thread Kris Buelens
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 : PF3to dump vars: REXDUMP or DUMP v1 v2 vn or 
DUMP v.'
 
col='YYYPPPRRRPYYRRRR'
 
hig='NN222NNN2222'
/* Colors:  1 2 3 4 5 6 7 0Exthi:   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='YYYR'
 
hig='NNN2'
 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 IBMVM@LISTSERV.UARK.EDU 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


Re: writing color enhanced messes from rexx execs

2006-11-28 Thread Zoltan Balogh

First of all thank you for your help, and i'd like to see those execs
if it is possible.
Btw what is the variable  fid^ ? Sorry if i should know, i started to
learn rexx only some weeks ago. Is there a special meaning of the
variable with ^?


On 11/28/06, Kris Buelens [EMAIL PROTECTED] wrote:

What you ask is impossible In linemode.  If you want to exploit fullscreen
CMS, then you can define the color of each character:

...

 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 : PF3to dump vars: REXDUMP or DUMP v1 v2 vn or
DUMP v.'

Sorry but i dont really understand how can i dump vars. I mean if
there is a var with value, i can dump it with say too. Or it is a
bit like tracing vars like in higher programming languages?
But tomorrow i hope i can try it or i'll look some help about.
...

Contact me again if you want that code.

ok, i need them if it is possible :)


Re: writing color enhanced messes from rexx execs

2006-11-28 Thread Kris Buelens
Sorry, the carret is in Belgium the logical NOT symbol...; 'fid' is a 
variable name I often use to indicate a fileid. 
I'll send you these REXX execs in a VMARC tomorrow.

Kris,
IBM Belgium, VM customer support


The IBM z/VM Operating System IBMVM@LISTSERV.UARK.EDU wrote on 
2006-11-28 21:40:36:

 First of all thank you for your help, and i'd like to see those execs
 if it is possible.
 Btw what is the variable  fid^ ? Sorry if i should know, i started to
 learn rexx only some weeks ago. Is there a special meaning of the
 variable with ^?

 
 On 11/28/06, Kris Buelens [EMAIL PROTECTED] wrote:
  What you ask is impossible In linemode.  If you want to exploit 
fullscreen
  CMS, then you can define the color of each character:
 ...
   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 : PF3to dump vars: REXDUMP or DUMP v1 v2 vn 
or
  DUMP v.'
 Sorry but i dont really understand how can i dump vars. I mean if
 there is a var with value, i can dump it with say too. Or it is a
 bit like tracing vars like in higher programming languages?
 But tomorrow i hope i can try it or i'll look some help about.
 ...
  Contact me again if you want that code.
 ok, i need them if it is possible :)


Re: writing color enhanced messes from rexx execs

2006-11-28 Thread Ray Mansell

Kris Buelens wrote:
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
  
Nothing is impossible :-)  Well, alright, *some* things are impossible, 
but this isn't one of them.


Some years ago I wrote a small assembler program to do just this. In 
essence, it uses a combination of SCREEN VMOUT, TERM AUTOCR, and a 
little-known switch on the CMS TYPLIN function call. Using this, I am 
able to create linemode output on the screen that includes colours, 
blinking, reverse video, and underscore.


Everything is triggered off an escape character which is followed by 
attribute specifications. For example:


'esay /yuH/dnello /bnthere/dn'

will generate an output line containing the text 'Hello there', where 
the 'H' is yellow and underscored, the 'ello ' is normal, and 'there' is 
blue.


Ray Mansell
IBM Hawthorne


Re: writing color enhanced messes from rexx execs

2006-11-28 Thread Gonen Shoham
So where is this Assemble pgm




-Original Message-
From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED] On
Behalf Of Ray Mansell
Sent: Wednesday, November 29, 2006 6:51 AM
To: IBMVM@LISTSERV.UARK.EDU
Subject: Re: writing color enhanced messes from rexx execs

Kris Buelens wrote:
 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
   
Nothing is impossible :-)  Well, alright, *some* things are impossible, 
but this isn't one of them.

Some years ago I wrote a small assembler program to do just this. In 
essence, it uses a combination of SCREEN VMOUT, TERM AUTOCR, and a 
little-known switch on the CMS TYPLIN function call. Using this, I am 
able to create linemode output on the screen that includes colours, 
blinking, reverse video, and underscore.

Everything is triggered off an escape character which is followed by 
attribute specifications. For example:

'esay /yuH/dnello /bnthere/dn'

will generate an output line containing the text 'Hello there', where 
the 'H' is yellow and underscored, the 'ello ' is normal, and 'there' is

blue.

Ray Mansell
IBM Hawthorne