Complete Keypad Example

[T.Jackson]

I haven't seen Mister_e's keypad routine. Anyone have the link handy?

[T.Jackson]

Notes & Eratta:
First paragraph under schematic I state: Also, it's worth while noting that the 4MHz crystal isn't critical, you could if you wish use an RC oscillator. You'll save a few bucks. <hr/>*This assumes that you won't be connecting the keypad to the serial port. A crystal is mandatory if you intend to build the project entirely as presented.

[Darrel Taylor]

I haven't seen Mister_e's keypad routine. Anyone have the link handy?

• Matrix Keypad routine
  http://www.picbasic.co.uk/forum/showthread.php?t=3250

But that's OK,

new entries (ways) are welcome!
<br>

[zaferakbay]

güzel çalışma teşekkür ederim



TÜRKİYE

[mister_e]

güzel çalışma teşekkür ederim can't be found

Désolé je ne comprends pas

Sayzer?

[RAYMON]

I find the T.Jackson program very well, but I need a routine or a help for a program, to make a spy, to see example thank you

Col_1 VAR PORTB.4
Col_2 VAR PORTB.5
Col_3 VAR PORTB.6

Row_1 VAR PORTB.3
Row_2 VAR PORTB.2
Row_3 VAR PORTB.1
Row_4 VAR PORTB.0



Col_1/ Row_1 = 1
Col_1/ Row_2 = 4
Col_1/ Row_3 = 7
Col_1/ Row_4 = *

Col_2/ Row_1 = 2
Col_2/ Row_2 = 5
Col_2/ Row_3 = 8
Col_2/ Row_4 = 0

Col_3/ Row_1 = 3
Col_3/ Row_2 = 6
Col_3/ Row_3 = 9
Col_3/ Row_4 = #

CASE 1
Col_1 = 0
Row_1 = 0
Row_2 = 0
Row_3 = 0
Row_4 = 0


'// 1 Key
IF Row_1 = 0 THEN
IF Allow_Key = 0 THEN
Key_Press = 1
Allow_Key = 1
ENDIF
ENDIF
'// 4 Key
IF Row_2 = 0 THEN
IF Allow_Key = 0 THEN
Key_Press = 4
Allow_Key = 1
ENDIF
ENDIF
'// 7 Key
IF Row_3 = 0 THEN
IF Allow_Key = 0 THEN
Key_Press = 7
Allow_Key = 1
ENDIF
ENDIF
'// * Key
IF Row_4 = 0 THEN
IF Allow_Key = 0 THEN
Key_Press = 42
Allow_Key = 1
ENDIF
ENDIF

Scan_Col = 0

http://www.electroniquepratique.com/...idMg=44&id=523

Mini espion pour clavier de PC