Hallo
Ich wollte mir einen kleinen automatischen autoit rechner basteln.
Leider bin ich ein vollpfosten was autoit betrifft
ich hatte vor eine variable Zahl ( meist 6 stellig)
immer durch 32 zu teilen.
von dem daraus resultierende ergebniss möchte ich die zahlen hinter dem komma
nochmals mit 32 multiplizieren, um letzendlich das ergebniss zu erhalten.
mal nen beispiel:
987654 geteilt durch 32 ergibt 30864,1875
(zahl nach komma) 0,1875 mal 32 ergibt 6
so sollte der rechner das eigentlich rechnen.
dabei ist die 6 stellige ausgangszahl variabel wie gesagt.
leider hab ich bis auf ein gui nicht wirklich einen plan wie ich das machenkann.
ich habe zwar bei den knöppen multuplizieren und dividieren die 32 schon mit im giu drinne
aber das erleichtert maximal die eingabe
das soll aber selbständig das ergebniss bringen wenn ich die 6 stellige zahl eingebe und = drücke
vllt kann sich ja einer erbarmen mir zu helfen ( ohne mich auf die Hilfe hin zu weisen - da ich die nicht wirklich verstehe)
Vielen Dank im Vorraus
hier mal das gui obwohl das nich wirklich sinn macht geschweige den ne vorlage ist
edit : weis einer wie man noch bewerkstelligen könnte das man das endergebniss ( in dem fall 6 ) noch mit einem buchstaben verbinden könnte ?
also die ausgabe wäre dann 6 - G oder je nach dem was das endergebniss ist, die ziffer immer mit einem dazu gehörigen buchstaben aus zu geben.
( es gibt eh nur maximal 31 endergebnisse egal welche zahl vorraus geht)
$GUI = GUICreate("Brotpreis Rechner", 180, 80, -1, -1)
$input = GUICtrlCreateInput("", 10, 10, 160, 20)
[/autoit][autoit][/autoit][autoit]$bnDiv = GUICtrlCreateButton("/", 10, 40, 40, 30)
$bnMulti = GUICtrlCreateButton("*", 50, 40, 40, 30)
$bnResultat = GUICtrlCreateButton("=", 90, 40, 40, 30)
$bnC = GUICtrlCreateButton("C", 130, 40, 40, 30)
GUISetState()
[/autoit][autoit][/autoit][autoit]While 1
Switch GUIGetMsg()
Case - 3
MsgBox(64, "", " By By " & @TAB, 1)
Exit
Case $bnC
GUICtrlSetData($input, "")
Case $bnDiv
GUICtrlSetData($input, GUICtrlRead($input) & "/32")
Case $bnMulti
GUICtrlSetData($input, GUICtrlRead($input) & "*32")
Case $bnResultat
If GUICtrlRead($input) = "" Then
MsgBox(64, "", "keine eingabe" & @TAB)
Else
GUICtrlSetData($input, Execute(GUICtrlRead($input)))
EndIf
EndSwitch
WEnd