diff --git a/mini2.z3 b/mini2.z3
index 7e548dc..a32682f 100644
Binary files a/mini2.z3 and b/mini2.z3 differ
diff --git a/misc.zil b/misc.zil
index 54ed0ee..f17022b 100644
--- a/misc.zil
+++ b/misc.zil
@@ -342,6 +342,14 @@
 
 <GLOBAL P-NOT-HERE 0>
 
+<ROUTINE GET-PREACTION(A "AUX" (P ,PREACTIONS))
+	 <REPEAT (P0)
+       <SET P0 <GET .P 0>>
+       <COND (<==? .P0 .A -1> <RETURN <GET .P 1>>)>
+       <SET P <+ .P 2>>
+     >
+>
+
 %<COND (<GASSIGNED? PREDGEN>
 
 '<ROUTINE PERFORM (A "OPTIONAL" (O <>) (I <>) "AUX" V OA OO OI) 
@@ -375,7 +383,7 @@
 	       <COND
 		(<SET V <APPLY <GETP ,WINNER ,P?ACTION>>> .V)
 		(<SET V <APPLY <GETP <LOC ,WINNER> ,P?ACTION> ,M-BEG>> .V)
-		(<SET V <APPLY <GET ,PREACTIONS .A>>> .V)
+		(<SET V <APPLY <GET-PREACTION .A>>> .V)
 		(<AND .I <SET V <APPLY <GETP .I ,P?ACTION>>>> .V)
 		(<AND .O
 		      <NOT <==? .A ,V?WALK>>
@@ -429,7 +437,7 @@
 				      <GETP <LOC ,WINNER> ,P?ACTION>
 				      ,M-BEG>> .V)
 		     (<SET V <D-APPLY "Preaction"
-				      <GET ,PREACTIONS .A>>> .V)
+				      <GET-PREACTION .A>>> .V)
 		     (<AND .I <SET V <D-APPLY "PRSI"
 					      <GETP .I ,P?ACTION>>>> .V)
 		     (<AND .O
diff -u mini2_data.zap mmd.z
--- mini2_data.zap	2021-02-11 23:39:51.000000000 -0500
+++ mmd.z	2021-02-11 23:22:40.000000000 -0500
@@ -4545,18 +4545,18 @@
 	.WORD V-WALK-TO,V-WAVE,V-YELL,V-ZORK
 	.ENDT
 
-PATBL:: .TABLE 208
-	.WORD 0,0,0,0,0,0,0,0,0,0
-	.WORD 0,0,0,0,0,0,0,0,0,0
-	.WORD 0,0,PRE-BURN,0,0,PRE-ENTER,0,0,0,0
-	.WORD 0,0,0,0,PRE-MUNG,0,0,0,0,PRE-DROP
-	.WORD PRE-PUT,PRE-PUT,0,0,0,0,0,PRE-FILL,0,0
-	.WORD PRE-GIVE,0,0,0,0,0,0,0,0,0
-	.WORD 0,0,0,0,0,0,0,0,0,0
-	.WORD 0,0,PRE-TAKE,0,0,0,0,0,0,PRE-READ
-	.WORD 0,0,0,0,0,0,0,0,0,0
-	.WORD 0,0,0,0,0,0,0,0,0,0
-	.WORD 0,0,0,0
+PATBL:: .TABLE 44
+	.WORD V?BURN,PRE-BURN
+    .WORD V?ENTER,PRE-ENTER
+	.WORD V?MUNG,PRE-MUNG
+    .WORD V?DROP,PRE-DROP
+	.WORD V?PUT,PRE-PUT
+    .WORD V?PUT-ON,PRE-PUT
+    .WORD V?FILL,PRE-FILL
+	.WORD V?GIVE,PRE-GIVE
+	.WORD V?TAKE,PRE-TAKE
+    .WORD V?READ,PRE-READ
+	.WORD -1,0
 	.ENDT
 
 ST?VERBOSE:: .TABLE 3