4x3 alfanumerisk tastatur

B

brennbar67

Guest
Vet noen hvordan skrive et program som kunne vise tegn keyed av tastaturet?
Alle som fikk c-kildekoden eller forsamlingen koden?
Hvis du kan sende meg materialet, er det stor pris ...

<img src="http://www.edaboard.com/images/smiles/icon_smile.gif" alt="Smil" border="0" />
 
Jeg brukte pic kontrolleren.men 4X4-tasten

;**********************************************
; STEP å følge når teste dette programmet
; 1.Connect RS232 eller RS422 kabel mellom styret og PC.
; 2.Download dette programmet CPU.
; 3.Run terminal program som Procom pluss, XTALK etc.
; 4.Set parameter Procom pluss til 9600 baud, Ingen paritet, 8 biter og 1 bit.stoppe
; 5.Connect Keyboard 4x4 til KBI / IO ombord CP-PIC v4.0
; RB4 koble rad 1
; RB5 koble rad 2
; RB6 koble rad 3
; RB7 koble rad 4
; RD0 koble kolonne 1
; RD1 koble kolonne 2
; RD2 koble kolonne 3
; RD3 koble kolonne 4
; 6.Press en tast på tastaturet, vil du se nøkkelen du trykket.
;**********************************************

listen p = 16f877; listen direktivet definerer prosessor
#
include <p16f877.inc>; prosessor bestemt variabel definisjoner

telle EQU 0x21
colm EQU 0x22
dt1 EQU 0x23
dt2 EQU 0x24
dt3 EQU 0x25

Org 0x0000

;************ Første *******************

init bsf status, RP0; velger bank 1
clrf TRISD
movlw 0xff
movwf TRISB
BCF OPTION_REG, 7
movlw 0x40; baudhastighet 9600
movwf SPBRG
clrf TXSTA; 8 bits data, ingen, 1 stoppe

BCF status RP0; velger banken 0
bsf RCSTA, brukes; Asynkrone seriell port aktivere
bsf RCSTA, CREN; kontinuerlig motta

bsf status, RP0; velger banken 0
bsf TXSTA, TXEN; Overføringsbuffer aktivere
BSF TXSTA, BRGH; Hi Speed
BCF status RP0; velger banken 0
;********** Begynne å sende **********************
skanne movlw 0xfe; starte skanningen kolonne 1
movwf colm
clrf teller; klart counter
scan1 movf colm, W; skanne kolonne
movwf PORTD
btfss PORTB, 4; sjekk RB4
goto sw_1
btfss PORTB, 5; sjekk RB5
goto sw_2
btfss PORTB, 6; sjekk RB6
goto sw_3
btfss PORTB, 7; sjekk RB7
goto sw_4
movlw ,4
clrc; klart bære flagg
addwf telle, f
clrc
rlf colm, f; rotere skanne
btfsc colm, 4; sjekk siste kolonnen
goto scan1
goto skanne; starte skanningen

sw_4 incf telle, f
sw_3 incf telle, f
sw_2 incf telle, f
sw_1 movf telle, w

ringe TAB
samtale sende; sende data til RS232
samtale forsinkelse
goto skanne; Tilbake til skanning

send movwf TXREG; Send nyere data til TX
wait1 movlw TXSTA;
movwf FSR fortsetter
btfss INDF, 1; sjekk TRMT bit i TXSTA (FSR fortsetter)
goto wait1; TXREG full eller TRMT = 0
tilbake

forsinkelse movlw 3; forsinkelse
movwf dt1
sd3 clrf dt2
sd2 clrf dt3
sd1 decfsz dt3
goto sd1
decfsz dt2
goto sd2
decfsz dt1
goto sd3
tilbake

;********* Tebel melding ********************

TAB addwf PCL, f; Flytt utlignet til PC lavere

DT "0", "1", "2", "3", "4", "5", "6", "7", "8", "9", "A", "B", " C "," D "," E "," F "

 
Les Appplication Merk AN234
Maskinvare teknikker for PICmicro  Microcontrollers
Fra Microchip
Du kan lese 20 Key fra 1 pin
(A2D)

 
Forbindelse
http://ww1.microchip.com/downloads/en/AppNotes/00234a.pdf

God design for foreta tastatur og ledet sjåfør

 

Welcome to EDABoard.com

Sponsor

Back
Top