PDA

View Full Version : P18f8490



gavo
- 29th September 2005, 19:21
Hi,

Does anyone have any code examples for a LCD routine for the P18F8490?

mister_e
- 30th September 2005, 02:15
LCDOUT $fe,1,"Hello"

khoog
- 30th September 2005, 20:14
This code should turn on all lcd segments for one second and then turn them off etc. You must compile with PBP 2.46 for this to work.

code:

'************************************************* ****************************
'* LCDsegs.BAS
'*
'************************************************* ****************************


;----- REGISTER Files -----------------------------------------------------



lcdse0 = $FF
lcdse1 = $FF
lcdse2 = $FF
lcdse3 = $FF
lcdse4 = $FF
lcdse5 = $FF

LCDPS = %00110000
LCDCON = %11000011

LCDloop:
'**************************** lcd segment outputs ******************************

lcddata0 = %11111111
lcddata1 = %11111111
lcddata2 = %11111111
lcddata3 = %11111111
lcddata4 = %11111111
lcddata5 = %11111111
lcddata6 = %11111111
lcddata7 = %11111111
lcddata8 = %11111111
lcddata9 = %11111111
lcddata10 = %11111111
lcddata11 = %11111111
lcddata12 = %11111111
lcddata13 = %11111111
lcddata14 = %11111111
lcddata15 = %11111111
lcddata16 = %11111111
lcddata17 = %11111111
lcddata18 = %11111111
lcddata19 = %11111111
lcddata20 = %11111111
lcddata21 = %11111111
lcddata22 = %11111111
lcddata23 = %11111111

pause 1000

lcddata0 = %00000000
lcddata1 = %00000000
lcddata2 = %00000000
lcddata3 = %00000000
lcddata4 = %00000000
lcddata5 = %00000000
lcddata6 = %00000000
lcddata7 = %00000000
lcddata8 = %00000000
lcddata9 = %00000000
lcddata10 = %00000000
lcddata11 = %00000000
lcddata12 = %00000000
lcddata13 = %00000000
lcddata14 = %00000000
lcddata15 = %00000000
lcddata16 = %00000000
lcddata17 = %00000000
lcddata18 = %00000000
lcddata19 = %00000000
lcddata20 = %00000000
lcddata21 = %00000000
lcddata22 = %00000000
lcddata23 = %00000000

PAUSE 1000

GOTO LCDloop

END

gavo
- 1st October 2005, 11:31
Thanks I will give it a bash