16f877 and ps/2 keyboard error???
Hi! I have been trying to make an interface between 16f877 and ps/2 keyboard but although I have connected the data and clk pins to PB.7 and PB.6 , I cannot see anything on my glcd.
Should I connect these pins with any pullup resistors from 5V or what shoud I do ??
I'm writing my codes below.. Pls help me!
Thans A Lot....
Code:
Include "PROTON18_452.BAS"
Device 16F877
WARNINGS = OFF
TRISB=%0110000
Symbol Giris PORTB.6
Symbol Clk PORTB.5
Dim dur As Bit
Dim ComingData As Byte
Dim B0 As Byte
Dim xpos As Byte
Dim ypos As Byte
Dim OKU As Byte
Dim ADRS As Word
Dim TEKRAR As Word
Dim ARRAY1[9] As Byte
Cls
BEGIN:
Dim i As Word
For i = 0 To 10 Step 1 '11 bitlik veri gelecek
While Clk =1 ' Ilk önce Clock=1 olmali
Wend
If i<9 & i>0 Then
ARRAY1[i]=ComingData
EndIf
While Clk = 0
Wend
While Clk = 0
Wend
Next
Cls
Print At 2,2, Str ARRAY1
DelayMS 500
GoTo BEGIN
End
Include "FONT.INC"
second part of the code for initalize GLCD ... There isn't any error..
Code:
' PROTON board for 16 series device
' Operating on 4MHz.
' Using a GRAPHIC LCD with an internal FONT
Device 16F877
XTAL 4
TRISB=%11010000
TRISA=%00000110
PORTB=0
LCD_DTPORT = PORTD
LCD_RSPIN = PORTC.1
LCD_ENPIN = PORTE.0
LCD_RWPIN = PORTC.0
LCD_CS1PIN = PORTE.1
LCD_CS2PIN = PORTE.2
LCD_TYPE = GRAPHIC
INTERNAL_FONT = On
FONT_ADDR = 0
SDA_PIN = PORTC.4
SCL_PIN = PORTC.3
SERIAL_BAUD = 2400
RSOUT_PIN = PORTC.6
RSOUT_MODE = TRUE
RSOUT_PACE = 1
RSIN_PIN = PORTC.7
RSIN_MODE = TRUE
HSERIAL_BAUD = 2400 ' Set baud rate to 2400
HSERIAL_RCSTA = %10010000 ' Enable serial port and continuous receive
HSERIAL_TXSTA = %00100100 ' Enable transmit and asynchronous mode
HSERIAL_CLEAR = On ' Enable Error clearing on received characters
'KEYPAD_PORT = PORTB
CCP1_PIN = PORTC.2
CCP2_PIN = PORTC.1
Symbol T300 = 3313 NO_LIST
Symbol N300 = 3313 + $4000 NO_LIST
Symbol T600 = 1646 NO_LIST
Symbol N600 = 1646 + $4000 NO_LIST
Symbol T1200 = 813 NO_LIST
Symbol N1200 = 813 + $4000 NO_LIST
Symbol T2400 = 396 NO_LIST
Symbol N2400 = 396 + $4000 NO_LIST
Symbol T4800 = 188 NO_LIST
Symbol N4800 = 188 + $4000 NO_LIST
Symbol T9600 = 84 NO_LIST
Symbol N9600 = 84 + $4000 NO_LIST
Symbol OT2400 = 396 + $8000 NO_LIST ' Open True
Symbol OT1200 = 813 + $8000 NO_LIST ' Open True
Symbol OT9600 = 84 + $8000 NO_LIST ' Open True
Symbol OT300 = 3313 + $8000 NO_LIST ' Open True
Symbol ON2400 = 396 + $4000 + $8000 NO_LIST ' Open Inverted
Symbol ON1200 = 813 + $4000 + $8000 NO_LIST ' Open Inverted
Symbol ON9600 = 84 + $4000 + $8000 NO_LIST ' Open Inverted
Symbol ON300 = 3313 + $4000 + $8000 NO_LIST ' Open Inverted
' Rsout / Serial Constants
Symbol HOME = 1 NO_LIST
Symbol BELL = 7 NO_LIST
Symbol BKSP = 8 NO_LIST
Symbol TAB = 9 NO_LIST
Symbol CR = 13 NO_LIST
ALL_DIGITAL = True ' Set PORTA and PORTE to all digital
