macro help

[Jimg]

Is there some way to write this more simply?

Code Select Expand

    for arg,<baddr>
        quote SUBSTR <arg>,1,1
        isquote=0
        IFIDN quote , <">
            isquote=1
        elseifidn quote,<'>
            isquote=1
        endif
        if isquote
            .data
               tmpoffset = $
               db arg,0
            .code
            mov esi,tmpoffset
It works, but it's kinda ugly.
I have tried every combination of

   if ( (quote eq <"> )  or (quote eq <'>) )

that I could think of with no luck.

[qWord]

hi,

come this closer to your taste:

Code Select Expand

        IF (@InStr(1,<&arg>,<!">) EQ 1) OR (@InStr(1,<&arg>,<!'>) EQ 1)
            .data
                tmpoffset = $
                db arg,0
            .code
            mov esi,tmpoffset
        ELSE
            ;...
        ENDIF


regards, qWord

[Jimg]

Thanks, that works.  Anyone else?

[Jimg]

And with your hint, I got a little furthur-

Code Select Expand

    for arg,<baddr>
        quote SUBSTR <arg>,1,1
        IF (@InStr(1,<!"!'>,<%quote>))
            .data
               tmpoffset = $
               db arg,0
            .code
            mov esi,tmpoffset


[MichaelW]

How about:

Code Select Expand


    IF (@InStr(1,<!"!'>,@SubStr(<arg>,1,1)))
      .data
        tmpoffset = $
        db arg,0
      .code
      mov esi,tmpoffset
    ENDIF