Dar biškį su C# padėkite

Shadowed, 8th Dec 2020 8:18 am GMT+0200 permalink

Ot blin, ne ten parašiau :D Norėjau į o.software, ten Jamieson L kažkaip
gerai ant kelio praeitą kartą užvedė. Kraustomės į ten su viskuo kas čia
parašyta plius papildyta.

Taigis, Dėl Gržžžššš... Pšššš... Maul Halten :D (tas serialas tikrai geras
:D ) - Pamiegu, nes RS232 ant 9600 bodų yra lėtas, ypač jei daugiau duomenų
tai nespėja suvaikščiot. RS232 be papildomų fyčiurų, tik TX, RX. Toliau
pasakoju iš naujo, po Grzegorz'o atsakymu.

"Grzegorz Brzęczyszczykiewicz" parašė naujienų
news:rqljop$lo4$1@news.omnitel.net...

2020-12-07 17:29, Shadowed rašė:

serialPort1.Write(new byte[] { 0x50, 0x00, 0xEF, 0x00}, 0, 4);
// Rašomi duomenys
       Thread.Sleep(250); // Palaukiu, kad spėtų suvaikščiot

O nereikia paragint kad iškakotų į serial'ą?
.flush ar panašiai?

Ir nemiegok - blogo tono požymis miegoti darbe
if (serialPort1.BytesToRead) {...}
ar panašiai.
Ir jeigu tai paleisi atskiru thread'u - mažiau skaudės galvą.

       int Bytes_To_Read =
serialPort1.BytesToRead; // Suskaičiuoja kiek baitų
gauta teisingai, parodo 4

// ---- O va čia turėtų būti kažkas, kas tuos gautus duomenis parašytų į
textbox'ą. Nu blemba, kiek variantų išbandžiau - nesigauna. Iš įdomesnių
- parašo tik duomenų kiekį (4) arba kažkodėl parašo raidė P.

parodyk nuaskaitymą.

--
Grzegorz

Chrząszczyrzewoszyce, powiat Łękołody
// ------------------------------------------------------------------------------
Nuo čia :)

Nemažai pasistūmiau su savo programikės rašymu, bet užstrigau ties tokia
kvaila vieta, kur atrodo ir pavyzdukų daug yra, bet vis tiek veikia ne taip,
kaip noriu. Papasakokit dar truputį apie teisingą duomenų gavimą iš RS232...

Tikslas - rašau į serialPort1, po to tą patį noriu nuskaityti. RX su TX
fižiškai užtrumpintas.

Čia daug maž visa rašanti ir skaitanti programėlė

public void Write_Read_Test()
{
serialPort1.Write(new byte[] { 0x50, 0x00, 0xEF, 0x00, 0x03, 0x00, 0x00,
0x0B }, 0, 8);

Thread.Sleep(250);

int Bytes_To_Read = serialPort1.BytesToRead;

tBox_Raw_Data.Text += "Bytes to read: " + Bytes_To_Read +

Environment.NewLine;

tBox_Raw_Data.Text += serialPort1.ReadExisting() + Environment.NewLine;

// -- Nei šitas, nei ReadLine nesuveikia. Bet kodėl neveikia lyg ir
suprantu. O va teisingą gavimą dar noriu pasiaiškinti :). Bandžiau dar
keletą būdų, bet ten buvo savo kūrybos (berods tas kur P rašė), tai jau
nebeatgaminsiu jaučiu tiksliai kaip ten buvo.

serialPort1.DiscardInBuffer();                              // Išsivalom

buferius
serialPort1.DiscardOutBuffer(); // Išsivalom
buferius
}

zZz, 8th Dec 2020 9:57 am GMT+0200 permalink

Išdėstyk klausimą. Bent kad Laimis suprastų.

Flush išvalo by default. Ar nori pasiųst?

On 2020-12-08 08:18, Shadowed wrote:

