17 lines
299 B
AutoHotkey
17 lines
299 B
AutoHotkey
for k, v in [[0, 25], [250, 265], [1000, 1025]] {
|
|
while v[1] <= v[2] {
|
|
Out .= Ordinal(v[1]) " "
|
|
v[1]++
|
|
}
|
|
Out .= "`n"
|
|
}
|
|
MsgBox, % Out
|
|
|
|
Ordinal(n) {
|
|
s2 := Mod(n, 100)
|
|
if (s2 > 10 && s2 < 14)
|
|
return n "th"
|
|
s1 := Mod(n, 10)
|
|
return n (s1 = 1 ? "st" : s1 = 2 ? "nd" : s1 = 3 ? "rd" : "th")
|
|
}
|