TECH.RegisteredObject %String %GlobalCharacterStream LastIndex quit:Index="" do Data.WriteLine(^(Index)) kill ^Tools.DebugWindow(..ClientIP,Index) } quit Data ]]> LastIndex quit:Index="" Write !,^(Index) kill ^Tools.DebugWindow(..ClientIP,Index) } hang .2 } } catch { ;; unlock on ctrl-C Lock -(^Tools.DebugWindow(..ClientIP)#"S"):0 } ]]> 1 IP:%String %Boolean 1 IP:%String,Message:%String ClientIP:%String="" 1 1 %Status 1 1 1 %Status 1