From d32b1796c6c1eed69f4b4ab663892fb563772ec2 Mon Sep 17 00:00:00 2001
From: Ian Skinner <56081713+IanSkinner1982@users.noreply.github.com>
Date: Tue, 27 Apr 2021 19:06:38 -0400
Subject: [PATCH] Swapped ML$ with R1$ and fixed printing IA(x)

---
 prg.txt | 13 +++++++------
 1 file changed, 7 insertions(+), 6 deletions(-)

diff --git a/prg.txt b/prg.txt
index 6653bfa..56eb20a 100755
--- a/prg.txt
+++ b/prg.txt
@@ -52,12 +52,13 @@
 2090 goto2000
 
 2500 forx=itoj
-2510 ?ml$na$(x)ia(x)
-2520 ?ml$bd$(x)
-2530 ?ml$pr(x)"{down}"
-2540 next
-2550 gosub
-2560 return
+2510 ?r1$na$(x)
+2520 ?r1$r2$ia(x)
+2530 ?r1$bd$(x)
+2540 ?r1$pr(x)"{down}"
+2550 next
+2560 gosub 3000
+2570 return
 
 3000 get k$
 3010 x=-1*(k$="1")-2*(k$="2")-3*(k$="3")-4*(k$="4")