Español
Fuente/ Codesnippets

Auslesen Temperaturfühler Usb

 
- Página 1 -



Web
Scanner
Apéndice:
Web Scanner, Beitrag=56582, Zeitpunkt=28.03.2010
Usted puede Usted dieses Thermometer en Ebay bestellen:

USB xp linux thermometer,RS232 protocol,TEMPer232
Ebay Artikelnummer:220564891464

Herstellerseite:
[...] 

Lo kostet 18US$ + 6$ Fracht.
Das Temper232 kommt de China, dauert pocos Tage.

Grüße

Web


Web Scanner, Beitrag=56571, Zeitpunkt=28.03.2010
Anbei el Ver código fuente. Kann uno sicher todavía viel mejor hacer, pero funktioniert erstemal:
KompilierenMarcaSeparación
Temperaturmessung 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

@Clos
a>(f%) End


¡Hola Programmierfreunde,

después de längerer Tiempo Yo otra vez una kleines Softwareprojekt.
Lo va una Temperatursteuerung. Dazu muß Soy un USB
Temperaturstick auswerten. Algo como hier: Ebay Artikelnummer: 380167386533

Nun mi Cuestión, ha así algo ya alguien gemacht?
Gibt lo como spezielle Treiber, dlls, oder sonstige Hilfen?
Yo muß dazu sagen, el el Stick todavía no en me weilt y
por lo tanto es todavía algo dürftig con el Datenlage

Grüße

Web
 
Xprofan X3.1
Win7 auf AMDX6
12.10.2009  
 



 
- Página 2 -



GDL
Hola Roland,

genauso como du el serielle Schnittstelle eingebettet hast.
Das dein XProfan el Windowseigene USB Übergabe anspricht.

Kenne mich con USB en el WinBereich überhaupt no de.
Könnte me algo como vorstellen
- Diálogo el el angeschlossenen USB Geräte con Kanal anzeigt
- open usb para Kanal
- read vom Kanal
- write en el Kanal
- close Kanal

Problema es sólo, dass en USB el Portnummern no fest vergeben son.Mann muss siempre sólo todos USB Geräte ermitteln y el Portnummer de su angesteckten Hardware ermitteln.

Servus
Georg
 
Windows7 Xprofan 8,9,10 [...]  [...] 
13.10.2009  
 



Schaut veces [...]  .
 
13.10.2009  
 




Web
Scanner
Ohh je,
el sieht pero no gerade muy trivial de
Como bin Yo veces algo niedergeschlagen...
Hoffentlich Yo me como no zuviel vorgenommen?

Grüße

Web
 
Xprofan X3.1
Win7 auf AMDX6
13.10.2009  
 




GDL
Hola si,

como besorge Yo más bien pocos alte Rechner con RS232 y en largo Sicht progge Yo mein Programa otra vez en inp y out en.
Wenn el Industrieboards todavía günstiger voluntad, steige Yo en, como esta heutigen Multimediakisten para mich eh nimmer brauchbar son.

Servus
Georg
 
Windows7 Xprofan 8,9,10 [...]  [...] 
14.10.2009  
 



Wo genau liegt porque el problema en solch USB-RS232-Port?

Yo frag wegen el Mondauto.
 
15.10.2009  
 




GDL
@IF,

el problema es en Atmel no el USB Mikrocontrollertreiber.
El haben el neuen Atmel ya Onboard.

Das Problema es, como greife Hice XProfan heraus mittels Windows en el geladenen Treiber a.
El Problemas fangen ya con el USB Kanalnummerermittlung a.
Wenn el Treiber una virtuellen ComPort erschafft isses sí kein Problema.Nur schaffen todos Treiber una virtuellen ComPort?
Aber como dijo,USB es para mich auch Neuland.

Servus
Georg
 
Windows7 Xprofan 8,9,10 [...]  [...] 
15.10.2009  
 




GDL
@ Mondauto

