What are you talking about?What point are you trying to make?
On Thu, Apr 12, 2018 at 3:30 PM -0500, "Tom Marchant"
“Keep in mind that UNPK swaps bits 0-3 of the right byte with
bits 4-7.”
That’s why the Or Immediate is there; it enforces a zone nibble of 0xF for the
last hex digit and ensures correct execution of the TRanslate.
Let me try that again ...
WORK DS CL6
DS X , Slack byte
UNPK WORK(7),SDWACMPC(4)
NC WORK,=X'0F0F0F0F0F0F'
TR WORK,=C'0123456789ABCDEF'
--
Donald H. Blake
Ecclesiastes 12:1
WORK DS CL6
DS X , Slack byte
UNPK WORK(7),SDWACMPC
NI WORK,=X'0F0F0F0F0F0F'
TR WORK,=C'0123456789ABCDEF'
--
Donald H. Blake
Ecclesiastes 12:1
On Wed, 11 Apr 2018 20:15:12 +, Keven wrote:
>Using the UNPK/OI does mean no reading past the last byte of the value to be
>converted which may be desirable for a generalized implementation.
Sure, you could do something like this to convert two bytes to four hex digits:
UNPK
Keep in mind that UNPK swaps bits 0-3 of the right byte with bits 4-7.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Assembler List on behalf
of Keven
Sent: Wednesday, April