title: TASM Print characters of string
body: <p>I'm trying to print a string character by character, iterating through it. This is what I've got:</p>
  
  <pre><code>.MODEL SMALL
  .STACK 64
  .DATA
      string DB 'Something',0
      len equ $-string
  
  .CODE
  
      xor bx, bx    
      mov si, offset string
  Char:
      mov al, byte[si + bx]
      inc bx
      cmp bx, len
      je Fin
  
      mov ah, 2
      mov dl, al
      int 21h
  
      jmp Char
  
  Fin:
      mov ax, 4c00h
      int 21h
  END
  </code></pre>
  
  <p>I don't know if I'm getting the right mem reference of string, because it only shows me weird symbols. I tried adding 30 to dl, thinking it was because of the ascii representation.</p>
  
  <p>How can I print char by char?</p>