Das Mondauto könnt ihr ya con USB y el FTDI RLE245 oder RLE235 betreiben.
El FTDI Bausteine informe se con el mitgelieferten Treibern automáticamente en Windows a.
Dort erzeugen ellos una virtuellen COMPORT el con el XPofan Befehlen angesprochen voluntad kann.
Ausgangsseitig erzeugen el Bausteine 8bit Parallel oder seriel con Handshaking.

Diesen Umweg mache Yo sí ya.
Yo wünsche me aber direkten Zugriff de XProfan en el windowsinterne USB Übergabeschnittstelle.
So como en el Druckern auch va.Yo melde el USB-Drucker en efecto en Windows a y no cada Programa qué drucken kann.

Servus
Georg
 
Windows7 Xprofan 8,9,10 [...]  [...] 
16.10.2009  
 




E.T.
Yo denke, el angemeldete Drucker se auch no anders como una COM angesprochen, si yo me en mi Drucker así anschaue, qué dieser eingerichtet ha:



Dies probablemente einzig el Treiber hacer puede.

4 kB
Hochgeladen:16.10.2009
Ladeanzahl111
Descargar
 
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, el USB Temperaturfühler es como.

Soweit funktioniert el auch con el mitgelieferten Software.
El Daten voluntad en una Excelfile ausgegeben.
Wahrscheinlich el einfachste Variante el File zuzugreifen y el Daten einzulesen?

Yo hätte lo aber gern anders, direkt con Profano en mein Programa ausgelesen.
¿Cómo se puede Yo como anfangen, bin algo ratlos...
Bin para jede Ayuda dankbar.

Grüße

Web
 
Xprofan X3.1
Win7 auf AMDX6
20.10.2009  
 



Gibt lo una mitgelieferte Software el el _aktuelle Temperatur anzeigt?

Link para Produkt?
 
20.10.2009  
 




Web
Scanner
Produktlink es hier:

[...] 

Aktuelle Temperatur se en una Excelfile abgelegt y aktuell adecuado.


130 kB
Hochgeladen:20.10.2009
Ladeanzahl118
Descargar
 
Xprofan X3.1
Win7 auf AMDX6
20.10.2009  
 



Liegt ne DLL con Doku en?

Andernfalls ne EMail a el Progger de el Programa como...
 
20.10.2009  
 




Zum Quelltext


Título del Tema, max. 100 Signo.
 

Systemprofile:

Kein Systemprofil creado. [anlegen]

XProfan:

 Contribución  Font  Smilies  ▼ 

Bitte registro en una Contribución a verfassen.
 

Tema opciones

56.259 Views

Untitledvor 0 min.
H.Brill09.05.2023
Erasmus.Herold30.04.2019
E.T.25.02.2018
Tango03.09.2017
Más...

Themeninformationen



Admins  |  AGB  |  Applications  |  Autores  |  Chat  |  Política de Privacidad  |  Descargar  |  Entrance  |  Ayuda  |  Merchantportal  |  Pie de imprenta  |  Mart  |  Interfaces  |  SDK  |  Services  |  Juegos  |  Búsqueda  |  Support

Ein Projekt aller XProfan, el lo son!


Mi XProfan
Privado Noticias
Eigenes Ablageforum
Temas-Merkliste
Eigene Beiträge
Eigene Temas
Zwischenablage
Cancelar
 Deutsch English Français Español Italia
Traducciones

Política de Privacidad


Wir uso Cookies sólo como Session-Cookies wegen el technischen Notwendigkeit y en uns hay no Cookies de Drittanbietern.

Wenn du hier en unsere Webseite klickst oder navigierst, stimmst du unserer Erfassung de Informationen en unseren Cookies en XProfan.Net a.

Weitere Informationen a unseren Cookies y dazu, como du el Kontrolle darüber behältst, findest du en unserer nachfolgenden Datenschutzerklärung.


einverstandenDatenschutzerklärung
Yo möchte no Cookie