No Worries. I actually had a fair bit more to write, 10,000 character limit is cumbersome to work with. I"m currently reading over things, trying to shorten sentences in attempts to fit more in. Would prefer to keep it all as one single post.
No Worries. I actually had a fair bit more to write, 10,000 character limit is cumbersome to work with. I"m currently reading over things, trying to shorten sentences in attempts to fit more in. Would prefer to keep it all as one single post.
Its quite simple for me
Code:<font color="#000080">@Config = _XT_OSC & _WDT_OFF & _PWRTE_OFF & _LVP_OFF & _BODEN_OFF </font><font color="#800000"><b>DEFINE </b></font><b>PIC16F877A </b><font color="#800000"><b>DEFINE </b></font><b>OSC </b><font color="#0000FF"><b>4 </b></font><font color="#800000"><b>INCLUDE </b></font><font color="#FF0000"><b>"KeyPad.bas" </b></font><font color="#0000FF"><b><i>' ( mister_e 's great keypad include file ) </i></b></font><font color="#800000"><b>INCLUDE </b></font><font color="#FF0000"><b>"MYLCD.BAS" </b></font><b>CMCON = </b><font color="#0000FF"><b>7 </b></font><b>ADCON1 = </b><font color="#0000FF"><b>7 </b></font><b>myvar </b><font color="#800000"><b>VAR BYTE </b></font><b>start: </b>@ <b>READKEYPAD _myvar </b><font color="#800000"><b>LCDOUT </b></font><font color="#0000FF"><b>$fe</b></font><b>,</b><font color="#0000FF"><b>1 </b></font><font color="#800000"><b>LCDOUT </b></font><font color="#FF0000"><b>" Key Value = "</b></font><b>,</b><font color="#800000"><b>DEC2 </b></font><b>myvar </b><font color="#800000"><b>GOTO </b></font><b>start </b>
I haven't seen Mister_e's keypad routine. Anyone have the link handy?
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.
- Matrix Keypad routine
http://www.picbasic.co.uk/forum/showthread.php?t=3250
But that's OK,
new entries (ways) are welcome!
<br>
DT
güzel çalışma teşekkür ederim
TÜRKİYE
Last edited by Archangel; - 2nd July 2015 at 08:25.
Désolé je ne comprends pasOriginally Posted by langtolan.com
Sayzer?
Steve
It's not a bug, it's a random feature.
There's no problem, only learning opportunities.
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
Bookmarks