汇编语言 无法生成任何文件 list也没有生成
求 商品单价 输入 数量 总价格 但是编译时 没有生成相应文件 求解

代码如下
dseg segment
prompt1 db 'the quantity of parts:$'
prompt2 db 'the value of parts:$'
crlf db 0dh,0ah,'$'
quantity db 8,?,8 dup(' ')
value db 8,?,8 dup(' ')
qty dw ?
price dw ?
dseg ends

stack segment stack
db 200 dup(?)
stack ends

StrDisp macro message;显示宏
lea dx, message
mov ah, 09h
int 21h
endm

StrInput macro NumStr；输入
lea dx,NumStr
mov ah,0ah
int 21h
endm


cseg segment
main proc far
assume cs:cseg,ds:dseg
start:
push ds
sub ax,ax
push ax
mov ax,dseg
mov ds,ax
begin:

StrDisp prompt1
StrInput quantity
StrDisp crlf
StrDisp prompt2
StrInput value
StrDisp crlf

call subconv；从键盘输入
call subcalc
call subdisp


StrDisp crlf

jmp start
ret

main endp

subconv proc near

IRP reg,<ax,bx,cx,si,di>
push reg
endm

lea si,quantity
mov al,[si+1]
cbw
mov cx,ax

call decbin
mov qty,bx
lea si,value
mov al,[si+1]
cbw
mov cx,ax
call decbin
mov price,bx

IRP reg,<di,si,cx,bx,ax>
pop reg
endm

ret
subconv endp


decbin proc near
mov bx,0
digit:
mov al,[si+2]
inc si
sub al,30h
cbw
xchg ax,bx
mov di,10
mul di
xchg ax,bx
add bx,ax
loop digit
ret
decbin endp


subcalc proc near
push ax
push dx
mov ax,price
cwd
div qty
mov price,ax
pop dx
pop ax
ret
subcalc endp

GetNumVal macro bit,NamProc
mov bx,bit
call NamProc
endm

subdisp proc near
push ax
push bx
mov ax,price
GetNumVal 10000,bindec
GetNumVal 1000,bindec
GetNumVal 100,bindec
GetNumVal 10,bindec
mov dl,al
or dl,30h
mov ah,02h
int 21h
pop bx
pop ax
ret
subdisp endp


bindec proc near
mov dx,0

a10:
cmp ax,bx
jl a20
inc dl
sub ax,bx
jmp a10
a20:
push ax
or dl,30h
mov ah,02h
int 21h
pop ax
ret
bindec endp
cseg ends
end start



[解决办法]
编译命令贴出来