Jump to content

ABC words: Difference between revisions

No edit summary
Line 332:
=={{header|AutoHotkey}}==
<lang autohotkey>FileRead, unixdict, unixdict.txt
MsgboxLoop, %Parse, ABCWord(unixdict, "`n")
if ABCWord(A_LoopField)
{
count++
text .= count ": " A_LoopField . Delimiter"`n"
}
Msgbox, %text%
 
ABCWord(List, DelimiterWord) {
if InStr(Word, "a")
Loop, parse, List, %Delimiter%
if InStr(A_LoopFieldWord, "b") > InStr(Word, "a")
if InStr(A_LoopFieldWord, "bc") > InStr(A_LoopFieldWord, "ab")
return texttrue
if InStr(A_LoopField, "c") > InStr(A_LoopField, "b")
{else
count++return false
else
text .= count ": " A_LoopField . Delimiter
return false
}
else
return text
return false
}</lang>
}
}</lang>
 
{{out}}
Cookies help us deliver our services. By using our services, you agree to our use of cookies.