?? 24c02.lst
字號:
頁 1
09-11-05
10:10:20
偉福匯編器 V5.00 Copyright (c) 1989, 99 by CHY
地址 機器碼 源程序
clk bit p2.5
dout bit p2.6
SDA BIT P3.5
SCL BIT P3.4
en bit p2.7
KEYBUF EQU 35H
KEY EQU 39H
DISPBUF EQU 20H
FLAG0 EQU 0
;***************************************************
ORG 000H
0000 2100 AJMP START
;***************************************************
ORG 0100H
START:
0100 787F MOV R0,#7FH
0102 E4 CLR A
0103 F6 CLRRAM: MOV @R0,A
0104 D8FD DJNZ R0,CLRRAM
0106 75817D MOV SP,#7DH
;***************************************************
0109 7580FF MOV P0,#0FFH
010C 7590FF MOV P1,#0FFH
010F 75A0FF MOV P2,#0FFH
0112 75B0FF MOV P3,#0FFH
;***************************************************
;初始化參數
;***************************************************
;主程序
;***************************************************
WAIT:
;***************************************************
0115 1201B4 LCALL KEYINPUT ;是否有鍵按下？
0118 E500 MOV A,FLAG0
011A B401F8 CJNE A,#1,WAIT
011D E539 MOV A,KEY
;***************************************************
011F B40B03 CJNE A,#0BH, PANDUAN1
0122 02033D LJMP DISPMIMA
0125 B40C03 PANDUAN1: CJNE A,#0CH, PANDUAN2
0128 020134 LJMP CLRDISP
012B B40A03 PANDUAN2: CJNE A,#0AH, PANDUAN3
012E 02013A LJMP SETMIMA
PANDUAN3:
0131 020115 LJMP WAIT
C:\DOCUMENTS AND SETTINGS\ZHANGTAO\桌面\匯編程序\已調通的程序\LED\24C02.ASM
頁 2
09-11-05
10:10:20
偉福匯編器 V5.00 Copyright (c) 1989, 99 by CHY
地址 機器碼 源程序
;******************************************************************************
;清屏: LED
;******************************************************************************
CLRDISP:
0134 12031B LCALL CLRLED ;LED顯示6個0
0137 020115 LJMP WAIT
;**********************************************
;設置密碼
;**********************************************
SETMIMA:
013A 12014C LCALL TIANC
013D 7BA0 MOV R3,#0A0H
013F 7C01 MOV R4,#01H
0141 7920 MOV R1,#DISPBUF
0143 09 INC R1 ;密碼在DISPBUF+1處
0144 7F06 MOV R7,#6
0146 120176 LCALL WR24C02
0149 020115 LJMP WAIT
;**********************************************
;填充顯示緩沖區556688
TIANC:
014C 7420 MOV A,#DISPBUF
014E F8 MOV R0,A
014F 7400 MOV A,#0H ;小數點位/不顯示
0151 F6 MOV @R0,A
0152 08 inc r0
0153 7408 mov a,#8H
0155 F6 mov @r0,a
0156 08 inc r0
0157 7408 mov a,#08H
0159 F6 mov @r0,a
015A 08 inc r0
015B 7406 mov a,#06H
015D F6 mov @r0,a
015E 08 inc r0
015F 7406 mov a,#06H
0161 F6 mov @r0,a
0162 08 inc r0
0163 7405 mov a,#05H
0165 F6 mov @r0,a
0166 08 inc r0
0167 7405 mov a,#05H
0169 F6 mov @r0,a
016A 08 inc r0
016B 7401 mov a,#01H ;識別碼=01
C:\DOCUMENTS AND SETTINGS\ZHANGTAO\桌面\匯編程序\已調通的程序\LED\24C02.ASM
頁 3
09-11-05
10:10:20
偉福匯編器 V5.00 Copyright (c) 1989, 99 by CHY
地址 機器碼 源程序
016D F6 mov @r0,a
016E 08 inc r0
016F 7401 mov a,#01H ;蜂鳴器鳴叫，二次分頻
0171 F6 mov @r0,a
0172 120308 LCALL DELY10MS
0175 22 RET
;*********************************************************
;****************************************************************************
;寫串行E2PROM子程序WR24C02
; (R3)=10100000（命令1010+器件3位地址+讀/寫(1/0)。 器件地址：一個芯片是000）
; (R4)=片內字節地址
; (R1)=欲寫數據存放地址指針
; (R7)=連續寫字節數n
;****************************************************************************
WR24C02:
0176 75B0FF MOV P3,#0FFH
0179 C2B5 CLR SDA ; 發開始信號
017B EB MOV A,R3 ; 送器件地址
017C 3192 ACALL SUBS
017E EC MOV A,R4 ; 送片內字節地址
017F 3192 ACALL SUBS
AGAIN:
0181 E7 MOV A,@R1
0182 3192 ACALL SUBS ;調發送單字節子程序
0184 09 INC R1
0185 DFFA DJNZ R7,AGAIN;連續寫n個字節
0187 C2B5 CLR SDA ;SDA置0, 準備送停止信號
0189 31AD ACALL DELAY2 ;延時以滿足傳輸速率要求
018B D2B4 SETB SCL ;發停止信號
018D 31AD ACALL DELAY2
018F D2B5 SETB SDA
0191 22 RET
SUBS:
0192 7808 MOV R0,#08H ;發送單字節子程序
LOOP11:
0194 C2B4 CLR SCL
0196 33 RLC A
0197 92B5 MOV SDA,C
0199 00 NOP
019A D2B4 SETB SCL
019C 31AD ACALL DELAY2
019E D8F4 DJNZ R0,LOOP11 ;循環8次送8個bit
01A0 C2B4 CLR SCL
01A2 31AD ACALL DELAY2
01A4 D2B4 SETB SCL
01A6 A2B5 REP: MOV C,SDA
01A8 40FC JC REP ;判應答到否，未到則等待
01AA C2B4 CLR SCL
C:\DOCUMENTS AND SETTINGS\ZHANGTAO\桌面\匯編程序\已調通的程序\LED\24C02.ASM
頁 4
09-11-05
10:10:20
偉福匯編器 V5.00 Copyright (c) 1989, 99 by CHY
地址 機器碼 源程序
01AC 22 RET
DELAY2:
01AD 00 NOP
01AE 00 NOP
01AF 00 NOP
01B0 00 NOP
01B1 00 NOP
01B2 00 NOP
01B3 22 RET
;*******************************************************************************************
;鍵盤處理子程序
;input: KEYBUF,TAB
;OUTPUT: KEY:鍵值
;出口：FLAG0=1 有按鍵
; 0 無
;*******************************************************************************************
KEYINPUT:
01B4 753502 MOV KEYBUF,#2
;
01B7 7580FF MOV P0,#0FFH
01BA C284 CLR P0.4
01BC E580 MOV A,P0
01BE 540F ANL A,#0FH
01C0 640F XRL A,#0FH ;有鍵按下嗎？
01C2 6047 JZ NOKEY1
01C4 120311 LCALL DELY10US
01C7 E580 MOV A,P0
01C9 540F ANL A,#0FH
01CB 640F XRL A,#0FH ;真的有鍵按下嗎？
01CD 603C JZ NOKEY1
01CF E580 MOV A,P0
01D1 540F ANL A,#0FH
01D3 B40E06 CJNE A,#0EH,NK1 ;鍵碼的值是多少？P0.4xP0.0
01D6 753503 MOV KEYBUF,#3
01D9 0201F8 LJMP DK1
01DC B40D06 NK1: CJNE A,#0DH,NK2 ;鍵碼是P0.4xP0.1 ?
01DF 753502 MOV KEYBUF,#2
01E2 0201F8 LJMP DK1
01E5 B40B06 NK2: CJNE A,#0BH,NK3 ;鍵碼是P0.4xP0.2 ?
01E8 753501 MOV KEYBUF,#1
01EB 0201F8 LJMP DK1
01EE B40706 NK3: CJNE A,#07H,NK4 ;鍵碼是P0.4xP0.3 ?
01F1 753500 MOV KEYBUF,#0
01F4 0201F8 LJMP DK1
01F7 00 NK4: NOP
C:\DOCUMENTS AND SETTINGS\ZHANGTAO\桌面\匯編程序\已調通的程序\LED\24C02.ASM
頁 5
09-11-05
10:10:20
偉福匯編器 V5.00 Copyright (c) 1989, 99 by CHY
地址 機器碼 源程序
DK1:
01F8 E535 MOV A,KEYBUF
01FA 9003ED MOV DPTR,#TAB
01FD 93 MOVC A,@A+DPTR ;查表，取鍵值
01FE F539 MOV KEY,A
0200 750001 MOV FLAG0,#1 ;FLAG0=1
0203 E580 DK1A: MOV A,P0
0205 540F ANL A,#0FH
0207 640F XRL A,#0FH ;按鍵有沒有松開？
0209 70F8 JNZ DK1A
NOKEY1:
020B 7580FF MOV P0,#0FFH
020E C285 CLR P0.5
0210 E580 MOV A,P0
0212 540F ANL A,#0FH
0214 640F XRL A,#0FH
0216 6047 JZ NOKEY2
0218 120311 LCALL DELY10US
021B E580 MOV A,P0
021D 540F ANL A,#0FH
021F 640F XRL A,#0FH
0221 603C JZ NOKEY2
0223 E580 MOV A,P0
0225 540F ANL A,#0FH
0227 B40E06 CJNE A,#0EH,NK5
022A 753507 MOV KEYBUF,#7
022D 02024C LJMP DK2
0230 B40D06 NK5: CJNE A,#0DH,NK6
0233 753506 MOV KEYBUF,#6
0236 02024C LJMP DK2
0239 B40B06 NK6: CJNE A,#0BH,NK7
023C 753505 MOV KEYBUF,#5
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -