| |
| |
|
| - page 1 - |
|
Web
Scanner | Nachtrag:
Web Scanner, Beitrag=56582, Zeitpunkt=28.03.2010
tu peux Dir cet Thermometer chez Ebay bestellen: USB xp linux thermometer,RS232 protocol,TEMPer232 Ebay Artikelnummer:220564891464 Herstellerseite: [...]  cela Ding kostet 18États-Unis$ + 6$ Fracht. cela Temper232 venez aus la Chine, dauert paire Tage. Grüße Web
Web Scanner, Beitrag=56571, Zeitpunkt=28.03.2010
Anbei qui Voir le texte source. peux on sûrement encore viel besser faire, mais es funktioniert erstemal: KompilierenMarqueSéparationTemperaturmessung Temper232 für PROFAN
über RS232 COMPORT 3
(C) Webbisoft 3/2010
Declare a$, f%, ende%,e%
Declare x$, y$, z%, bz&, xtemp!,xdtemp!, ll&, hh&, testtemp%
Proc GetComInput
Parameters id%
x$ = @ReadCom$(id%,10)
y$ = @ComError(id%)
bz& = @addr(x$)
print "temp: ",bz&
WhileNot x$ = ""
testtemp% = 0
x$=@ReadCom$(id%, 10)
@ComError(id%)
bz& = ord(mid$(x$,1,1))
print "temp1: ",(bz&); " ";
if bz& = 36
testtemp% = 1
else
testtemp% = 0
endif
bz& = ord(mid$(x$,2,1))
print (bz&); " ";
if bz& = 254
testtemp% = 1
else
testtemp% = 0
endif
bz& = ord(mid$(x$,3,1))
print (bz&); " ";
if bz& = 2
testtemp% = 1
else
testtemp% = 0
endif
bz& = ord(mid$(x$,4,1))
print (bz&); " ";
bz& = ord(mid$(x$,5,1))
print (bz&); " ";
bz& = ord(mid$(x$,6,1))
print (bz&); " "
iF TESTTEMP% =1
hh& = ord(mid$(x$,4,1))
ll& = ord(mid$(x$,5,1))
Print "ll& =", (ll&)
Print "hh& =",(hh&)
Xtemp! =256*hh&+ll&
Print "xtemp!=", xtemp!
If Xtemp! > 16384
XDtemp! = -(16384-(Xtemp!)/4)*(0.03125) Korrekturwert 4000h ab 100°C
Else
XDtemp! = (Xtemp!/4)*(0.03125)
EndIf
XDtemp!= XDtemp!-3 Korrekturwert
@Set("Decimals",2)
print "Temperatur USB232= ",xdtemp!,"°C"
endif
sleep 800
EndWhile
print
EndProc
Window 0, 0 - 400, 400
f% = @OpenCom("COM3", 1024, 1024)
@SetCom("COM3:4800,N,8,1")
@WriteCom(f%, chr$($24)+ chr$($10)+chr$($05)+chr$($01)+chr$($01)+chr$($00)+chr$($32)+chr$($01)+chr$($55))
Thermometer initialisieren
y$ = @ComError(f%)
GetComInput f% Antwort abwarten und anzeigen
ende% = 0
WhileNot ende%
a$ = @Inkey$() Tastatur abfragen
If a$ = "§" Ende mit SHIFT-3
ende%=1
Else
GetComInput f% empfangene Zeichen lesen
Endif
EndWhile
@Closa> (f% )
Fin
allô Programmierfreunde,
pour längerer Zeit habe je wieder un kleines Softwareprojekt.
und dir um une Temperatursteuerung. en supplément doit je une USB
Temperaturstick auswerten. Quelque chose comme ici: Ebay Artikelnummer: 380167386533
eh bien mon Frage, hat so quelque chose déjà quelqu'un gemacht?
Gibt es là spezielle Treiber, dlls, ou bien sonstige Hilfen?
je dois en supplément dire, cela qui Stick encore pas chez mir weilt et
daher ist es et avec ca dürftig avec qui Datenlage 
Grüße
Web |
|
| |
| |
| |
|
| |
| |
| - page 2 - |
|
|
GDL | allô Roland,
genauso comment du qui serielle Schnittstelle eingebettet la hâte.
cela dein XProfan qui Windowseigene USB Übergabe anspricht.
Kenne mich avec USB im WinBereich pas du tout aus.
Könnte mir quelque chose comme présenter
- Dialog qui qui angeschlossenen USB Geräte avec canal anzeigt
- open usb pour canal
- read vom canal
- write sur den canal
- close canal
Problem ist arrêt, dass chez USB qui Portnummern pas fest vergeben sommes.homme muss toujours seulement alle USB Geräte ermitteln et qui Portnummer de seiner angesteckten Hardware ermitteln.
salut
Georg |
|
| |
| |
| |
|
|
 | |
