Search the Community
Showing results for tags 'Numbers'.
-
Hi all, How do I allow an input control (GUICtrlCreateInput) to get only digits and dots? $ES_NUMBER - allows only digits, but I need to be able to type something like this only: 2.15.1598.1 Can you help me please?
-
Hello. I need to perform a specific string replace, but not sure how to go about it. The scenario is this: I have a large block of text. Within the text colons appear ":", Sometimes the colons are used in a sentence appearing after a word. Other times they appear in between numbers like a ratio or a sport score (e.g. "6:8"). I want to replace the colons appearing between numeric values like 6:8 with the word "to", but not the ones appearing at the end of a sentence. Is there a way that I can have StringReplace (or any other method) differentiate when to replace the colon based on it appearing between numbers? I did try searching for a similar scenario. Thank you for any help.
-
Hi everyone I've read all yesterday forums , i think it's me , but i could not find a clue for this : I need to generate large numbers and output into csv format or excel format - Range between 3000000 and 9000000 - Need 5000000 numbers - Numbers should not be in series ( Mixed and Random ) - I would prefere to have a check digits at the end Anyone could help please ? Thank you
-
hi everyone! I need some help with my rpn calculator. I first translated it from vbscript to autoitscript and that's when i stumbled on problem one: (46) : ==> Array variable has incorrect number of subscripts or subscript dimension range exceeded.: $Stack[ubound($Stack)] = $Item ^ ERROR After that (and i know this from testing it as a vbscript) it can't work with negative numbers: "1 - - 2" to Reverse Polish notation = "1 - 2 -" gives me the build in error... Can you guy's help me with my code pleas? Func Print($what,$er = 0) $t = '' if $err <> 0 then $t = 'ERROR!' MsgBox($er,$st,$what) EndFunc Func RPN($Tokenarray) Local $Stack = [] Local $Result Local $Operator_B Local $Operator_A For $Token = 0 To Ubound($Tokenarray) If Isoperator($Tokenarray[$Token]) Then $Operator_B = Pop($Stack) $Operator_A = Pop($Stack) If $Operator_A = "" Then Print("The user has not input sufficient values in the expression.",16) exit EndIf Switch $Tokenarray[$Token] Case "+" $Result = Number($Operator_A,3) + Number($Operator_B,3) Case "-" $Result = Number($Operator_A,3) - Number($Operator_B,3) Case "*" $Result = Number($Operator_A,3) * Number($Operator_B,3) Case "/" $Result = Number($Operator_A,3) / Number($Operator_B,3) Case "^" $Result = Number($Operator_A,3) ^ Number($Operator_B,3) EndSwitch Push($Result,$Stack) Else Push($Tokenarray[$Token],$Stack) EndIf Next If Ubound($Stack) > 1 Then Print("The user input has too many values.",16) Exit EndIf Return pop($Stack) EndFunc Func Push($Item, Byref $Stack) If Ubound($Stack) > -1 Then Redim $Stack[Ubound($Stack) + 1] $Stack[Ubound($Stack)] = $Item Else Local $Stack = [$Item] EndIf EndFunc Func Pop($Stack) $pop = "" If Ubound($Stack) > -1 Then $Pop = $Stack[Ubound($Stack)] Redim $Stack[Ubound($Stack) - 1] EndIf Return $pop EndFunc Func Peek($Stack) $peek = "" If Ubound($Stack) > -1 Then $Peek = $Stack(Ubound($Stack)) EndIf Return $peek EndFunc Func Isoperator($Operator) Return StringInstr("+-*/^&<=>", $Operator) <> 0 And StringLen($Operator) = 1 EndFunc Func Precedence($Operator) If Isoperator($Operator) Then Switch $Operator case "^" Return 4 case "*","/" Return 3 case "+","-" Return 2 case "&" Return 1 case "<","=",">" Return 0 EndSwitch EndIf EndFunc ;################################################################################################## ; (4 - -5) = (4|-|-|5) = (4|-|5|-) ; input tokens rpn Global $calculate_this = ["4","-","5","-"] Print(rpn($calculate_this)) thanks in advance , TheAutomator
- 30 replies
-
- rpn
- calculator
-
(and 2 more)
Tagged with:
-
This probably has a simple solution, but I cannot figure it out. First here is the code: #include #include #include #include #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("", 234, 58, 192, 124) $FIRST = GUICtrlCreateLabel("First", 8, 16, 23, 17) $SECOND = GUICtrlCreateLabel("Second", 104, 15, 41, 17) $1st=GUICtrlCreateInput("", 36, 12, 57, 21) $2nd=GUICtrlCreateInput("", 150, 12, 57, 21) GUISetState(@SW_SHOW) #EndRegion ### END Koda GUI section ### $FIRST1=GUICtrlRead($1st) $SECOND2=GUICtrlRead($2nd) if $FIRST1<>"" Then $SECOND2=$FIRST1+$SECOND2 EndIf While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd What I want to do is, when I put a number in the First inputbox, the Second inputbox automatically adds it to its total. Example: First: I put in the number 6 Second: It already has the number 8 in it I want the Second to automatically update to 14. Any help is greatly appreciated.
- 3 replies
-
- inputboxes
- input
- (and 4 more)
-
Okay, I'm guessing after a while my posts are becoming annoying so I'll try to make this my last question. I've been trying to guess how to make a sequence of actions in a timed difference for example "(action of num key 1) 0.5 second delay from (action of num key 2)" again to try to simplify 1, (0.5 secs) 2 (1.0 secs) 3 (1.5 secs) [1,2,3 being the keys on the keyboard]. so basically i have no idea how to do this but it'd be interesting to mess about with and fiddle with so, anyone know?