LED kapcsolás sorosporton át

kapu48

És Igy mit küld:

[Button1.click]
 open "com1:4800,n,8,1,ds0,cs0,rs" for binary as #1

 print #1, 1
 close #1
Wait

Az egyes számot. "1".

Az ASC(1) (vagy Chr(1)) ami a terv lenne (Byte alapú).

Theophrast

És így Bascom alatt hogyan fogadjam?
próbáltam byteként de igy nem működik

Byte-ként -> szívatod magadat:
IsCharWaitting()=1 és beolvasás után az Inkey() értéke"", akkor 0 kódú karakter volt...

Maradj a sztingkezelésnél...

Theophrast

rendben
maradok a stringek küldözgetésénél

és szükség eseték átalakitgatok mindkét oldalon

köszönöm a segítséget

kapu48

Ne ad fel ilyen könnyen!

Kód: Egész kijelölése

Dim A As Byte 

Inputbin A

Mindent meg kel tanulni!

Theophrast

Pc-től az AVR felé szerintem sztringeket célszerű küldeni.

Ha készenvan az elektronika, AVR-en van a program- szerintem ekkor a debugolás terminálemulátorban történik.
Itt viszont az ember számára könyebben megjegyezhetők a karakterláncok
(pl be, ki, novel, csokken, szamol, beolvas stb) mint a kódszámok. (tény hogy több tárhyelet követel egy 8 karakteres string mint egy byte, de ha elég nagy az AVR akkor nem okoz problémát.

én a AVR->PC komunikációtól félek

Ha az avr egy mért hőmérsékletet amit ő single-ként kezel (pl -4,76) kiküld sorosporton akkor az liberty basicben hogy jelenik meg?
Ill hogy tudjuk ezt kezelni?

kapu48

Bascom Help:

Kód: Egész kijelölése

'var = STR( x)
'var  A string variable.
'X  A numeric variable.

Dim Aa As Single , Ss As String * 10

Aa = 123.25
Ss = Str(a)
Print Ss