...
begin:
   mov  ax,[bx]
   test ax,1
   jnz  no
   inc  a
no:
   inc  bx
   inc  bx
   loop begin
...