fifo ft245 vb
So today i have finally got the FIFO chip working. I have used a PIC to load the bytes into the FIFO chip and the output is read at a constant speed.
I now have a working setup that gives 1.024Mbit without any errors
Next i will try to go up to 2Mbit throughput but i have one question to ask..
I'm using a 16F84 to do the loading of the fifo and some picbasic code - the fastest load speed i can acheive with a 20MHz xtal is ~180KHz i need 200KHz or more for 2Mbit transfer...
The code goes like this
Any comments welcome...
Thanks
Rob
>>>>>>>>>>>>
'FIFO
TRISA = %11111
TRISB = %00000000
' CONNECTION INFO:
'
' PIN 7 PORTB.1 = WEN1 WRITE ENABLE TO FIFO
' PIN 8 PORTB.2 = RD READ DATA TO FT245
' PIN 9 PORTB.3 = WCLK WRITE CLOCK TO FIFO
'
' PIN 17 PORTA.0= RXF GOES HIGH WHEN FT245 IS EMPTY
' PIN 18 PORTA.1= FF GOES LOW WHEN FIFO CHIP IS FULL
'START STATE
PORTB.1 = 1
PORTB.2 = 1
PORTB.3 = 1
MAIN:
PORTB.3 = 0
PORTB.1 = 1
PORTB.2 = 1
if PORTA.0 = 0 THEN 'IF FT245 HAS DATA THEN CONTINUE
IF PORTA.1 = 1 THEN 'IF FIFO CHIP IS NOT FULL THEN CONTINUE
PORTB.2 = 0 'LOW PULSE OUT FOR RD
PORTB.1 = 0 'LOW PULSE OUT FOR WRITE ENABLE
ENDIF
ENDIF
PORTB.3 = 1 'WCLK needs to be cycled to refresh FF status all times.
GOTO MAIN
>>>>>>>>>>>>>>>>>>