diff options
author | Tom Ryder <tom@sanctum.geek.nz> | 2017-05-14 21:49:38 +1200 |
---|---|---|
committer | Tom Ryder <tom@sanctum.geek.nz> | 2017-05-14 21:49:38 +1200 |
commit | 115f95904dddebec3b2442ddaf2fde466748d59e (patch) | |
tree | 9fdb167da0bcaef6e865868b27adcb464a9d7b94 /games/drakon.awk | |
parent | Array-less approach to squ(6df) (diff) | |
download | dotfiles-115f95904dddebec3b2442ddaf2fde466748d59e.tar.gz dotfiles-115f95904dddebec3b2442ddaf2fde466748d59e.zip |
Avoid re-calcing length each loop in drakon(6df)
Diffstat (limited to 'games/drakon.awk')
-rw-r--r-- | games/drakon.awk | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/games/drakon.awk b/games/drakon.awk index 4b8c35c5..1eddb4f2 100644 --- a/games/drakon.awk +++ b/games/drakon.awk @@ -1,9 +1,10 @@ # 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 <= length; i++) { + for (i = 1; i <= len; i++) { char = substr($0, i, 1) if (char ~ /[a-zA-Z]/) char = (toggle = !toggle) ? tolower(char) : toupper(char) |