Pretty list VLIST

doc/PLFORTH.md

@@ -11,6 +11,10 @@ PLFORTH is a PLASMA module written in PLASMA itself. As a first class citizen of
 
 There are quite a few missing word that a standard FORTH would have. Mostly due to deliberately keeping PLFORTH as minimal as possible to reduce the memory footpring and load time. Most of the missing words can be synthesized using existing PLASMA modules and some glue words. The double word have mostly been made avialable through PLASMA's 32 bit integer module, `INT32` by way of the `int32.4th` script. You can always petition to get your favorite FORTH word included in the default vocabulary. Speaking of `VOCABULARY`, PLFORTH only has one.
 
+## PLFORTH built-in words
+
+![VLIST](forthwords.png)
+
 ## PLFORTH specific words
 
 ### Words for looking at internal structures:

src/toolsrc/plforth.pla

@@ -1833,10 +1833,19 @@ def _comment_#0
 end
 def _vlist_#0
   word d
+  byte tab
 
-  d = vlist
+  tab = 0
+  d   = vlist
   while d
-    puts(d); puts("  ")
+    tab = tab + 1 + ^d
+    if tab > 39
+      putln;
+      tab = ^d
+    else
+      puts(" ")
+    fin 
+    puts(d)
     if conio:keypressed()
       getc; getc
     fin
@@ -1892,7 +1901,7 @@ end
 //
 // Start FORTH
 //
-puts("FORTH (Alpha) for PLASMA 2.1\n")
+puts("FORTH for PLASMA 2.1\n")
 if cmdsys:sysver < $0201
   puts("PLASMA >= 2.01 required\n")
   return