nemertem.bas
Friedrich Gábor
igazifido at t-online.hu
Sun Jan 1 13:36:14 CET 2006
Buék!
A gondom a következő: Bascom-ban egy sztringet szeretnék megjeleníteni az
lcd-n, amiben egy saját definiált karakter van - chr(0). Nem tudom a
chr(0)-t beilleszteni a sztringbe, bármilyen másik karaktert bevesz
(chr(1)/chr(2)/....), de a chr(0)-t nem.
Próba forráskód:
------------------------------------------------------------
$crystal = 7372800 'Sebesseg
$regfile = "Attiny2313.dat" 'Chip
$baud = 9600 'Sorosport
Config Lcd = 20 * 4 'LCD
Config Lcdpin = Pin , Db4 = Portb.4 , Db5 = Portb.5 , Db6 = Portb.6 , Db7 =
Portb.7 , E = Portb.1 , Rs = Portb.2
Dim Sor As String * 3
Deflcdchar 0 , 32 , 32 , 32 , 31 , 32 , 32 , 32 , 32
Cls
Cursor Off
Locate 1 , 1
Lcd Chr(255) ; Chr(0) ; Chr(255) 'Ezt kéne látni
Sor = Chr(255) + Chr(000) + Chr(255) 'Itt 2* kiírja a
chr(255)-t
Locate 2 , 1
Lcd Sor
Sor = "{255}" + "{000}" + "{255}" 'Meg itt is....
Locate 3 , 1
Lcd Sor
End
----------------------------------------------
Mi a gond?
Köszi
Fidó
More information about the Elektro
mailing list