diff options
Diffstat (limited to 'games')
-rw-r--r-- | games/drakon.awk | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/games/drakon.awk b/games/drakon.awk index b8d72888..ce619585 100644 --- a/games/drakon.awk +++ b/games/drakon.awk @@ -1,14 +1,14 @@ # TyPe lIkE AnDoR DrAkOn fRoM AnCiEnT DoMaInS Of mYsTeRy # <http://www.adomgb.info/adomgb-4.html> { - len = length - line = "" - toggle = 0 + len = length($0) + lin = "" + tog = 0 for (i = 1; i <= len; i++) { - char = substr($0, i, 1) - if (char ~ /[[:alpha:]]/) - char = (toggle = !toggle) ? tolower(char) : toupper(char) - line = line char + chr = substr($0, i, 1) + if (chr ~ /[[:alpha:]]/) + chr = (tog = !tog) ? tolower(chr) : toupper(chr) + lin = lin chr } - print line + print lin } |