>debug
-a100
push cs/pop ds
102:mov dx,150/mov ah,9/int 21
xor si,si/mov cx,2
10E: mov ah,1/int 21
cmp al,0d/jz 130
cmp al,1b/jnz 11E
mov ah,4c/int 21
11E:and al,0f/shl si,1
mov bx,si/shl si,1/shl si,1
add si,bx/cbw/add si,ax
loop 10E
130:mov ax,0e0d/int 10
mov al,0a/int 10
mov ax,si
mov bl,4
mul bl
mov dx,17c
add dx,ax
mov ah,9/int 21
jmp 102
e150 d a 'Please Input Month No.(1-12)[Esc to Quit]: $'
e180 'Jan$Feb$Mar$Apr$May$Jun$Jul$Aug$Sep$Oct$Nov$Dec$'
rcx
100
n month.com
w
q
本程序无数据校验部分,输入1-12以外的数或字符将显示错误结果。‘/’=回车