Damn, you had to include the word "good". If you want some baseless code which is LE enabled and is designed to run as a z/OS UNIX command, you can download my UNIX "alpha" code from the CBT. It is FILE864 at http://www.cbttape.org/updates.htm
I also attached a non-LE baseless HLASM program source code to this email. It is a do nothing skeleton. I think the listserv will strip it out. -- John McKown Systems Engineer IV IT Administrative Services Group HealthMarkets(r) 9151 Boulevard 26 * N. Richland Hills * TX 76010 (817) 255-3225 phone * john.mck...@healthmarkets.com * www.HealthMarkets.com Confidentiality Notice: This e-mail message may contain confidential or proprietary information. If you are not the intended recipient, please contact the sender by reply e-mail and destroy all copies of the original message. HealthMarkets(r) is the brand name for products underwritten and issued by the insurance subsidiaries of HealthMarkets, Inc. -The Chesapeake Life Insurance Company(r), Mid-West National Life Insurance Company of TennesseeSM and The MEGA Life and Health Insurance Company.SM > -----Original Message----- > From: IBM Mainframe Assembler List > [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On Behalf Of Scott Ford > Sent: Tuesday, June 05, 2012 3:00 PM > To: ASSEMBLER-LIST@LISTSERV.UGA.EDU > Subject: Re: Base registers > > Guys, > > John and spoke where can you find a good sample of baseless > assembler code ? > I want to convert some of ours , need a sample to get me > started, it would help... > > Scott ford > www.identityforge.com > > On Jun 5, 2012, at 2:51 PM, "Robert A. Rosenberg" > <a...@rarpsl.com> wrote: > > > At 07:57 -0400 on 06/05/2012, Tom Marchant wrote about Re: > Base registers: > > > >> Yuck. By adding a few LOCTR instructions, all of the data > can be grouped at > >> the beginning of the program. If relative branches are > used in the code, > >> the base register is needed only for data and literals. > >> > >> MYCSECT CSECT > >> USING *,R15 > >> J BYID > >> DATA LOCTR > >> ID DC C'module-name' > >> BASES DC A(MYCSECT) > >> DC A(MYCSECT+4096) > >> DC A(MYCSECT+2*4096) > >> DC A(MYCSECT+3*4096) > >> BYID DS 0H > >> CODE LOCTR > >> LM R9,R12,BASES > >> DROP R15 > >> USING MYCSECT,R9,R10,R11,R12 > >> ... > >> DATA LOCTR > >> * additional DC statements are coded here > >> LTORG > >> > >> You can probably do with only one base register for the data. > > > > That BYID needs to be placed after the CODE LOCTR or you will be > > jumping into your DATA area and a DC or the LTORG. > >