回 帖 发 新 帖 刷新版面

主题:汇编编写数字三角形

有编写的三角的代码  不过不能改变颜色  希望高手能帮忙添加代码使它可以改变颜色
代码如下:
ode segment 
assume cs:code,ds:code 
org 100h 
main proc near 
    mov ah,0 
    mov al,8 
    mov bh,0 
    mov bl,1 
    mov cx,8 

rep4: 
    push ax 
    push bx 
    push cx 

sub al,bl 
jna left 


   mov cx,ax 
   mov ah,2 
   mov dl,20h 
rep1: 
int 21h 
loop rep1 


left:mov cx,bx 
   mov ah,2 
   mov dl,30h 
add dl,bl 
rep2: 
int 21h 
dec dl
loop rep2

sub bl,1 
jna next 


  mov cx,bx 
add dl,2 
rep3: 
int 21h 
inc dl 
loop rep3 


next:mov dl,0dh 
int 21h 
  mov dl,0ah 
int 21h 

pop cx 
pop bx 
pop ax 
inc bl 
loop rep4 

  mov ah,4ch 
int 21h 

main endp 
code ends 
end main

回复列表 (共1个回复)

沙发


assume cs:code

code segment
start:    
        mov cx,0
        mov bh,0
        mov dh,0
        mov dl,7
        mov si,0
        mov bl,31h
t:
        inc si
        mov cx,si
        mov al,bl
        push dx
        push ax
rep1:
        push cx
        mov ah,2
        int 10h
        
        mov cx,1
        mov al,bl
        push bx
        mov ah,9
        mov bl,47h
        int 10h
        
        pop bx
        pop cx
        inc dl
        dec bl
        loop rep1
        
        cmp si,1
        jna next
        
        mov cx,si
        dec cx
        mov bl,al
        inc bl
        
        
rep2:
        push cx
        mov ah,2
        int 10h
        
        mov cx,1
        mov al,bl
        push bx
        mov ah,9
        mov bl,47h
        int 10h
        
        pop bx
        pop cx
        inc dl
        inc bl
        loop rep2
        
next:
        pop ax
        pop dx
        mov bl,al
        inc bl
        inc dh
        dec dl
        cmp dl,1
        ja t
        
    
        mov ax,4c00h
        int 21h
code ends
end start

试试这个。

我来回复

您尚未登录,请登录后再回复。点此登录或注册