Add 2025 day 1 solutions

1 files changed, 19 insertions, 0 deletions

diff --git a/2025/01/puzzle-1.awk b/2025/01/puzzle-1.awk
new file mode 100755
index 0000000..4ed1d7f
--- /dev/null
+++ b/2025/01/puzzle-1.awk
@@ -0,0 +1,19 @@
+#!/usr/bin/awk -f
+
+function mod(n, m)
+{
+	return ((n % m) + m) % m
+}
+
+BEGIN { dial = 50 }
+
+/^L/ { sign = -1 }
+/^R/ { sign = +1 }
+
+{
+	n = substr($0, 2)
+	if ((dial = mod(dial + n*sign, 100)) == 0)
+		acc++
+}
+
+END { print acc }