diff --git a/forth_src/v.fs b/forth_src/v.fs
index b14f15d92..ef9e35e7d 100755
--- a/forth_src/v.fs
+++ b/forth_src/v.fs
@@ -468,6 +468,14 @@ linelen dup if 1- then min
 curx c! then cursor-scr-pos
 dup @ $80 or swap c!
 
+\ show position
+$7e8 >r
+eof @ bufstart - 1- 0 <# #s #>
+r> over - dup >r swap move
+r> 1- '/' over c! >r
+editpos bufstart - 0 <# #s #>
+r> over - swap move
+
 key
 
 \ hide cursor
@@ -479,7 +487,8 @@ dup $88 = if 2drop cleanup rom-kernal
 bufstart eof @ bufstart - 1-
 evaluate quit then
 
-insert if do-insert else do-main if
+insert if do-insert else
+$7dd 11 bl fill do-main if
 drop rom-kernal cleanup exit then then
 
 need-refresh if show-page else