自创霓虹灯程序，可能代码看起来有点乱

死亡请帖

1. assume cs:code,ds:code
   
2. code segment
   
3. color         db 8
   
4. rest:        mov color,8
   
5.                 jmp a
   
6. start:        mov ax, code
   
7.                 mov ds, ax
   
8.                 mov ax, 0b800h
   
9.                 mov es, ax
   
10.                 mov bx, 0
    
11.                 mov cx, 100
    
12. start0:        cmp color, 10h
    
13.                 jnb rest
    
14. a:                mov bl,color        ;show函数的变量bl赋值，bl存放颜色信息
    
15.                 call show
    
16.                 inc color
    
17.                 loop start0
    
18.                 mov ah, 4ch                ;退出程序
    
19.                 int 21h
    
20.                
    
21. show:   push bx                        ;定义show函数
    
22.         push cx
    
23.                
    
24. delay:        mov dx,100h                ;小甲鱼外中断视频里讲到的delay函数
    
25.                 mov ax,0
    
26. s1:                sub ax,1
    
27.                 sbb dx,0
    
28.                 cmp ax,0
    
29.                 jne s1
    
30.                 cmp dx,0
    
31.                 jne s1
    
32.                
    
33.                 mov bh,bl
    
34.                 mov di, 0
    
35.                 mov cx,4000
    
36.                 mov al,'\'
    
37. b:                mov ah,bl
    
38.                 mov es:[di],ax
    
39.                 dec cx
    
40.                 jcxz exit
    
41.                 add di, 2
    
42.                 cmp bl, 10h
    
43.                 jnb init                ;将bl变量重新初始化
    
44.                 inc bl
    
45.                 jmp go
    
46. init:        mov bl,bh
    
47. go:                jmp b
    
48. ok:     pop cx
    
49.         pop bx
    
50. exit:        ret
    
51.                
    
52. code ends
    
53. end start

复制代码

china0008

效果不错，很有意思。继续努力。

583413088

恩恩   真的不错啊   我下了  多谢楼主分享

???

谢谢分享，拿走研究下

lanza

俺好奇，看看学习了！

只是丶梦

美妙.收藏了

parbbo

挺强的哦！

coko

看帖，就必须回帖