Ot blin, ne ten parašiau :D Norėjau į o.software, ten Jamieson L kažkaip
gerai ant kelio praeitą kartą užvedė. Kraustomės į ten su viskuo kas čia
parašyta plius papildyta.

Taigis, Dėl Gržžžššš... Pšššš... Maul Halten :D (tas serialas tikrai
geras :D ) - Pamiegu, nes RS232 ant 9600 bodų yra lėtas, ypač jei
daugiau duomenų tai nespėja suvaikščiot. RS232 be papildomų fyčiurų, tik
TX, RX. Toliau pasakoju iš naujo, po Grzegorz'o atsakymu.

"Grzegorz Brzęczyszczykiewicz" parašė naujienų
news:rqljop$lo4$1@news.omnitel.net...

2020-12-07 17:29, Shadowed rašė:

serialPort1.Write(new byte[] { 0x50, 0x00, 0xEF, 0x00}, 0, 4);
// Rašomi duomenys

           Thread.Sleep(250); // Palaukiu, kad spėtų suvaikščiot

O nereikia paragint kad iškakotų į serial'ą?
.flush ar panašiai?

Ir nemiegok - blogo tono požymis miegoti darbe
if (serialPort1.BytesToRead) {...}
ar panašiai.
Ir jeigu tai paleisi atskiru thread'u - mažiau skaudės galvą.

           int Bytes_To_Read =
serialPort1.BytesToRead;                   // Suskaičiuoja kiek baitų
gauta teisingai, parodo 4

// ---- O va čia turėtų būti kažkas, kas tuos gautus duomenis parašytų į
textbox'ą. Nu blemba, kiek variantų išbandžiau - nesigauna. Iš įdomesnių
- parašo tik duomenų kiekį (4) arba kažkodėl parašo raidė P.

