From fe9a35353befff0c4b733553cb8d18aec2438526 Mon Sep 17 00:00:00 2001
From: Brion Vibber <brion@pobox.com>
Date: Thu, 29 Dec 2022 20:32:58 -0800
Subject: [PATCH] works for 3 * 5 = 15

---
 mandel.s | 26 ++++++++++++++++++--------
 1 file changed, 18 insertions(+), 8 deletions(-)

diff --git a/mandel.s b/mandel.s
index ab7cea5..24e77db 100644
--- a/mandel.s
+++ b/mandel.s
@@ -39,14 +39,6 @@ LOG10 = $ded1
 
 .export start
 
-.proc start
-loop:
-    jmp loop
-.endproc
-
-.proc mandelfloat
-.endproc
-
 .macro sext16to32 arg
     .local plus
     .local minus
@@ -208,3 +200,21 @@ loop:
     ; if dist >= 4 break, else continue iterating
 
 .endproc
+
+.proc start
+    ; FR0 = 3
+    ; FR1 = 5
+    lda #3
+    sta FR0
+    lda #5
+    sta FR1
+    lda #0
+    sta FR0 + 1
+    sta FR1 + 1
+
+    jsr imul16
+    ; should have 32-bit 15 in FR2
+
+loop:
+    jmp loop
+.endproc