标题: 单片机16*16点阵Proteus仿真 汇编语言程序 [打印本页]
作者: whiteM3    时间: 2019-7-30 17:03
标题: 单片机16*16点阵Proteus仿真 汇编语言程序
具体内容看附件吧，我把写的程序打包放在一起了。
感兴趣的朋友可以做进一步扩展。


单片机源程序如下:
  1.                 ORG                0000H
  2.                 AJMP        MAIN
  3.                 ORG                0100H
  4. MAIN:       
  5.                 SETB        P3.6                ;RW,1读，0写
  6.                 SETB        P3.5                  ;RS，1数据寄存器，0命令/状态寄存器
  7.                 MOV                2AH,#16                ;位首地址
  8.                 LCALL        TIM1
  9.                 JMP                MAIN
  10.                        
  11. //////////////////////////////////////////////////////////////////////////////////////////////////////////////////               
  12. TIM1:        MOV                R5,#-1                ;位右移次数
  13.                 MOV                R7,#10               
  14. LOOP0:        INC                R5
  15.                 MOV                2EH,R5       
  16. LOOP1:        MOV                R3,#0
  17.                 MOV                R4,#16                ;位扫描初始化                                                       
  18. LOOP2:        LCALL        WEI                       
  19.                 LCALL        EXC1H
  20.                 LCALL        HC595
  21.                 LCALL        EXC1L
  22.                 LCALL        HC595
  23.                 CLR                P3.5
  24.                 NOP
  25.                 NOP
  26.                 SETB        P3.5
  27.                
  28.                 INC                R3
  29.                 DJNZ        R4,LOOP2         ;扫描16位
  30.                
  31.                 MOV                R5,2EH       
  32.                 DJNZ        R7,LOOP1        ;延时显示
  33.                
  34.                 MOV                R7,#10
  35.                 CJNE        R5,#8,LOOP0        ;右移8位
  36. //////////////////////////////////////////////////////////////
  37. TIM2:        MOV                R5,#-1
  38.                 MOV                R7,#10
  39. LOOP3:        INC                R5
  40.                 MOV                2DH,R5
  41. LOOP4:        MOV                R3,#0
  42.                 MOV                R4,#16                                       
  43. LOOP5:        LCALL        WEI       
  44.                 LCALL        EXC2H
  45.                 LCALL        HC595
  46.                 LCALL        EXC2L
  47.                 LCALL        HC595
  48.                 CLR                P3.5
  49.                 NOP
  50.                 NOP
  51.                 SETB        P3.5
  52.        
  53.                 INC                R3
  54.                 DJNZ        R4,LOOP5                 ;扫描16位
  55.                
  56.                 MOV                R5,2DH       
  57.                 DJNZ        R7,LOOP4                   ;延时显示
  58.                
  59.                 MOV                R7,#10
  60.                 CJNE        R5,#8,LOOP3                ;再右移八位，共16位       
  61.        
  62.                 MOV                A,2AH
  63.                 ADD                A,#16
  64.                 MOV                2AH,A       
  65.                 CJNE        A,#80,TIM1
  66.                 RET
  67. //////////////////////////////////////////////////////////////////////////////////////////////////////////////////////

  69. WEI:        MOV                DPTR,#WEI2       
  70.                 CLR                A
  71.                 ADD                A,R3                       
  72.                 MOVC        A,@A+DPTR
  73.                 CPL                A
  74.                 LCALL        HC595               
  75.                 MOV                DPTR,#WEI1       
  76.                 CLR                A
  77.                 ADD                A,R3               
  78.                 MOVC        A,@A+DPTR
  79.                 CPL                A
  80.                 LCALL        HC595
  81.                 RET       

  83. ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////       
  84.                 ;得到偏移后段码高八位
  85. EXC1H:        MOV                22H,R5                ;保存右移次数       
  86.                
  87.                 MOV                DPTR,#TAB2       
  88.                 MOV                A,2AH
  89.                 CLR                C
  90.                 SUBB        A,#16
  91.                 ADD                A,R3
  92.                 MOVC        A,@A+DPTR
  93.                 MOV                20H,A               
  94.                
  95.                 MOV                DPTR,#TAB1
  96.                 MOV                A,2AH
  97.                 ADD                A,R3
  98.                 MOVC        A,@A+DPTR
  99.                 MOV                21H,A

  101.                 MOV                A,22H
  102.                 JZ                Z1
  103.                 LCALL   ROTATE1
  104.                 JMP                Z2
  105. Z1:                MOV                A,20H
  106. Z2:                RET

  108. EXC2H:        MOV                22H,R5                ;保存右移次数       
  109.                
  110.                 MOV                DPTR,#TAB1
  111.                 MOV                A,2AH
  112.                 ADD                A,R3
  113.                 MOVC        A,@A+DPTR
  114.                 MOV                20H,A
  115.                
  116.                 MOV                DPTR,#TAB2       
  117.                 MOV                A,2AH
  118.                 ADD                A,R3
  119.                 MOVC        A,@A+DPTR
  120.                 MOV                21H,A       
  121.                
  122.                 MOV                A,22H
  123.                 JZ                Z3
  124.                 LCALL   ROTATE1
  125.                 JMP                Z4
  126. Z3:                MOV                A,20H
  127. Z4:                RET

  129. ROTATE1:CLR                C
  130.                 MOV                A,21H
  131.                 RRC                A
  132.                 MOV                21H,A                 ;保存每次右循环后的数据
  133.                 MOV                A,20H
  134.                 RRC                A
  135.                 MOV                20H,A       
  136.                 DJNZ        R5,ROTATE1
  137.                 MOV                R5,22H                ;还原右移次数
  138.                 RET
  139. ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
  140.                 ;得到偏移后段码低八位
  141. EXC1L:        MOV                22H,R5                ;保存右移次数       
  142.                
  143.                 MOV                DPTR,#TAB1       
  144.                 MOV                A,2AH
  145.                 CLR                C
  146.                 SUBB        A,#16
  147.                 ADD                A,R3
  148.                 MOVC        A,@A+DPTR
  149.                 MOV                23H,A
  150.                
  151.                 MOV                DPTR,#TAB2       
  152.                 MOV                A,2AH
  153.                 CLR                C
  154.                 SUBB        A,#16
  155.                 ADD                A,R3
  156.                 MOVC        A,@A+DPTR
  157.                 MOV                24H,A               
  158.                
  159.                 MOV                A,22H
  160.                 JZ                Z5
  161.                 LCALL   ROTATE2
  162.                 JMP                Z6
  163. Z5:                MOV                A,23H
  164. Z6:                RET
  165. EXC2L:        MOV                22H,R5                ;保存右移次数       
  166.                
  167.                 MOV                DPTR,#TAB2       
  168.                 MOV                A,2AH
  169.                 ADD                A,R3
  170.                 CLR                C
  171.                 SUBB        A,#16
  172.                 MOVC        A,@A+DPTR
  173.                 MOV                23H,A
  174.                
  175.                 MOV                DPTR,#TAB1       
  176.                 MOV                A,2AH
  177.                 ADD                A,R3
  178.                 MOVC        A,@A+DPTR
  179.                 MOV                24H,A               
  180.                
  181.                 MOV                A,22H
  182.                 JZ                Z7
  183.                 LCALL   ROTATE2
  184.                 JMP                Z8
  185. Z7:                MOV                A,23H
  186. Z8:                RET
  187. ROTATE2:CLR                C
  188.                 MOV                A,24H
  189.                 RRC                A
  190.                 MOV                24H,A
  191.                 MOV                A,23H
  192.                 RRC                A
  193.                 MOV                23H,A       
  194.                 DJNZ        R5,ROTATE2
  195.                 MOV                R5,22H       
  196.                 RET
  197. ///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////
  198.                 ;HC595数据传输
  199. HC595:        MOV                R2,#8
  200. SHFT:        MOV                C,Acc.7
  201.                 MOV                P3.4,C
  202.                 RL                A
  203.                 CLR                P3.6
  204.                 NOP
  205.                 NOP
  206.                 SETB        P3.6
  207.                 DJNZ        R2,SHFT
  208. DELAY:        MOV                2FH,#0AFH
  209. DELAY1:        DJNZ        2FH,DELAY1       
  210.                 RET

  212. WEI1:        DB        01H,02H,04H,08H,10H,20H,40H,80H,00H,00H,00H,00H,00H,00H,00H,00H
  213. WEI2:        DB        00H,00H,00H,00H,00H,00H,00H,00H,01H,02H,04H,08H,10H,20H,40H,80H
  214. TAB1:        ;低八位       
  215.                 DB        0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
  216.                 DB         0x00,0x80,0x60,0xF8,0x07,0x40,0x20,0x18,0x0F,0x08,0xC8,0x08,0x08,0x28,0x18,0x00
  217.                 DB        0x10,0x10,0xF0,0x1F,0x10,0xF0,0x00,0x80,0x82,0x82,0xE2,0x92,0x8A,0x86,0x80,0x00
  218.                 DB        0x00,0xFC,0x04,0x04,0xFC,0x00,0xC2,0xBA,0x82,0x82,0x82,0xFE,0x82,0x82,0x80,0x00
  219.                 DB        0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
  220. TAB2:        ;高八位
  221.                 DB        0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
  222.                 DB        0x01,0x00,0x00,0xFF,0x00,0x10,0x0C,0x03,0x40,0x80,0x7F,0x00,0x01,0x06,0x18,0x00        ;你
  223.                 DB        0x40,0x22,0x15,0x08,0x16,0x61,0x00,0x00,0x40,0x80,0x7F,0x00,0x00,0x00,0x00,0x00        ;好
  224.                 DB        0x00,0x0F,0x04,0x04,0x0F,0x20,0x10,0x08,0x04,0x42,0x81,0x7F,0x00,0x00,0x00,0x00        ;呀
  225.                 DB        0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00
  226.                 END
复制代码

所有资料51hei提供下载:
16×16点阵仿真.zip (270.97 KB, 下载次数: 44)






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