From 941a5888c1c4bbc3cea28d063896750a3e20218e Mon Sep 17 00:00:00 2001
From: =?utf8?q?Am=C3=A9lia=20Coutard-Sander?= <git@ameliathe1st.gay>
Date: Fri, 13 Dec 2024 11:42:32 +0100
Subject: [PATCH] Moyen plus facile de dessiner des lignes

---
 bin/main.ml | 12 ++++++++++++
 1 file changed, 12 insertions(+)

diff --git a/bin/main.ml b/bin/main.ml
index dee50bd..9169e02 100644
--- a/bin/main.ml
+++ b/bin/main.ml
@@ -56,6 +56,18 @@ let inputs
           | 'q' -> { inter with x = inter.x - 1 }
           | 's' -> { inter with y = inter.y - 1 }
           | 'd' -> { inter with x = inter.x + 1 }
+          | 'Z' ->
+                  Automata.set inter.x inter.y inter.current board;
+                  { inter with y = inter.y + 1 }
+          | 'Q' ->
+                  Automata.set inter.x inter.y inter.current board;
+                  { inter with x = inter.x - 1 }
+          | 'S' ->
+                  Automata.set inter.x inter.y inter.current board;
+                  { inter with y = inter.y - 1 }
+          | 'D' ->
+                  Automata.set inter.x inter.y inter.current board;
+                  { inter with x = inter.x + 1 }
           | '\t' -> { inter with running = true }
           | _ -> inter
         else inter
-- 
2.46.0