StringRegExp Question

[EnnArr]

Hello!

Very new to AutoIt so please pardon my ignorance. I'm trying to sort through some text on the clipboard and the text that i'm looking for is always in a particular pattern.

+xx to Charisma

StringRegExp($clipboard, 'to Charisma') works, but i'm trying to only get a match when xx is above a certain value.

Can anyone point me in the right direction? I've tried searching but I can't seem to find what I need.

Thank you

[iamtheky]

 go ahead and call them widgets everytime instead of game related attributes (as we dont do gaming scripts round here).    you can get just the numbers, test them, and then return the entire string...is that the intent?

If you just want the boolean return thats cool, but working backwards from the full return might help a bit.

;~ $sTest = "+200 to widgets" ;match due to greater operator
;~ $sTest = "+19 to widgets" ;match due to = operator
;~ $sTest = "+18 to widgets" ;no match less than min


$sPattern = "\+(\d+) to widgets" ;this is assuming all strings have a + sign in them, if there is a chance of a '-' or no operator this expression would fail
$min = 19

$x = number(stringregexp($sTest , $sPattern , 3)[0]) >= $min ? stringregexp($sTest , "(" & $sPattern & ")" , 3)[0] : "<does not match criteria>"

msgbox(0, '' , $x)

 

Edited June 1, 2018 by iamtheky

[EnnArr]

Wow, thank you so much.  This will help me accomplish my goal. Do you mind if i ask some questions about the function and definitions in AutoIT?

$sPattern = "\+(\d+) to charisma"

When defining the pattern, +(\d+) is equal to +xx where xx is any decimal, correct? What does the first \ in the pattern represent? Will adding a (?i) after make any following text after in the pattern case insensitive? 

Thanks again for your help!

 

[EnnArr]

$x = number(stringregexp($sTest , $sPattern , 3)[0]) >= $min ? stringregexp($sTest , "(" & $sPattern & ")" , 3)[0] : "<does not match criteria>"

This code works  great, but I don't understand why. I'm trying to make sense of it in the documentation but i'm not getting anywhere. Am I on the right track?

Is the  flag 3 returning the match to an array then then 'number(stringregexp' isolates the numbers and checks if it >= $min ?

After that I'm lost.

 

[iamtheky]

The first backslash escapes the plus sign (if you change that to a negative the direct array call throws an exception because no array was returned from the regex). The capture is any digit with the unescaped plus sign meaning one or more.  The 3 returns an array of global matches so the [0] after it is returning the first element of that array.

it could be set to insensitive, or it could be '\Dharisma', lots of choices depending on the variety of input

 

The ternary says 

check that number ? If true return the whole match because I stick that whole thing in another set of parentheses : else whatever you want when it fails the match

Edited June 1, 2018 by iamtheky

[jchd]

Another way, scanning the subject string only once:

Local $s = "fhui +17 to Charisma -25 to fhkl +43 to me +51 to Charisma +16 to Charisma"
Local $max = 0
$max = Int(Execute(StringRegExpReplace($s, "(?:.*?)\+(\d\d) to Charisma", "($1 > $max ? - $max + Assign('max', $1) - 1 + $max : 0) + ") & "0"))

ConsoleWrite($max & @LF)

A rare use of Assign().