diff --git a/blk/497 b/blk/497
new file mode 100644
index 0000000..b909d2d
--- /dev/null
+++ b/blk/497
@@ -0,0 +1,9 @@
+CODE @PUT ( c a -- f )
+    DE POPqq,
+    BC POPqq,
+    chkPS,
+    A 0x04 LDrn, ( @PUT )
+    0x28 RSTn,
+    PUSHZ,
+;CODE
+