From 7f21946126a24c27a324779823a3413679f177a0 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Gustav=20S=C3=B6rn=C3=A4s?= <gustav@sornas.net>
Date: Sat, 30 Jan 2021 20:19:27 +0100
Subject: add pong

---
 pong/pong.tdy | 63 +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
 1 file changed, 63 insertions(+)
 create mode 100644 pong/pong.tdy

(limited to 'pong/pong.tdy')

diff --git a/pong/pong.tdy b/pong/pong.tdy
new file mode 100644
index 0000000..9405a5c
--- /dev/null
+++ b/pong/pong.tdy
@@ -0,0 +1,63 @@
+blob Paddle {
+    x: float
+    y: float
+}
+
+blob Player {
+    paddle: Paddle
+}
+
+blob State {
+    p1: Player
+    p2: Player
+}
+
+update := fn state: State {
+    delta := get_delta()
+
+    if key_down("w") {
+        state.p1.paddle.y = state.p1.paddle.y + delta
+    }
+    if key_down("s") {
+        state.p1.paddle.y = state.p1.paddle.y - delta
+    }
+
+    if key_down("i") {
+        state.p2.paddle.y = state.p2.paddle.y + delta
+    }
+    if key_down("i") {
+        state.p2.paddle.y = state.p2.paddle.y - delta
+    }
+}
+
+draw := fn state: State {
+    clear()
+    draw_rectangle(state.p1.paddle.x, state.p1.paddle.y, 0.2, 1.)
+    draw_rectangle(state.p2.paddle.x, state.p2.paddle.y, 0.2, 1.)
+    next_frame()
+}
+
+init := fn {
+    running := true
+
+    state := State()
+    state.p1 = Player()
+    state.p1.paddle = Paddle()
+    state.p1.paddle.x = 1.
+    state.p1.paddle.y = 10.
+
+    state.p2 = Player()
+    state.p2.paddle = Paddle()
+    state.p2.paddle.x = 19.
+    state.p2.paddle.y = 10.
+
+    for i := 0, i < 5, i = i + 1 {
+        log(state.p1.paddle.x, state.p1.paddle.y)
+        log(state.p2.paddle.x, state.p2.paddle.y)
+
+        update(state)
+        draw(state)
+    }
+}
+
+init()
-- 
cgit v1.2.1