I am trying out an 18F4450 on the LAB-X1 board.
Code:
'****************************************************************
'* Name : Hello.BAS *
'* Author : Ted Crafton *
'* Notice : Copyright (c) 2008 PROGRAM SPECS *
'* : All Rights Reserved *
'* Date : 6/10/2008 *
'* Version : 1.0 *
'* Notes : *
'* : *
'****************************************************************
CLEAr
define LCD_DREG PORTD
DEFINE LCD_RSREG PORTE
DEFINE LCD_RSBIT 0
DEFINE LCD_EREG PORTE
DEFINE LCD_EBIT 1
DEFINE LCD_RWREG PORTE
DEFINE LCD_RWBIT 2
DEFINE LCD_BITS 8
DEFINE LCD_LINES 2
DEFINE LCD_COMMANDUS 2000
DEFINE LCD_DATAUS 20
TRISD=%00000000
TRISE=%00000000
ADCON1=%00000111
LOOP:
LCDOUT $FE,1
PAUSE 500
LCDOUT "HELLO"
pause 500
LCDOUT $FE,$C0
LCDOUT "Jan Crafton"
PAUSE 500
GOTO LOOP
END
If runs I have flashing LEDs, however the LCD only displays a row of blocks. I figure I either have bad fuses or some else real simple can someone point me in the right direction.
Bookmarks