⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 44键盘多模块演示程序.txt

📁 44键盘多模块演示程序
💻 TXT
📖 第 1 页 / 共 2 页
字号:
4*4键盘多模块演示程序(51汇编)
;--------PS/2-----------------------
PS2CLOCK       BIT   INT1;PC小键盘时钟
PS2DATA        BIT   T1;PC小键盘数据
;--------X5045----------------------
WREN           EQU   00000110B;
WRDI           EQU   00000100B;
RDSR           EQU   00000101B;
WRSR           EQU   00000001B;
READ           EQU   00000011B;
WRITE          EQU   00000010B;
WD1            BIT   5;
WD0            BIT   4;
BL1            BIT   3;
BL0            BIT   2;
WEL            BIT   1;
WIP            BIT   0;
;%%%%%%%DS1302串行时钟芯片%%%%%%%%%%%%%%%%%%%%
timerst        BIT P2.2
timeio         BIT P2.5
timeclk        BIT P2.6

timemaxaddr    EQU 01fh;(XX11111X)

;                 rDDDDDr(1)
;                1a     /
;                 m43210w(0)
timewriteram0  EQU 11000000b;0c0h
timereadram0   EQU 11000001b;0c1h
timewriteram1  EQU 11000010b;0c2h
timereadram1   EQU 11000011b;0c3h
timewriteram2  EQU 11000100b;0c4h
timereadram2   EQU 11000101b;0c5h
timewriteram3  EQU 11000110b;0c6h
timereadram3   EQU 11000111b;0c7h
timewriteram4  EQU 11001000b;0c8h
timereadram4   EQU 11001001b;0c9h
timewriteram5  EQU 11001010b;0cah
timereadram5   EQU 11001011b;0cbh
timewriteram6  EQU 11001100b;0cch
timereadram6   EQU 11001101b;0cdh
timewriteram7  EQU 11001110b;0ceh
timereadram7   EQU 11001111b;0cfh
timewriteram8  EQU 11010000b;0d0h
timereadram8   EQU 11010001b;0d1h
timewriteram9  EQU 11010010b;0d2h
timereadram9   EQU 11010011b;0d3h
timewriteram10 EQU 11010100b;0d4h
timereadram10  EQU 11010101b;0d5h
timewriteram11 EQU 11010110b;0d6h
timereadram11  EQU 11010111b;0d7h
timewriteram12 EQU 11011000b;0d8h
timereadram12  EQU 11011001b;0d9h
timewriteram13 EQU 11011010b;0dah
timereadram13  EQU 11011011b;0dbh
timewriteram14 EQU 11011100b;0dch
timereadram14  EQU 11011101b;0ddh
timewriteram15 EQU 11011110b;0deh
timereadram15  EQU 11011111b;0dfh
timewriteram16 EQU 11100000b;0e0h
timereadram16  EQU 11100001b;0e1h
timewriteram17 EQU 11100010b;0e2h
timereadram17  EQU 11100011b;0e3h
timewriteram18 EQU 11100100b;0e4h
timereadram18  EQU 11100101b;0e5h
timewriteram19 EQU 11100110b;0e6h
timereadram19  EQU 11100111b;0e7h
timewriteram20 EQU 11101000b;0e8h
timereadram20  EQU 11101001b;0e9h
timewriteram21 EQU 11101010b;0eah
timereadram21  EQU 11101011b;0ebh
timewriteram22 EQU 11101100b;0ech
timereadram22  EQU 11101101b;0edh
timewriteram23 EQU 11101110b;0eeh
timereadram23  EQU 11101111b;0efh
timewriteram24 EQU 11110000b;0f0h
timereadram24  EQU 11110001b;0f1h
timewriteram25 EQU 11110010b;0f2h
timereadram25  EQU 11110011b;0f3h
timewriteram26 EQU 11110100b;0f4h
timereadram26  EQU 11110101b;0f5h
timewriteram27 EQU 11110110b;0f6h
timereadram27  EQU 11110111b;0f7h
timewriteram28 EQU 11111000b;0f8h
timereadram28  EQU 11111001b;0f9h
timewriteram29 EQU 11111010b;0fah
timereadram29  EQU 11111011b;0fbh
timewriteram30 EQU 11111100b;0fch
timereadram30  EQU 11111101b;0fdh
timewriteramall EQU 11111110b;0feh;多字节写DS1302命令(ram)
timereadramall EQU 11111111b;0ffh;多字节读DS1302命令(ram)


;                 rDDDDDr(1)
;                1a     /
;                 g43210w(0)

timewriteseg   EQU 10000000b;080h
timereadseg    EQU 10000001b;081h

timewritemin   EQU 10000010b;082h
timereadmin    EQU 10000011b;083h

timewritehr    EQU 10000100b;084h
timereadhr     EQU 10000101b;085h

timewritedate  EQU 10000110b;086h
timereaddate   EQU 10000111b;087h

timewritemonth EQU 10001000b;088h
timereadmonth  EQU 10001001b;089h

timewriteday   EQU 10001010b;08ah
timereadday    EQU 10001011b;08bh

timewriteyear  EQU 10001100b;08ch
timereadyear   EQU 10001101b;08dh

