Darren,
Thanks, I got it now. Keep up the good work!
Darren,
Thanks, I got it now. Keep up the good work!
Padawan-78
Hey everyone,
I thought I would try contribute instead of just take from this great forum.
Here are 2 symbols I came up with for the Holidays using Darren's Character generator.
Both require 4x20 LCD of space.
I also figured out that you can redefine 8 custom characters as many times as you want...in loops only. You just have to be careful about how you go back and forth between the loops.
enjoy
halloween:
LCDOUT 254,64,8,17,3,7,15,15,29,29 ' Cust Char #0 PUMPKIN
LCDOUT 254,72,12,31,31,14,31,31,27,27 ' Cust Char #1
LCDOUT 254,80,2,17,24,28,30,30,23,23 ' Cust Char #2
LCDOUT 254,88,29,30,14,7,7,19,8,0 ' Cust Char #3
LCDOUT 254,96,31,21,21,0,10,31,31,0 ' Cust Char #4
LCDOUT 254,104,23,15,14,28,28,25,2,0 ' Cust Char #5
LCDOUT 254,112,8,16,10,6,1,1,6,8 ' Cust Char #6 PUMPKIN VINE
lcdout 254, 1
lcdout $FE,Row1+3, 6
LCDOUT $FE,Row2+2, 0
LCDOUT $FE,Row2+3, 1
LCDOUT $FE,Row2+4, 2," Happy "
LCDOUT $FE,Row3+2, 3
LCDOUT $FE,Row3+3, 4
LCDOUT $FE,Row3+4, 5," Halloween "
pause 5000
goto halloween
christmas:
LCDOUT 254,64,4,8,7,31,3,8,4,0 ' Cust Char #0 Christmas Star
LCDOUT 254,72,14,27,17,0,17,27,14,14 ' Cust Char #1
LCDOUT 254,80,4,2,28,31,24,2,4,0 ' Cust Char #2
LCDOUT 254,88,4,4,4,21,21,4,14,14 ' Cust Char #3
LCDOUT 254,96,14,14,14,4,4,4,21,21 ' Cust Char #4
LCDOUT 254,104,21,4,4,4,4,4,0,0 ' Cust Char #5
lcdout 254, 1
lcdout $FE,Row1+3, 3
LCDOUT $FE,Row2+2, 0
LCDOUT $FE,Row2+3, 1
LCDOUT $FE,Row2+4, 2," MERRY "
LCDOUT $FE,Row3+3, 4," CHRISTMAS"
LCDOUT $FE,Row4+3, 5
pause 5000
goto christmas
Padawan-78
nice job earltyso!
Steve
It's not a bug, it's a random feature.
There's no problem, only learning opportunities.
Hi, i have written this program to make custom character on 2*16 LCD but LCD shows nothing.i use picbasic pro and PIC16F877A. what's the problem?
define OSC 4
' Set LCD Data port
DEFINE LCD_DREG PORTC
' Set starting Data bit (0 or 4) if 4-bit bus
DEFINE LCD_DBIT 4
' Set LCD Register Select port
DEFINE LCD_RSREG PORTC
' Set LCD Register Select bit
DEFINE LCD_RSBIT 1
' Set LCD Enable port
DEFINE LCD_EREG PORTC
' Set LCD Enable bit
DEFINE LCD_EBIT 0
' Set LCD bus size (4 or 8 bits)
DEFINE LCD_BITS 4
' Set number of lines on LCD
DEFINE LCD_LINES 2
'Making lcd ready
pause 100
lcdout $fe,1
m var byte
n var byte
m=25
n=98
lcdout $fe,$40,$08,$04,$02,$01,$01,$02,$04,$08
lcdout $fe,$14
lcdout $fe,$00,$00,$07,$07,$1F,$00,$00,$00
lcdout $fe,$14
lcdout $fe,$04,$04,$04,$04,$07,$00,$00,$00
lcdout $fe,$14
lcdout ":",#m,".",#n
end
i have studied that post but i still have problem. post 2 just specify the 8 location but LCD is 2*16.what about other locations?
Bookmarks