Stránka 2 z 2
Napsal: 02 zář 2009, 18:12
od AB
Kupodivu to funguje, i když ty krkolomé převody jsou na první pohled podezřelé.
Ale co když chci poslat číslo 12?
Pro komunikaci s klávesnicí se většinou používá toto:
Kód: Vybrat vše
Dim Rx_int As Integer
Do
Input "Zadej číslo[Enter] : " , Rx_int 'ulož do Rx_int
Print "Stiskl jsi ";
Print Rx_int ' 4
Rx_int = Rx_int * Rx_int ' Provedu nějaký výpočet 4 * 4
Print Rx_int ' vytisknu výpočet 16
Loop
End
Napsal: 02 zář 2009, 19:53
od michalino
AB
to si pište, že to funguje, v dobrém slova smyslu
pomaličku se do toho dostávám.....
mám radost i díky Vám...
Někde něko psal, už nevím kdo a kde, že když vytisknu printem něco na terminál, že už to z toho terminálu nedostanu....pár nocí učení a čtení o AVR a je to tadyyyyyyyyy, dostanu to z terminálu......
ten příklad co píšete....
ano , to máte pravdu, klasicky to provést, jen na druhou stranu,
kdo mi tam zmáčkně ten enter, když první MEGA vyšle číslo a druhá ho má úplně samostatně přijmout....
dá se nějak nahradit lidský stisk enteru v tomto případě ?
Pokud ano, pak je to vyřešeno, pokud ne...pak musím jít cestou uvedeného příkladu...jak prosím se to stisknutí enteru dá obejít?
děkuji....
Napsal: 02 zář 2009, 20:04
od Návštěvník
Já se taky umím podrbat levou nohou za pravým uchem, ale jaký to má smysl, když se tam můžu podrbat pravou rukou
Napsal: 02 zář 2009, 20:28
od michalino
No přesně na to se ptám anonyme
Mne už ta levá noha bolí...a jde to nějak prosím vyřešit, rozumně?
Napsal: 02 zář 2009, 20:45
od Návštěvník
S Bascomem ti neporadím, ale to už víš.
Napsal: 02 zář 2009, 21:33
od michalino
bascom, bascom...jo,jo,anonyme...jdu koumat,díky
Napsal: 02 zář 2009, 21:38
od Návštěvník
Prostě ta data vezmi jak jsou uložená v proměnných v paměti a po bytech je přenes na druhou stranu a tam je zase stejně do stejných proměnných v paměti ulož. Jenže to bys musel vědět, jak jsou ty proměnné uložené v paměti a to ty jako pojídač koláčků netušíš, ty vlastně ani nejsi pojídač koláčků, když programuješ v bascomu.
Napsal: 03 zář 2009, 00:31
od AB
kdo mi tam zmáčkně ten enter,
Příkaz Print sám vyšle automaticky nakonec znaky CR LF (to je ten Enter).
Podívej se na help Config Input.
Kód: Vybrat vše
Config Input = Crlf , Echo = Noecho
Dim Cislo1 As Word
Dim Cislo2 As Word
Dim Cislo3 As Word
Do 'procesor 1
Print Cislo1 ; Cislo2 ; Cislo3
Wait 1
Loop
Do 'procesor 2
If Ischarwaiting() = 1 Then
Input Cislo1 , Cislo2 , Cislo3
End If
Loop
End
Napsal: 03 zář 2009, 07:46
od Návštěvník
AB,
děkuji Vám za odpověď a pomoc. Jako vždy smekám klobouk a mlčím. Funkce config input jsem si nevšiml, zkusím ji prozkoumat a trochu pobádat,dám vědět, jak to dopadlo.
Děkuji Vám moc za Váš čas AB!
Napsal: 03 zář 2009, 16:22
od nekmil
anonym napsal: "když programuješ v bascomu"
A myslíš, že s Pascalem či Céčkem by to vyhrál?
Nebo nedejbože s assemblerem?
Napsal: 03 zář 2009, 16:32
od Návštěvník
nekmil píše:anonym napsal: "když programuješ v bascomu"
A myslíš, že s Pascalem či Céčkem by to vyhrál?
Nebo nedejbože s assemblerem?
Při jeho současných znalostech je to jedno. A pojídači koláčků programují v Pascalu, opravdoví programátoři používají Fortran (ti lepší assembler)
Napsal: 03 zář 2009, 19:12
od AB
Zajímalo by mne, jaký praktický přínos v diskuzi
má stále se opakující sdělení tohoto typu:
"Já sice o Bascomu nevím nic, ale vím, že kdo nepíše v tom programu jako já, je úplný ignorant."
Napsal: 03 zář 2009, 19:27
od Návštěvník
AB píše:Zajímalo by mne, jaký praktický přínos v diskuzi
má stále se opakující sdělení tohoto typu:
"Já sice o Bascomu nevím nic, ale vím, že kdo nepíše v tom programu jako já, je úplný ignorant."
A kde to vidíš?