diff --git a/blk/282 b/blk/282
index 043a090..862f9b9 100644
--- a/blk/282
+++ b/blk/282
@@ -1,2 +1,2 @@
-VARIABLE lblofl VARIABLE lblpushRS VARIABLE lblexec
-VARIABLE lblfind
+VARIABLE lblofl VARIABLE lblpushRS VARIABLE lblpopRS
+VARIABLE lblexec VARIABLE lblfind
diff --git a/blk/283 b/blk/283
index 7aea058..3a87ebf 100644
--- a/blk/283
+++ b/blk/283
@@ -2,7 +2,7 @@ H@ ORG !
 0 JP, ( 00, main ) NOP, ( unused ) NOP, NOP, ( 04, BOOT )
 NOP, NOP, ( 06, uflw ) NOP, NOP, ( 08, LATEST )
 NOP, NOP, NOP, NOP, NOP, NOP, NOP, ( 0a, unused )
-0 JP, ( 11, pushRS ) 0 JP, ( 14, popRS )
+NOP, NOP, NOP, ( unused ) 0 JP, ( 14, popRS )
 NOP, NOP, NOP, ( unused )
 0 JP, ( 1a, next ) NOP, NOP, NOP, ( unused )
 NOP, NOP, NOP, NOP, ( unused )
diff --git a/blk/288 b/blk/288
deleted file mode 100644
index fbd4b96..0000000
--- a/blk/288
+++ /dev/null
@@ -1,15 +0,0 @@
-CODE >R
-    HL POP, 17 BCALL, ( 17 == pushRS )
-;CODE
-CODE R>
-    20 BCALL, ( 20 == popRS ) HL PUSH,
-;CODE
-CODE 2>R ( 0xa9 )
-PC ORG @ 0x35 + ! ( stable ABI JP )
-    DE POP, HL POP,
-    17 BCALL, ( 17 == pushRS ) EXDEHL, 17 BCALL,
-;CODE NOP, NOP, NOP,
-CODE 2R>
-    20 BCALL, ( 20 == popRS ) EXDEHL, 20 BCALL,
-    HL PUSH, DE PUSH,
-;CODE
diff --git a/blk/297 b/blk/297
index 5851602..fec81aa 100644
--- a/blk/297
+++ b/blk/297
@@ -1,10 +1,10 @@
-lblpushRS BSET PC ORG @ 0x12 + ! ( pushRS )
+lblpushRS BSET
     IX INCd, IX INCd,
     0 IX+ L LDIXYr,
     1 IX+ H LDIXYr,
     RET,
 
-PC ORG @ 0x15 + ! ( popRS )
+lblpopRS BSET PC ORG @ 0x15 + ! ( popRS )
     L 0 IX+ LDrIXY,
     H 1 IX+ LDrIXY,
     IX DECd, IX DECd,
diff --git a/blk/326 b/blk/326
new file mode 100644
index 0000000..0a29173
--- /dev/null
+++ b/blk/326
@@ -0,0 +1,15 @@
+CODE >R
+    HL POP, lblpushRS @ CALL,
+;CODE
+CODE R>
+    lblpopRS @ CALL, HL PUSH,
+;CODE
+CODE 2>R
+PC ORG @ 0x35 + ! ( stable ABI JP )
+    DE POP, HL POP,
+    lblpushRS @ CALL, EXDEHL, lblpushRS @ CALL,
+;CODE
+CODE 2R>
+    lblpopRS @ CALL, EXDEHL, lblpopRS @ CALL,
+    HL PUSH, DE PUSH,
+;CODE