;duplicate top10 src = ( 加 就 加 加 加 的 到 否 的 额 一 他 个 飞 的 的 他 的 对 额 额 他 哦 平 去 我 额 人 啊 是 的 飞 个 好 ) a := [] b = loop, Parse, src, `n, `r { if !a["" A_LoopField] a["" A_LoopField] := 1 else a["" A_LoopField] += 1 } for c,d in a { d2 := SubStr("00000", 1, 5-strlen(d)) d str := d2 "_" c b .= b ? "`n" str : str } Sort, b, R e := StrSplit(b,"`n","`r") f = loop 10 f .= f ? "`n" e[A_index] : e[A_index] MsgBox % f
60 queries in 3.315 seconds |