parodyk nuaskaitymą.
- Shadowed, 8th Dec 2020 10:23 am GMT+0200 permalink
  
  Principe noriu per COMą išsiųsti gaują HEXų ir gauti atgal atsakymą kitą gaują HEXų į textboxą :D. Kad neskipintų 0x00 pridejau ir serialPort1.DiscardNull = false; ten kur reikia, nors man atrodo čia ir taip default nustatymas.
  
  public void Write_Read_Test()
  {
  serialPort1.Write(new byte[] { 0x50, 0x00, 0xEF, 0x00, 0x03, 0x00, 0x00, 0x0B }, 0, 8);
```
Thread.Sleep(250);

int Bytes_To_Read = serialPort1.BytesToRead;

tBox_Raw_Data.Text += "Bytes to read: " + Bytes_To_Read + Environment.NewLine; // Čia OK, suskaičuoja teisingai

tBox_Raw_Data.Text += serialPort1.ReadExisting() + Environment.NewLine; // -- Nei šitas, nei ReadLine nesuveikia. Bet kodėl neveikia lyg ir suprantu. O va teisingą gavimą dar noriu pasiaiškinti :). Bandžiau dar keletą būdų, bet ten buvo savo kūrybos (berods tas kur P rašė), tai jau  nebeatgaminsiu jaučiu tiksliai kaip ten buvo.

serialPort1.DiscardInBuffer();                             // Išsivalom buferius
serialPort1.DiscardOutBuffer();                            // Išsivalom buferius
```
  }
  - Shadowed, 8th Dec 2020 10:35 am GMT+0200 permalink
    
    BitConverter irgi keikiasi kažką ten apie unable int to byte...
    
    "Shadowed" shadowed@bk.ru parašė naujienų news:rqndc9$q7l$1@news.omnitel.net...
    Principe noriu per COMą išsiųsti gaują HEXų ir gauti atgal atsakymą kitą gaują HEXų į textboxą :D. Kad neskipintų 0x00 pridejau ir serialPort1.DiscardNull = false; ten kur reikia, nors man atrodo čia ir taip default nustatymas.
    
    public void Write_Read_Test()
    {
    serialPort1.Write(new byte[] { 0x50, 0x00, 0xEF, 0x00, 0x03, 0x00, 0x00, 0x0B }, 0, 8);
```
Thread.Sleep(250);

int Bytes_To_Read = serialPort1.BytesToRead;

tBox_Raw_Data.Text += "Bytes to read: " + Bytes_To_Read + Environment.NewLine; // Čia OK, suskaičuoja teisingai

tBox_Raw_Data.Text += serialPort1.ReadExisting() + Environment.NewLine; // -- Nei šitas, nei ReadLine nesuveikia. Bet kodėl neveikia lyg ir suprantu. O va teisingą gavimą dar noriu pasiaiškinti :). Bandžiau dar keletą būdų, bet ten buvo savo kūrybos (berods tas kur P rašė), tai jau  nebeatgaminsiu jaučiu tiksliai kaip ten buvo.

serialPort1.DiscardInBuffer();                             // Išsivalom buferius
serialPort1.DiscardOutBuffer();                            // Išsivalom buferius
```
    }
    - Shadowed, 8th Dec 2020 11:03 am GMT+0200 permalink
      
      Radau, P raidė parašo va tokia eilutė:
      
      tBox_Raw_Data.Text += "Existing data: " + serialPort1.ReadExisting() + Environment.NewLine;
      - Shadowed, 8th Dec 2020 12:56 pm GMT+0200 permalink
        
        Gavosi, taip nujaučiau, kad reiks prasukti ciklą kiekvienam skaičiukui. Vat to spirtelėjimo ir trūko .
        
        byte[] buffer = new byte[serialPort1.BytesToRead];
        serialPort1.Read(buffer, 0, buffer.Length);
        
        StringBuilder sb = new StringBuilder();
        for (int i = 0; i < buffer.Length; i++)
        sb.AppendFormat("{0:X2} ", buffer[i]);
        
        tBox_Raw_Data.Text += sb.ToString() + Environment.NewLine;
        
        Vis tiek visiems ačiū.
        
        Lawrence Jamieson, 10th Dec 2020 11:26 am GMT+0200 permalink
        
        2020-12-08 12:56, Shadowed rašė:
        
        Gavosi, taip nujaučiau, kad reiks prasukti ciklą kiekvienam skaičiukui.
        Vat to spirtelėjimo ir trūko Šypsena.
        byte[] buffer = new byte[serialPort1.BytesToRead];
        serialPort1.Read(buffer, 0, buffer.Length);
        StringBuilder sb = new StringBuilder();
        for (int i = 0; i < buffer.Length; i++)
            sb.AppendFormat("{0:X2} ", buffer[i]);
        tBox_Raw_Data.Text += sb.ToString() + Environment.NewLine;
        Vis tiek visiems ačiū.
        
        O nenorėtum vietoj ciklų parašyti taip:
        
        tBox_Raw_Data.Text += BitConverter.ToString(buffer) + Environment.NewLine;
        
        zZz, 10th Dec 2020 1:04 pm GMT+0200 permalink
        
        Protokolo nerašė. Nuims nuo buferio, o jei ne viskas bufery? ;)
        
        On 2020-12-10 11:26, Lawrence Jamieson wrote:
        
        2020-12-08 12:56, Shadowed rašė:
        
        Gavosi, taip nujaučiau, kad reiks prasukti ciklą kiekvienam
        skaičiukui. Vat to spirtelėjimo ir trūko Šypsena.
        byte[] buffer = new byte[serialPort1.BytesToRead];
        serialPort1.Read(buffer, 0, buffer.Length);
        StringBuilder sb = new StringBuilder();
        for (int i = 0; i < buffer.Length; i++)
             sb.AppendFormat("{0:X2} ", buffer[i]);
        tBox_Raw_Data.Text += sb.ToString() + Environment.NewLine;
        Vis tiek visiems ačiū.
        
        O nenorėtum vietoj ciklų parašyti taip:
        
        tBox_Raw_Data.Text += BitConverter.ToString(buffer) + Environment.NewLine;
        
        Shadowed, 10th Dec 2020 1:29 pm GMT+0200 permalink
        
        Gal dar ne viskas taip blogai :) Truputį luktelkit, zZz pasijungs per
        nuotolinį, pažiūrės, tada jeigu nesigaus visi kartu pagalvosim :)
        
        "zZz" parašė naujienų news:rqsvb1$m33$1@news.omnitel.net...
        
        Protokolo nerašė. Nuims nuo buferio, o jei ne viskas bufery? ;)
        
        On 2020-12-10 11:26, Lawrence Jamieson wrote:
        
        2020-12-08 12:56, Shadowed rašė:
        
        Gavosi, taip nujaučiau, kad reiks prasukti ciklą kiekvienam skaičiukui.
        Vat to spirtelėjimo ir trūko Šypsena.
        byte[] buffer = new byte[serialPort1.BytesToRead];
        serialPort1.Read(buffer, 0, buffer.Length);
        StringBuilder sb = new StringBuilder();
        for (int i = 0; i < buffer.Length; i++)
        sb.AppendFormat("{0:X2} ", buffer[i]);
        tBox_Raw_Data.Text += sb.ToString() + Environment.NewLine;
        Vis tiek visiems ačiū.
        
        O nenorėtum vietoj ciklų parašyti taip:
        
        tBox_Raw_Data.Text += BitConverter.ToString(buffer) + Environment.NewLine;
        
        zZz, 10th Dec 2020 1:34 pm GMT+0200 permalink
        
        Tai atsiuntei man duomenis ar dar ne? ;)
        
        On 2020-12-10 13:29, Shadowed wrote:
        
        Gal dar ne viskas taip blogai :) Truputį luktelkit, zZz pasijungs per
        nuotolinį, pažiūrės, tada jeigu nesigaus visi kartu pagalvosim :)
        
        "zZz" parašė naujienų news:rqsvb1$m33$1@news.omnitel.net...
        
        Protokolo nerašė. Nuims nuo buferio, o jei ne viskas bufery? ;)
        
        On 2020-12-10 11:26, Lawrence Jamieson wrote:
        
        2020-12-08 12:56, Shadowed rašė:
        
        Gavosi, taip nujaučiau, kad reiks prasukti ciklą kiekvienam
        skaičiukui. Vat to spirtelėjimo ir trūko Šypsena.
        byte[] buffer = new byte[serialPort1.BytesToRead];
        serialPort1.Read(buffer, 0, buffer.Length);
        StringBuilder sb = new StringBuilder();
        for (int i = 0; i < buffer.Length; i++)
             sb.AppendFormat("{0:X2} ", buffer[i]);
        tBox_Raw_Data.Text += sb.ToString() + Environment.NewLine;
        Vis tiek visiems ačiū.
        
        O nenorėtum vietoj ciklų parašyti taip:
        
        tBox_Raw_Data.Text += BitConverter.ToString(buffer) +
        Environment.NewLine;
    - zZz, 8th Dec 2020 3:25 pm GMT+0200 permalink
      
      Tai siųsk :) Tik HEX nerodys text'u, nes turėsi byte krūvą. Tą krūvą
      gali konvertuoti į tekstą. Imk Convert namespace.
      
      On 2020-12-08 10:35, Shadowed wrote:
      
      BitConverter irgi keikiasi kažką ten apie unable int to byte...
      "Shadowed" shadowed@bk.ru parašė naujienų
      news:rqndc9$q7l$1@news.omnitel.net...
      Principe noriu per COMą išsiųsti gaują HEXų ir gauti atgal atsakymą kitą
      gaują HEXų į textboxą :D. Kad neskipintų 0x00 pridejau ir
      serialPort1.DiscardNull = false; ten kur reikia, nors man atrodo čia ir
      taip default nustatymas.
      public void Write_Read_Test()
      {
          serialPort1.Write(new byte[] { 0x50, 0x00, 0xEF, 0x00, 0x03, 0x00,
      0x00, 0x0B }, 0, 8);
          Thread.Sleep(250);
          int Bytes_To_Read = serialPort1.BytesToRead;
          tBox_Raw_Data.Text += "Bytes to read: " + Bytes_To_Read +
      Environment.NewLine;// Čia OK, suskaičuoja teisingai
          tBox_Raw_Data.Text += serialPort1.ReadExisting() +
      Environment.NewLine;// -- Nei šitas, nei ReadLine nesuveikia. Bet kodėl
      neveikia lyg ir suprantu. O va teisingą gavimą dar noriu pasiaiškinti
      :). Bandžiau dar keletą būdų, bet ten buvo savo kūrybos (berods tas kur
      P rašė), tai jau nebeatgaminsiu jaučiu tiksliai kaip ten buvo.
      serialPort1.DiscardInBuffer(); // Išsivalom buferius
      serialPort1.DiscardOutBuffer(); // Išsivalom buferius
      }
  - Lawrence Jamieson, 10th Dec 2020 11:20 am GMT+0200 permalink
    
    tingiu gilintis, bet ten su Sleep ir ReadExisting tai negerai padaryta.
    
    Nereikia jokių Sleep, iškart darai Read. Prieš tai susetupini koks yra
    ReadTimeout.
    
    O geriausia tai yra kabinti handlerį prie DataReceived ir skaityti
    duomenis is komporto ten.
    - DGS, 10th Dec 2020 11:19 am GMT+0100 permalink
      
      Geriausia. Tik dar reik nepamirst, kad DataReceived gali buti issauktas kiekvieno pareinancio baito. Tad reikia rasytis savo buferi, ten laukt kol prisirinks reikalinga informacija, tada ja apdorot ir raisinti eventa. Ir dar reik nepamirst, kad DataReceived pareina ne is main threado, todel norint kazka updating gui, reik atitinkamai Invoke'int, kad negaut exceptiono.
      
      "Lawrence Jamieson" parašė naujienų news:rqsp84$eat$1@news.omnitel.net...
      
      tingiu gilintis, bet ten su Sleep ir ReadExisting tai negerai padaryta.
      
      Nereikia jokių Sleep, iškart darai Read. Prieš tai susetupini koks yra
      ReadTimeout.
      
      O geriausia tai yra kabinti handlerį prie DataReceived ir skaityti
      duomenis is komporto ten.
      - Lawrence Jamieson, 10th Dec 2020 3:43 pm GMT+0200 permalink
        
        :)
        
        Matau, kad ne tik man teko iš komportų skaityti :)
        
        Pas mus tai standartas yra delimiterius siųsti, tai pildomws buferį kol
        negaunam delimiterio, tada jau perduodam tą buferį handlinimui.
        
        zZz, 10th Dec 2020 3:54 pm GMT+0200 permalink
        
        Nebūtų patogiau servisą pakurt? Ar buferis didelis ir laukimui atsparus? :)
        
        NO
        
        On 2020-12-10 15:43, Lawrence Jamieson wrote:
        
        :)
        
        Matau, kad ne tik man teko iš komportų skaityti :)
        
        Pas mus tai standartas yra delimiterius siųsti, tai pildomws buferį kol
        negaunam delimiterio, tada jau perduodam tą buferį handlinimui.
        
        DGS, 10th Dec 2020 3:21 pm GMT+0100 permalink
        
        Servisas ar ne, nuo situacijos priklauso.
        Jei komunikacija vyksta tik su appsu, kam tas servisas? Prisijungei, sukomandavai, gavai atsakymus, atsijungei ir pamirsai.
        
        "zZz" parašė naujienų news:rqt9ab$2t1$1@news.omnitel.net...
        
        Nebūtų patogiau servisą pakurt? Ar buferis didelis ir laukimui atsparus? :)
        
        zZz, 10th Dec 2020 4:54 pm GMT+0200 permalink
        
        Servisas irgi aplikacija. Einam alaus
        
        On 2020-12-10 16:21, DGS wrote:
        
        Servisas ar ne, nuo situacijos priklauso.
        Jei komunikacija vyksta tik su appsu, kam tas servisas? Prisijungei, sukomandavai, gavai atsakymus, atsijungei ir pamirsai.
        
        "zZz" parašė naujienų news:rqt9ab$2t1$1@news.omnitel.net...
        
        Nebūtų patogiau servisą pakurt? Ar buferis didelis ir laukimui atsparus? :)
        
        DGS, 10th Dec 2020 4:16 pm GMT+0100 permalink
        
        O tai kaip be delimiterio? Tada jau stipriai kvepia dantu remontu per sikna :) Nebent paketai fiksuoto ilgio ir is poros paketu galima kazkaip identifikuot kur kas...
        
        "Lawrence Jamieson" parašė naujienų news:rqt8mn$23d$1@news.omnitel.net...
        
        :)
        
        Matau, kad ne tik man teko iš komportų skaityti :)
        
        Pas mus tai standartas yra delimiterius siųsti, tai pildomws buferį kol
        negaunam delimiterio, tada jau perduodam tą buferį handlinimui.
        
        zZz, 10th Dec 2020 10:32 pm GMT+0200 permalink
        
        Nori? - Imk. Delimiterio nėra. Dinaminis rinkinys.
        
        Imk testą: 0x11 0x97 0x20 0x67 0x92 0x0H
        
        On 2020-12-10 17:16, DGS wrote:
        
        O tai kaip be delimiterio? Tada jau stipriai kvepia dantu remontu per sikna :) Nebent paketai fiksuoto ilgio ir is poros paketu galima kazkaip identifikuot kur kas...
        
        "Lawrence Jamieson" parašė naujienų news:rqt8mn$23d$1@news.omnitel.net...
        
        :)
        
        Matau, kad ne tik man teko iš komportų skaityti :)
        
        Pas mus tai standartas yra delimiterius siųsti, tai pildomws buferį kol
        negaunam delimiterio, tada jau perduodam tą buferį handlinimui.
        
        DGS, 11th Dec 2020 10:23 am GMT+0100 permalink
        
        0x0H ? Cia jau kazkas uzslepto :D
        Siaip tai del delimiteriu besigincydami dar atsizvelkim i tai, kas gaunama is serialo. Jei ten temperaturos sensorius raportuoja temperatura ar variklis apsukas, tai tiek delimiteris ir reikalingas. O jei kokiu nors parametru grupe su papildoma informacija ir tu grupiu ne viena ir ne penkios? Hemorojus butu, ne kitaip...
        
        "zZz" parašė naujienų news:rqu0kf$af$1@news.omnitel.net...
        
        Nori? - Imk. Delimiterio nėra. Dinaminis rinkinys.
        
        Imk testą: 0x11 0x97 0x20 0x67 0x92 0x0H
        
        zZz, 11th Dec 2020 12:24 pm GMT+0200 permalink
        
        On 2020-12-11 11:23, DGS wrote:
        
        0x0H ? Cia jau kazkas uzslepto :D
        
        Aha ;)
        
        Siaip tai del delimiteriu besigincydami dar atsizvelkim i tai, kas gaunama is serialo. Jei ten temperaturos sensorius raportuoja temperatura ar variklis apsukas, tai tiek delimiteris ir reikalingas. O jei kokiu nors parametru grupe su papildoma informacija ir tu grupiu ne viena ir ne penkios? Hemorojus butu, ne kitaip...
        
        Nėr ginčo. Protokolo gi neturim :)

Usenet @ RKM

Dar biškį su C# padėkite

A short format overview