The TR translates a bit position in the range 0 to 7
to the appropriate bit mask, that is
0 is translated to B'10000000'
1 to B'01000000'
2 to B'00100000'
3 to B'00010000'
and so on
So the XI inverts the bit that is specified by those two parameters
on entry to the procedure:
ZAP BYTE,T@SAVE(7) QUOTIENT IS BYTE DISPLACEMENT. *
00000910
ZAP BIT,T@SAVE+7(1) REMAINDER IS BIT DISPLACEMENT. *
00000920
Kind regards
Bernd
Am 04.02.2014 18:22, schrieb Ron Thomas:
Ok Thanks .so what would be o/p of this statement "TR BIT,TR@TAB " here ?
Thanks,
Ron T
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN