LED kapcsolás sorosporton át

A Liberty Basic - ami a Bascomhoz hasonló nyelvezettel bír - csak PC grafikus felületéhez...
Avatar
kapu48
Elektronbűvölő
Hozzászólások: 3231
Csatlakozott: 2008. augusztus 29. péntek, 6:00
Tartózkodási hely: Újkígyós

HozzászólásSzerző: kapu48 » 2012. április 14. szombat, 21:42

És Igy mit küld:

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

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

 print #1, 1
 close #1
Wait

:?:

Avatar
Robert
Elektronbűvölő
Hozzászólások: 9908
Csatlakozott: 2005. december 9. péntek, 7:00
Tartózkodási hely: Budapest
Kapcsolat:

HozzászólásSzerző: Robert » 2012. április 14. szombat, 21:47

Az egyes számot. "1".

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

Avatar
Theophrast
SzínkódFestő
Hozzászólások: 78
Csatlakozott: 2011. július 17. vasárnap, 6:00

HozzászólásSzerző: Theophrast » 2012. április 14. szombat, 21:58

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

Avatar
Robert
Elektronbűvölő
Hozzászólások: 9908
Csatlakozott: 2005. december 9. péntek, 7:00
Tartózkodási hely: Budapest
Kapcsolat:

HozzászólásSzerző: Robert » 2012. április 14. szombat, 22:01

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...

Avatar
Theophrast
SzínkódFestő
Hozzászólások: 78
Csatlakozott: 2011. július 17. vasárnap, 6:00

HozzászólásSzerző: Theophrast » 2012. április 14. szombat, 22:07

rendben
maradok a stringek küldözgetésénél :P
és szükség eseték átalakitgatok mindkét oldalon

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

Avatar
kapu48
Elektronbűvölő
Hozzászólások: 3231
Csatlakozott: 2008. augusztus 29. péntek, 6:00
Tartózkodási hely: Újkígyós

HozzászólásSzerző: kapu48 » 2012. április 14. szombat, 22:16

Ne ad fel ilyen könnyen!

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

Dim A As Byte

Inputbin A


Mindent meg kel tanulni!
:wink:

Avatar
Theophrast
SzínkódFestő
Hozzászólások: 78
Csatlakozott: 2011. július 17. vasárnap, 6:00

HozzászólásSzerző: Theophrast » 2012. április 15. vasárnap, 9:15

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?

Avatar
kapu48
Elektronbűvölő
Hozzászólások: 3231
Csatlakozott: 2008. augusztus 29. péntek, 6:00
Tartózkodási hely: Újkígyós

HozzászólásSzerző: kapu48 » 2012. április 15. vasárnap, 10:03

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

:wink:


Vissza: “Liberty Basic”

Ki van itt

Jelenlévő fórumozók: nincs regisztrált felhasználó valamint 0 vendég