Restyled ia32.

1 files changed, 15 insertions, 17 deletions

diff --git a/main.sts b/main.sts
index 7cbca9f..89b8697 100644
--- a/main.sts
+++ b/main.sts
@@ -1,26 +1,24 @@
 module ia32/elf/begin.sts
 
-defword myword
-key if
-	emit
-fi
-drop
+defword keyecho
+    key if emit fi
+    drop
 exit
 
-defarr my_array 3
-defvar my_variable
+defarr numstr 3
+defvar char
 
 set_entry
-31 my_variable !
-my_variable @ emit
-32 my_array !
-33 my_array 1 + !
-34 my_array 2 + !
-my_array @ emit
-my_array 1 + @ emit
-my_array 2 + @ emit
-35 36 swap emit emit
-myword
+    31 char !
+    char @ emit
+    32 numstr !
+    33 numstr 1 + !
+    34 numstr 2 + !
+    numstr @ emit
+    numstr 1 + @ emit
+    numstr 2 + @ emit
+    35 36 swap emit emit
+    keyecho
 quit
 
 module ia32/elf/end.sts