汇编语言在数组中插入一个数据然后改变数组长度？

.model small
.stack
.data
string db 'please input a number:$',0ah,0dh
buf db 10（表示数组长度包括自身）,25,21,19,16,12,11,9,7,3
p db ?
count equ $-buf
.code
start:
mov ax,@data
mov ds,ax
mov ah,9
lea dx,string
int 21h
mov ah,1
int 21h
mov p,al
mov cx,count
mov bx,offset buf
inlp:
cmp al,[bx+1]
jbe next
xchg al,[bx+1]
inc bx
dec cx
cmp cx,0
jnz inlp
jmp quit
next:
cmp al,[bx+1]
je quit
inc bx
loop inlp
quit:
mov ah,4ch
int 21h
end start

怎么修改长度10

取出buf第一个元素，自增后放回去就行了。

mov al,[buf]

inc al

mov [buf],al