实验9

箪v箪

assume cs:code,ds:data,ss:stack
data segment
db 'welcome to masm!'
db 21h,26h,74h
data ends

stack segment
dw 8 dup(0)
stack ends

code segment
start:  mov ax,data
                mov ds,ax
                mov ax,stack
                mov ss,ax
               
                xor bx,bx          ;bx清0，用来索引颜色
                mov ax,0b872h      ;屏幕中间现存的段地址，
               
                mov cx,3           ;外循环3次
        s3: push cx            ;三个入栈保存外循环相关寄存器的值
                push ax            ;以防止在内循环中他们的值被改变
                ;push bx
               
                mov es,ax         
                mov si,0           ;索引源数据，字符welcome to masm
                mov di,0           ;定位目标地址
                mov cx,16          ;内循环16次
        s1: mov al,ds:[si]
                mov ah,ds:10h[bx]
                mov es:[di],ax
                inc si
                add di,2
                loop s1
                inc  bx
                               
                pop ax
                add ax,0ah
               
                pop cx
                loop s3
               
                mov ax,4c00h
                int 21h
               
code ends
end start
               
把小甲鱼的程序优化了一下，分享分享

小王子之歌

1. ;=============================================================
   
2. ;     实验九: 在屏幕中间显示3行不同前景,背景色的字符
   
3. 
   
4. ;=============================================================
   
5. 
   
6. assume cs:codesg, ds:datasg, ss:stacksg
   
7. 
   
8. datasg segment
   
9.                 db 'welcome to masm!'                                ;显示的字符
   
10.                 db 00000010b, 00100100b, 01110001b  ;颜色属性
    
11. datasg ends
    
12. 
    
13. stacksg segment
    
14.                 db 8 dup(0)
    
15. stacksg ends
    
16. 
    
17. codesg segment
    
18. 
    
19. start:
    
20.                 mov ax, stacksg
    
21.                 mov ss, ax
    
22.                 mov sp, 8
    
23.                 mov ax, datasg
    
24.                 mov ds, ax
    
25.                 mov ax, 0B872H                                                ;显示中间行中间列偏移地址
    
26.                 mov es, ax
    
27.                
    
28.                 mov di, 0                                                        ;行偏移,每行 +160
    
29.                 mov si, 0                                                        ;颜色属性字节偏移 ds:16[si]
    
30.                
    
31.                 mov cx, 3
    
32.         S:                                                                                ;外循环,3次,一次为一行 di
    
33.                 mov bx, 0                                                        ;字符字节偏移
    
34.                
    
35.                 push cx
    
36.                
    
37.                 mov cx, 16
    
38.                 s0:                                                                        ;内循环,一次1字节字符(写入显示地址为2字节) bx
    
39.                         mov al,                            [bx]
    
40.                         push bx                                                        ;保存 bx,下面可用2*(bx) 来完成显示地址偏移
    
41.                         add bx, bx
    
42.                         mov es:[bx + di],         al
    
43.                         mov al,                                 16[si]
    
44.                         mov es:1[bx + di],         al
    
45.                         pop bx
    
46.                        
    
47.                         inc bx
    
48.                        
    
49.                 loop s0
    
50.                
    
51.                 add di, 160
    
52.                 inc si
    
53.                
    
54.                 pop cx
    
55.        
    
56.         loop S
    
57.                
    
58.                 mov ax, 4c00H
    
59.                 int 21H
    
60.        
    
61. codesg        ends
    
62. 
    
63. end start

复制代码

同分享,俺独立写的代码,才发现与小甲鱼的,还有网上参考答案出入比较大...但试验了一下,还是可以的...求优化...