标题: 8086+8253A可调时钟Proteus仿真程序 [打印本页]
作者: 好的123454    时间: 2020-4-26 12:54
标题: 8086+8253A可调时钟Proteus仿真程序
8086可调时钟仿真原理图如下（proteus仿真工程文件可到本帖附件中下载）


单片机源程序如下:
  1. .MODEL        SMALL
  2. .8086
  3. .stack
  4. .code
  5. .startup
  6. NMI_init: push es        ;NMI不可屏蔽中断向量表初始化
  7.       xor ax, ax
  8.       mov es, ax
  9.       mov al, 02h
  10.       xor ah, ah
  11.       shl ax, 1
  12.       shl ax, 1
  13.       mov si, ax
  14.       mov ax, offset NMI_service
  15.       mov es:[si], ax
  16.       inc si
  17.       inc si
  18.       mov bx, cs
  19.       mov es:[si], bx
  20.       pop es
  21.       ;定时/计数器初始化
  22.       mov al,00110111b   ;T0 16位 mode3 bcd
  23.       mov dx,0406h       ;控制口地址
  24.       out dx,al
  25.       mov dx,0400h       ;T0地址
  26.       mov ax,0100h       ;100KHz 100分频 1KHz   
  27.       out dx,al
  28.       mov al,ah          ;高字节
  29.       out dx,al  
  30.       mov al,10110101b   ;T2 16位 mode2 bcd
  31.       mov dx,0406h
  32.       out dx,al
  33.       mov dx,0404h
  34.       mov ax,1000h       ;1KHz 1000分频 1Hz   
  35.       out dx,al
  36.       mov al,ah          ;高字节
  37.       out dx,al
  38. loop0:                  ;主任务
  39.       call key
  40.       call disp      
  41.       jmp loop0   
  42.                              
  43. NMI_service:             ;中断服务程序
  44.       push ax  
  45.       mov al,sec
  46.       add al,1
  47.       daa     
  48.       mov sec,al  
  49.       cmp sec,60h
  50.       jb  exit
  51.       mov sec,0
  52.       mov al,min
  53.       add al,1
  54.       daa     
  55.       mov min,al  
  56.       cmp min,60h
  57.       jb  exit
  58.       mov min,0
  59.       mov al,hou
  60.       add al,1
  61.       daa     
  62.       mov hou,al  
  63.       cmp hou,12h
  64.       jb  exit
  65.       mov hou,0                    
  66. exit: pop ax
  67.       iret
  68. disp  proc  near
  69.       mov al,0ffh           ;不显示         
  70.       mov dx,0201h
  71.       out dx,al
  72.       mov bl,sec
  73.       and bx,000fh
  74.       mov si,bx      
  75.       mov al,situation[si]  ;段码     
  76.       mov dx,0200h
  77.       out dx,al      
  78.       mov al,0feh           ;秒个位         
  79.       mov dx,0201h
  80.       out dx,al
  81.       call delay
  82.       mov al,0ffh           ;不显示        
  83.       mov dx,0201h  
  84.       out dx,al
  85.       mov bl,sec
  86.       and bx,00f0h
  87.       mov cl,4         
  88.       shr bx,cl            
  89.       mov si,bx
  90.       mov al,situation[si]  ;段码     
  91.       mov dx,0200h
  92.       out dx,al      
  93.       mov al,0fdh           ;秒十位      
  94.       mov dx,0201h
  95.       out dx,al
  96.       call delay
  97.       mov al,0ffh           ;不显示         
  98.       mov dx,0201h
  99.       out dx,al      
  100.       mov al,40h            ;段码     
  101.       mov dx,0200h
  102.       out dx,al      
  103.       mov al,0fbh           ;秒个位         
  104.       mov dx,0201h
  105.       out dx,al
  106.       call delay
  107.       mov al,0ffh           ;不显示         
  108.       mov dx,0201h
  109.       out dx,al
  110.       mov bl,min
  111.       and bx,000fh
  112.       mov si,bx      
  113.       mov al,situation[si]  ;段码     
  114.       mov dx,0200h
  115.       out dx,al      
  116.       mov al,0f7h           ;分个位         
  117.       mov dx,0201h
  118.       out dx,al
  119.       call delay
  120.       mov al,0ffh           ;不显示        
  121.       mov dx,0201h  
  122.       out dx,al
  123.       mov bl,min
  124.       and bx,00f0h
  125.       mov cl,4         
  126.       shr bx,cl            
  127.       mov si,bx
  128.       mov al,situation[si]  ;段码     
  129.       mov dx,0200h
  130.       out dx,al      
  131.       mov al,0efh           ;分十位      
  132.       mov dx,0201h
  133.       out dx,al
  134.       call delay
  135.       mov al,0ffh           ;不显示         
  136.       mov dx,0201h
  137.       out dx,al      
  138.       mov al,40h            ;段码     
  139.       mov dx,0200h
  140.       out dx,al      
  141.       mov al,0dfh           ;秒个位         
  142.       mov dx,0201h
  143.       out dx,al
  144.       call delay
  145.       mov al,0ffh           ;不显示         
  146.       mov dx,0201h
  147.       out dx,al
  148.       mov bl,hou
  149.       and bx,000fh
  150.       mov si,bx      
  151.       mov al,situation[si]  ;段码     
  152.       mov dx,0200h
  153.       out dx,al      
  154.       mov al,0bfh           ;时个位         
  155.       mov dx,0201h
  156.       out dx,al
  157.       call delay
  158.       mov al,0ffh           ;不显示        
  159.       mov dx,0201h  
  160.       out dx,al
  161.       mov bl,hou
  162.       and bx,00f0h
  163.       mov cl,4         
  164.       shr bx,cl            
  165.       mov si,bx
  166.       mov al,situation[si]  ;段码     
  167.       mov dx,0200h
  168.       out dx,al      
  169.       mov al,07fh           ;时十位      
  170.       mov dx,0201h
  171.       out dx,al
  172.       call delay
  173.       ret
  174. disp    endp

  176. key     proc near
  177.         mov dx,0600h
  178.         in  al,dx
  179.         test al,01h   
  180.         jnz  nexthou      
  181.         call disp           ;消抖
  182.         call disp
  183.         call disp      
  184.         mov dx,0600h
  185.         in  al,dx
  186.         test al,01h
  187.         jnz  nexthou
  188.         mov al,min
  189.         add al,1            ;分调整
  190.         daa
  191.         mov min,al
  192.         cmp min,60H
  193.         jb  nexthou
  194.         mov min,0
  195. nexthou: mov dx,0600h
  196.         in  al,dx
  197.         test al,02h
  198.         jnz  exitkey      
  199.         call disp            ;消抖
  200.         call disp
  201.         call disp      
  202.         mov dx,0600h
  203.         in  al,dx
  204.         test al,02h
  205.         jnz  exitkey
  206.         mov al,hou
  207.         add al,1         
  208.         daa                  ;时调整
  209.         mov hou,al   
  210.         cmp hou,12H
  211.         jb  nexthou
  212.         mov hou,0
  213. exitkey:ret
  214. key     endp
  215.       
  216. delay   proc  near
  217.         push bx
  218.         push cx
  219.             mov  bx,1
  220.    lp1:   mov cx,469
  221.    lp2:   loop lp2
  222.             dec bx
  223.             jnz lp1
  224.         pop  cx
  225.         pop  bx
  226.             ret
  227. delay      endp  

  229. .data
  230. sec         db 00h
  231. min         db 00h
  232. hou         db 11h
  233. situation   db 3FH,06H,5BH,4FH,66H,6DH,7DH,07H,7FH,6FH,40h ;共阴   
  234. sit_end=$        
  235. END
复制代码

所有资料51hei提供下载:
_8253A_可调时钟.rar (60.62 KB, 下载次数: 82)






欢迎光临 (http://www.51hei.com/bbs/) Powered by Discuz! X3.1