Jay already pointed that out. In a previously message I reported that WORK8 should have been changed to OBUFF.
I missed one occurrence (just one!). You routine executes more instructions. As to performance, I have not tested either one, so I can not say. I wonder how they will run on real IBM hardware. John P Baker -----Original Message----- From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On Behalf Of Art Celestini Sent: Wednesday, December 12, 2007 8:52 PM To: [email protected] Subject: Re: Mainframe Assembler Coding Contest Well, just for the sport of it, I think this requires even less (not tested): LHI R1,8 IC R2,BYTE STC STC R2,RESULT-1(R1) SRL R2,1 BCT R1,STC NC RESULT,=8X'01' OC RESULT,=8X'F0' * BYTE DC B'01110101' Sample input RESULT DS CL8 Output 32 Instructions 16 Literals 1 Input Area 8 Output Area 57 Total Bytes 7 Total Instructions BTW, John, your second instruction below refers to WORK8, which doesn't seem to be defined. -- Art ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html