timewriteregall EQU 10001110b;08eh;多字节写DS1302命令(reg)
timereadregall EQU 10001111b;08fh;多字节读DS1302命令(reg)

tricklewrite    equ  10010000b;90h
trickleread     equ  10010001b;91h
;-------------------------------------------------
;                    HABCDEFG
LEDCHAR0        EQU  01111110B;\'0\'
LEDCHAR1        EQU  00110000B;\'1\'
LEDCHAR2        EQU  01101101B;\'2\'
LEDCHAR3        EQU  01111001B;\'3\'
LEDCHAR4        EQU  00110011B;\'4\'
LEDCHAR5        EQU  01011011B;\'5\'
LEDCHAR6        EQU  01011111B;\'6\'
LEDCHAR7        EQU  01110000B;\'7\'
LEDCHAR8        EQU  01111111B;\'8\'
LEDCHAR9        EQU  01111011B;\'9\'
LEDCHARA        EQU  01110111B;\'A\'
LEDCHARB        EQU  00011111B;\'B\'
LEDCHARC        EQU  01001110B;\'C\'
LEDCHARD        EQU  00111101B;\'D\'
LEDCHARE        EQU  01001111B;\'E\'
LEDCHARF        EQU  01000111B;\'F\'
LEDCHAR         EQU  11111111B;\'8.\'
;-------------------------------------------------
TIME1_25MS      EQU  -1152;-1250*0.9216;1.25MS
TIME8MS         EQU  -8000;*0.9216;8MS
;-----------------------------------------------
DEFBEEPMODE1        EQU 10000000B;响1声
DEFBEEPMODE2        EQU 10110000B;响2声
DEFBEEPMODE3        EQU 10101100B;响3声
DEFBEEPMODE4        EQU 10101011B;响4声
;-------------------------------------
CS      BIT     P2.7
WDT    BIT       P2.7;X5045CS
SCK     BIT     P2.6
SI      BIT     P2.5
SO      BIT     P2.5
SIO     BIT     P2.5
WP      BIT     P2.4
BEEP    BIT    P2.3
RST     BIT     P2.2;DS1302CS
;------------------------------------
ISDCS   BIT     P2.4;ISD4004
SCLK    BIT     P2.6
MOSI    BIT     P2.5
MISO    BIT     P2.5
;-------------------------------------
LOAD    BIT     P2.1;MAX7219CS
CLK     BIT     P2.6
DIN     BIT     P2.5
;------------------------------------
;BBCBUS BIT     P2.0;模拟串口(9600bps)
;-----------------------------------
; 8052 Extensions
WDTRST  DATA    0A6H
AUXR    DATA    08EH
T2CON   DATA    0C8H
RCAP2L  DATA    0CAH
RCAP2H  DATA    0CBH
TL2     DATA    0CCH
TH2     DATA    0CDH
ET2     BIT     0ADH
PT2     BIT     0BDH
T2EX    BIT     091H
T2      BIT     090H
TF2     BIT     0CFH
EXF2    BIT     0CEH
RCLK    BIT     0CDH
TCLK    BIT     0CCH
EXEN2   BIT     0CBH
TR2     BIT     0CAH
C_T2    BIT     0C9H
CP_RL2  BIT     0C8H
;-------RS1EQU0,RS0EQU0 系统服务区----------
REGR00     DATA    000H
REGR01     DATA    001H
REGR02     DATA    002H
REGR03     DATA    003H
REGR04     DATA    004H
REGR05     DATA    005H
REGR06     DATA    006H
REGR07     DATA    007H

R00     DATA    000H
R01     DATA    001H
R02     DATA    002H
R03     DATA    003H
R04     DATA    004H
R05     DATA    005H
R06     DATA    006H
R07     DATA    007H
;-------RS1EQU0,RS0EQU1 系统服务区----------
R10     DATA    008H
R11     DATA    009H
R12     DATA    00AH
R13     DATA    00BH
R14     DATA    00CH
R15     DATA    00DH
R16     DATA    00EH
R17     DATA    00FH
;-------RS1EQU1,RS0EQU0 键盘缓冲区----------
R20     DATA    010H
R21     DATA    011H
R22     DATA    012H
R23     DATA    013H
R24     DATA    014H
R25     DATA    015H
R26     DATA    016H
R27     DATA    017H
;-------RS1EQU1,RS0EQU1 键盘缓冲区----------
R30     DATA    018H
R31     DATA    019H
R32     DATA    01AH
R33     DATA    01BH
R34     DATA    01CH
R35     DATA    01DH
R36     DATA    01EH
R37     DATA    01FH
;---------------系统定义------------------
KEYBUF1          DATA   20H
KEYBUF2          DATA   21H
KEYCOUNT         DATA   22H;键号
LEDBIT           DATA   23H;
LEDCPLBIT        BIT    LEDBIT.0
BEEPMODE         DATA   2FH
;-----------------------------------------
BEEPCOUNT        DATA   30H
BEEPBUFF         DATA   31H
SYSTEMTIME1_25MS DATA   32H;1.25MS
SYSTEMTIME125MS  DATA   33H;0.5秒
SYSTEMTIME500MS  DATA   34H;0.5秒
;----------------------------------------
LEDHIGHBUFF1     DATA   40H
LEDLOWBUFF1      DATA   41H
LEDHIGHBUFF2     DATA   42H
LEDLOWBUFF2      DATA   43H
;----------------------------------------
TIMEWRBIT        DATA   48H;时间写入位
;----------------------------------------
LEDBUFF          DATA   50H;50H~5FH
LEDBUFF0         DATA   50H
LEDBUFF1         DATA   51H
LEDBUFF2         DATA   52H
LEDBUFF3         DATA   53H
LEDBUFF4         DATA   54H
LEDBUFF5         DATA   55H
LEDBUFF6         DATA   56H
LEDBUFF7         DATA   57H
LEDBUFF8         DATA   58H
LEDBUFF9         DATA   59H
LEDBUFFA         DATA   5AH
LEDBUFFB         DATA   5BH
LEDBUFFC         DATA   5CH
LEDBUFFD         DATA   5DH
LEDBUFFE         DATA   5EH
LEDBUFFF         DATA   5FH
RAM_55H      DATA   7EH
RAM_AAH      DATA   7FH
;---------------------------------------
SP_MIN         DATA RAM_AAH
;-------主程序开始----------------------
    ORG    0000H
