I try to display some characters, using this code :
.....Code:; http://www.darreltaylor.com/files/CustChar.htm LCDOUT $FE,$40,$04,$0A,$04,$00,$00,$00,$00,$00 ' Cust Char #0 degree Celsius LCDOUT $FE,$48,$0A,$1F,$11,$11,$11,$11,$11,$1F ' Cust Char #1 empty batt LCDOUT $FE,$50,$0A,$1F,$11,$11,$11,$11,$1F,$1F ' Cust Char #2 1/5 batt LCDOUT $FE,$58,$0A,$1F,$11,$11,$11,$1F,$1F,$1F ' Cust Char #3 2/5 batt LCDOUT $FE,$60,$0A,$1F,$11,$11,$1F,$1F,$1F,$1F ' Cust Char #4 3/5 batt LCDOUT $FE,$68,$0A,$1F,$11,$1F,$1F,$1F,$1F,$1F ' Cust Char #5 4/5 batt LCDOUT $FE,$70,$0A,$1F,$1F,$1F,$1F,$1F,$1F,$1F ' Cust Char #6 full batt
...Code:char_batt: batt = TmpW / 100 ; (TmpW is war word ; reading ADC) select case batt case batt < 105 char = 1 case batt => 105 and batt =< 115 char = 2 case batt => 116 and batt =< 125 char = 3 case batt => 126 and batt =< 130 char = 4 case batt => 131 and batt < 144 char = 5 case batt => 144 char = 6 end select return
But I have on display just char # 1 ; do not change in # 2 to 5 ...Code:if (temperature2/100) =>10 then LcdOut $FE, $c0, "O:", Sign2, DEC (Temperature2 / 100), ".", DEC Temperature2 dig 1, 0 , " " , char ," ", dec TmpW dig 4,dec TmpW dig 3,",",dec TmpW dig 2 else LcdOut $FE, $C0, "O:", Sign2, $14, DEC (Temperature2 / 100), ".", DEC Temperature2 dig 1, 0 , " ", char , " ", dec TmpW dig 4,dec TmpW dig 3,",",dec TmpW dig 2 endif
What I do wrong ? Thanks !





Bookmarks