主题：简易频率计

继续学习

kk

简易频率计

                           ;**********************************************
                           ;*        简易频率计                          *
                           ;*    T0用于记数，P3。0用于脉冲输入           *
                           ;*    T1用于定时，采用中断                    *
                           ;*    P1口输出高位，P2口输出低位。            *
                           ;*    共阴级数码管显示                        *
                           ;*    频率范围0--99Hz十进制显示               *
                           ;*    伟福3.0通过                             *
                           ;**********************************************

                 org 00h
                 jmp start
                 org 001bh
                 jmp intm1

                 org 30h
      start:     mov p1,#40h
                 mov p2,#40h
      start1:    mov tmod,#15h
                 mov th1,#high(65536-10000)
                 mov tl1,#low(65536-10000)
                 mov th0,#0
                 mov tl0,#0
                 mov ie,#88h
                 mov r2,#00
        l1:      jb p3.0,l1
                 setb tr1
                 setb tr0

        l2:      cjne r2,#100,l2
                 clr tr1
                 clr tr0

                 mov a,tl0
                 mov 45h,a
                 call dcbs
                 call dis
                 jmp start1

       intm1:
                 mov th1,#high(65536-10000)
                 mov tl1,#low(65536-10000)
                 inc r2
                 reti
         dcbs:   mov r5,#00h
                 mov r6,#00h
         loop:   mov a,r5
                 add a,#1
                 da a
                 mov r5,a
                 inc r6
                 mov a,r6
                 cjne a,45h,loop
                 mov a,r5
                 mov r3,a
                 ret
         dis:    mov a,r3
                 anl a,#0fh
                 mov dptr,#tab
                 movc a,@a+dptr
                 mov p2,a
                 mov a,r3
                 swap a
                 anl a,#0fh
                 mov dptr,#tab
                 movc a,@a+dptr
                 mov p1,a
                 ret
     tab: db 3fh,06h,5bh,4fh,66h,6dh,7dh,07h,7fh,6fh,77h,7ch,39h,5eh,79h,71h

                end

我也看看