sorry this took a while to get back I have been busy lately
again any enlightenment would be great ,cause its got me beat .I should also mention its my first "project" with one of the newer pics with the internal clocks and what not,so it could be something quite obvious to you more experienced PIC'ers
Code:
INCLUDE "modedefs.bas"
@ device pic16F677, intrc_osc_noclkout
'DEFINES ------------------------------
OSCCON = %01100101 'set internal clock at 4MHZ
OSCTUNE = %00000
'OSCCON = %01101000
define OSC 4 'this makes no difference
trisb = %00000000
trisc = %00000000
WPUB = %00000000 'weak pullups on portB disabled
IOCB = %00000000 'interupt on change disabled
SSPCON.5 = 0 'SSPEN
CM1CON0 = %00000000 'comparaters disabled
CM2CON0 = %00000000
ANSEL = %00000000
'ADON = 0 'no ADC inabled
define LCD_DREG PORTB
DEFINE LCD_DBIT 4
DEFINE LCD_RSREG PORTC
DEFINE LCD_RSBIT 7
DEFINE LCD_EREG PORTC
DEFINE LCD_EBIT 6
DEFINE LCD_BITS 4
define LCD_BITS 4
define LCD_LINES 1
define LCD_COMMANDUS 2000
define LCD_DATAUS 50
temp var byte
'start-------------------------------------
pause 500
temp = 104
lcdout $FE,$0E 'this works
pause 1500
lcdout $FE,$14 'this works
pause 1500
lcdout $FE,$80 'this works
pause 1500
Loop:
lcdout $FE,1
pause 700
lcdout $FE,1,"one" 'this doesnt work
pause 700
lcdout $FE,1
pause 700
lcdout $FE,2,"two" 'this doesnt work
pause 700
lcdout $FE,1
pause 700
LCDOUt $FE,#temp 'this doesnt work
pause 700
goto loop
end
thanks
Bookmarks