diff --git a/Haas_Mills_BIDC/Bechtel DT.cps b/Haas_Mills_BIDC/Bechtel DT.cps
index 9ddc390..a7d8a35 100644
--- a/Haas_Mills_BIDC/Bechtel DT.cps	
+++ b/Haas_Mills_BIDC/Bechtel DT.cps	
@@ -2817,6 +2817,7 @@ function onSection() {
 
   if (tool.type != TOOL_PROBE) {
     setCoolant(tool.coolant);
+    writeBlock(gFormat.format(4), "P500");
   }
 
   writeComment("BEGIN OPERATION");
diff --git a/Haas_Mills_BIDC/Bechtel VF2.cps b/Haas_Mills_BIDC/Bechtel VF2.cps
index e95f503..b46e4c2 100644
--- a/Haas_Mills_BIDC/Bechtel VF2.cps	
+++ b/Haas_Mills_BIDC/Bechtel VF2.cps	
@@ -2817,6 +2817,7 @@ function onSection() {
 
   if (tool.type != TOOL_PROBE) {
     setCoolant(tool.coolant);
+    writeBlock(gFormat.format(4), "P500");
   }
 
   writeComment("BEGIN OPERATION");