From 9344597dac7b0953cec6fc1a2f27bee5b0ec051d Mon Sep 17 00:00:00 2001
From: "Kartik K. Agaram" <vc@akkartik.com>
Date: Sun, 16 May 2021 11:46:24 -0700
Subject: hestified life: initial commit

https://ivanish.ca/hest-podcast
---
 507line.mu | 11 +++++++++++
 1 file changed, 11 insertions(+)

(limited to '507line.mu')

diff --git a/507line.mu b/507line.mu
index 8da67b07..b8ee5efb 100644
--- a/507line.mu
+++ b/507line.mu
@@ -82,3 +82,14 @@ fn draw-vertical-line screen: (addr screen), x: int, y0: int, y1: int, color: in
     loop
   }
 }
+
+fn draw-rect screen: (addr screen), xmin: int, ymin: int, xmax: int, ymax: int, color: int {
+  var y/eax: int <- copy ymin
+  {
+    compare y, ymax
+    break-if->=
+    draw-horizontal-line screen, y, xmin, xmax, color
+    y <- increment
+    loop
+  }
+}
-- 
cgit 1.4.1-2-gfad0