DATAS SEGMENT spa db 10 num1 dw 1 num2 dw 1 num3 dw 1 num11 dw ? num22 dw ? num33 dw ? DATAS ENDSCODES SEGMENT ASSUME CS:CODES,DS:DATASSTART: MOV AX,DATAS MOV DS,AX mov cx,5 mov si,0 mov di,0 a1:cmp si,num1jge a2inc si mov dl,'*' mov ah,2 int 21h jmp a1 a2: cmp si,5 jge a3 inc si mov dl,' ' mov ah,2 int 21h jmp a2 a3: ;add num1,1 call buf cmp spa,0 jg a3 add num1,1 mov si,0 mov dl,2 mov spa,10 mov ax,9 sub ax,num2 mov num11,ax div dl mov num22,ax a4: cmp si,num22 jge a5 mov dl,' ' mov ah,2 int 21h inc si jmp a4 a5: cmp di,num2 jge a6 mov dl,'*' mov ah,2 int 21h inc di jmp a5 a6: cmp si,num11 jg a7 mov dl,' ' mov ah,2 int 21h inc si jmp a6 a7: call buf cmp spa,0 jg a7 add num2,2 mov si,0 mov di,0 mov spa,10 mov ax,5 sub ax,num3 mov num33,ax a8: cmp si,num33 jge a9 mov dl,' ' mov ah,2 int 21h inc si jmp a8 a9: cmp di,num3 jge a10 mov dl,'*' mov ah,2 int 21h inc di jmp a9 a10: add num3,1 dec cx mov si,0 mov di,0 mov dl,0dh mov ah,2 int 21h MOV dl,0ahMOVah,2INT 21h cmp cx,0 jg a1 MOV AH,4CH INT 21H buf procmov dl,' 'mov ah,2int 21hdec sparetbuf endp CODES ENDS END START
