Hi,
Verify that the PIC is running at the speed you think it is, otherwise the set timings will be wrong. If it IS running at 8MHz then try increasing the LCD_COMMANDUS and LCD_DATAUS defines.
I don't think MPASM has anything to do with it.
/Henrik.
Hi,
Verify that the PIC is running at the speed you think it is, otherwise the set timings will be wrong. If it IS running at 8MHz then try increasing the LCD_COMMANDUS and LCD_DATAUS defines.
I don't think MPASM has anything to do with it.
/Henrik.
HI,
I changed the values for LCD_COMMANDUS and LCD_DATAUS but that did not change anything. How do I check internal oscillation ??
I also ADDED hpwm COMMAND and I get the oscillation output wanted, so I guess the clocking is good...
K
Last edited by lerameur; - 4th March 2013 at 15:18.
150 ms between readings must be a bit tooshort to see anything clear ...
also add PAUSE > 700ms before sending the first data stream ( just once @ power up ) to the LCD ...
Alain
************************************************** ***********************
Why insist on using 32 Bits when you're not even able to deal with the first 8 ones ??? ehhhhhh ...
************************************************** ***********************
IF there is the word "Problem" in your question ...
certainly the answer is " RTFM " or " RTFDataSheet " !!!
*****************************************
I am down with just the LCDOUT commands:
still giving awkward letters on the LCD:
INCLUDE "modedefs.bas" 'Includes supoprt for PicBasic language
OSCCON = %01110000 '8 Mhz
DEFINE OSC 8
'/////////////////////////
'// LCD configuration //
'/////////////////////////
DEFINE LCD_DREG PORTB ' Set LCD Data port
DEFINE LCD_DBIT 4 ' Set starting Data bit (0 or 4) if 4-bit bus
DEFINE LCD_RSREG PORTB ' Set LCD Register Select port
DEFINE LCD_RSBIT 0 ' Set LCD Register Select bit
DEFINE LCD_EREG PORTB ' Set LCD Enable port
DEFINE LCD_EBIT 1 ' Set LCD Enable bit
DEFINE LCD_BITS 4 ' Set LCD bus size (4 or 8 bits)
DEFINE LCD_LINES 2 ' Set number of lines on LCD
DEFINE LCD_COMMANDUS 2500
DEFINE LCD_DATAUS 250
DEFINE CHAR_PACING 2000
pause 1000
Mainloop:
lcdout $FE,1, " This is a test" '
lcdout $FE,$C0, "Next or Select" '
pause 200
GOTO Mainloop
End
a scheme would be helpful ... especially to see how contrast and R/W lines are connected ...
************************************************** ***********************
Why insist on using 32 Bits when you're not even able to deal with the first 8 ones ??? ehhhhhh ...
************************************************** ***********************
IF there is the word "Problem" in your question ...
certainly the answer is " RTFM " or " RTFDataSheet " !!!
*****************************************
Hi,
I was about to put a video of my circuit working. So i decided to use many colored wiring to make it easier to see. Once that was done, I tried the circuit and... yes.. I was working. There u go.. hardware problem.
Thanks for your time.
K
No way! A hardware issue? Got to be the first - NOT ;-)
Seriously, glad you found it!
/Henrik.
Bookmarks