I obviously did not explain this wellm despite some coding errors..
I was hoping the Macro itself would test the value of the parameter and then 
generate the proper instruction.
For Example: couldnt I use several TYPE attrinute

    AIF (T'&L EQ 'A').DOLOAD       A-type Address
    AIF (T'&L EQ 'N").DOLADD       decimal numeric

If my understaning of the TYPE Attribute is correct, I dont
see an Attribute for an equate.


Paul D'Angelo
*

---------- Original Message ----------
From: "Andreas F. Geissbuehler" <[email protected]>
To: [email protected]
Subject: Re: Some Help with Conditional Assembly
Date: Sat, 2 Nov 2013 14:17:08 -0400

From: <ssteam@***.com
> If I Specify AMOVE L=32767
> I want the macro to generate a Load Addres
>       LA  Rz,32767

Paul, surely you meant 4095 ...

    L    Rz, *+(L&SYSNDX.-*)
    ...
L&SYSNDX DC A(&L)    as Martin Truebner recommends

otherwise:
        AIF (&L GT 0 AND &L LT 4096).LA
.* or
        AIF (&L  LT 4096).LA    assumes EQUATE < 4096
        J         *+8                jump inline constant
        DC    AL4(&L)        note AL4 or CNOP required
        L        Rz,*-4
        AGO    .LX
.LA     ANOP
        LA    Rz,&L
.LX     ANOP

Andreas Geissbuehler

Reply via email to