| |
| |
| |
|
|
Web
Scanner | Ohh je,
cela sieht mais pas justement très trivial aus 
là suis je la fois quelque chose niedergeschlagen...
Hoffentlich habe je mir là pas zuviel vorgenommen?
Grüße
Web |
|
| |
| |
| |
|
|
GDL | allô iF,
là besorge je mir lieber paire vieille calculateur avec RS232 et sur longtemps Sicht progge je mon Programme wieder sur inp et out um.
si qui Industrieboards encore günstiger volonté, steige je um, là cet heutigen Multimediakisten pour mich eh nimmer brauchbar sommes.
salut
Georg |
|
| |
| |
| |
|
|
| wohin oui c'est ca liegt car cela Problem chez solch USB-RS232-Port?
je frag à cause de dem Moonbuggy. |
|
| |
| |
| |
|
|
GDL | @iF,
cela Problem ist chez Atmel pas qui USB Mikrocontrollertreiber.
qui avons qui neuen Atmel déjà Onboard.
cela Problem ist, comment greife je aus XProfan heraus mittels Windows sur qui geladenen Treiber trop.
qui Probleme attraper déjà avec qui USB Kanalnummerermittlung à.
si qui Treiber une virtuellen ComPort erschafft isses oui ne...aucune Problem.seulement créer alle Treiber une virtuellen ComPort?
mais comment dit,USB ist pour mich aussi Neuland.
salut
Georg |
|
| |
| |
| |
|
|
GDL | @ Moonbuggy
cela Moonbuggy peut son déjà avec USB et den FTDI RLE245 ou bien RLE235 betreiben.
qui FTDI Bausteine annoncer sich avec dem mitgelieferten Treibern automatisch chez Windows à.
là erzeugen vous une virtuellen COMPORT qui avec den XPofan Befehlen angesprochen volonté peux.
Ausgangsseitig erzeugen qui Bausteine 8bit parallèle ou bien seriel avec Handshaking.
Diesen le détour fais je oui déjà.
je wünsche mir mais direkten Zugriff de XProfan sur qui windowsinterne USB Übergabeschnittstelle.
So comme chez den Druckern aussi allez.je melde qui USB-Drucker oui aussi chez Windows à et pas chez chaque Programme quoi drucken peux.
salut
Georg |
|
| |
| |
| |
|
|
E.T. | je denke, qui angemeldete Drucker wird aussi pas anders comme une COM angesprochen, si je mir cela chez meinem Drucker so anschaue, quoi cette installé hat:
ca wird wohl seule qui Treiber faire peut. |
|
| |
| Grüße aus Sachsen... Mario  WinXP, Win7 (64 Bit),Win8(.1),Win10, Win 11, Profan 6 - X4, XPSE, und 'nen schwarzes, blinkendes Dingens, wo ich das alles reinschütte... | 16.10.2009 ▲ |
|
| |
|
|
Web
Scanner | So, qui USB Temperaturfühler ist là.
Soweit funktioniert qui aussi avec qui mitgelieferten Software.
qui données volonté sur un Excelfile ausgegeben.
Wahrscheinlich qui einfachste variante sur cela File zuzugreifen et qui données einzulesen?
je hätte es mais gern anders, direct avec Profan dans mon Programme ausgelesen.
comment peux je là anfangen, suis quelque chose perplexe...
suis pour chacun Aider reconnaissant. 
Grüße
Web |
|
| |
| |
| |
|
|
| Gibt es une mitgelieferte Software qui qui _aktuelle température anzeigt?
Link zum Produkt? |
|
| |
| |
| |
|
|
Web
Scanner | Produktlink ist ici:
[...] 
Aktuelle température wird dans un Excelfile abgelegt et aktuell angezeigt.
 |
|
| |
| |
| |
|
|
| Liegt ne DLL avec Doku chez?
Andernfalls ne EMail à den Progger de dem Programme là... |
|
| |
| |
| |
|
(1.117)
Deutsch
English
Français
Español
Italia
