1074 replies to this topic

[TLM]

I put together this little trick to add repeat characters without a loop.
I know RegEx is slow but shouldnt it return 0 (error) or 15 (expected) characters rather than 9 (anomalous)?

SetFormat, Float, % (".14",_:=0.,C:=RegExReplace(_+0,"[\d.]",Chr(32)))
Msgbox % ">" C "<" ; <-- should be 15 spaces not 8 see below code.

This one works for obvious reasons

SetFormat, Float, % (".14",_:=0.)
C:=RegExReplace(_+0,"[\d.]",Chr(32))
Msgbox % ">" C "<"

You come to expect error or no error, not kinda error. Unless I'm not think about this correctly.

To debug this, returning the string from memory shows the length

SetFormat, Float, % (".14",_:=0.,L:=StrPut(RegExReplace(_+0,"[\d.]",Chr(32)),&C))
Msgbox % ">" StrGet(&C) "< " L

[just me]

Hi TLM,
 
your RegExReplace() is processed before the new format is set. So the default 0.6 (8 characters) is used.
 

MsgBox, 0, A_FormatFloat, % A_FormatFloat . " = " . StrLen(0.0 + 0) . " characters."
SetFormat, Float, % (".14", _:=0., C := RegExReplace(_+0, "[\d.]", Chr(32)))
Msgbox % ">" C "<" . " - StrLen( C ) = " . StrLen( C ) ; <-- should be 15 spaces not 8 see below code.

[smorgasboard]

hi all merry christmas!

i want to sort lines. lines are of two types either they have a pattern of (negative)?1to3digits(dot)2digits in them or they dont

i want to sort the lines that have this pattern of 1to3digits(dot)2digits. i want these lines to be replaced with all the contents that they already have including this pattern (some values are negative also) with serial no. in the left most side.

 

nothing happens to the lines that dont have this pattern (these are actually marks) or these lines might as well be deleted.

 

thanks in advance

 

MARKS OF CANDIDATES
                                                        IN ROLL NUMBER ORDER

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
~~~~~
Record# ROLL        NAME                        TOTAL CAT1 CAT2 CAT3 GENDER DEPTL
 108901 9212000290 JEENSHA SATHAR               28.25 6    0    0    2      2
 108902 9212000292 DINDU KG                     38.50 6    0    0    2      2

result is

 

 

MARKS OF CANDIDATES
                                                        IN ROLL NUMBER ORDER

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
~~~~~
Record# ROLL        NAME                        TOTAL CAT1 CAT2 CAT3 GENDER DEPTL
 1. 108902 9212000292 DINDU KG                     38.50 6    0    0    2      2

2. 108901 9212000290 JEENSHA SATHAR               28.25 6    0    0    2      2

[smorgasboard]

@TLM thanks again!!

 

you hit the nail on the head! the above problem is solved again by you.

[adrianh]

Hey smorgasboard, I know that you already got an answer from TLM and that's cool, but I wanted to give your problem a try anyway as it interested me and this is what I came up with:

x := "
(
 
MARKS OF CANDIDATES
                                                        IN ROLL NUMBER ORDER

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
~~~~~
Record# ROLL        NAME                        TOTAL CAT1 CAT2 CAT3 GENDER DEPTL
 108901 9212000290 JEENSHA SATHAR               28.25 6    0    0    2      2
 108902 9212000292 DINDU KG                     38.50 6    0    0    2      2
result is
 
 
MARKS OF CANDIDATES
                                                        IN ROLL NUMBER ORDER

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
~~~~~
Record# ROLL        NAME                        TOTAL CAT1 CAT2 CAT3 GENDER DEPTL
 1. 108902 9212000292 DINDU KG                     38.50 6    0    0    2      2
2. 108901 9212000290 JEENSHA SATHAR               28.25 6    0    0    2      2
)"


x := RegExReplace(x, "m`a)(?:(.*?(\d{1,3}\.\d\d ).*$\R?)|.*$\R?)", "$2$1")
Sort x, N
x := RegExReplace(x, "m`a)\d{1,3}\.\d\d (.*$\R?)", "$1")
MsgBox %x%

Here is a more detailed and commented version:

;// I'm slowly migrating to this as my newline match.
NL := "\R"

;// This sub regex is the number that must exist in the line to match
NUMBER := "\d{1,3}\.\d\d "

;// This regex describes a line that I want and puts it in the 1st capture group.
;// Further, put the number of interest in the 2nd capture group.
WANT := "(.*?(" NUMBER ").*$" NL "?)" 

;// This regex states match that line that I want *or* still match the line 
;// but don't put it in a capture group.
DO_OR_DONT_WANT := "(?:" WANT "|.*$" NL "?)"

;// If what I want is found, capture groups 1 and 2 are populated otherwise 
;// they are empty.  Put 2nd capture group infront of 1st.
x := RegExReplace(x, "m`a)" DO_OR_DONT_WANT, "$2$1")

;// sort the lines
Sort x, N

;// Remove the leading number used to sort on
x := RegExReplace(x, "m`a)" NUMBER "(.*$" NL "?)", "$1")

;// you know ;)
MsgBox %x%

I found the problem interesting and learned a few things from it. Here's hoping that it does the same for you.

I would also be interested in seeing what TLM's solution was. He comes up with some great stuff!

Thanks, and happy holidays!


Adrian

[TLM]

"your RegExReplace() is processed before the new format is set. So the default 0.6 (8 characters) is used."

 

Thank you just me, your advice led me to the correct solution ( once again )

VarSetCapacity(_,15*2,1),S:=RegExReplace(_,".",Chr(32)),_:=""
Msgbox % ">" S "<"

[just me]

You don't even need your magic var "_" in the current version:

S := RegExReplace((S, VarSetCapacity(S, 15 << !!A_IsUnicode, 1)), ".", " ")
Msgbox % " S: >" . S . "< - StrLen(S) = " . StrLen(S)

[TLM]

you know I had a feeling there was a bit shift.. I just couldn't conceptualize it tytyty

I see what you did by extending hStack param, slick .. <<< no nested parenthesis revealed the uni

double inversion is cute (returns correct chr count with/out it) and your modal alert is ohso js concat lololol

[just me]

btw your modal alert is ohso js concat lololol

 

 

Maybe I'll change it when using v2, still not sure.

[TLM]

Wait, is V2 using the concat operator *shock* ??

[just me]

http://l.autohotkey.net/v2-changes.htm
Expressions:
Auto-concat now requires at least one space or tab in all cases (the v1 documentation says there "should be" a space).

 

[TLM]

Please see note: http://www.autohotke...-63#entry562252

[adrianh]

Could you give a sample input? I wouldn't have thought that a foreign string (one that comes from outside of the AHK script) would be interpreted the same way as one that is within.

EDIT: what is the resulting string going to be used for?



Adrian

[guest3456]

i cant stand auto concat, the . operator makes code so much more readable

[adrianh]

I find the opposite actually, but maybe it might be the way it's being used?


Adrian