Das deutsche QBasic- und FreeBASIC-Forum

[muerzi]

Hallo Liebe Gemeinde

Habe von einer Firma günstigst eine elektronische Waage erstanden.
(Etwas älteres Modell ~ 1993)
Jetzt möchte ich diese auf dem Hof meines Vaters aufstellen um allerhand zu wiegen (Kühe, Pferde, Schafe), aber egal.

Leider habe ich den PC dazu nicht bekommen um die Messdaten anzeigen zu können --> Aus Datenschutzgründen konnten sie mir den PC nicht geben.

Die Firma hat mir aber ein BASIC programm gegeben das die Daten über die Serielle SChnittstelle des PC's liest.
Größtenteils habe ich es schon in VB6 übersetzt, nur da wos im die "Wurst" geht komm ich einfach nicht weiter

Könnt ihr mir bitte helfen?

[micha]

Sieht so aus als wenn der Controller in der Waage über RTS und DTR gesteuert wird (lesen bei fallender Flanke) aber die eigentlichen Datenbits werden nicht wie Dokumentiert über CTS gelesen sondern "normal" über RX

IN VB6 benutzt du Das Commctrl um die Leitungen zu Treiben
oder machst Du das mit einer DLL für Portzugriffe über IN/OUT ?

Nur mal so am Rande welche Port's stehen denn in Input%/Output% ?

Micha

[muerzi]

Hallo micha

das ist nur der Ausschnitt aus dem "BASIC" Programm das mit vorliegt.
Ich übersetze es nun in VB6 damit ich eine schöne GUI bekomme.
Auserdem wurde mir gesagt das die Waage nur mit einem URALT Rechner funktioniert, warum konnten sie (Firma) mir auch nicht sagen.
Wie man gezielt Leitungen in VB6 anspricht muss ich erst mal googeln.
Aber über RS232 string versenden ist kein Problem.

Zu deiner Frage zu den Adressen

[dreael]

Am besten uns genauer Hersteller und Typ dieser Waage angeben, denn vielleicht lässt sich ja ein Manual im Internet noch dazu finden.

Ansonsten einmal ganz ehrlich: Wird keinerlei reguläres RS-232-Protokoll mit Zeichen unterstützt, für welches Du ganz normal OPEN "COMx:" mit z.B. 9600,N,8,1 o.ä. machen kannst?

Tipp: Ich würde sonst einmal mit HyperTerminal noch etwas spielen!
_________________
Teste die PC-Sicherheit mit www.sec-check.net

[HorstD]

[28398]

InpOut32.dll