START:
    LJMP  MAINSTART;主程序开始
    ORG   0003H
;-------掉电保护中断INT0服务程序--------
INT0_INTADDR:
    RETI
    ORG   000BH
;-------定时器T0中断服务程序------------
T0_INTADDR:
    LJMP  T0INTPROC;定时器T0中断服务程序
    RETI
    ORG   0013H
;-------外部中断INT1服务程序------------
INT1_INTADDR:
        LJMP  PS2PROC;PS/2键盘中断服务程序
    RETI
    ORG   001BH
;-------定时器T1中断服务程序------------
T1_INTADDR:
    LJMP  T1INTPROC;定时器T1中断服务程序
    RETI
    ORG   0023H
;-------串行中断服务程序----------------
SINT_INTADDR:
    RETI
    ORG   002BH
;-------定时器T2中断服务程序------------
    LJMP  T2INTPROC;执行中断服务程序
    RETI
;-------取键号---------------------------
GETKEYNUM:
        MOV   A,KEYCOUNT;取键号;0~15
    ANL   A,#0FH
    ADD   A,#LOW(KEYVALTAB-GETKEYNUMOFF)
    MOVC  A,@A+PC
GETKEYNUMOFF:
    RET
;-------4*4键盘接线示意-----------------
;         |  |  |  |
;P1.7  <->C--8--4--0--
;P1.6  <->D--9--5--1--
;P1.5  <->E--A--6--2--
;P1.4  <->F--B--7--3--
;P1.3  <->|  |  |  |
;P1.2  <---->|  |  |
;P1.1  <------->|  |
;P1.0  <---------->|
;-------键值表---------------------------
KEYVALTAB:
KEY07:  DB    10000001B;0(p1.0-p1.7)
KEY06:  DB    01000001B;1(p1.0-p1.6)
KEY05:  DB    00100001B;2(p1.0-p1.5)
KEY04:  DB    00010001B;3(p1.0-p1.4)

KEY17:  DB    10000010B;4(p1.1-p1.7)
KEY16:  DB    01000010B;5(p1.1-p1.6)
KEY15:  DB    00100010B;6(p1.1-p1.5)
KEY14:  DB    00010010B;7(p1.1-p1.4)

KEY27:  DB    10000100B;8(p1.2-p1.7)
KEY26:  DB    01000100B;9(p1.2-p1.6)
KEY25:  DB    00100100B;A(p1.2-p1.5)
KEY24:  DB    00010100B;B(p1.2-p1.4)

KEY37:  DB    10001000B;C(p1.3-p1.7)
KEY36:  DB    01001000B;D(p1.3-p1.6)
KEY35:  DB    00101000B;E(p1.3-p1.5)
KEY34:  DB    00011000B;F(p1.3-p1.4)
;-------执行键盘命令----------------------
;本程序利用散转回收技术
;它的最大优点是散转处的子程序可被它用
KEYPROC:
    ANL   A,#00111111B;有键压下键码0~15,16~31
    MOV   B,A
    RL    A;*2
    MOV   R1,A
    ADD   A,#LOW(KEYJMPPROCTAB-KEYPROC_OFF1+1)
    MOVC  A,@A+PC;取低8位地址
KEYPROC_OFF1:
        PUSH  ACC;压入低8位地址
    MOV   A,R1
    ADD   A,#LOW(KEYJMPPROCTAB-KEYPROC_OFF2)
    MOVC  A,@A+PC;取高8位地址
KEYPROC_OFF2:
        PUSH  ACC;压入高8位地址
        MOV   A,B;取键号;0~15
    RET;执行键盘命令
;-------压键事件处理地址表--------------------
KEYJMPPROCTAB:
    DW    KEYPROC0
    DW    KEYPROC1
    DW    KEYPROC2
    DW    KEYPROC3
    DW    KEYPROC4
    DW    KEYPROC5

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -