標(biāo)題: 1602液晶6位計數(shù)器 [打印本頁]
作者: 1234mx    時間: 2016-10-31 11:04
標(biāo)題: 1602液晶6位計數(shù)器
這是計算機(jī)小程序
液晶計數(shù)器.rar (9.76 KB, 下載次數(shù): 13)
  1. ;********************************************************************************
  2. ;             1602液晶6位計數(shù)器:本程序調(diào)試通過                                  *
  3. ;      硬件： 插上1602液晶                                                                                        *

  5. ;********************************************************************************

  7.         RS EQU P2.6           //液晶屏讀操作定義
  8.         RW EQU P2.5           //液晶屏寫操作定義
  9.         E EQU P2.7
  10.         org 00h
  11.         a_bit equ 30h                 ;個位數(shù)存放處
  12.         b_bit equ 31h                 ;十位數(shù)存放處
  13.         c_bit equ 32h                 ;百位數(shù)存放處
  14.         d_bit equ 33h                 ;千位數(shù)存放處
  15.         e_bit equ 34h                 ;萬位數(shù)存放處
  16.         f_bit equ 35h                 ;十萬位數(shù)存放處
  17.         mov        a,#30h          ;30H的ASCIC碼為0
  18.         mov        a_bit,a
  19.         mov        b_bit,a
  20.         mov        c_bit,a
  21.         mov        d_bit,a
  22.         mov        e_bit,a
  23.         mov        f_bit,a
  24.         org        0030h
  25.         MOV P0,#00000001B        ;清屏
  26.         ACALL ENABLE
  27.         MOV P0,#00111000B        ;顯示功能
  28.         ACALL ENABLE
  29.         MOV P0,#00001100B        ;顯示開關(guān)控制
  30.         ACALL ENABLE
  31.         MOV P0,#06H                ;輸入模式
  32.         ACALL ENABLE
  33.         MOV p0,#80H                ;第一行的開始位置
  34.         cALL ENABLE
  35.         MOV P0,#00000001B        ;清屏
  36.         ACALL ENABLE
  37.         MOV DPTR,#TABLE1        ;顯示PASS WORD
  38.         CALL WRITE1                ;到TABLE1取碼?
  39. stlop:  acall display            ;顯示
  40.         inc a_bit                     ;加1
  41.         mov        a,a_bit
  42.         cjne        a,#3AH,stlop        ;如果A的值到3AH那么繼續(xù)否則重新
  43.         mov        a_bit,#30h      ;顯示數(shù)送30H（就是顯示0)
  44.         inc b_bit
  45.         mov        a,b_bit
  46.         cjne        a,#3AH,stlop
  47.         mov        b_bit,#30h
  48.         inc c_bit
  49.         mov        a,c_bit
  50.         cjne        a,#3AH,stlop
  51.         mov        c_bit,#30h
  52.         inc d_bit
  53.         mov        a,d_bit
  54.         cjne        a,#3AH,stlop
  55.         mov        d_bit,#30h
  56.         inc e_bit
  57.         mov        a,e_bit
  58.         cjne        a,#3AH,stlop
  59.         mov        e_bit,#30h
  60.         inc f_bit
  61.         mov        a,f_bit
  62.         cjne        a,#3AH,stlop
  63.         mov        f_bit,#30h
  64.         ajmp        stlop
  65. display:                        ;顯示子程序
  66.         MOV P0,#0C9H
  67.         ACALL ENABLE
  68.         MOV A,A_BIT
  69.         ACALL WRILTE2
  70.         MOV P0,#0C8H                ;顯示的位置
  71.         ACALL ENABLE
  72.              MOV A,B_BIT              ;顯示10位數(shù)
  73.         ACALL WRILTE2            ;顯示
  74.         MOV P0,#0C7H                ;數(shù)據(jù)存貯器地址
  75.         ACALL ENABLE
  76.         MOV A,C_BIT
  77.         ACALL WRILTE2
  78.         MOV P0,#0C6H                ;數(shù)據(jù)存貯器地址
  79.         ACALL ENABLE
  80.         MOV A,D_BIT
  81.         ACALL WRILTE2
  82.         MOV P0,#0C5H                ;數(shù)據(jù)存貯器地址
  83.         ACALL ENABLE
  84.         MOV A,E_BIT
  85.         ACALL WRILTE2
  86.         MOV P0,#0C4H                ;數(shù)據(jù)存貯器地址
  87.         ACALL ENABLE
  88.           MOV A,F_BIT
  89.         ACALL WRILTE2
  90.                                 ;1MS延時(按12MHZ算)
  91. ;====================================================
  92. D1MS:        MOV R7,#2
  93.               DJNZ R7,$
  94.               RET
  95. WRILTE2:MOV p0,A  ;顯示
  96.         SETB RS
  97.         CLR RW
  98.         CLR E
  99.         CALL DELAY
  100.         CALL DELAY3
  101.         SETB E
  102.         RET
  103. WRITE1: MOV R1,#00H                   ;顯示table中的值
  104.         A1: MOV A,R1                ;到table取碼
  105.         MOVC A,@A+DPTR
  106.         call  WRILTE2           ;顯示到lcd
  107.         INC R1
  108.         CJNE A,#00H,A1          ;是否到00h
  109.         RET
  110. ENABLE: CLR RS                         ;送命令
  111.         CLR RW
  112.         CLR E
  113.         ACALL DELAY
  114.         SETB E
  115.         RET
  116. DELAY: MOV P0,#0FFH
  117.         CLR RS
  118.         SETB RW
  119.         CLR E
  120.         NOP
  121.         SETB E
  122.         JB P0.7,DELAY                ;判斷忙標(biāo)志
  123.         RET
  124. DELAY3:                         ; 延時程序
  125.         MOV  R7,#255
  126.         D1:MOV R6,#25
  127.         D2: DJNZ R6,D2
  128.         DJNZ R7,D1
  129. RET
  130. table1: db"   Counter      ",00H
  131. end

復(fù)制代碼






歡迎光臨 (http://www.torrancerestoration.com/bbs/) Powered by Discuz! X3.1