define op

macro call? dest*
  local operand, size, type, prefixes
  define operand dest

  type = 1
  match =near? more, dest
    type = 1
    redefine operand more
  else match =far? more, dest
    type = 2
    redefine operand more
  end match

  parse_operands type, operand
end macro

macro parse_operands t:0, operands*&
  local operand, size

  irp ops, operands
    define operand ops
    size = 0
    match =tbyte? more, ops
      size = 10
      redefine operand more
    end match
    parse_operand operand
  end irp
end macro

macro parse_operand operand*
  local m
  match segment:offset, operand
    match [addr], offset
      display 'wrong',13,10
    else
      display 'wrong',13,10
    end match
  else match [addr], operand
    display 'CORRECT!',13,10
  else
    m = operand metadata 1
    display 'wrong',13,10
  end match
end macro

element rax? : 1

call tbyte [rax]
call far tbyte [rax]
call far [rax]
call [rax]
    

    define operand ops    

    operand equ ops    

    match =tbyte? more, ops
      size = 10 
      redefine operand more
    else match any, ops
      size = 0
      define operand any
    end match