[求助]汇编一道题

以前做过一个２的１１次方的，你试着去改改，加上输入输出语句．
dseg segment
array dw 1,2,4,8,16,32,64,128,256
dw 512,1024,2048,4096,8192,16384
x db 11
pwr dw ?
dseg ends
cseg segment
assume ds:dseg,cs:cseg
start:
mov ax,dseg
mov ds,ax
mov si,offset array

mov bh,0

mov bl,x
shl bx,1

mov ax,array[bx]
mov pwr,ax
mov ah,4ch
int 21h
cseg ends
end start

data segment
print db 'please input a number from 1-7:$'
data ends
stack segment para stack 'stack'
sta db 20 dup(?)
stack ends
code segment
assume cs:code,ds:data,ss:stack
start: mov ax,data
mov ds,ax
mov ax,stack
mov ss,ax
lea dx,print
mov ah,9
int 21h

mov ah,1
int 21h ;输出一个字符给AL
sub al,30h
mov cl,al
mov ch,0
mov ax,2
mov bx,2
sub cx,1
jz lop1 ；判断输入的是否是1,是1则直接转lop1

lop: mul bx
loop lop

mov cx,0
lop1: mov bx,10 ;将数值转换成ASCII码
mov dx,0
div bx
add dx,30h
push dx
inc cx
and ax,0fffh
jnz lop1
mov dl,0ah
mov ah,2
int 21h

lop2: pop dx ；输出字符
mov ah,2
int 21h
loop lop2
mov ah,4ch
int 21h
code ends
end start

大哥啊,这是到九的啊.输 8,输9都能出结果啊

是汇编盲!!!!主要是要交了,实在没办法,刚才是位姐姐