FileRead, WordList, %WordListDir%

;[Indexing]
Loop, Parse, WordList, `n
{
	If (SubStr(A_LoopField,1,1) = Chr(IndexChr+65)){
		WordListLetterStart := WordListLetterStart "|" A_Index
		IndexChr++
	}
}
StringSplit, WordListLetterStart, WordListLetterStart, |
MsgBox, % WordListLetterStart
;[/Indexing]