编程显示图形

DATAS SEGMENT
    spa db 10
    num1 dw 1
    num2 dw 1
    num3 dw 1
    num11 dw ?
    num22 dw ?
    num33 dw ?
  
DATAS ENDS

CODES SEGMENT
    ASSUME CS:CODES,DS:DATAS
START:
    MOV AX,DATAS
    MOV DS,AX
    
    mov cx,5
    mov si,0
    mov di,0
 a1:
	cmp si,num1
	jge a2
	inc 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,0ah
	MOV	ah,2
	INT   21h
	
 	
 	cmp cx,0
 	jg a1
   
    MOV AH,4CH
    INT 21H
 	
buf proc
	mov dl,' '
	mov ah,2
	int 21h
	dec spa
	ret
buf endp
   
CODES ENDS
    END START