
; Entr‚es : ES=source/dest
DoFire:
  xor cx,cx
  xor di,di
  .df_loop:
    mov al,[es:di-1]
    add al,[es:di+1]
    add al,[es:di+512]
    add al,[es:di+256]
    shr al,2
    stosb
  loop .df_loop
ret