????? Chống Rung Phím Bằng Cách Lưu Lại Thành Old??

[hồng quyên]

em có đọc bài viết của anh hoctro89xxx

PP như sau:
Với nút bấm xuống 0V:
đọc bàn phím -> lưu lại thành OLD

đọc bàn phím-> HIỆN TẠI
phân tích từng phím:
nếu HIỆN TẠI =0 và OLD =1 --> có bấm
gán OLD = HIỆN TẠI

Mặc dù khi bấm và nhả có xuất hiện các xung nhưng trên thực tế PP này khung bị rung phím.
-----em thầy pp đó rất hay nhưng em chưa hiểu về nguyên lý cũng như cách viết như thế nào!!!vậy các anh có thể giải thích rõ hơn giúp em cách viết chương trình này đuợc kg Ạ??
EM CẢM ƠN!!!

[hoctro89xxx]

em có đọc bài viết của anh hoctro89xxx

PP như sau:
Với nút bấm xuống 0V:
đọc bàn phím -> lưu lại thành OLD

đọc bàn phím-> HIỆN TẠI
phân tích từng phím:
nếu HIỆN TẠI =0 và OLD =1 --> có bấm
gán OLD = HIỆN TẠI

Mặc dù khi bấm và nhả có xuất hiện các xung nhưng trên thực tế PP này khung bị rung phím.
-----em thầy pp đó rất hay nhưng em chưa hiểu về nguyên lý cũng như cách viết như thế nào!!!vậy các anh có thể giải thích rõ hơn giúp em cách viết chương trình này đuợc kg Ạ??
EM CẢM ƠN!!!

Nếu muốn rõ hơn hãy YM cho tôi nhé!

[gtvt45]

To Hồng Quyên ...

bạn có thể tham khảo file này khảo sát bàn phím 3x3.
Hy vọng giúp dc bạn.
Ok

#include<sfr51.inc>
org 00h
ljmp main
org 40h
main:       mov    sp,#5fh  
quet_phim:  mov    p2,#00111000b        ;dua 1 ra hang , dua 0 ra cot
            jnb    p2.3,hang1
            jnb    p2.4,hang2
            jnb    p2.5,hang3
            sjmp   khong_bam
            sjmp   quet_phim
hang1:      mov    p2,#00110111b
            jnb    p2.0,phim0
            jnb    p2.1,phim1
            jnb    p2.2,phim2
            sjmp   khong_bam
hang2:      mov    p2,#00101111b
            jnb    p2.0,phim3
            jnb    p2.1,phim4
            jnb    p2.2.phim5
            sjmp   khong_bam
hang3:      mov    p2,#00011111b
            jnb    p2.0.phim6
            jnb    p2.1,phim7
            jnb    p2.2,phim8
            sjmp   khong_bam
            sjmp   quet_phim
end
phim0:      lcall  chong_rung
            mov    p0,#11111110b              ;sang led 0
            ret
phim1:      lcall  chong_rung
            mov    p0.#11111101b              ;sang led 1
            ret
phim2:       lcall  chong_rung
            mov    p0,#11111011b              ;sang led 2
            ret
phim3:      lcall  chong_rung
            mov    p0,#11110111b              ;sang led 3
            ret
phim4:      lcall  chong_rung
            mov    p0,#11101111b              ;sang led 4
            ret
Phim5:      lcall  chong_rung
            mov    p0,#11011111b              ;sang led 5
            ret
Phim6:      lcall  chong_rung
            mov    p0,#10111111b              ;sang led 6
            ret
Phim7:      lcall  chong_rung
            mov    p0,#01111111b              ;sang led 7
            ret
            
phim8:      lcall  chong_rung
            mov    p0,#00000000b              ;sang tat ca ca led
            ret
khong_bam:  mov    R0,#00000000b
            ret
chong_rung: mov    R0,#20
ch0:        mov    R1,#100
ch1:        mov    R2,#100
ch2:        mov    R3,#50
Ch3:        djnz   ch3,R3
            djnz   ch2,R2
            djnz   ch1,R1  
            djnz   ch0,20 
ret