1 files changed, 15 insertions, 0 deletions
diff --git a/games/drakon.awk b/games/drakon.awk
new file mode 100644
index 00000000..5d73f74d
--- /dev/null
+++ b/games/drakon.awk
@@ -0,0 +1,15 @@
+# TyPe lIkE AnDoR DrAkOn fRoM AnCiEnT DoMaInS Of mYsTeRy
+# <http://www.adomgb.info/adomgb-4.html>
+{
+    for (i = 1; i <= length($0); i++) {
+        c = substr($0, i, 1)
+        if (i % 2) {
+            c = tolower(c)
+        }
+        else {
+            c = toupper(c)
+        }
+        s = s c
+    }
+    print s
+}