.model small
.data
.code
mov ax,@data
mov ds,ax
mov ax,0013h ;设置显示模式
int 10h
mov ax,0 ;初始行号
mov ch,1 ;初始颜色
mov cl,0 ;背景色
mov si,199 ;设置行数
again:mov dx,320
mov bx,1
next:call vga_color256
inc bx ;列号增1
dec dx
jnz next ;是否画完一条线
inc ch ;更换颜色
inc ax ;更改行号
dec si
jnz again
mov ah,0 ;等待键盘输入
int 16h
mov ax,0003h ;恢复彩色文本模式3
int 10h
mov ax,4c00h
int 21h
vga_color256 proc near ;VGA13H模式(320*200*256)
push ax
push dx
push di
push es
mov dx,0a000h
mov es,dx
mov dx,320
mul dx
add ax,bx
mov di,ax
mov es:[di],ch
pop es
pop di
pop dx
pop ax
ret
vga_color256 endp
end