В стек передается три аски кода, если это число, то поместить в стек

org 100h      
    
    start:
 
    mov ax,034h    ;4
    push ax     
    mov bx,057h    ;G
    push bx  
    mov cx,071h    ;9
    push cx  
    
    call ChisloVStek
 
proc ChisloVStek
    
    mas dw 1d,2d,3d
    
    lea si,mas 
    mov cx,3
c:    
    pop ax
    mov [si], ax
    add si,2
loop c      
              
    lea si,mas
              
cicle:
    mov dx,048h 
    cmp ax,dx
    jbe exit
 
    mov bp,057h
    cmp ax,bp 
    jbe vstek  
    jmp exit
       
exit:     
    loop cicle
    vstek:
    push ax
     
end proc 
   
     
ret

org 100h      
    
    start:
 
    mov ax,037h    ;  0
    push ax     
    mov bx,055h    ;  1
    push bx  
    mov cx,036h    ;  1
    push cx  
    
    call ChisloVStek
 
proc ChisloVStek 
    
   
    mas dw 1d,2d,3d
    
    lea si,mas 
    mov cx,3
    pop ax
c:    
    pop ax
    mov [si], ax
    add si,2
loop c   
          
;prygaem po massivu
    mov cx,3
    lea si,mas      
cicle:                                    
    mov dx,048h 
    cmp [si],dx
    jbe exit
 
    mov bp,057h
    cmp [si],bp 
    jbe vstek  
    jmp exit
vstek:
    push [si]    
exit:
    add si,2      
    loop cicle
end proc      
ret