Вывод Числа На Экран, FASM Опции

[Игорь]

Пытаюсь сделать процедуру вывода числа в десят. представлении на экран. Делю, кладу в стек, достаю в обратном порядке. Проблема в том, что при запуске из TurboDebugger'a при делении в ax почему-то 0 ,а в dx вообще ерунда какая-то.

use16  
org 100h      
 mov ax,4321      
 call WPrint  
mov ax,4c00h  
int 21h  
;----------------------------------------------------------  
WPrint:     ; ax:выводимое слово или байт    
 push ax   ; \   
 push cx   ;  | сохранение регистров которые будут использоваться  
 push dx   ; /  
Divizion:   
 xor dx,dx       
 div word[10]    
 push dx   
 inc cx   
 cmp ax,0  
jnz Divizion   
 mov ah,02h  ; подготовка прерывания
Print:   
 pop dx   
 add dl,48      
 int 21h  
loop Print   
 pop dx    ; \   
 pop cx    ;  | восстановление регистров   
 pop ax    ; /  
ret  
;----------------------------------------------------------