diff --git a/blk/126 b/blk/126
index 5f4aa91..d7a8efd 100644
--- a/blk/126
+++ b/blk/126
@@ -11,6 +11,4 @@ CREATE PREVPOS 0 , CREATE PREVBLK 0 ,
 : status 0 aty ." BLK" SPC BLK> ? SPC ACC ?
     SPC EDPOS @ 64 /MOD . ',' EMIT . SPC
     BLKDTY @ IF '*' EMIT THEN 10 nspcs ;
-: contents 3 aty BLK> @ LIST 3 16 gutter ;
-: selblk BLK> @ PREVBLK ! BLK@ contents ;
-: mode! ( c -- ) 63 0 AT-XY ;
+: nums 17 1 DO 2 I + aty I . SPC SPC LOOP ;
diff --git a/blk/127 b/blk/127
index 5ef876e..651d174 100644
--- a/blk/127
+++ b/blk/127
@@ -1,3 +1,9 @@
+: contents 16 0 DO 3 I 3 + AT-XY
+    64 I * BLK( + DUP 64 + SWAP DO
+        I C@ 0x20 MAX EMIT LOOP LOOP
+    3 16 gutter ;
+: selblk BLK> @ PREVBLK ! BLK@ contents ;
+: mode! ( c -- ) 63 0 AT-XY ;
 : pos! ( newpos -- ) EDPOS @ PREVPOS !
     DUP 0< IF DROP 0 THEN 1023 MIN EDPOS ! ;
 : setpos ( -- ) EDPOS @ 64 /MOD
diff --git a/blk/131 b/blk/131
index 346832e..3c68705 100644
--- a/blk/131
+++ b/blk/131
@@ -9,6 +9,6 @@
     1 aty ." I: " IBUF bufp
     2 aty ." F: " FBUF bufp 0 3 gutter ;
 : VE
-    clrscr 0 ACC ! 0 PREVPOS ! contents
+    clrscr 0 ACC ! 0 PREVPOS ! nums contents
     BEGIN status bufs setpos KEY handle UNTIL
     19 aty (infl) ;