A51 MACRO ASSEMBLER  綺陣鍵臺鍵值蟔示砡_騙LCD                                             06/25/2008 14:29:48 PAGE     1


MACRO ASSEMBLER A51 V7.10
OBJECT MODULE PLACED IN 矩陣鍵盤鍵值顯示程序-LCD.OBJ
ASSEMBLER INVOKED BY: C:\Keil\C51\BIN\A51.EXE 矩陣鍵盤鍵值顯示程序-LCD.asm SET(SMALL) DEBUG EP

LOC  OBJ            LINE     SOURCE

                       1     ;--------------------------------------------------------------
                       2     ;矩陣鍵盤定義：
                       3     ;P1.0-P1.3為列線,P1.4-P1.7為行線
                       4     ;--------------------------------------------------------------
  0093                 5                RELAY  EQU  P1.3
  00B7                 6                BEEP   EQU  P3.7
                       7     ;--------------------------------------------------------------
  00A0                 8                RS    EQU  P2.0
  00A1                 9                RW    EQU  P2.1
  00A2                10                EN    EQU  P2.2
  0026                11                X     EQU  26H       ;LCD 地址變量
                      12     ;--------------------------------------------------------------
0000                  13                ORG  0000H
0000 8000             14                JMP  MAIN
                      15     ;--------------------------------------------------------------
0002 758130           16     MAIN:      MOV  SP,#30H
0005 C2A2             17                CLR   EN
0007 111F             18                CALL  SET_LCD
0009 1181             19                CALL  MENU1
000B 3146             20                CALL  BEEP_BL
000D                  21     LOOP0:
000D 7590F0           22                MOV  P1,#0F0H
0010 E590             23                MOV  A,P1
0012 B4F002           24                CJNE  A,#0F0H,LOOP1  ;有鍵按下轉LOOP1
0015 80F6             25                JMP   LOOP0
0017                  26     LOOP1:
0017 11E8             27                CALL  KEY_IN
0019 3115             28                CALL  CONV
001B 3146             29                CALL  BEEP_BL
001D 80EE             30                JMP  LOOP0
                      31     ;-----------------------------------------------------
                      32     ;  LCD 初始化設置
                      33     ;-----------------------------------------------------
001F                  34     SET_LCD:
001F C2A2             35               CLR  EN
0021 1134             36               CALL  INIT_LCD     ;初始化 LCD
0023 3164             37               CALL  DELAY1
0025 90009A           38               MOV  DPTR,#INFO1   ;指針指到顯示信息1
0028 7401             39               MOV  A,#1          ;顯示在第一行
002A 1153             40               CALL  LCD_SHOW
002C 9000AB           41               MOV  DPTR,#INFO2   ;指針指到顯示信息2
002F 7402             42               MOV  A,#2          ;顯示在第二行
0031 1153             43               CALL  LCD_SHOW
0033 22               44               RET
                      45     ;-----------------------------------------------------
0034                  46     INIT_LCD:                 ;8位I/O控制 LCD 接口初始化
0034 7438             47               MOV  A,#38H     ;雙列顯示，字形5*7點陣
0036 11BC             48               CALL  WCOM
0038 3164             49               CALL  DELAY1
003A 7438             50               MOV  A,#38H     ;雙列顯示，字形5*7點陣
003C 11BC             51               CALL  WCOM
003E 3164             52               CALL  DELAY1
0040 7438             53               MOV  A,#38H     ;雙列顯示，字形5*7點陣
0042 11BC             54               CALL  WCOM
0044 3164             55               CALL  DELAY1
0046 740C             56               MOV  A,#0CH     ;開顯示，關光標，
0048 11BC             57               CALL  WCOM
004A 3164             58               CALL  DELAY1
A51 MACRO ASSEMBLER  綺陣鍵臺鍵值蟔示砡_騙LCD                                             06/25/2008 14:29:48 PAGE     2

004C 7401             59               MOV  A,#01H     ;清