模拟 sleep 问题

SillyMe

大佬帮忙看看，运行的时候老是中途卡死，不知怎么回事！
代码如下:
assume cs:code

stack segment
    db 128 dup(0)
stack ends

code segment
start:    mov ax,stack
          mov ss,ax
                  mov sp,128
                  
                  call show_ch
                  
                  mov ax,4c00H
                  int 21H
;==========================================
show_ch:  push ax
          push es
                  push di
                  
          mov ax,0b800H
                  mov es,ax
                  mov di,160*12+40*2
                  mov al,'a'
print:    mov es:[di],al
          inc al
                  call delay
                  cmp al,'z'
                  jna print
                  
                  pop di
                  pop es
                  pop ax
                  
                  ret
;==========================================
delay:    push ax

          mov al,0
                  out 70H,al
                  in al,71H
                  mov ah,al
                  inc ah
                  mov al,0
                  
delay_s:  push ax
          out 70H,al
                  in al,71H
                  cmp al,ah
                  pop ax
                  jne  delay_s
                  
                  pop ax
                  ret
;==========================================
code ends
end start

人造人

你为什么不调试程序？


延时部分有问题，已经修复

1. assume cs:code
   
2. 
   
3. stack segment
   
4.     db 128 dup(0)
   
5. stack ends
   
6. 
   
7. code segment
   
8. start:
   
9.         mov ax, stack
   
10.         mov ss, ax
    
11.         mov sp, 128
    
12. 
    
13.         call show_ch
    
14. 
    
15.         mov ax, 4c00H
    
16.         int 21H
    
17.        
    
18. ;==========================================
    
19. 
    
20. show_ch:
    
21.         push ax
    
22.         push es
    
23.         push di
    
24. 
    
25.         mov ax, 0b800H
    
26.         mov es, ax
    
27.        
    
28.         mov di, 160*12+40*2
    
29.         mov al, 'a'
    
30. print:
    
31.         mov es:[di],al
    
32.         inc al
    
33.        
    
34.         call delay
    
35.        
    
36.         cmp al, 'z'
    
37.         jna print
    
38. 
    
39.         pop di
    
40.         pop es
    
41.         pop ax
    
42.         ret
    
43.        
    
44. ;==========================================
    
45. 
    
46. delay:
    
47.         push ax
    
48. 
    
49.         mov al, 0
    
50.         out 70H, al
    
51.        
    
52.         in al, 71H
    
53.         mov ah, al
    
54.        
    
55. delay_s:
    
56.         mov al, 0
    
57.         out 70H, al
    
58.        
    
59.         in al, 71H
    
60.         cmp ah, al
    
61.         je  delay_s
    
62. 
    
63.         pop ax
    
64.         ret
    
65.        
    
66. code ends
    
67. 
    
68. end start
    

复制代码