From 4fd1aae518076adc8b97735225c678d6a362328d Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Sun, 6 Nov 2022 09:58:38 -0800 Subject: Kazinator's Advent of Code stuff. --- 2021/02/part1.tl | 1010 ++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 1010 insertions(+) create mode 100644 2021/02/part1.tl (limited to '2021/02/part1.tl') diff --git a/2021/02/part1.tl b/2021/02/part1.tl new file mode 100644 index 0000000..983506a --- /dev/null +++ b/2021/02/part1.tl @@ -0,0 +1,1010 @@ +(defvar x 0) +(defvar y 0) +(defvar aim 0) + +(defun forward (n) (inc x n)) +(defun down (n) (inc y n)) +(defun up (n) (dec y n)) + +(forward 9) +(forward 9) +(forward 3) +(down 2) +(forward 8) +(down 8) +(forward 1) +(down 6) +(down 9) +(down 9) +(forward 1) +(up 5) +(up 4) +(up 8) +(down 6) +(down 7) +(forward 4) +(forward 6) +(forward 2) +(forward 2) +(forward 4) +(down 2) +(down 6) +(forward 6) +(forward 9) +(up 4) +(up 6) +(down 2) +(forward 7) +(up 7) +(down 8) +(down 4) +(down 6) +(forward 1) +(down 2) +(up 1) +(forward 8) +(down 9) +(forward 6) +(up 9) +(down 8) +(forward 5) +(forward 8) +(down 8) +(up 3) +(up 9) +(down 2) +(down 2) +(forward 5) +(up 7) +(forward 5) +(down 6) +(forward 4) +(down 2) +(up 2) +(up 7) +(up 1) +(down 4) +(down 8) +(forward 6) +(down 2) +(forward 7) +(down 1) +(forward 7) +(forward 1) +(up 1) +(down 4) +(down 3) +(down 4) +(down 4) +(up 8) +(down 1) +(up 7) +(forward 8) +(down 5) +(up 1) +(down 4) +(down 3) +(forward 4) +(up 7) +(forward 1) +(down 4) +(down 2) +(down 4) +(up 8) +(up 6) +(down 1) +(up 3) +(down 5) +(forward 4) +(down 3) +(forward 9) +(down 9) +(forward 2) +(down 4) +(up 3) +(down 4) +(forward 1) +(forward 7) +(forward 9) +(forward 7) +(forward 3) +(forward 6) +(down 4) +(forward 7) +(down 5) +(down 1) +(forward 7) +(up 1) +(down 8) +(down 7) +(down 7) +(down 7) +(down 3) +(forward 4) +(forward 6) +(forward 6) +(forward 1) +(down 7) +(down 6) +(down 8) +(up 5) +(down 7) +(up 6) +(forward 9) +(down 7) +(down 1) +(down 9) +(forward 8) +(up 5) +(down 6) +(forward 3) +(up 2) +(down 1) +(forward 2) +(down 3) +(up 6) +(forward 8) +(forward 1) +(forward 3) +(down 9) +(forward 1) +(down 3) +(up 7) +(forward 8) +(up 8) +(down 7) +(down 2) +(forward 3) +(up 7) +(forward 6) +(down 7) +(down 6) +(up 5) +(forward 9) +(down 7) +(up 5) +(forward 6) +(up 5) +(up 6) +(forward 6) +(down 8) +(down 1) +(forward 7) +(forward 6) +(down 5) +(down 6) +(forward 9) +(down 6) +(up 5) +(forward 9) +(forward 4) +(down 1) +(forward 5) +(down 4) +(forward 5) +(forward 1) +(down 1) +(forward 4) +(down 5) +(forward 4) +(up 8) +(down 1) +(forward 6) +(down 5) +(forward 8) +(forward 8) +(forward 5) +(down 7) +(down 4) +(forward 4) +(up 1) +(up 8) +(down 6) +(up 5) +(forward 6) +(forward 5) +(forward 9) +(down 3) +(down 5) +(forward 3) +(down 6) +(forward 6) +(up 7) +(up 6) +(down 6) +(down 1) +(forward 8) +(forward 9) +(up 5) +(forward 8) +(forward 9) +(forward 9) +(down 2) +(down 8) +(forward 8) +(down 2) +(up 8) +(down 2) +(down 2) +(up 1) +(down 5) +(down 6) +(down 1) +(down 8) +(down 9) +(forward 3) +(forward 2) +(down 6) +(up 8) +(forward 9) +(forward 7) +(forward 1) +(down 8) +(up 8) +(forward 8) +(down 5) +(down 3) +(up 3) +(forward 6) +(forward 5) +(down 4) +(forward 4) +(down 4) +(forward 5) +(forward 9) +(forward 2) +(forward 9) +(down 1) +(down 3) +(down 6) +(forward 6) +(down 7) +(forward 3) +(forward 4) +(forward 1) +(down 6) +(forward 1) +(forward 4) +(forward 2) +(forward 2) +(forward 1) +(forward 2) +(down 1) +(up 2) +(forward 1) +(down 3) +(forward 8) +(down 3) +(down 9) +(forward 5) +(down 3) +(down 3) +(forward 2) +(forward 9) +(down 9) +(forward 4) +(down 2) +(forward 5) +(up 8) +(down 4) +(forward 5) +(down 1) +(forward 9) +(down 1) +(forward 7) +(forward 2) +(down 2) +(down 6) +(up 3) +(forward 7) +(up 4) +(forward 7) +(forward 6) +(down 8) +(forward 2) +(down 3) +(forward 9) +(forward 4) +(forward 8) +(down 6) +(forward 8) +(down 9) +(down 2) +(down 3) +(forward 1) +(down 5) +(down 3) +(forward 2) +(forward 7) +(down 4) +(down 3) +(forward 9) +(down 2) +(forward 2) +(forward 1) +(up 6) +(up 4) +(down 5) +(forward 5) +(up 8) +(down 7) +(forward 6) +(down 5) +(forward 3) +(forward 3) +(forward 7) +(up 9) +(up 6) +(down 5) +(up 7) +(forward 2) +(forward 5) +(down 9) +(down 6) +(forward 7) +(down 9) +(up 2) +(up 5) +(forward 1) +(forward 8) +(forward 9) +(up 8) +(forward 9) +(forward 5) +(up 9) +(down 4) +(down 7) +(forward 2) +(forward 1) +(down 4) +(up 8) +(down 5) +(down 7) +(down 9) +(down 3) +(down 9) +(up 8) +(up 7) +(up 8) +(down 8) +(down 2) +(down 6) +(down 6) +(up 5) +(up 9) +(forward 1) +(down 8) +(up 4) +(up 3) +(forward 7) +(up 7) +(down 3) +(up 1) +(forward 3) +(down 7) +(forward 8) +(forward 2) +(down 6) +(down 2) +(up 7) +(up 5) +(forward 7) +(forward 1) +(forward 6) +(up 6) +(forward 5) +(down 2) +(up 4) +(forward 2) +(down 9) +(forward 6) +(forward 3) +(forward 3) +(forward 4) +(forward 2) +(down 6) +(forward 9) +(forward 7) +(down 4) +(up 1) +(forward 4) +(down 6) +(down 6) +(up 1) +(up 1) +(forward 3) +(down 5) +(up 5) +(down 3) +(down 6) +(up 8) +(down 2) +(up 6) +(up 1) +(forward 8) +(up 6) +(down 8) +(forward 9) +(forward 4) +(forward 9) +(down 7) +(down 9) +(down 6) +(down 1) +(forward 9) +(forward 9) +(down 6) +(down 5) +(up 6) +(down 9) +(up 4) +(up 5) +(forward 8) +(down 4) +(down 5) +(forward 8) +(forward 7) +(down 2) +(forward 2) +(forward 6) +(forward 7) +(down 1) +(down 7) +(down 1) +(down 6) +(forward 2) +(up 2) +(down 4) +(down 8) +(forward 1) +(down 1) +(down 3) +(down 3) +(up 9) +(down 9) +(forward 3) +(up 4) +(forward 1) +(down 9) +(down 8) +(down 9) +(forward 5) +(forward 4) +(up 3) +(down 8) +(forward 2) +(down 3) +(up 5) +(forward 4) +(down 7) +(down 8) +(down 9) +(forward 8) +(down 8) +(forward 4) +(down 6) +(down 3) +(forward 5) +(down 3) +(down 9) +(down 4) +(up 8) +(forward 4) +(up 6) +(down 3) +(forward 6) +(down 9) +(down 7) +(forward 7) +(forward 3) +(forward 2) +(forward 4) +(down 4) +(down 5) +(up 9) +(down 2) +(down 6) +(down 9) +(forward 7) +(forward 3) +(up 3) +(forward 3) +(down 4) +(down 7) +(forward 2) +(down 2) +(forward 3) +(down 8) +(down 7) +(down 7) +(forward 2) +(forward 2) +(up 6) +(forward 8) +(forward 9) +(up 3) +(forward 8) +(forward 5) +(forward 7) +(up 3) +(forward 3) +(forward 6) +(down 5) +(down 5) +(down 4) +(forward 1) +(forward 8) +(forward 4) +(forward 3) +(down 1) +(forward 8) +(down 4) +(up 5) +(forward 4) +(down 2) +(forward 7) +(down 2) +(forward 9) +(down 1) +(forward 6) +(forward 8) +(forward 6) +(forward 7) +(forward 1) +(forward 6) +(down 5) +(up 3) +(forward 7) +(down 6) +(forward 2) +(down 2) +(forward 8) +(forward 9) +(up 7) +(forward 1) +(forward 1) +(up 1) +(forward 1) +(down 2) +(forward 6) +(down 9) +(up 1) +(up 2) +(forward 6) +(forward 1) +(forward 7) +(down 1) +(up 8) +(forward 7) +(up 6) +(up 4) +(down 1) +(forward 2) +(down 4) +(down 1) +(down 7) +(down 4) +(up 3) +(forward 8) +(forward 3) +(forward 5) +(down 7) +(down 8) +(forward 5) +(forward 2) +(down 5) +(down 2) +(forward 2) +(up 9) +(down 3) +(down 5) +(up 7) +(down 4) +(down 2) +(down 7) +(forward 6) +(down 2) +(forward 1) +(up 4) +(forward 2) +(forward 2) +(down 5) +(down 1) +(down 1) +(forward 7) +(forward 6) +(down 7) +(down 5) +(up 1) +(up 3) +(forward 3) +(forward 9) +(forward 4) +(down 1) +(down 5) +(forward 3) +(forward 7) +(down 8) +(forward 8) +(forward 2) +(forward 7) +(up 7) +(down 7) +(down 4) +(down 2) +(up 6) +(up 1) +(forward 8) +(up 8) +(up 6) +(down 8) +(forward 1) +(down 5) +(forward 3) +(down 3) +(down 3) +(forward 1) +(up 3) +(up 3) +(forward 8) +(forward 8) +(down 8) +(forward 6) +(forward 2) +(down 7) +(forward 8) +(down 7) +(up 5) +(forward 7) +(down 1) +(forward 9) +(up 6) +(down 2) +(up 2) +(up 5) +(forward 6) +(forward 9) +(forward 3) +(down 8) +(forward 8) +(down 2) +(up 5) +(down 9) +(forward 5) +(down 6) +(down 3) +(down 9) +(up 8) +(up 3) +(down 2) +(forward 7) +(forward 4) +(forward 4) +(forward 8) +(up 6) +(up 4) +(forward 9) +(down 6) +(down 8) +(up 3) +(up 5) +(forward 8) +(forward 7) +(forward 4) +(down 8) +(forward 1) +(forward 5) +(down 9) +(forward 8) +(up 6) +(down 6) +(down 8) +(down 2) +(forward 4) +(forward 9) +(forward 2) +(forward 7) +(down 3) +(forward 3) +(up 6) +(down 4) +(forward 2) +(up 4) +(down 4) +(forward 4) +(forward 3) +(forward 1) +(up 6) +(forward 1) +(down 1) +(forward 7) +(up 4) +(forward 3) +(down 4) +(up 6) +(up 2) +(up 8) +(down 1) +(down 6) +(down 6) +(down 1) +(down 7) +(forward 8) +(down 9) +(forward 5) +(up 2) +(up 7) +(up 5) +(down 6) +(up 1) +(up 6) +(forward 4) +(down 7) +(forward 5) +(forward 1) +(down 6) +(forward 2) +(down 2) +(forward 9) +(down 9) +(up 6) +(forward 1) +(up 7) +(down 7) +(forward 1) +(down 6) +(up 1) +(forward 2) +(forward 1) +(down 4) +(forward 9) +(forward 7) +(forward 5) +(down 1) +(forward 2) +(down 2) +(down 2) +(down 5) +(forward 1) +(up 8) +(forward 9) +(down 7) +(forward 9) +(down 2) +(up 5) +(down 9) +(down 8) +(down 5) +(forward 8) +(forward 4) +(down 4) +(down 6) +(forward 1) +(down 5) +(up 6) +(down 3) +(down 3) +(forward 9) +(down 9) +(forward 6) +(down 5) +(up 6) +(down 5) +(up 7) +(forward 9) +(down 2) +(down 4) +(down 8) +(forward 4) +(up 7) +(forward 9) +(forward 7) +(up 5) +(down 7) +(down 5) +(down 1) +(forward 5) +(forward 4) +(down 2) +(up 3) +(forward 1) +(up 4) +(up 9) +(down 4) +(forward 3) +(down 4) +(down 9) +(forward 4) +(up 2) +(up 3) +(forward 7) +(up 6) +(down 8) +(down 8) +(forward 6) +(forward 2) +(forward 3) +(forward 9) +(forward 7) +(down 6) +(down 7) +(down 4) +(down 2) +(forward 8) +(down 6) +(forward 6) +(forward 6) +(forward 9) +(down 8) +(down 1) +(up 5) +(down 1) +(forward 9) +(down 1) +(up 8) +(forward 8) +(down 3) +(forward 1) +(down 9) +(forward 6) +(forward 4) +(forward 8) +(down 2) +(up 8) +(down 2) +(up 8) +(down 9) +(down 4) +(up 7) +(forward 7) +(forward 5) +(down 5) +(down 4) +(up 8) +(forward 1) +(down 7) +(forward 1) +(up 9) +(forward 9) +(forward 7) +(forward 9) +(down 9) +(forward 4) +(down 7) +(forward 6) +(forward 6) +(up 3) +(forward 2) +(down 5) +(up 8) +(down 1) +(up 8) +(down 4) +(down 1) +(up 6) +(forward 4) +(forward 3) +(forward 6) +(down 3) +(forward 4) +(forward 4) +(forward 4) +(down 8) +(forward 3) +(up 8) +(up 8) +(down 8) +(forward 6) +(forward 8) +(up 5) +(forward 6) +(down 8) +(down 7) +(up 4) +(forward 6) +(forward 9) +(down 9) +(forward 4) +(up 2) +(forward 1) +(up 3) +(down 9) +(down 8) +(forward 8) +(forward 8) +(forward 7) +(down 6) +(down 1) +(up 6) +(up 6) +(forward 9) +(forward 7) +(forward 7) +(down 3) +(down 6) +(down 9) +(down 4) +(forward 7) +(forward 3) +(forward 3) +(down 7) +(up 5) +(down 3) +(forward 6) +(forward 3) +(forward 5) +(up 3) +(down 7) +(forward 2) +(up 7) +(forward 9) +(down 3) +(down 9) +(forward 8) +(forward 5) +(up 7) +(up 2) +(up 8) +(forward 6) +(down 8) +(forward 2) +(forward 4) +(up 2) +(forward 2) +(forward 8) +(forward 4) +(down 8) +(forward 5) +(down 4) +(down 7) +(forward 3) +(down 3) +(up 1) +(down 9) +(forward 9) +(down 2) +(down 1) +(forward 1) +(down 6) +(down 3) +(forward 5) +(down 3) +(down 8) +(up 7) +(down 1) +(up 9) +(down 4) +(forward 9) +(down 4) +(forward 3) +(forward 6) +(down 3) +(forward 3) +(down 2) +(down 7) +(down 1) +(up 4) +(down 9) +(down 1) +(down 3) +(down 4) +(down 8) +(down 7) +(forward 4) +(down 4) +(down 9) +(forward 2) +(forward 7) +(forward 2) +(down 6) +(up 8) +(forward 6) +(down 2) +(forward 6) +(up 8) +(forward 6) +(down 9) +(forward 2) +(forward 6) + +(put-line `x = @x, y = @y, aim = @aim, (* x y) = @(* x y)`) -- cgit v1.2.3