Add 2022 day 6 solutions

1 files changed, 26 insertions, 0 deletions

diff --git a/2022/06/puzzles.awk b/2022/06/puzzles.awk
new file mode 100644
index 0000000..2a53949
--- /dev/null
+++ b/2022/06/puzzles.awk
@@ -0,0 +1,26 @@
+#!/usr/bin/gawk -f
+
+BEGIN {
+	RS = "[a-z]"
+	# START PART 1
+	COUNT = 4
+	# END PART 1 START PART 2
+	COUNT = 14
+	# END PART 2
+}
+NR > COUNT {
+	for (i = 2; i <= length(a); i++)
+		a[i - 1] = a[i]
+	delete a[length(a)]
+}
+{ a[(NR == 1 ? 0 : length(a)) + 1] = RT }
+NR > COUNT {
+	for (i in a) {
+		if (_a[a[i]]++ == 1) {
+			delete _a
+			next
+		}
+	}
+	print NR
+	exit
+}