At 15:48 -0600 on 06/17/2015, Paul Gilmartin wrote about Re:
Assembler exercise - MAX of two or more equates:
On 2015-06-17 15:46, Robert Ngan wrote:
Based on a technique I use to reserve space large enough for (say) X, Y or
Z:
BUFFER DS 0X
DS (L'X)X
ORG BUFFER
DS (L'Y)X
ORG BUFFER
DS (L'Z)X
ORG ,
BUFLEN EQU *-BUFFER
So MAX(Y,Y,Z) is BUFLEN
Where X, Y and Z are equate, just omit the L'
You can only use that once. Well, as many times as you care to
create DSECTs.
-- gil
Only one DSECT is needed. If you want to find the MAX of another set
of values, repeat the code by adding a BUFFER1 to BUFLEN1 block after
BUFLEN.
