Code für Geigerzähler

Alle Fragen zur Programmierung, die nicht in die speziellen Themen passen
Benutzeravatar
tionov
Site Admin
Beiträge: 348
Registriert: So 18. Mai 2014, 22:40
Kontaktdaten:

Re: Code für Geigerzähler

Beitrag von tionov » Mo 3. Aug 2020, 13:49

Wieso "leider"?

"gambas3-gb-net ist schon die neueste Version "

Du hast es also schon installiert. Jetzt musst du in deinem Projekt festlegen, dass es die Komponente verwendet (Projekt -> Eigenschaften -> Komponenten). Und danach steht der Reiter zur Verfügung.
Alles Gute,

tionov

phb
Foriker
Beiträge: 10
Registriert: So 26. Jul 2020, 21:53
Kontaktdaten:

Re: Code für Geigerzähler

Beitrag von phb » Mo 3. Aug 2020, 21:54

Ich versuche die serielle Schnittstelle auf dem Pi auszulesen - denn da kommen jetzt meine Counts an. Es ist die erste serielle Schnitstelle (16550 kompatibel) nicht die Mini-UART. Ich kann sie unter Minicom mit dem Befehl "sudo minicom -D /dev/ttyAMA0 -b 9600" einwandfrei ansprechen und auslesen!!! Die Counts vom Geigerzähler kommen einmal pro Minute im Terminal an! Leider aber nicht in dem untenstehenden Programm das ich geschrieben habe. Im Display wird nur "--- Counts" angezeigt :( :( :(
Was mache ich falsch?
' Gambas class file

Public sCounts As String

Public Sub SerialPort1_Read()

Try SerialPort1.Open(1)

If SerialPort1.Status = Net.Active Then
Read #SerialPort1, sCounts, Lof(SerialPort1)

Endif

End


Public Sub TextBox1_KeyPress()

If sCounts <> "" Then
lblCounts.Text = Asc(sCounts) & "Counts"

Else
lblCounts.Text = "--- Counts"
Endif

End

Antworten

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 5 Gäste