1 files changed, 17 insertions, 0 deletions
diff --git a/baremetal/500clear-screen.mu b/baremetal/500clear-screen.mu
new file mode 100644
index 00000000..0dbcdee2
--- /dev/null
+++ b/baremetal/500clear-screen.mu
@@ -0,0 +1,17 @@
+fn clear-screen screen: (addr screen) {
+  var y/eax: int <- copy 0
+  {
+    compare y, 0x300  # 768
+    break-if->=
+    var x/edx: int <- copy 0
+    {
+      compare x, 0x400  # 1024
+      break-if->=
+      pixel 0, x, y, 0  # black
+      x <- increment
+      loop
+    }
+    y <- increment
+    loop
+  }
+}