Probleme beim Rechnen mit HEX und DEC

mm4040

Hallo,

ich habe Probleme beim Rechnen mit Hexadezimal Zahlen und Dezimal Zahlen.

Wie ich es auch wende und drehe , es funktioniert nicht.

Problem:

Ich lese aus einem Gerät einen Hex Wert aus. zb. 3E8=1000

Rechne den Wert in Dezimal um und addiere über eine Inputbox einen Wert dazu z.B 200 dazu

Das Ergebnis ist richtiger Weise 1200 ( Was ein Wunder)

Jetzt möchte ich die 1200 wieder in Hex umrechnen und bekomme immer nur "0000"

Kann mir jemand Helfen ?

$rec = TCPRecv($Socket, 2048)

TCPSend($Socket, Chr(0x02) & "s{ 00 01 " & $HexDI & "}" & $aParameter[$y] & Chr(0x03)) ;

$rec = TCPRecv($Socket, 2048)

If $y = 3 Then ;X-POs

;~ $b1=$rec

;~ ConsoleWrite("Länge" & StringLen($rec))

$b1 = StringMid($rec, 26, StringLen($rec) - 26)

ConsoleWrite("1 Wert ausgelesen (Hex) -> " & $b1 & @CRLF); zB. 1000=3E8

ConsoleWrite("2 Wert umrechnen in(DEC) -> " & Dec($b1) & @CRLF);

ConsoleWrite("3 Wert aus Eingabebox -> " & $InputDifferenz & @CRLF)

Local $Ergebnis = Dec($b1) + $InputDifferenz ; Addition der beiden Werte

ConsoleWrite("4 Ergebnis=" & $Ergebnis & "->Hex=" & Hex($Ergebnis) & @CR)

EndIf

TCPCloseSocket($Socket)

TCPShutdown()

------------- Ausgabe-----------

1 Wert ausgelesen (Hex) -> 3E8

2 Wert umrechnen in(DEC) -> 1000

3 Wert aus Eingabebox -> 200

4 Ergebnis=1200->Hex=0000

**alpines**

AutoIt sieht keinen Unterschied zwischen Hexadezimal- und Dezimalzahlen. Du kannst einfach 0xBC + 121 rechnen.

Dein Problem müsste eher an der TCPRecv-Funktion und dem StringMid dahinter liegen (oder der eingegebenen InputDifferenz).

Da du uns nur sehr wenig von deinem Code präsentierst können wir nur raten.

$InputDifferenz taucht in deinem Snippet nicht auf, ist $InputDifferenz die Variable die das Control beinhaltet oder der Inhalt des Controls der mit GUICtrlRead eingelesen wird?

mm4040

Natürlich will ich euch nicht raten lassen.

die TCPRecv-Funktion funktioniert, auch die Eingabebox($InputDifferenz) funktioniert.

Ich habe ja eine Variable deshalb kann ich nicht mit 0x..+ 200 Rechnen

Es wird ja richtig gerechnet, aber ich muss das Ergebnis 1200 wieder in Hex umrechnen und das funktioniert nicht

**autoiter**

Das Problem für micht (vllt. uns) ist, dass ein einfaches Beispiel eben doch funktioniert.

Code

$b1 = "3E8"
Local $Ergebnis = InputBox("Testzahl", "", "") + Dec($b1)
MsgBox(0,"", "Hex = " & Hex($Ergebnis) & @CR)

mm4040

ohen Worte

Danke

mm4040

Danke du hast mir sehr geholfen,

wenn ich nämlich die Reihenfolge vertausche , dann kommt Müll raus

$b1 = "3E8"

Local $Ergebnis = Dec($b1)+InputBox("Testzahl", "", "")

MsgBox(0,"", "Hex = " & Hex($Ergebnis) & @CR)

**autoiter**

Ja. Wir müssen uns selten um Datentypen kümmern in AutoIt. Das ist geil und scheiße

So funktioniert das:

Code

$b1 = "3E8"
Local $Ergebnis = Dec($b1)+Int(InputBox("Testzahl", "", ""))
MsgBox(0,"", "Hex = " & Hex($Ergebnis) & @CR)