From 19fefeb732d559195edb01ebc36170c0cf9a0308 Mon Sep 17 00:00:00 2001
From: nic-gaffney <gaffney_nic@protonmail.com>
Date: Fri, 14 Apr 2023 04:57:53 -0500
Subject: eepy

---
 examples/mandelbrot.sloth | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 examples/mandelbrot.sloth

(limited to 'examples')

diff --git a/examples/mandelbrot.sloth b/examples/mandelbrot.sloth
new file mode 100644
index 0000000..bc95e2f
--- /dev/null
+++ b/examples/mandelbrot.sloth
@@ -0,0 +1,24 @@
+val size: int = 200;
+val maxVal: float = 4.0;
+val maxIter: int = 50;
+val plane: float = 4.0;
+
+for x in 0 .. size {
+    for y in 0 .. size {
+        var cReal: float = (x * plane / size) - 2;
+        var cImg: float = (y * plane / size) - 2;
+        var zReal: float = 0;
+        var zImg: float = 0;
+        var count: float = 0;
+        while (zReal * zReal + zImg * zImg) <= maxVal && count < 4{
+            var temp: float = (zReal * zReal) - (zImg * zImg) + cReal;
+            zImg = 2 * zReal * zImg + cImg;
+            zReal = temp;
+            count += 1;
+        }
+        if count == maxIter {
+            term_setpos(x, y);
+            print("*");
+        }
+    }
+}
-- 
cgit v1.2.3