From d6894f2fa44c75bab7a2b17f57f2f1ecf5deef80 Mon Sep 17 00:00:00 2001
From: "Infineon\\Mitchem" <mitchem.external@infineon.com>
Date: Mon, 25 Aug 2025 12:58:16 -0700
Subject: [PATCH] Revert removed Write event code.

---
 LSL2/OIWIN/REACT_ITEM.json | 30 +++++++++++++++++++++++++++++-
 LSL2/STPROC/REACT_ITEM.txt |  6 ++++++
 2 files changed, 35 insertions(+), 1 deletion(-)

diff --git a/LSL2/OIWIN/REACT_ITEM.json b/LSL2/OIWIN/REACT_ITEM.json
index 5387683..50fcc54 100644
--- a/LSL2/OIWIN/REACT_ITEM.json
+++ b/LSL2/OIWIN/REACT_ITEM.json
@@ -376,6 +376,33 @@
                         "<1,18,13,13>": "",
                         "<1,18,13,14>": "",
                         "<1,18,13,15>": "STPROC"
+                    },
+                    "<1,18,14>": {
+                        "<1,18,14,1>": "X",
+                        "<1,18,14,2>": "EXECUTE",
+                        "<1,18,14,3>": "OBJ_CALL_EVENT",
+                        "<1,18,14,4>": {
+                            "<1,18,14,4,1>": "@SELF",
+                            "<1,18,14,4,2>": "@EVENT",
+                            "<1,18,14,4,3>": "@PARAM1",
+                            "<1,18,14,4,4>": "@PARAM2",
+                            "<1,18,14,4,5>": "@PARAM3",
+                            "<1,18,14,4,6>": "@PARAM4",
+                            "<1,18,14,4,7>": "@PARAM5",
+                            "<1,18,14,4,8>": "@PARAM6"
+                        },
+                        "<1,18,14,5>": "",
+                        "<1,18,14,6>": "",
+                        "<1,18,14,7>": "",
+                        "<1,18,14,8>": "",
+                        "<1,18,14,9>": "",
+                        "<1,18,14,10>": "",
+                        "<1,18,14,11>": "",
+                        "<1,18,14,12>": "",
+                        "<1,18,14,13>": "",
+                        "<1,18,14,14>": "",
+                        "<1,18,14,15>": "STPROC",
+                        "<1,18,14,16>": "0"
                     }
                 },
                 "<1,19>": {
@@ -391,7 +418,8 @@
                     "<1,19,10>": "QBFLOADLIST",
                     "<1,19,11>": "QBFNEXT",
                     "<1,19,12>": "QBFPREV",
-                    "<1,19,13>": "QBFRUN"
+                    "<1,19,13>": "QBFRUN",
+                    "<1,19,14>": "WRITE"
                 },
                 "<1,20>": "",
                 "<1,21>": "",
diff --git a/LSL2/STPROC/REACT_ITEM.txt b/LSL2/STPROC/REACT_ITEM.txt
index 8972697..3ff9883 100644
--- a/LSL2/STPROC/REACT_ITEM.txt
+++ b/LSL2/STPROC/REACT_ITEM.txt
@@ -150,10 +150,16 @@ GOSUB Refresh
 
 RETURN
 
+
 * * * * * * *
 Write:
 * * * * * * *
 
+Parent = Get_Property(@WINDOW,'PARENT')
+
+IF Parent = 'REACTOR_LOG' OR Parent = 'REACT_STATE' THEN
+	Post_Event(@WINDOW,'CLOSE')
+END
 
 RETURN