blob: 1eddb4f2127627b86bf885547c9f5781ce783609 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
# TyPe lIkE AnDoR DrAkOn fRoM AnCiEnT DoMaInS Of mYsTeRy
# <http://www.adomgb.info/adomgb-4.html>
{
len = length
line = ""
toggle = 0
for (i = 1; i <= len; i++) {
char = substr($0, i, 1)
if (char ~ /[a-zA-Z]/)
char = (toggle = !toggle) ? tolower(char) : toupper(char)
line = line char
}
print line
}
|