.MACRO ULOSTR STCODE,ENDCOD $$$STR=STCODE $$$END=ENDCOD .WORD ID001 .WORD ID002 .WORD ID003 .WORD $$$END-$$$STR+<6*<$$$LOA-2>> .WORD 6*<$$$LOA-2> .WORD $$$LOA-2 $$$LOB=2 .ENDM ULOSTR .MACRO ULOEND $$$LOA=$$$LOB .WORD <$$$END-$$$STR+1>/2 .ENDM ULOEND