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