axin01.asm

这个源代码是用汇编语言编辑的

                     .model small
                     .stack 200   
                     .code
                     .startup
                     mov ah,0
                     mov al,5
                     int 10h
                     mov ah,11
                     mov bh,0
                     mov bl,0eh
                     int 10h
                     mov ah,11
                     mov bh,1
                     mov bl,0
                     int 10h     
                     mov dx,0
                     mov cx,150
                     call red
                     mov dx,0
lopb:                mov cx,151
lopc:                mov ah,12
                     mov al,1
                     int 10h
                     inc cx
                     cmp cx,170
                     jb lopc
                     add dx,10
                     cmp dx,200
                     jb lopb
                     .exit 0
red                  proc
lopa:                mov ah,12
                     mov al,2
                     int 10h 
                     inc dx
                     cmp dx,200
                     jbe lopa
                     ret
red                  endp
                     .exit 0
                     end