include io.asm

stack segment stack
	dw 128 dup (?)
stack ends

data segment
 d dw 10
 k1 dw 3
 k2 dw 2
data ends

code segment 'code'
	assume ss:stack, ds:data, cs:code
pro proc
    inc sp
    pop bx
	cmp bh,bl
	jnb gott
	add bh,bl
	sub sp,3
	push bx
	mov ax,0
	inc sp
	call pro
	inc ax
	ret
gott:mov ax,0
     push bx 
     ret
pro endp
	
start:
	mov ax,data
	mov ds,ax
	push bx
	push k1
	push k2
    call pro
	pop bx
    finish
code ends
    end start