开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Windows编程 > 多显示器编程 > 查看源码
AD_ALLAN~~~~~.ASM
资源名称：AD_ALLAN~~~~~.rar　[点击查看]
上传用户：qzt189
上传日期：2020-08-05
资源大小：1k
文件大小：4k
源码类别：

多显示器编程

开发平台：

Visual Basic

AD_ALLAN~~~~~.ASM：源码内容
  2. ad_buf  equ   30h
  3.                         org     0
  4.                         ljmp    display         ;显示子程序
  5.                         org     3               ;中断0的入口地址
  6.                         ljmp    int00
  7. display:
  8.                         setb    ea              ;开放所有的中断
  9.                         setb    ex0            ;开放0中断
  11.                         mov     r5,#0AAh
  12.          RUN_display:   mov     p0,#0
  13.                         mov     a,#80h
  14.                         mov     p0,a
  15.                         lcall   sel1
  16.                         lcall   delay
  17.                         lcall   sel5
  18.                         lcall   delay
  19.                         dec     r5
  20.                         JC      FLOT
  21.                         mov     r0,#ad_buf      ;R0指向经转换的数据
  22.                         mov     a,@r0
  23.                         mov     dptr,#tab
  24.                         movc    a,@a+dptr
  25.                         mov     p0,a
  26.                         lcall   sel2
  27.                         lcall   delay
  28.                         inc     r0
  29.                         mov     a,@r0
  30.                         mov     r1,a            ;从31h取两次数，
  31.                        swap      a               ;将高低位对调
  32.                         anl     a,#0fh           ;取出次高位的值 来
  33.                         movc    a,@a+dptr
  34.                         mov     p0,a
  35.                         lcall   sel3
  36.                         lcall   delay            ;在LED2上显示次高位的值
  37.                         mov     a,r1             ;将保存在12中的值再倒回来
  38.                         anl     a,#0fh           ;取出最低位的值来
  39.                         movc    a,@a+dptr
  40.                         mov     p0,a
  41.                         lcall   sel4
  42.                         lcall   delay
  44.                         cjne    r5,#1h,qqq
  45.                         ljmp    display
  47.                   qqq  :
  48.                         ajmp    RUN_display
  49. ;*****************************************************************************************
  50. sel1:
  51.                         clr     p2.7
  52.                         clr     p2.6
  53.                         clr     p2.5
  54.                         ret
  55. sel2:                   setb     p2.7
  56.                         clr     p2.6
  57.                         clr     p2.5
  58.                         ret
  59. sel3:                   clr     p2.5
  60.                         setb     p2.6
  61.                         clr     p2.7
  62.                         ret
  63. sel4:                   clr     p2.5
  64.                         setb    p2.6
  65.                         setb     p2.7
  66.                         ret
  67. sel5:                   setb    p2.5
  68.                         clr     p2.6
  69.                         clr     p2.7
  70.                         ret
  71. delay:
  72.                         mov     r4,#022
  73.           lloop3:       mov     r3,#022
  74.           lloop4:       djnz    r3,lloop4
  75.                         djnz    r4,lloop3
  76.                         ret
  77. FLOT:                   mov     a,#80h
  78.                         mov     p0,a
  79.                         lcall   sel2
  80.                         lcall   delay
  81.                         lcall   sel3
  82.                         lcall   delay
  83.                         lcall   sel4
  84.                         lcall   delay
  85.                         LJMP    DISPLAY
  86. ;********************************************************************
  87. int00:                  push    a                ;保护A
  88.                         clr     ea
  89.                         clr     ex0                ;让INT0和中断不能进来
  90.                         mov     r0,#ad_buf
  91.            ad1:         clr     p2.0
  92.                         clr     p2.1
  93.                         mov     a,p1             ;读高8位的值
  94.                         setb    p2.1
  95.                         mov     c,acc.4
  96.                         anl     a,#0fh           ;把A的低4位取出来，实际是将AD最高四位值求出
  97.                         mov     @r0,a
  98.                         inc     r0               ;r0指向下一个单元31H
  99.                         clr     p2.2
  100.                         mov     a,p1
  101.                         setb    p2.2             ;关低位的读入
  102.                         setb    p2.0
  103.                         mov     @r0,a
  104.                         pop     a
  105.                         reti
  106. tab:    db     7eh,0ch,0b6h,9eh,0cch,0dah,0fah,0eh,0feh,0deh,0eeh,0f8h,72h,0bch,0f2h,0e2h,80H
  107.                 ;0,  1,   2,  3,   4,   5,   6,  7,   8,   9,   A,   B,  C,   D,  E,   F