Witam serdecznie!
Chciałbym poprosić kolegów o rozwiązanie pewnej kwestii.
Ischarwaiting() zwraca wartość 1 gdy w buforze coś jest a 0 jak nie ma. Dana wejściowa (Znak) z RS232 na postać 5 znaków + enter czyli 6 znaków. Config Serialin=Buffered, Size=6. Zmienna Znak jest wartości String*6. Dane z RS-a odbierane są w pętli:
Program odbiera dane, ale Ischarwaiting() nie zwraca nigdy zera. Wiem to bo w tej pętli umieściłem włączanie diody sygnalizacyjnej a poza nią jej wyłączenie. Skutek-dioda świeci cały czas. Co robię nie tak?
Dane wysyłane są z aplikacji VB w postaci "dane + Chr(13)" i zawsze "dane" mają 5 znaków. Dodam jeszcze konfigurację input-a:
Z góry dziękuję za odpowiedzi
Dodano po 3 [minuty]:
powstał mały byk przy przepisywaniu, "end if" jest tuż nad loop, przepraszam za pomyłkę
Chciałbym poprosić kolegów o rozwiązanie pewnej kwestii.
Ischarwaiting() zwraca wartość 1 gdy w buforze coś jest a 0 jak nie ma. Dana wejściowa (Znak) z RS232 na postać 5 znaków + enter czyli 6 znaków. Config Serialin=Buffered, Size=6. Zmienna Znak jest wartości String*6. Dane z RS-a odbierane są w pętli:
Kod: text
Program odbiera dane, ale Ischarwaiting() nie zwraca nigdy zera. Wiem to bo w tej pętli umieściłem włączanie diody sygnalizacyjnej a poza nią jej wyłączenie. Skutek-dioda świeci cały czas. Co robię nie tak?
Dane wysyłane są z aplikacji VB w postaci "dane + Chr(13)" i zawsze "dane" mają 5 znaków. Dodam jeszcze konfigurację input-a:
Kod: text
Z góry dziękuję za odpowiedzi
Dodano po 3 [minuty]:
powstał mały byk przy przepisywaniu, "end if" jest tuż nad loop, przepraszam za pomyłkę