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