Beim lernen hat man viele Fragen, die man ohne Hilfe of nicht lösen kann.
Leider verstehe ich die Funktione aus der "MVCOM LIBRARY" nicht richtig und kann folglich den folgenden Code (einzelne Zeilen) nicht in PB übersetzten. Kann mir da jemand helfen? Es handelt sich bei dem Code um den Teil den man braucht um Daten von einem seriellen A/D-Wandler zu lesen (10 BIT DATENERFASSUNGSSYSTEM - BST Conrad electronik; zu finden unter: http://www1.conrad.de/ mit der Artikel-Nr.: 190226 - 62)
Danke
[/code]
DIN.s = "111101111111" ; Input Chanal
B = 512
Vout = 0
Ref = 5
Port.s = "com1: baud=4800 parity=n data=8 stop=1"
Handshake.l = 1
Buffer.l = 1024
HCom.l = ComOpen(Port, Handshake,Buffer,Buffer)
For i = 0 To 12
;OUT AdresseCom1 + 4, (&HFE AND INP(AdresseCom1 + 4))
If Mid(DIN,i,1)
;OUT AdresseCom1 + 4, (&HFD AND INP(AdresseCom1 + 4))
Else
;OUT AdresseCom1 + 4, (&H2 OR INP(AdresseCom1 + 4))
EndIf
;OUT AdresseCom1 + 4, (&H1 OR INP(AdresseCom1 + 4))
;If (INP(AdresseCom1 + 6) And 16) = 16
D = 0
Else
D = 1
Vout = Vout + Bitwert
EndIf
BitWert = BitWert/2
Next i
MessageRequester("Messwert", StrU(Vout,#Word),0)
If Hcom > 0
ComClose(HCom)
EndIf
Code: Alles auswählen