_DATA segment
  nr dw 7230
  repr db 5 dup (' ')
  end_repr:
  zece dw 10
_DATA ends

assume ds:_DATA
assume cs:_TEXT

_TEXT segment
start:
  mov ax, _DATA
  mov ds, ax

  mov ax, nr
  mov bx, offset end_repr-1 ; bx = adresa la care punem caracterul curent
bucla:
  mov dx, 0
  div zece ; dx=cifra, ax=catul
  add dl, '0'  ; dl=codul ascii al cifrei
  mov byte ptr [bx], dl
  sub bx, 1
  cmp ax, 0
  jne bucla

  mov ax, 4C00h
  int 21h
_TEXT ends

_STACK segment stack
  db 512 dup(?)
_STACK ends

end start