作者ruemann (此人掛網中……)
看板ASM
標題Re: [問題] 鍵盤掃描的PORT問題
時間Sun Apr 6 21:05:51 2008
ROW REG R2 ;ROW=R2
KEYFLAG REG R3 ;KEYFLAG=R3
START:
MOV P0,#0 ;P0=0,8個LED熄滅
LOOP1:
MOV P2,#0EFH ;P2=0EFH,初始掃描線
MOV ROW,#0 ;ROW=0,設為第0列
NEXT1:
MOV A,P2 ;A=P2,獲得狀態
ANL A,#0FH ;A=A&0FH,保留低4Bits
CJNE A,#0FH,OUT1 ;若A<>0FH(有按鍵),則跳至OUT1
MOV A,P2 ;A=P2
RL A ;A=A<-A,左移一位
ORL A, #0F0H ; 這行不一定要
MOV P2,A ;P2=A,得新掃描線
INC ROW ;ROW=ROW+1,下一列
CJNE ROW,#5,NEXT1 ;若ROW<>5,則跳至NEXT1
SJMP LOOP1 ;GOTO LOOP1
OUT1:
ACALL DELAY20MS ;呼叫延遲20毫秒(消除彈跳)
MOV A,P2 ;A=P2,獲得狀態
ANL A,#0FH ;A=A&0FH,保留低4Bits
CJNE A,#0FH,OUT2 ;若A<>0FH(有按鍵),則跳至OUT2
SJMP LOOP1 ;GOTO LOOP1
OUT2:
MOV DPTR,#IDXCOL ;DPTR=#IDXCOL之位址
MOVC A,@A+DPTR ;A=[DPTR+A]位址上的資料
MOV B,A ;B=A
MOV A,ROW ;A=ROW
RL A ;A=A<-A
RL A ;A=A<-A,左移二次為其乘4
ANL A,
#11111100B ;A=A&0FCH,去掉低2Bits
ADD A,B ;A=A+B,獲得健值
MOV P0,A ;P0=A,輸出LED顯示
LOOP2: ;此處為避免重覆按鍵
MOV A,P2 ;A=P2,獲得狀態
ANL A,#0FH ;A=A&0FH,保留低4Bits
CJNE A,#0FH,LOOP2 ;若A<>0FH(有按鍵),則跳至LOOP2
ACALL DELAY20MS ;呼叫延遲20毫秒(消除彈跳)
MOV A,P2 ;A=P2
ANL A,#0FH ;A=A&0FH,保留低4Bits
CJNE A,#0FH,LOOP2 ;若A<>0FH(有按鍵),則跳至LOOP2
SJMP LOOP1 ;GOTO LOOP1
DELAY20MS:
ACALL DELAY10MS ;呼叫延遲10毫秒
ACALL DELAY10MS ;呼叫延遲10毫秒
RET
include delay.inc ;
IDXCOL: ;計算鍵值資料區
DB 0,1,0,2
DB 0,1,0,3
DB 0,1,0,2
DB 0,1,0,4
END ;程式結束
以上是這套軟體裡面的範例，
線路的設定是P1.0 P1.1 P1.2 P1.3為鍵盤的輸入，
P2.0 P2.1 P2.2 P2.3為鍵盤的輸出，
因為這樣的設定，會浪費到PORT1.4~1.7和2.4~2.7，
所以想說把P1.0~P1.3的部分轉移到P2.4~2.7
沒有改幾行，不過應該可以達成你要的功能，先試試看吧
--
我只是個想賺 P 幣的迷途小羔羊
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 203.70.244.225
1F：推 zmc0076:謝謝你，這個改法好像還是不行= =" 04/07 14:49
2F：→ ruemann:跑出什麼結果？ 04/07 22:11
3F：推 zmc0076:好改好了~~不好意思這麼久才來回~~ 04/13 14:26
4F：→ zmc0076:總共改的地方 P1全部改成P2 ROW迴圈改成4 初始掃描EF 04/13 14:27
5F：→ zmc0076:就這幾個地方而已，但是有時會錯亂，我還在找原因~ 04/13 14:27
6F：→ zmc0076:不過基本LED燈已經可以從0~F了 04/13 14:29