Français
Forum

COM HEX senden

 

Erasmus.Herold
Hallöchen ...

Um un Gerät à qui Schnittstelle COM1 trop initialisieren, muss je une
HEX Code senden.

Anders comme sonst, peux je qui COM Schnittstelle alors pas avec ...
WriteCom(id%, "ATZ\n")
ansprechen.

je muss folgenden HEX Code senden, um den Leseprozess trop starten: BB 17 02 00 00 19 0D 0A

avec ...
WriteCom(id%, "BB 17 02 00 00 19 0D 0A")
habe je mais keinen Erfolg, wahrscheinlich, weil es pas wirklich comme HEX gesendet wird. Hat quelqu'un une concept?

Dankeschön.
 
22.01.2019  
 




p.specht

si du es Byte-weise faire veux, ersetze den gesamten String velours Anführungszeichen par cela là (sur qui Schnelle, daher plutôt unelegant):

chr$($BB)+chr$($17)+chr$($02)+chr$($00)+chr$($00)+chr$($19)+chr$($0D)+chr$($0A)
 
XProfan 11
Computer: Gerät, daß es in Mikrosekunden erlaubt, 50.000 Fehler zu machen, zB 'daß' statt 'das'...
22.01.2019  
 




Erasmus.Herold
marteau!

vite & bien!
 
22.01.2019  
 




H.Brill
qui Beitrag ist zwar déjà quelque chose älter, mais ici ist encore
qui Universalfunktion en supplément :
Déclarer String bt, B[], C[]
bt = Chr$($BB) + Chr$($17) + Chr$($02) + Chr$($00) + Chr$($00) + Chr$($19) + Chr$($0D) + Chr$($0A)
CLS
Imprimer bt
Imprimer
Imprimer Bytes("BB 17 02 00 00 19 0D 0A", 0)
Imprimer Bytes("BB 17 02 00 00 19 0D 0A", 1)

Proc Bytes

    Paramètres String s, Long Option
    Déclarer String send, B[], C[]
    B[] = Explode(s, " ")
    SetSize C[], SizeOf(B[])
    MAT C[] = "$"
    MAT C[] + B[]

    Select Option

        CaseOf 0

        Move("ArrToList", C[])
        send = Move("ListToStr", »)

        CaseOf 1

        send = »

        WhileLoop 0, SizeOf(C[]) - 1

            send = send + Chr$(C[&LOOP])

        Endwhile

        Otherwise
        send = »

    EndSelect

    Retour send

ENDPROC

Waitkey

peux ensuite beides, comme zusammengezählter Wert ou bien zum Konvertieren
avec dem $-marque devant et Komma entre. Siehe Option comme
2. paramètre.
 
Benutze XPROFAN X3 + FREEPROFAN
Wir sind die XProfaner.
Sie werden von uns assimiliert.
Widerstand ist zwecklos!
Wir werden alle ihre Funktionen und Algorithmen den unseren hinzufügen.

Was die Borg können, können wir schon lange.
01.01.2023  
 




Erasmus.Herold
eh bien - quand même vielen Dank pour deine concept.

Salut Erasmus
 
02.01.2023  
 



répondre


Topictitle, max. 100 marque.
 

Systemprofile:

ne...aucune Systemprofil angelegt. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

s'il te plaît s'inscrire um une Beitrag trop verfassen.
 

Options du sujet

3.800 Views

Untitledvor 0 min.
H.Brill10.10.2024
Wilfried Friebe28.05.2023
Uwe ''Pascal'' Niemeier13.03.2023
Paul Glatz06.03.2023
plus...

Themeninformationen



Admins  |  AGB  |  Applications  |  Auteurs  |  Chat  |  protection des données  |  Télécharger  |  Entrance  |  Aider  |  Merchantportal  |  Empreinte  |  Mart  |  Interfaces  |  SDK  |  Services  |  Jeux  |  cherche  |  Support

un projet aller XProfaner, qui il y a!


Mon XProfan
Privé Nouvelles
Eigenes Ablageforum
Sujets-La liste de voeux
Eigene Posts
Eigene Sujets
Zwischenablage
Annuler
 Deutsch English Français Español Italia
Traductions

protection des données


Wir verwenden Cookies seulement comme Session-Cookies à cause de qui technischen Notwendigkeit et chez uns gibt es aucun Cookies de Drittanbietern.

si du ici sur unsere Webseite klickst ou bien navigierst, stimmst du unserer Erfassung de Informationen dans unseren Cookies sur XProfan.Net trop.

Weitere Informationen trop unseren Cookies et en supplément, comment du qui Kontrolle par-dessus behältst, findest du dans unserer nachfolgenden Datenschutzerklärung.


d'accordDatenschutzerklärung
je voudrais keinen Cookie