aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data commit

Browse source
This commit is contained in:
Ingy döt Net 2023-07-01 11:58:00 -04:00
parent 7387c8f97b
commit cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

8
Task/Longest-common-substring/AutoHotkey/longest-common-substring-1.ahk Normal file
View file

@ -0,0 +1,8 @@
LCS(a, b){
x := i := 1
while StrLen(x)
Loop % StrLen(a)
IfInString, b, % x := SubStr(a, i:=StrLen(x)=1 ? i+1 : i, n:=StrLen(a)+1-A_Index)
res := StrLen(res) > StrLen(x) ? res : x
return res
}

1
Task/Longest-common-substring/AutoHotkey/longest-common-substring-2.ahk Normal file
View file

@ -0,0 +1 @@
MsgBox % LCS("thisisatest", "testing123testing")

5
Task/Longest-common-substring/AutoHotkey/longest-common-substring-3.ahk Normal file
View file

@ -0,0 +1,5 @@
LCS(a, b){
while pos := RegExMatch(a "`n" b, "(.+)(?=.*\R.*\1)", m, pos?pos+StrLen(m):1)
res := StrLen(res) > StrLen(m1) ? res : m1
return res
}

1
Task/Longest-common-substring/AutoHotkey/longest-common-substring-4.ahk Normal file
View file

@ -0,0 +1 @@
MsgBox % LCS("thisisatest", "testing123testing")