Improved Delphi scanner.

2 files changed, 2969 insertions, 2969 deletions

diff --git a/test/scanners/delphi/pluto.expected.raydebug b/test/scanners/delphi/pluto.expected.raydebug
index 032e8d4..cf71c0e 100644
--- a/test/scanners/delphi/pluto.expected.raydebug
+++ b/test/scanners/delphi/pluto.expected.raydebug
@@ -10,7 +10,7 @@ reserved(const)
   ident(RegMoleVersion) operator(=) string<delimiter(')content(1.1)delimiter(')>operator(;)
 
 reserved(type)
-  ident(TFindThreadProgress) operator(=) operator(()ident(fpNone)operator(,) ident(fpEvery512th)operator(,) ident(fpEach)operator(\);)
+  ident(TFindThreadProgress) operator(=) operator(()ident(fpNone)operator(,) ident(fpEvery512th)operator(,) ident(fpEach)operator(\))operator(;)
 
   ident(TRegFindThread) operator(=) reserved(class)operator(()ident(TThread)operator(\))
   directive(private)
@@ -44,7 +44,7 @@ reserved(type)
     ident(Ranges)operator(:) ident(TRanges)operator(;)
     reserved(destructor) ident(Destroy)operator(;) directive(override)operator(;)
     reserved(constructor) ident(CreateIt)operator(()ident(PriorityLevel)operator(:) ident(TThreadPriority)operator(;) ident(s)operator(:) reserved(string)operator(;)
-      ident(SearchFor)operator(:) ident(TSearchOptions)operator(;) ident(Progress)operator(:) ident(TFindThreadProgress)operator(\);)
+      ident(SearchFor)operator(:) ident(TSearchOptions)operator(;) ident(Progress)operator(:) ident(TFindThreadProgress)operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(implementation)
@@ -60,20 +60,20 @@ reserved(var)
 reserved(begin)
   reserved(with) ident(ListTV) reserved(do) reserved(begin)
     comment(//Items.BeginUpdate;)
-    ident(Node) operator(:=) ident(TTreeNode)operator(.)ident(Create)operator(()ident(Items)operator(\);)
-    ident(SetTNImage)operator(()ident(Node)operator(,) ident(syncIcon)operator(\);)
-    ident(Items)operator(.)ident(AddNode)operator(()ident(Node)operator(,) ident(FindNode)operator(,) ident(Copy)operator(()ident(CurrentPath)operator(,) integer(1)operator(,) integer(255)operator(\),) reserved(nil)operator(,)
-      ident(naAddChildFirst)operator(\);)
+    ident(Node) operator(:=) ident(TTreeNode)operator(.)ident(Create)operator(()ident(Items)operator(\))operator(;)
+    ident(SetTNImage)operator(()ident(Node)operator(,) ident(syncIcon)operator(\))operator(;)
+    ident(Items)operator(.)ident(AddNode)operator(()ident(Node)operator(,) ident(FindNode)operator(,) ident(Copy)operator(()ident(CurrentPath)operator(,) integer(1)operator(,) integer(255)operator(\))operator(,) reserved(nil)operator(,)
+      ident(naAddChildFirst)operator(\))operator(;)
     reserved(if) reserved(not) ident(FindNode)operator(.)ident(Expanded) reserved(and) operator(()ident(FindNode)operator(.)ident(Count) operator(=) integer(1)operator(\)) reserved(then) comment(//First Node)
-      ident(FindNode)operator(.)ident(Expand)operator(()ident(False)operator(\);)
+      ident(FindNode)operator(.)ident(Expand)operator(()ident(False)operator(\))operator(;)
     comment(//Items.EndUpdate;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
 reserved(constructor) ident(TRegFindThread)operator(.)ident(CreateIt)operator(()ident(PriorityLevel)operator(:) ident(TThreadPriority)operator(;) ident(s)operator(:) reserved(string)operator(;)
-  ident(SearchFor)operator(:) ident(TSearchOptions)operator(;) ident(Progress)operator(:) ident(TFindThreadProgress)operator(\);)
+  ident(SearchFor)operator(:) ident(TSearchOptions)operator(;) ident(Progress)operator(:) ident(TFindThreadProgress)operator(\))operator(;)
 reserved(begin)
-  reserved(inherited) ident(Create)operator(()ident(True)operator(\);)      comment(// Create thread suspended)
+  reserved(inherited) ident(Create)operator(()ident(True)operator(\))operator(;)      comment(// Create thread suspended)
   ident(Priority) operator(:=) ident(PriorityLevel)operator(;) comment(// Set Priority Level)
   ident(FreeOnTerminate) operator(:=) ident(True)operator(;) comment(// Thread Free Itself when terminated)
 
@@ -92,16 +92,16 @@ reserved(end)operator(;)
 
 reserved(procedure) ident(TRegFindThread)operator(.)ident(Execute)operator(;)
 reserved(begin)
-  ident(Synchronize)operator(()ident(Start)operator(\);)
+  ident(Synchronize)operator(()ident(Start)operator(\))operator(;)
   ident(Find)operator(;)
-  ident(Synchronize)operator(()ident(Finish)operator(\);)
+  ident(Synchronize)operator(()ident(Finish)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TRegFindThread)operator(.)ident(Find)operator(;)
 reserved(var)
   ident(SpecialKey)operator(:) ident(HKEY)operator(;)
 
-  reserved(procedure) ident(Add)operator(()reserved(const) ident(Path)operator(:) reserved(string)operator(;) reserved(const) ident(Icon)operator(:) ident(Integer)operator(\);)
+  reserved(procedure) ident(Add)operator(()reserved(const) ident(Path)operator(:) reserved(string)operator(;) reserved(const) ident(Icon)operator(:) ident(Integer)operator(\))operator(;)
   reserved(var)
     ident(zCurrentPath)operator(:) reserved(string)operator(;)
   reserved(begin)
@@ -109,23 +109,23 @@ reserved(var)
 
     ident(CurrentPath) operator(:=) ident(Path)operator(;)
     ident(syncIcon) operator(:=) ident(Icon)operator(;)
-    ident(Synchronize)operator(()ident(Self)operator(.)ident(Add)operator(\);)
+    ident(Synchronize)operator(()ident(Self)operator(.)ident(Add)operator(\))operator(;)
 
     ident(CurrentPath) operator(:=) ident(zCurrentPath)operator(;)
   reserved(end)operator(;)
 
-  reserved(procedure) ident(AddValueName)operator(()reserved(const) ident(ValueName)operator(:) reserved(string)operator(;) ident(Typ)operator(:) ident(TRegDataType)operator(\);)
+  reserved(procedure) ident(AddValueName)operator(()reserved(const) ident(ValueName)operator(:) reserved(string)operator(;) ident(Typ)operator(:) ident(TRegDataType)operator(\))operator(;)
   reserved(begin)
-    ident(Add)operator(()ident(CurrentPath) operator(+) string<delimiter(')content(\\\\)delimiter(')> operator(+) ident(ValueName)operator(,) ident(IconOfDataType)operator(()ident(Typ)operator(\)\);)
+    ident(Add)operator(()ident(CurrentPath) operator(+) string<delimiter(')content(\\\\)delimiter(')> operator(+) ident(ValueName)operator(,) ident(IconOfDataType)operator(()ident(Typ)operator(\))operator(\))operator(;)
   reserved(end)operator(;)
 
-  reserved(procedure) ident(AddValueData)operator(()reserved(const) ident(ValueName)operator(:) reserved(string)operator(;) ident(Context)operator(:) ident(TRegContext)operator(\);)
+  reserved(procedure) ident(AddValueData)operator(()reserved(const) ident(ValueName)operator(:) reserved(string)operator(;) ident(Context)operator(:) ident(TRegContext)operator(\))operator(;)
   reserved(begin)
-    ident(Add)operator(()ident(CurrentPath) operator(+) string<delimiter(')content(\\\\)delimiter(')> operator(+) ident(ValueName) operator(+) string<delimiter(')content( = )delimiter(')> operator(+) ident(DataPreviewOfContext)operator(()ident(Context)operator(\),)
-      ident(IconOfDataType)operator(()ident(Context)operator(.)ident(Typ)operator(\)\);)
+    ident(Add)operator(()ident(CurrentPath) operator(+) string<delimiter(')content(\\\\)delimiter(')> operator(+) ident(ValueName) operator(+) string<delimiter(')content( = )delimiter(')> operator(+) ident(DataPreviewOfContext)operator(()ident(Context)operator(\))operator(,)
+      ident(IconOfDataType)operator(()ident(Context)operator(.)ident(Typ)operator(\))operator(\))operator(;)
   reserved(end)operator(;)
 
-  reserved(function) ident(FoundInStr)operator(()reserved(const) ident(Data)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+  reserved(function) ident(FoundInStr)operator(()reserved(const) ident(Data)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
   reserved(begin)
     ident(Result) operator(:=) ident(False)operator(;)
     reserved(if) ident(SearchText) operator(=) string<delimiter(')delimiter(')> reserved(then)
@@ -136,7 +136,7 @@ reserved(var)
 
     reserved(if) ident(sfWildCards) reserved(in) ident(SearchFor) reserved(then) reserved(begin)
       reserved(if) ident(Assigned)operator(()ident(Mask)operator(\)) reserved(then)
-        ident(Result) operator(:=) ident(Mask)operator(.)ident(Matches)operator(()ident(Data)operator(\);)
+        ident(Result) operator(:=) ident(Mask)operator(.)ident(Matches)operator(()ident(Data)operator(\))operator(;)
     reserved(end) reserved(else) reserved(begin)
       comment({if not (sfFileNames in SearchFor\) then begin
         if TextBegin(SearchText, UntilChar(Data, '~'\)\) and FileExists(Data\) then
@@ -146,7 +146,7 @@ reserved(var)
 
       reserved(if) operator([)ident(sfParts)operator(,) ident(sfIgnoreCase)operator(]) operator(<=) ident(SearchFor) reserved(then)
         reserved(if) ident(SfUseLocales) reserved(in) ident(SearchFor) reserved(then)
-          ident(Result) operator(:=) integer(0)operator(<)ident(PosEx)operator(()ident(SearchText)operator(,) ident(AnsiLowerCase)operator(()ident(Data)operator(\)\))
+          ident(Result) operator(:=) integer(0)operator(<)ident(PosEx)operator(()ident(SearchText)operator(,) ident(AnsiLowerCase)operator(()ident(Data)operator(\))operator(\))
         reserved(else)
           ident(Result) operator(:=) integer(0)operator(<)ident(PosExText)operator(()ident(SearchText)operator(,) ident(Data)operator(\))
       reserved(else) reserved(if) ident(sfParts) reserved(in) ident(SearchFor) reserved(then)
@@ -157,16 +157,16 @@ reserved(var)
         reserved(else)
           ident(Result) operator(:=) ident(SameText)operator(()ident(Data)operator(,) ident(SearchText)operator(\))
       reserved(else)
-        ident(Result) operator(:=) operator(()ident(SearchText) operator(=) ident(Data)operator(\);)
+        ident(Result) operator(:=) operator(()ident(SearchText) operator(=) ident(Data)operator(\))operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 
-  reserved(function) ident(FoundInByteA)operator(()reserved(const) ident(Data)operator(:) ident(TByteA)operator(\):) ident(Boolean)operator(;)
+  reserved(function) ident(FoundInByteA)operator(()reserved(const) ident(Data)operator(:) ident(TByteA)operator(\))operator(:) ident(Boolean)operator(;)
   reserved(begin)
-    ident(Result) operator(:=) ident(FoundInStr)operator(()ident(StrOfByteA)operator(()ident(Data)operator(\)\);)
+    ident(Result) operator(:=) ident(FoundInStr)operator(()ident(StrOfByteA)operator(()ident(Data)operator(\))operator(\))operator(;)
   reserved(end)operator(;)
 
-  reserved(procedure) ident(ScanValues)operator(()ident(Key)operator(:) ident(HKEY)operator(;) ident(Info)operator(:) ident(TRegKeyInfo)operator(\);)
+  reserved(procedure) ident(ScanValues)operator(()ident(Key)operator(:) ident(HKEY)operator(;) ident(Info)operator(:) ident(TRegKeyInfo)operator(\))operator(;)
   reserved(var)
     ident(i)operator(:) ident(Integer)operator(;)
     ident(MaxLen)operator(,) ident(NameLen)operator(,) ident(Len)operator(,) ident(Typ)operator(:) ident(Cardinal)operator(;)
@@ -174,7 +174,7 @@ reserved(var)
     ident(ValueName)operator(:) ident(PChar)operator(;)
 
     reserved(procedure) ident(ScanValue)operator(()reserved(const) ident(ValueName)operator(:) reserved(string)operator(;) reserved(const) ident(Typ)operator(:) ident(TRegDataType)operator(;)
-      reserved(const) ident(Data)operator(:) reserved(string)operator(\);)
+      reserved(const) ident(Data)operator(:) reserved(string)operator(\))operator(;)
     reserved(begin)
       reserved(if) operator(()ident(sfSpecialTypes) reserved(in) ident(SearchFor)operator(\)) reserved(and) reserved(not) ident(InRanges)operator(()ident(Ranges)operator(,) ident(Typ)operator(\)) reserved(then)
         ident(Exit)operator(;)
@@ -182,27 +182,27 @@ reserved(var)
       reserved(case) ident(Typ) reserved(of)
         ident(rdString)operator(,) ident(rdExpandString)operator(:) reserved(if) ident(sfString) reserved(in) ident(SearchFor) reserved(then) reserved(begin)
           reserved(if) ident(FoundInStr)operator(()ident(Data)operator(\)) reserved(then) reserved(begin)
-            ident(Inc)operator(()ident(DataFound)operator(\);)
+            ident(Inc)operator(()ident(DataFound)operator(\))operator(;)
             ident(AddValueData)operator(()ident(ValueName)operator(,)
-              ident(RegContext)operator(()ident(Typ)operator(,) ident(TByteA)operator(()ident(Copy)operator(()ident(Data)operator(,) integer(1)operator(,) ident(Length)operator(()ident(Data)operator(\)-)integer(1)operator(\)\)\)\);)
+              ident(RegContext)operator(()ident(Typ)operator(,) ident(TByteA)operator(()ident(Copy)operator(()ident(Data)operator(,) integer(1)operator(,) ident(Length)operator(()ident(Data)operator(\))operator(-)integer(1)operator(\))operator(\))operator(\))operator(\))operator(;)
           reserved(end)operator(;)
         reserved(end)operator(;)
 
         ident(rdCardinal)operator(,) ident(rdCardBigEndian)operator(:) reserved(if) ident(sfDWord) reserved(in) ident(SearchFor) reserved(then) reserved(begin)
-          reserved(if) operator(()ident(Length)operator(()ident(Data)operator(\)) operator(>=) ident(SizeOf)operator(()ident(Cardinal)operator(\)\)) reserved(and)
-          operator(()ident(dwordVal) operator(=) ident(PCardinal)operator(()ident(Copy)operator(()ident(Data)operator(,) integer(1)operator(,) ident(SizeOf)operator(()ident(Cardinal)operator(\)\)\)^\)) reserved(then) reserved(begin)
-            ident(Inc)operator(()ident(DataFound)operator(\);)
+          reserved(if) operator(()ident(Length)operator(()ident(Data)operator(\)) operator(>=) ident(SizeOf)operator(()ident(Cardinal)operator(\))operator(\)) reserved(and)
+          operator(()ident(dwordVal) operator(=) ident(PCardinal)operator(()ident(Copy)operator(()ident(Data)operator(,) integer(1)operator(,) ident(SizeOf)operator(()ident(Cardinal)operator(\))operator(\))operator(\))operator(^)operator(\)) reserved(then) reserved(begin)
+            ident(Inc)operator(()ident(DataFound)operator(\))operator(;)
             ident(AddValueData)operator(()ident(ValueName)operator(,)
-              ident(RegContext)operator(()ident(Typ)operator(,) ident(ByteAOfStr)operator(()ident(Data)operator(\)\)\);)
+              ident(RegContext)operator(()ident(Typ)operator(,) ident(ByteAOfStr)operator(()ident(Data)operator(\))operator(\))operator(\))operator(;)
           reserved(end)operator(;)
         reserved(end)operator(;)
 
       reserved(else)
         reserved(if) ident(sfOtherTypes) reserved(in) ident(SearchFor) reserved(then) reserved(begin)
           reserved(if) ident(FoundInStr)operator(()ident(Data)operator(\)) reserved(then) reserved(begin)
-            ident(Inc)operator(()ident(DataFound)operator(\);)
+            ident(Inc)operator(()ident(DataFound)operator(\))operator(;)
             ident(AddValueData)operator(()ident(ValueName)operator(,)
-              ident(RegContext)operator(()ident(Typ)operator(,) ident(ByteAOfStr)operator(()ident(Data)operator(\)\)\);)
+              ident(RegContext)operator(()ident(Typ)operator(,) ident(ByteAOfStr)operator(()ident(Data)operator(\))operator(\))operator(\))operator(;)
           reserved(end)operator(;)
         reserved(end)operator(;)
       reserved(end)operator(;)
@@ -213,32 +213,32 @@ reserved(var)
 
     ident(Buffer) operator(:=) reserved(nil)operator(;)
     reserved(if) ident(sfValueData) reserved(in) ident(SearchFor) reserved(then)
-      ident(GetMem)operator(()ident(Buffer)operator(,) ident(Info)operator(.)ident(MaxDataLen)operator(\);)
+      ident(GetMem)operator(()ident(Buffer)operator(,) ident(Info)operator(.)ident(MaxDataLen)operator(\))operator(;)
 
-    ident(GetMem)operator(()ident(ValueName)operator(,) ident(MaxLen)operator(\);)
+    ident(GetMem)operator(()ident(ValueName)operator(,) ident(MaxLen)operator(\))operator(;)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Info)operator(.)ident(NumValues)operator(-)integer(1) reserved(do) reserved(begin)
       ident(NameLen) operator(:=) ident(MaxLen)operator(;)
       ident(Len) operator(:=) ident(Info)operator(.)ident(MaxDataLen)operator(;)
       reserved(if) reserved(not) ident(Success)operator(()ident(RegEnumValue)operator(()ident(Key)operator(,) ident(i)operator(,) ident(ValueName)operator(,) ident(NameLen)operator(,) reserved(nil)operator(,) operator(@)ident(Typ)operator(,)
-       ident(Buffer)operator(,) operator(@)ident(Len)operator(\)\)) reserved(then)
+       ident(Buffer)operator(,) operator(@)ident(Len)operator(\))operator(\)) reserved(then)
         ident(Continue)operator(;)
 
       reserved(if) ident(sfValueNames) reserved(in) ident(SearchFor) reserved(then)
         reserved(if) ident(FoundInStr)operator(()ident(ValueName)operator(\)) reserved(then) reserved(begin)
-          ident(Inc)operator(()ident(ValuesFound)operator(\);)
-          ident(AddValueName)operator(()ident(ValueName)operator(,) ident(Typ)operator(\);)
+          ident(Inc)operator(()ident(ValuesFound)operator(\))operator(;)
+          ident(AddValueName)operator(()ident(ValueName)operator(,) ident(Typ)operator(\))operator(;)
         reserved(end)operator(;)
 
       reserved(if) ident(sfValueData) reserved(in) ident(SearchFor) reserved(then)
-        ident(ScanValue)operator(()ident(ValueName)operator(,) ident(Typ)operator(,) reserved(string)operator(()ident(Copy)operator(()ident(TByteA)operator(()ident(Buffer)operator(\),) integer(0)operator(,) ident(Len)operator(\)\)\);)
+        ident(ScanValue)operator(()ident(ValueName)operator(,) ident(Typ)operator(,) reserved(string)operator(()ident(Copy)operator(()ident(TByteA)operator(()ident(Buffer)operator(\))operator(,) integer(0)operator(,) ident(Len)operator(\))operator(\))operator(\))operator(;)
     reserved(end)operator(;)
 
-    ident(FreeMem)operator(()ident(ValueName)operator(,) ident(MaxLen)operator(\);)
+    ident(FreeMem)operator(()ident(ValueName)operator(,) ident(MaxLen)operator(\))operator(;)
     reserved(if) ident(sfValueData) reserved(in) ident(SearchFor) reserved(then)
-      ident(FreeMem)operator(()ident(Buffer)operator(,) ident(Info)operator(.)ident(MaxDataLen)operator(\);)
+      ident(FreeMem)operator(()ident(Buffer)operator(,) ident(Info)operator(.)ident(MaxDataLen)operator(\))operator(;)
   reserved(end)operator(;)
 
-  reserved(procedure) ident(ScanKey)operator(()ident(Key)operator(:) ident(HKEY)operator(;) reserved(const) ident(KeyName)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\);)
+  reserved(procedure) ident(ScanKey)operator(()ident(Key)operator(:) ident(HKEY)operator(;) reserved(const) ident(KeyName)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(;)
   reserved(var)
     ident(p)operator(:) ident(PChar)operator(;)
     ident(i)operator(,) ident(z)operator(:) ident(Integer)operator(;)
@@ -248,55 +248,55 @@ reserved(var)
   reserved(begin)
     reserved(if) ident(Terminated) reserved(then) ident(Exit)operator(;)
 
-    ident(Inc)operator(()ident(KeysScanned)operator(\);)
+    ident(Inc)operator(()ident(KeysScanned)operator(\))operator(;)
     reserved(if) ident(Progress) operator(<>) ident(fpNone) reserved(then)
       reserved(if) operator(()ident(Progress) operator(=) ident(fpEach)operator(\)) reserved(or)
-       operator((()ident(Progress) operator(=) ident(fpEvery512th)operator(\)) reserved(and) operator((()ident(KeysScanned) reserved(and) hex($1FF)operator(\)) operator(=) integer(0)operator(\)\)) reserved(then) reserved(begin)
+       operator(()operator(()ident(Progress) operator(=) ident(fpEvery512th)operator(\)) reserved(and) operator(()operator(()ident(KeysScanned) reserved(and) hex($1FF)operator(\)) operator(=) integer(0)operator(\))operator(\)) reserved(then) reserved(begin)
         ident(syncStatusText) operator(:=) char<delimiter(')content(()delimiter(')> operator(+) ident(IntToStr)operator(()ident(KeysScanned)operator(\)) operator(+) string<delimiter(')content( k\) )delimiter(')> operator(+) ident(CurrentPath)operator(;)
-        ident(Synchronize)operator(()ident(UpdateStatus)operator(\);)
+        ident(Synchronize)operator(()ident(UpdateStatus)operator(\))operator(;)
       reserved(end)operator(;)
 
     reserved(with) ident(Info) reserved(do)
       reserved(if) reserved(not) ident(Success)operator(()ident(RegQueryInfoKey)operator(()ident(Key)operator(,) reserved(nil)operator(,) reserved(nil)operator(,) reserved(nil)operator(,) operator(@)ident(NumSubKeys)operator(,)
        operator(@)ident(MaxSubKeyLen)operator(,) reserved(nil)operator(,) operator(@)ident(NumValues)operator(,) operator(@)ident(MaxValueLen)operator(,) operator(@)ident(MaxDataLen)operator(,)
-       reserved(nil)operator(,) reserved(nil)operator(\)\)) reserved(then)
+       reserved(nil)operator(,) reserved(nil)operator(\))operator(\)) reserved(then)
         ident(Exit)operator(;)
 
     reserved(if) operator(()ident(Info)operator(.)ident(NumValues) operator(>) integer(0)operator(\)) reserved(and) ident(SearchForValues) reserved(then)
-      ident(ScanValues)operator(()ident(Key)operator(,) ident(Info)operator(\);)
+      ident(ScanValues)operator(()ident(Key)operator(,) ident(Info)operator(\))operator(;)
 
     reserved(if) ident(Info)operator(.)ident(NumSubKeys) operator(<=) integer(0) reserved(then)
       ident(Exit)operator(;)
 
     ident(Len) operator(:=) ident(Info)operator(.)ident(MaxSubKeyLen) operator(+) integer(1)operator(;)
-    ident(GetMem)operator(()ident(p)operator(,) ident(Len)operator(\);)
+    ident(GetMem)operator(()ident(p)operator(,) ident(Len)operator(\))operator(;)
 
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Info)operator(.)ident(NumSubKeys)operator(-)integer(1) reserved(do) reserved(begin)
       ident(l) operator(:=) ident(Len)operator(;)
-      ident(RegEnumKeyEx)operator(()ident(Key)operator(,) ident(i)operator(,) ident(p)operator(,) ident(l)operator(,) reserved(nil)operator(,) reserved(nil)operator(,) reserved(nil)operator(,) reserved(nil)operator(\);)
+      ident(RegEnumKeyEx)operator(()ident(Key)operator(,) ident(i)operator(,) ident(p)operator(,) ident(l)operator(,) reserved(nil)operator(,) reserved(nil)operator(,) reserved(nil)operator(,) reserved(nil)operator(\))operator(;)
       reserved(if) ident(sfKeys) reserved(in) ident(SearchFor) reserved(then)
         reserved(if) ident(FoundInStr)operator(()ident(p)operator(\)) reserved(then) reserved(begin)
-          ident(Inc)operator(()ident(KeysFound)operator(\);)
-          ident(Add)operator(()ident(CurrentPath) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(p)operator(,) ident(iconKeyMiddle)operator(\);)
+          ident(Inc)operator(()ident(KeysFound)operator(\))operator(;)
+          ident(Add)operator(()ident(CurrentPath) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(p)operator(,) ident(iconKeyMiddle)operator(\))operator(;)
         reserved(end)operator(;)
 
-      reserved(if) ident(Success)operator(()ident(RegOpenKey)operator(()ident(Key)operator(,) ident(p)operator(,) ident(NewKey)operator(\)\)) reserved(then) reserved(begin)
-        ident(z) operator(:=) ident(Length)operator(()ident(CurrentPath)operator(\);)
+      reserved(if) ident(Success)operator(()ident(RegOpenKey)operator(()ident(Key)operator(,) ident(p)operator(,) ident(NewKey)operator(\))operator(\)) reserved(then) reserved(begin)
+        ident(z) operator(:=) ident(Length)operator(()ident(CurrentPath)operator(\))operator(;)
         ident(CurrentPath) operator(:=) ident(CurrentPath) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(p)operator(;)
 
         reserved(try)
-          ident(ScanKey)operator(()ident(NewKey)operator(,) ident(p)operator(\);)
+          ident(ScanKey)operator(()ident(NewKey)operator(,) ident(p)operator(\))operator(;)
         reserved(finally)
-          ident(RegCloseKey)operator(()ident(NewKey)operator(\);)
+          ident(RegCloseKey)operator(()ident(NewKey)operator(\))operator(;)
         reserved(end)operator(;)
 
-        ident(SetLength)operator(()ident(CurrentPath)operator(,) ident(z)operator(\);)
+        ident(SetLength)operator(()ident(CurrentPath)operator(,) ident(z)operator(\))operator(;)
       reserved(end)operator(;)
 
       reserved(if) ident(Terminated) reserved(then) ident(Break)operator(;)
     reserved(end)operator(;)
 
-    ident(FreeMem)operator(()ident(p)operator(,) ident(Len)operator(\);)
+    ident(FreeMem)operator(()ident(p)operator(,) ident(Len)operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
@@ -306,87 +306,87 @@ reserved(begin)
     reserved(try)
       reserved(if) ident(sfHKU) reserved(in) ident(SearchFor) reserved(then) reserved(begin)
         ident(CurrentPath) operator(:=) string<delimiter(')content(HKU)delimiter(')>operator(;)
-        ident(ScanKey)operator(()ident(HKEY_USERS)operator(\);)
+        ident(ScanKey)operator(()ident(HKEY_USERS)operator(\))operator(;)
       reserved(end)operator(;)
       reserved(if) ident(sfHKLM) reserved(in) ident(SearchFor) reserved(then) reserved(begin)
         ident(CurrentPath) operator(:=) string<delimiter(')content(HKLM)delimiter(')>operator(;)
-        ident(ScanKey)operator(()ident(HKEY_LOCAL_MACHINE)operator(\);)
+        ident(ScanKey)operator(()ident(HKEY_LOCAL_MACHINE)operator(\))operator(;)
       reserved(end)operator(;)
       reserved(if) ident(sfHKDD) reserved(in) ident(SearchFor) reserved(then) reserved(begin)
         ident(CurrentPath) operator(:=) string<delimiter(')content(HKDD)delimiter(')>operator(;)
-        ident(ScanKey)operator(()ident(HKEY_DYN_DATA)operator(\);)
+        ident(ScanKey)operator(()ident(HKEY_DYN_DATA)operator(\))operator(;)
       reserved(end)operator(;)
 
       reserved(if) ident(SpecialPath) operator(<>) string<delimiter(')delimiter(')> reserved(then) reserved(begin)
-        reserved(if) ident(Success)operator(()ident(RegOpenKey)operator(()ident(HKEYOfStr)operator(()ident(ExRegRoot)operator(()ident(SpecialPath)operator(\)\),)
-         ident(PChar)operator(()ident(ExRegKey)operator(()ident(SpecialPath)operator(\)\),) ident(SpecialKey)operator(\)\)) reserved(then) reserved(begin)
-          ident(CurrentPath) operator(:=) ident(LWPSolve)operator(()ident(SpecialPath)operator(\);)
-          ident(ScanKey)operator(()ident(SpecialKey)operator(\);)
-          ident(RegCloseKey)operator(()ident(SpecialKey)operator(\);)
+        reserved(if) ident(Success)operator(()ident(RegOpenKey)operator(()ident(HKEYOfStr)operator(()ident(ExRegRoot)operator(()ident(SpecialPath)operator(\))operator(\))operator(,)
+         ident(PChar)operator(()ident(ExRegKey)operator(()ident(SpecialPath)operator(\))operator(\))operator(,) ident(SpecialKey)operator(\))operator(\)) reserved(then) reserved(begin)
+          ident(CurrentPath) operator(:=) ident(LWPSolve)operator(()ident(SpecialPath)operator(\))operator(;)
+          ident(ScanKey)operator(()ident(SpecialKey)operator(\))operator(;)
+          ident(RegCloseKey)operator(()ident(SpecialKey)operator(\))operator(;)
         reserved(end) reserved(else)
           ident(ShowMessage)operator(()string<delimiter(')content(Could not open)delimiter(')> operator(+) ident(EOL) operator(+)
-                      ident(Quote)operator(()ident(SpecialPath)operator(\)\);)
+                      ident(Quote)operator(()ident(SpecialPath)operator(\))operator(\))operator(;)
       reserved(end)operator(;)
     reserved(except)
       ident(syncStatusText) operator(:=) char<delimiter(')content(()delimiter(')> operator(+) ident(IntToStr)operator(()ident(KeysScanned)operator(\)) operator(+) string<delimiter(')content( k\) )delimiter(')> operator(+) ident(CurrentPath) operator(+)
         string<delimiter(')content(Error --> Terminated.)delimiter(')>operator(;)
-      ident(Synchronize)operator(()ident(UpdateStatus)operator(\);)
-      ident(Sleep)operator(()integer(1000)operator(\);)
+      ident(Synchronize)operator(()ident(UpdateStatus)operator(\))operator(;)
+      ident(Sleep)operator(()integer(1000)operator(\))operator(;)
     reserved(end)operator(;)
 
     ident(TimeElapsed) operator(:=) ident(SecondsPassed)operator(;)
   ident(Free)operator(;) reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(StrOfSearchOptions)operator(()reserved(const) ident(Options)operator(:) ident(TSearchOptions)operator(\):) reserved(string)operator(;)
+reserved(function) ident(StrOfSearchOptions)operator(()reserved(const) ident(Options)operator(:) ident(TSearchOptions)operator(\))operator(:) reserved(string)operator(;)
 
-  reserved(procedure) ident(Add)operator(()reserved(const) ident(s)operator(:) reserved(string)operator(\);)
+  reserved(procedure) ident(Add)operator(()reserved(const) ident(s)operator(:) reserved(string)operator(\))operator(;)
   reserved(begin)
     ident(Result) operator(:=) ident(Result) operator(+) ident(s)operator(;)
   reserved(end)operator(;)
 
   reserved(procedure) ident(AddOption)operator(()reserved(const) ident(Option)operator(:) reserved(string)operator(;) reserved(const) ident(Flag)operator(:) ident(TSearchVar)operator(;)
-    reserved(const) ident(Optional)operator(:) ident(Boolean) operator(=) ident(False)operator(\);)
+    reserved(const) ident(Optional)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(;)
   reserved(begin)
     reserved(if) ident(Flag) reserved(in) ident(Options) reserved(then)
       ident(Add)operator(()ident(Option)operator(\))
     reserved(else)
       reserved(if) reserved(not) ident(Optional) reserved(then)
-        ident(Add)operator(()char<delimiter(')content(^)delimiter(')> operator(+) ident(Option)operator(\);)
+        ident(Add)operator(()char<delimiter(')content(^)delimiter(')> operator(+) ident(Option)operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
 
-  ident(Add)operator(()char<delimiter(')content([)delimiter(')>operator(\);)
-  ident(AddOption)operator(()char<delimiter(')content(H)delimiter(')>operator(,) ident(sfAsHex)operator(,) ident(True)operator(\);)
-  ident(AddOption)operator(()string<delimiter(')content(W )delimiter(')>operator(,) ident(sfWildcards)operator(,) ident(True)operator(\);)
+  ident(Add)operator(()char<delimiter(')content([)delimiter(')>operator(\))operator(;)
+  ident(AddOption)operator(()char<delimiter(')content(H)delimiter(')>operator(,) ident(sfAsHex)operator(,) ident(True)operator(\))operator(;)
+  ident(AddOption)operator(()string<delimiter(')content(W )delimiter(')>operator(,) ident(sfWildcards)operator(,) ident(True)operator(\))operator(;)
 
-  ident(AddOption)operator(()char<delimiter(')content(C)delimiter(')>operator(,) ident(sfIgnoreCase)operator(\);)
-  ident(AddOption)operator(()char<delimiter(')content(L)delimiter(')>operator(,) ident(sfUseLocales)operator(\);)
-  ident(AddOption)operator(()string<delimiter(')content(P )delimiter(')>operator(,) ident(sfParts)operator(\);)
+  ident(AddOption)operator(()char<delimiter(')content(C)delimiter(')>operator(,) ident(sfIgnoreCase)operator(\))operator(;)
+  ident(AddOption)operator(()char<delimiter(')content(L)delimiter(')>operator(,) ident(sfUseLocales)operator(\))operator(;)
+  ident(AddOption)operator(()string<delimiter(')content(P )delimiter(')>operator(,) ident(sfParts)operator(\))operator(;)
 
-  ident(AddOption)operator(()char<delimiter(')content(K)delimiter(')>operator(,) ident(sfKeys)operator(\);)
-  ident(AddOption)operator(()char<delimiter(')content(N)delimiter(')>operator(,) ident(sfValueNames)operator(\);)
-  ident(AddOption)operator(()string<delimiter(')content(D )delimiter(')>operator(,) ident(sfValueData)operator(\);)
+  ident(AddOption)operator(()char<delimiter(')content(K)delimiter(')>operator(,) ident(sfKeys)operator(\))operator(;)
+  ident(AddOption)operator(()char<delimiter(')content(N)delimiter(')>operator(,) ident(sfValueNames)operator(\))operator(;)
+  ident(AddOption)operator(()string<delimiter(')content(D )delimiter(')>operator(,) ident(sfValueData)operator(\))operator(;)
 
-  ident(AddOption)operator(()char<delimiter(')content(S)delimiter(')>operator(,) ident(sfString)operator(\);)
-  ident(AddOption)operator(()char<delimiter(')content(D)delimiter(')>operator(,) ident(sfDWORD)operator(\);)
-  ident(AddOption)operator(()char<delimiter(')content(O)delimiter(')>operator(,) ident(sfOtherTypes)operator(\);)
-  ident(AddOption)operator(()char<delimiter(')content(?)delimiter(')>operator(,) ident(sfSpecialTypes)operator(\);)
+  ident(AddOption)operator(()char<delimiter(')content(S)delimiter(')>operator(,) ident(sfString)operator(\))operator(;)
+  ident(AddOption)operator(()char<delimiter(')content(D)delimiter(')>operator(,) ident(sfDWORD)operator(\))operator(;)
+  ident(AddOption)operator(()char<delimiter(')content(O)delimiter(')>operator(,) ident(sfOtherTypes)operator(\))operator(;)
+  ident(AddOption)operator(()char<delimiter(')content(?)delimiter(')>operator(,) ident(sfSpecialTypes)operator(\))operator(;)
 
-  ident(Add)operator(()string<delimiter(')content(] [)delimiter(')>operator(\);)
+  ident(Add)operator(()string<delimiter(')content(] [)delimiter(')>operator(\))operator(;)
 
   reserved(if) operator([)ident(sfHKU)operator(,) ident(sfHKLM)operator(,) ident(sfHKDD)operator(]) operator(<=) ident(Options) reserved(then)
     ident(Add)operator(()string<delimiter(')content(ALL)delimiter(')>operator(\))
   reserved(else) reserved(begin)
-    ident(AddOption)operator(()string<delimiter(')content(HKU )delimiter(')>operator(,) ident(sfHKU)operator(,) ident(True)operator(\);)
-    ident(AddOption)operator(()string<delimiter(')content(HKLM )delimiter(')>operator(,) ident(sfHKLM)operator(,) ident(True)operator(\);)
-    ident(AddOption)operator(()string<delimiter(')content(HKDD )delimiter(')>operator(,) ident(sfHKDD)operator(,) ident(True)operator(\);)
-    ident(Result) operator(:=) ident(TrimRight)operator(()ident(Result)operator(\);)
+    ident(AddOption)operator(()string<delimiter(')content(HKU )delimiter(')>operator(,) ident(sfHKU)operator(,) ident(True)operator(\))operator(;)
+    ident(AddOption)operator(()string<delimiter(')content(HKLM )delimiter(')>operator(,) ident(sfHKLM)operator(,) ident(True)operator(\))operator(;)
+    ident(AddOption)operator(()string<delimiter(')content(HKDD )delimiter(')>operator(,) ident(sfHKDD)operator(,) ident(True)operator(\))operator(;)
+    ident(Result) operator(:=) ident(TrimRight)operator(()ident(Result)operator(\))operator(;)
   reserved(end)operator(;)
 
-  ident(Add)operator(()char<delimiter(')content(])delimiter(')>operator(\);)
+  ident(Add)operator(()char<delimiter(')content(])delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TRegFindThread)operator(.)ident(Start)operator(;)
@@ -399,22 +399,22 @@ reserved(begin)
 
   comment(//Prepare for options)
   reserved(if) ident(sfAsHex) reserved(in) ident(SearchFor) reserved(then) reserved(begin)
-    ident(SearchText) operator(:=) reserved(string)operator(()ident(ByteAOfHex)operator(()ident(SearchText)operator(\)\);)
-    ident(SearchFor) operator(:=) ident(SearchFor) operator(-) operator([)ident(sfDWord)operator(,) ident(sfIgnoreCase)operator(];)
+    ident(SearchText) operator(:=) reserved(string)operator(()ident(ByteAOfHex)operator(()ident(SearchText)operator(\))operator(\))operator(;)
+    ident(SearchFor) operator(:=) ident(SearchFor) operator(-) operator([)ident(sfDWord)operator(,) ident(sfIgnoreCase)operator(])operator(;)
   reserved(end) reserved(else) reserved(begin)
     reserved(if) ident(SfUseLocales) reserved(in) ident(SearchFor) reserved(then)
-      ident(SearchText) operator(:=) ident(AnsiLowerCase)operator(()ident(SearchText)operator(\);)
+      ident(SearchText) operator(:=) ident(AnsiLowerCase)operator(()ident(SearchText)operator(\))operator(;)
 
     ident(dwordVal) operator(:=) integer(0)operator(;)
     reserved(if) ident(sfDWord) reserved(in) ident(SearchFor) reserved(then)
       reserved(if) ident(IsValidInteger)operator(()ident(SearchText)operator(\)) reserved(then)
         ident(dwordVal) operator(:=) ident(StrToInt)operator(()ident(SearchText)operator(\))
       reserved(else)
-        ident(Exclude)operator(()ident(SearchFor)operator(,) ident(sfDWord)operator(\);)
+        ident(Exclude)operator(()ident(SearchFor)operator(,) ident(sfDWord)operator(\))operator(;)
 
     reserved(if) ident(sfWildCards) reserved(in) ident(SearchFor) reserved(then)
       reserved(try)
-        ident(Mask) operator(:=) ident(TMask)operator(.)ident(Create)operator(()ident(SearchText)operator(\);)
+        ident(Mask) operator(:=) ident(TMask)operator(.)ident(Create)operator(()ident(SearchText)operator(\))operator(;)
       reserved(except)
         ident(Mask)operator(.)ident(Free)operator(;)
         ident(Mask) operator(:=) reserved(nil)operator(;)
@@ -422,16 +422,16 @@ reserved(begin)
   reserved(end)operator(;)
 
   ident(SearchForValues) operator(:=) operator(()ident(sfValueNames) reserved(in) ident(SearchFor)operator(\))
-                  reserved(or) operator(()ident(sfValueData) reserved(in) ident(SearchFor)operator(\);)
+                  reserved(or) operator(()ident(sfValueData) reserved(in) ident(SearchFor)operator(\))operator(;)
 
-  ident(FindNodeText) operator(:=) string<delimiter(')content(Find )delimiter(')> operator(+) ident(Quote)operator(()ident(FriendlyStr)operator(()ident(SearchText)operator(\)\)) operator(+) char<delimiter(')content( )delimiter(')> operator(+)
-    ident(StrOfSearchOptions)operator(()ident(SearchFor)operator(\);)
+  ident(FindNodeText) operator(:=) string<delimiter(')content(Find )delimiter(')> operator(+) ident(Quote)operator(()ident(FriendlyStr)operator(()ident(SearchText)operator(\))operator(\)) operator(+) char<delimiter(')content( )delimiter(')> operator(+)
+    ident(StrOfSearchOptions)operator(()ident(SearchFor)operator(\))operator(;)
 
   reserved(with) ident(ListTV)operator(.)ident(Items) reserved(do) reserved(begin)
     ident(BeginUpdate)operator(;)
-    ident(FindNode) operator(:=) ident(AddChildObject)operator(()reserved(nil)operator(,) ident(FindNodeText) operator(+) string<delimiter(')content(...)delimiter(')>operator(,) reserved(nil)operator(\);)
+    ident(FindNode) operator(:=) ident(AddChildObject)operator(()reserved(nil)operator(,) ident(FindNodeText) operator(+) string<delimiter(')content(...)delimiter(')>operator(,) reserved(nil)operator(\))operator(;)
     ident(FindNode)operator(.)ident(Data) operator(:=) ident(Self)operator(;)
-    ident(SetTNImage)operator(()ident(FindNode)operator(,) ident(iconHostReg)operator(\);)
+    ident(SetTNImage)operator(()ident(FindNode)operator(,) ident(iconHostReg)operator(\))operator(;)
     ident(EndUpdate)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
@@ -447,25 +447,25 @@ reserved(var)
 reserved(begin)
   ident(ObjectsFound) operator(:=) ident(KeysFound) operator(+) ident(ValuesFound) operator(+) ident(DataFound)operator(;)
 
-  ident(Found) operator(:=) ident(StrNumerus)operator(()ident(ObjectsFound)operator(,) string<delimiter(')content(object)delimiter(')>operator(,) string<delimiter(')content(objects)delimiter(')>operator(,) string<delimiter(')content(No)delimiter(')>operator(\);)
+  ident(Found) operator(:=) ident(StrNumerus)operator(()ident(ObjectsFound)operator(,) string<delimiter(')content(object)delimiter(')>operator(,) string<delimiter(')content(objects)delimiter(')>operator(,) string<delimiter(')content(No)delimiter(')>operator(\))operator(;)
   reserved(if) ident(ObjectsFound) operator(<) integer(2) reserved(then)
     ident(Found) operator(:=) ident(Found) operator(+) string<delimiter(')content( found.)delimiter(')>
   reserved(else) reserved(begin)
     ident(Found) operator(:=) ident(Found) operator(+) string<delimiter(')content( found: )delimiter(')>operator(;)
     reserved(if) ident(KeysFound) operator(>) integer(0) reserved(then)
-      ident(Found) operator(:=) ident(Found) operator(+) ident(StrNumerus)operator(()ident(KeysFound)operator(,) string<delimiter(')content(KeyName, )delimiter(')>operator(,) string<delimiter(')content(KeyNames, )delimiter(')>operator(,) string<delimiter(')content(No)delimiter(')>operator(\);)
+      ident(Found) operator(:=) ident(Found) operator(+) ident(StrNumerus)operator(()ident(KeysFound)operator(,) string<delimiter(')content(KeyName, )delimiter(')>operator(,) string<delimiter(')content(KeyNames, )delimiter(')>operator(,) string<delimiter(')content(No)delimiter(')>operator(\))operator(;)
     reserved(if) ident(ValuesFound) operator(>) integer(0) reserved(then)
       ident(Found) operator(:=) ident(Found) operator(+) ident(StrNumerus)operator(()ident(ValuesFound)operator(,) string<delimiter(')content(ValueName, )delimiter(')>operator(,) string<delimiter(')content(ValueNames, )delimiter(')>operator(,)
-        string<delimiter(')content(No)delimiter(')>operator(\);)
+        string<delimiter(')content(No)delimiter(')>operator(\))operator(;)
     reserved(if) ident(DataFound) operator(>) integer(0) reserved(then)
-      ident(Found) operator(:=) ident(Found) operator(+) ident(StrNumerus)operator(()ident(DataFound)operator(,) string<delimiter(')content(Data)delimiter(')>operator(,) string<delimiter(')content(Datas)delimiter(')>operator(,) string<delimiter(')content(No)delimiter(')>operator(\);)
+      ident(Found) operator(:=) ident(Found) operator(+) ident(StrNumerus)operator(()ident(DataFound)operator(,) string<delimiter(')content(Data)delimiter(')>operator(,) string<delimiter(')content(Datas)delimiter(')>operator(,) string<delimiter(')content(No)delimiter(')>operator(\))operator(;)
 
     reserved(if) ident(RightStr)operator(()ident(Found)operator(,) integer(2)operator(\)) operator(=) string<delimiter(')content(, )delimiter(')> reserved(then)
-      ident(Delete)operator(()ident(Found)operator(,) ident(Length)operator(()ident(Found)operator(\)) operator(-) integer(1)operator(,) integer(2)operator(\);)
+      ident(Delete)operator(()ident(Found)operator(,) ident(Length)operator(()ident(Found)operator(\)) operator(-) integer(1)operator(,) integer(2)operator(\))operator(;)
   reserved(end)operator(;)
 
   ident(FindNode)operator(.)ident(Text) operator(:=) ident(FindNodeText) operator(+) ident(Format)operator(()string<delimiter(')content( OK (%0.1f s\) %s)delimiter(')>operator(,)
-    operator([)ident(TimeElapsed)operator(,) ident(Found)operator(]\);)
+    operator([)ident(TimeElapsed)operator(,) ident(Found)operator(])operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(end)operator(.)
@@ -525,30 +525,30 @@ reserved(type)
     ident(StayOnTopCB)operator(:) ident(TPrefCheckBox)operator(;)
     ident(FindB)operator(:) ident(TButton)operator(;)
     ident(FindPrefB)operator(:) ident(TButton)operator(;)
-    reserved(procedure) ident(FindBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ListTVKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(FindEKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(ActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(DeActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormDeactivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(SfWildCardsCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(StayOnTopCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SfRootKeysUpdate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FindPrefBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(FindBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ListTVKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(FindEKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(ActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(DeActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormDeactivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(SfWildCardsCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(StayOnTopCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SfRootKeysUpdate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FindPrefBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 
     reserved(procedure) ident(CloseFindPrefP)operator(;)
     reserved(procedure) ident(OpenFindPrefP)operator(;)
-    reserved(procedure) ident(FindEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SfDataCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ListTVDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SfAsHexCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(Copy1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SfIgnoreCaseCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SfTypesCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(FindEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SfDataCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ListTVDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SfAsHexCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(Copy1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SfIgnoreCaseCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SfTypesCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(const)
@@ -567,51 +567,51 @@ reserved(uses) ident(plutomain)operator(,) ident(PrefU)operator(,) ident(ValuesU
 
 preprocessor({$R *.DFM})
 
-reserved(procedure) ident(TFindWin)operator(.)ident(FindBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(FindBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(SearchFor)operator(:) ident(TSearchOptions)operator(;)
   ident(FindThread)operator(:) ident(TRegFindThread)operator(;)
 
-  reserved(procedure) ident(AddOption)operator(()ident(CheckBox)operator(:) ident(TCustomCheckBox)operator(;) ident(Flag)operator(:) ident(TSearchVar)operator(\);)
+  reserved(procedure) ident(AddOption)operator(()ident(CheckBox)operator(:) ident(TCustomCheckBox)operator(;) ident(Flag)operator(:) ident(TSearchVar)operator(\))operator(;)
   reserved(begin)
     reserved(with) ident(CheckBox) reserved(as) ident(TCheckBox) reserved(do)
       reserved(if) ident(Enabled) reserved(and) ident(Checked) reserved(then)
-        ident(Include)operator(()ident(SearchFor)operator(,) ident(Flag)operator(\);)
+        ident(Include)operator(()ident(SearchFor)operator(,) ident(Flag)operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
-  ident(SearchFor) operator(:=) operator([];)
+  ident(SearchFor) operator(:=) operator([)operator(])operator(;)
 
-  ident(AddOption)operator(()ident(SfKeysCB)operator(,) ident(sfKeys)operator(\);)
+  ident(AddOption)operator(()ident(SfKeysCB)operator(,) ident(sfKeys)operator(\))operator(;)
 
-  ident(AddOption)operator(()ident(SfValuesCB)operator(,) ident(sfValueNames)operator(\);)
-  ident(AddOption)operator(()ident(SfDataCB)operator(,) ident(sfValueData)operator(\);)
+  ident(AddOption)operator(()ident(SfValuesCB)operator(,) ident(sfValueNames)operator(\))operator(;)
+  ident(AddOption)operator(()ident(SfDataCB)operator(,) ident(sfValueData)operator(\))operator(;)
 
-  ident(AddOption)operator(()ident(SfStringCB)operator(,) ident(sfString)operator(\);)
-  ident(AddOption)operator(()ident(SfDWordCB)operator(,) ident(sfDWord)operator(\);)
-  ident(AddOption)operator(()ident(SfOtherCB)operator(,) ident(sfOtherTypes)operator(\);)
+  ident(AddOption)operator(()ident(SfStringCB)operator(,) ident(sfString)operator(\))operator(;)
+  ident(AddOption)operator(()ident(SfDWordCB)operator(,) ident(sfDWord)operator(\))operator(;)
+  ident(AddOption)operator(()ident(SfOtherCB)operator(,) ident(sfOtherTypes)operator(\))operator(;)
 
   reserved(if) ident(SfRootKeyRB)operator(.)ident(Checked) reserved(then) reserved(begin)
-    ident(AddOption)operator(()ident(SfHKUCB)operator(,) ident(sfHKU)operator(\);)
-    ident(AddOption)operator(()ident(SfHKLMCB)operator(,) ident(sfHKLM)operator(\);)
-    ident(AddOption)operator(()ident(SfHKDDCB)operator(,) ident(sfHKDD)operator(\);)
+    ident(AddOption)operator(()ident(SfHKUCB)operator(,) ident(sfHKU)operator(\))operator(;)
+    ident(AddOption)operator(()ident(SfHKLMCB)operator(,) ident(sfHKLM)operator(\))operator(;)
+    ident(AddOption)operator(()ident(SfHKDDCB)operator(,) ident(sfHKDD)operator(\))operator(;)
   reserved(end)operator(;)
 
-  ident(AddOption)operator(()ident(SfAsHexCB)operator(,) ident(sfAsHex)operator(\);)
-  ident(AddOption)operator(()ident(SfWildCardsCB)operator(,) ident(sfWildCards)operator(\);)
-  ident(AddOption)operator(()ident(SfPartsCB)operator(,) ident(sfParts)operator(\);)
-  ident(AddOption)operator(()ident(SfIgnoreCaseCB)operator(,) ident(sfIgnoreCase)operator(\);)
-  ident(AddOption)operator(()ident(SfUseLocalesCB)operator(,) ident(sfUseLocales)operator(\);)
+  ident(AddOption)operator(()ident(SfAsHexCB)operator(,) ident(sfAsHex)operator(\))operator(;)
+  ident(AddOption)operator(()ident(SfWildCardsCB)operator(,) ident(sfWildCards)operator(\))operator(;)
+  ident(AddOption)operator(()ident(SfPartsCB)operator(,) ident(sfParts)operator(\))operator(;)
+  ident(AddOption)operator(()ident(SfIgnoreCaseCB)operator(,) ident(sfIgnoreCase)operator(\))operator(;)
+  ident(AddOption)operator(()ident(SfUseLocalesCB)operator(,) ident(sfUseLocales)operator(\))operator(;)
 
   comment({AddOption(SfCLSIDCB, sfCLSID\);
   AddOption(SfInterfaceCB, sfInterface\);})
 
   reserved(if) ident(SfTypesCB)operator(.)ident(Checked) reserved(and) reserved(not) ident(TypeRangeE)operator(.)ident(RangeMaximal) reserved(then)
-    ident(Include)operator(()ident(SearchFor)operator(,) ident(sfSpecialTypes)operator(\);)
+    ident(Include)operator(()ident(SearchFor)operator(,) ident(sfSpecialTypes)operator(\))operator(;)
 
   ident(FindThread) operator(:=) ident(TRegFindThread)operator(.)ident(CreateIt)operator(()
-    ident(TThreadPriority)operator(()ident(ThreadPriorityComB)operator(.)ident(ItemIndex)operator(\),) ident(FindE)operator(.)ident(Text)operator(,) ident(SearchFor)operator(,)
-      ident(TFindThreadProgress)operator(()ident(ProgressRG)operator(.)ident(ItemIndex)operator(\)\);)
+    ident(TThreadPriority)operator(()ident(ThreadPriorityComB)operator(.)ident(ItemIndex)operator(\))operator(,) ident(FindE)operator(.)ident(Text)operator(,) ident(SearchFor)operator(,)
+      ident(TFindThreadProgress)operator(()ident(ProgressRG)operator(.)ident(ItemIndex)operator(\))operator(\))operator(;)
 
   ident(FindThread)operator(.)ident(ListTV) operator(:=) ident(ListTV)operator(;)
 
@@ -620,14 +620,14 @@ reserved(begin)
 
   reserved(if) ident(SfCurKeyRB)operator(.)ident(Checked) reserved(then)
     ident(FindThread)operator(.)ident(SpecialPath) operator(:=)
-      ident(LWPSolve)operator(()ident(StrOfRegPath)operator(()ident(CurKey)operator(()ident(uhNonSystemShortcuts)operator(\)\)\);)
+      ident(LWPSolve)operator(()ident(StrOfRegPath)operator(()ident(CurKey)operator(()ident(uhNonSystemShortcuts)operator(\))operator(\))operator(\))operator(;)
 
   ident(FindThread)operator(.)ident(Resume)operator(;)
   ident(CloseFindPrefP)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TFindWin)operator(.)ident(ListTVKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(var)
   ident(Node)operator(:) ident(TTreeNode)operator(;)
 
@@ -636,7 +636,7 @@ reserved(var)
     ident(FindThread)operator(:) ident(TRegFindThread)operator(;)
   reserved(begin)
     reserved(if) operator(()ident(Node)operator(.)ident(Level) operator(=) integer(0)operator(\)) reserved(then) reserved(begin)
-      ident(FindThread) operator(:=) ident(TRegFindThread)operator(()ident(Node)operator(.)ident(Data)operator(\);)
+      ident(FindThread) operator(:=) ident(TRegFindThread)operator(()ident(Node)operator(.)ident(Data)operator(\))operator(;)
       reserved(if) reserved(not) ident(Assigned)operator(()ident(FindThread)operator(\)) reserved(then)
         ident(Node)operator(.)ident(Delete)
       reserved(else)
@@ -658,17 +658,17 @@ reserved(begin)
     ident(VK_F12)operator(:) reserved(if) ident(Assigned)operator(()ident(Node)operator(.)ident(Parent)operator(\)) reserved(then)
       ident(Node)operator(.)ident(Parent)operator(.)ident(AlphaSort)operator(;)
 
-    ident(VK_RETURN)operator(:) ident(ListTVDblClick)operator(()ident(Sender)operator(\);)
+    ident(VK_RETURN)operator(:) ident(ListTVDblClick)operator(()ident(Sender)operator(\))operator(;)
 
     ident(VK_DELETE)operator(:) ident(TerminateFindThread)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TFindWin)operator(.)ident(FindEKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Key) operator(=) ident(VK_RETURN) reserved(then)
-    ident(FindBClick)operator(()ident(Sender)operator(\);)
+    ident(FindBClick)operator(()ident(Sender)operator(\))operator(;)
 
   reserved(if) ident(Key) operator(=) ident(VK_UP) reserved(then) reserved(begin)
     ident(CloseFindPrefP)operator(;)
@@ -679,48 +679,48 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFindWin)operator(.)ident(ActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(ActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(ActivateThis)operator(()ident(Sender)operator(\);)
+  ident(ActivateThis)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFindWin)operator(.)ident(DeActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(DeActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(DeActivateThis)operator(()ident(Sender)operator(\);)
+  ident(DeActivateThis)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFindWin)operator(.)ident(FormDeactivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(FormDeactivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Assigned)operator(()ident(ActiveControl)operator(\)) reserved(and) operator(()ident(ActiveControl)operator(.)ident(Tag) operator(=) ident(EditControlFlag)operator(\)) reserved(then)
-    ident(DeActivateThis)operator(()ident(ActiveControl)operator(\);)
+    ident(DeActivateThis)operator(()ident(ActiveControl)operator(\))operator(;)
 
   ident(AlphaBlend) operator(:=) ident(TransparentCB)operator(.)ident(Checked)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFindWin)operator(.)ident(FormActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(FormActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Assigned)operator(()ident(ActiveControl)operator(\)) reserved(and) operator(()ident(ActiveControl)operator(.)ident(Tag) operator(=) ident(EditControlFlag)operator(\)) reserved(then)
-    ident(ActivateThis)operator(()ident(ActiveControl)operator(\);)
+    ident(ActivateThis)operator(()ident(ActiveControl)operator(\))operator(;)
 
   ident(AlphaBlend) operator(:=) ident(False)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TFindWin)operator(.)ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Key) operator(=) ident(VK_ESCAPE) reserved(then)
     ident(Close)operator(;)
-  ident(MainWin)operator(.)ident(FormKeyDown)operator(()ident(Sender)operator(,) ident(Key)operator(,) ident(Shift)operator(\);)
+  ident(MainWin)operator(.)ident(FormKeyDown)operator(()ident(Sender)operator(,) ident(Key)operator(,) ident(Shift)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFindWin)operator(.)ident(SfWildCardsCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(SfWildCardsCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(SfPartsCB)operator(.)ident(Enabled) operator(:=) reserved(not) ident(SfWildcardsCB)operator(.)ident(Checked)operator(;)
   ident(SfIgnoreCaseCB)operator(.)ident(Enabled) operator(:=) reserved(not) ident(SfWildcardsCB)operator(.)ident(Checked)operator(;)
   ident(SfUseLocalesCB)operator(.)ident(Enabled) operator(:=) ident(SfIgnoreCaseCB)operator(.)ident(Checked) reserved(and) reserved(not) ident(SfWildcardsCB)operator(.)ident(Checked)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFindWin)operator(.)ident(StayOnTopCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(StayOnTopCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(StayOnTopCB)operator(.)ident(Checked) reserved(then)
     ident(FormStyle) operator(:=) ident(fsStayOnTop)
@@ -728,7 +728,7 @@ reserved(begin)
     ident(FormStyle) operator(:=) ident(fsNormal)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFindWin)operator(.)ident(SfRootKeysUpdate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(SfRootKeysUpdate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(SfRootKeyRB) reserved(do) reserved(begin)
     ident(SfHKLMCB)operator(.)ident(Enabled) operator(:=) ident(Checked)operator(;)
@@ -737,7 +737,7 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFindWin)operator(.)ident(FindPrefBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(FindPrefBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(case) ident(FindPrefB)operator(.)ident(Tag) reserved(of)
     ident(fpbOpen)operator(:)
@@ -745,7 +745,7 @@ reserved(begin)
     ident(fpbClosed)operator(:)
       ident(OpenFindPrefP)operator(;)
   reserved(else)
-    ident(ShowMessage)operator(()string<delimiter(')content(Fehler: FindPrefB hat unbekanntes Tag)delimiter(')>operator(\);)
+    ident(ShowMessage)operator(()string<delimiter(')content(Fehler: FindPrefB hat unbekanntes Tag)delimiter(')>operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
@@ -769,7 +769,7 @@ reserved(begin)
   ident(ListTV)operator(.)ident(Repaint)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFindWin)operator(.)ident(FindEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(FindEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(IsValidInteger)operator(()ident(FindE)operator(.)ident(Text)operator(\)) reserved(then)
     ident(SfDWORDCB)operator(.)ident(Caption) operator(:=) string<delimiter(')content(D&WORD OK)delimiter(')>
@@ -777,11 +777,11 @@ reserved(begin)
     ident(SfDWORDCB)operator(.)ident(Caption) operator(:=) string<delimiter(')content(D&WORD ??)delimiter(')>operator(;)
 
   ident(SfAsHexCB)operator(.)ident(Enabled) operator(:=) operator(()ident(FindE)operator(.)ident(Text) operator(<>) string<delimiter(')delimiter(')>operator(\))
-    reserved(and) reserved(not) ident(CharIn)operator(()ident(FindE)operator(.)ident(Text)operator(,) ident(AllChars) operator(-) ident(HexadecimalChars) operator(-) operator([)char<delimiter(')content( )delimiter(')>operator(]\);)
-  ident(SfAsDWord)operator(.)ident(Enabled) operator(:=) ident(SfAsHexCB)operator(.)ident(Enabled) reserved(and) operator(()ident(Length)operator(()ident(TrimAll)operator(()ident(FindE)operator(.)ident(Text)operator(\)\)) operator(<) integer(8)operator(\);)
+    reserved(and) reserved(not) ident(CharIn)operator(()ident(FindE)operator(.)ident(Text)operator(,) ident(AllChars) operator(-) ident(HexadecimalChars) operator(-) operator([)char<delimiter(')content( )delimiter(')>operator(])operator(\))operator(;)
+  ident(SfAsDWord)operator(.)ident(Enabled) operator(:=) ident(SfAsHexCB)operator(.)ident(Enabled) reserved(and) operator(()ident(Length)operator(()ident(TrimAll)operator(()ident(FindE)operator(.)ident(Text)operator(\))operator(\)) operator(<) integer(8)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFindWin)operator(.)ident(SfDataCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(SfDataCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(SfDataCB) reserved(do) reserved(begin)
     ident(SfStringCB)operator(.)ident(Enabled) operator(:=) ident(Checked)operator(;)
@@ -790,7 +790,7 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFindWin)operator(.)ident(ListTVDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(ListTVDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(Node)operator(:) ident(TTreeNode)operator(;)
 reserved(begin)
@@ -798,10 +798,10 @@ reserved(begin)
   reserved(if) reserved(not) ident(Assigned)operator(()ident(Node)operator(\)) reserved(or) operator(()ident(Node)operator(.)ident(Level) operator(=) integer(0)operator(\)) reserved(then)
     ident(Exit)operator(;)
 
-  ident(MainWin)operator(.)ident(GotoKey)operator(()ident(UntilLastChar)operator(()ident(Node)operator(.)ident(Text)operator(,) char<delimiter(')content(=)delimiter(')>operator(\)\))
+  ident(MainWin)operator(.)ident(GotoKey)operator(()ident(UntilLastChar)operator(()ident(Node)operator(.)ident(Text)operator(,) char<delimiter(')content(=)delimiter(')>operator(\))operator(\))
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFindWin)operator(.)ident(SfAsHexCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(SfAsHexCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(SfAsHexCB) reserved(do) reserved(begin)
     ident(SfIgnoreCaseCB)operator(.)ident(Enabled) operator(:=) ident(Checked)operator(;)
@@ -809,7 +809,7 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFindWin)operator(.)ident(Copy1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(Copy1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(Node)operator(:) ident(TTreeNode)operator(;)
 reserved(begin)
@@ -820,12 +820,12 @@ reserved(begin)
   ident(Clipboard)operator(.)ident(AsText) operator(:=) ident(Node)operator(.)ident(Text)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFindWin)operator(.)ident(SfIgnoreCaseCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(SfIgnoreCaseCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(SfUseLocalesCB)operator(.)ident(Enabled) operator(:=) ident(SfIgnoreCaseCB)operator(.)ident(Checked)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFindWin)operator(.)ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(ImageFile)operator(:) reserved(string)operator(;)
 reserved(begin)
@@ -834,21 +834,21 @@ reserved(begin)
 
   ident(ImageFile) operator(:=) ident(PlutoDir) operator(+) string<delimiter(')content(mole.bmp)delimiter(')>operator(;)
   reserved(if) ident(FileExists)operator(()ident(ImageFile)operator(\)) reserved(then)
-    ident(MoleLogoI)operator(.)ident(Picture)operator(.)ident(LoadFromFile)operator(()ident(ImageFile)operator(\);)
+    ident(MoleLogoI)operator(.)ident(Picture)operator(.)ident(LoadFromFile)operator(()ident(ImageFile)operator(\))operator(;)
 
   ident(Width) operator(:=) ident(Screen)operator(.)ident(WorkAreaWidth) operator(-) integer(100)operator(;)
 
   ident(CloseFindPrefP)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFindWin)operator(.)ident(FormShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(FormShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(Top) operator(:=) ident(Screen)operator(.)ident(WorkAreaHeight) operator(-) integer(450)operator(;)
   ident(Height) operator(:=) ident(Screen)operator(.)ident(WorkAreaHeight) operator(-) ident(Top)operator(;)
   ident(Left) operator(:=) operator(()ident(Screen)operator(.)ident(WorkAreaWidth) operator(-) ident(Width)operator(\)) reserved(div) integer(2)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFindWin)operator(.)ident(SfTypesCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TFindWin)operator(.)ident(SfTypesCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(TypeRangeE)operator(.)ident(Enabled) operator(:=) ident(SfTypesCB)operator(.)ident(Checked)operator(;)
 reserved(end)operator(;)
@@ -963,8 +963,8 @@ reserved(const)
   ident(iconGroupBlinking) operator(=)   ident(iconFirstChange) operator(+) integer(8)operator(;)
   ident(nChangeIcons) operator(=)    integer(7)operator(;)
 
-  ident(DefaultValueFlag) operator(=) ident(Pointer)operator(()integer(1)operator(\);)
-  ident(MultiEditFlag) operator(=) ident(Pointer)operator(()integer(2)operator(\);)
+  ident(DefaultValueFlag) operator(=) ident(Pointer)operator(()integer(1)operator(\))operator(;)
+  ident(MultiEditFlag) operator(=) ident(Pointer)operator(()integer(2)operator(\))operator(;)
   
   ident(NoValueCaption) operator(=) string<delimiter(')content([No Value])delimiter(')>operator(;)
 
@@ -996,17 +996,17 @@ reserved(const)
   ident(clVeryBrightBlue) operator(=) hex($00FFDDDD)operator(;)
 
 reserved(type)
-  ident(TValueListColumn) operator(=) operator(()ident(vlcName)operator(,) ident(vlcSize)operator(,) ident(vlcType)operator(,) ident(vlcData)operator(\);)
+  ident(TValueListColumn) operator(=) operator(()ident(vlcName)operator(,) ident(vlcSize)operator(,) ident(vlcType)operator(,) ident(vlcData)operator(\))operator(;)
 
 reserved(const)
-  ident(ValueListColumnRange) operator(=) operator([)ident(Low)operator(()ident(TValueListColumn)operator(\)..)ident(High)operator(()ident(TValueListColumn)operator(\)];)
+  ident(ValueListColumnRange) operator(=) operator([)ident(Low)operator(()ident(TValueListColumn)operator(\))operator(..)ident(High)operator(()ident(TValueListColumn)operator(\))operator(])operator(;)
 
 reserved(type)
   ident(TSearchVar) operator(=) operator(()ident(sfKeys)operator(,) ident(sfValueNames)operator(,) ident(sfValueData)operator(,)
                 ident(sfAsHex)operator(,) ident(sfAsDWord)operator(,)
                 ident(sfWildCards)operator(,) ident(sfParts)operator(,) ident(sfIgnoreCase)operator(,) ident(SfUseLocales)operator(,)
-                ident(sfHKU)operator(,) ident(sfHKLM)operator(,) ident(sfHKDD)operator(,//) ident(sfCLSID)operator(,) ident(sfInterface)operator(,)
-                ident(sfString)operator(,) ident(sfDWord)operator(,) ident(sfOtherTypes)operator(,) ident(sfSpecialTypes)operator(\);)
+                ident(sfHKU)operator(,) ident(sfHKLM)operator(,) ident(sfHKDD)operator(,)comment(// sfCLSID, sfInterface,)
+                ident(sfString)operator(,) ident(sfDWord)operator(,) ident(sfOtherTypes)operator(,) ident(sfSpecialTypes)operator(\))operator(;)
 
   ident(TSearchOptions) operator(=) reserved(set) reserved(of) ident(TSearchVar)operator(;)
 
@@ -1019,40 +1019,40 @@ reserved(type)
   ident(PKeyShortcut) operator(=) operator(^)ident(TKeyShortcut)operator(;)
   ident(TShortcutA) operator(=) reserved(array) reserved(of) ident(TKeyShortcut)operator(;)
 
-  ident(TOpenNode) operator(=) reserved(function) operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\):) ident(Boolean)operator(;)
-  ident(TCheckNode) operator(=) reserved(procedure) operator(()ident(Node)operator(:) ident(TTreeNode)operator(;) ident(OnlyOnce)operator(:) ident(Boolean) operator(=) ident(True)operator(\);)
+  ident(TOpenNode) operator(=) reserved(function) operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(:) ident(Boolean)operator(;)
+  ident(TCheckNode) operator(=) reserved(procedure) operator(()ident(Node)operator(:) ident(TTreeNode)operator(;) ident(OnlyOnce)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(;)
 
   comment(//NodeInfo System)
   ident(TNodeFlag) operator(=) operator(()ident(nfDefect)operator(,) ident(nfReadOnly)operator(,) ident(nfChecked)operator(,)
-    ident(nfCopy)operator(,) ident(nfCut)operator(,) ident(nfPaste)operator(\);)
+    ident(nfCopy)operator(,) ident(nfCut)operator(,) ident(nfPaste)operator(\))operator(;)
   ident(TNodeFlags) operator(=) reserved(set) reserved(of) ident(TNodeFlag)operator(;)
 
   ident(TUniHostType) operator(=) operator(()ident(uhNone)operator(,)
                   ident(uhReg)operator(,) ident(uhIni)operator(,) ident(uhRegFile)operator(,)
-                  ident(uhUserShortcut)operator(,) ident(uhStandardShortcut)operator(,) ident(uhSystemShortcut)operator(\);)
+                  ident(uhUserShortcut)operator(,) ident(uhStandardShortcut)operator(,) ident(uhSystemShortcut)operator(\))operator(;)
   ident(TUniHostTypes) operator(=) reserved(set) reserved(of) ident(TUniHostType)operator(;)
 
 reserved(const)
-  ident(uhShortcuts) operator(=) operator([)ident(uhUserShortcut)operator(,) ident(uhStandardShortcut)operator(,) ident(uhSystemShortcut)operator(];)
-  ident(uhNonSystemShortcuts) operator(=) operator([)ident(uhUserShortcut)operator(,) ident(uhStandardShortcut)operator(];)
+  ident(uhShortcuts) operator(=) operator([)ident(uhUserShortcut)operator(,) ident(uhStandardShortcut)operator(,) ident(uhSystemShortcut)operator(])operator(;)
+  ident(uhNonSystemShortcuts) operator(=) operator([)ident(uhUserShortcut)operator(,) ident(uhStandardShortcut)operator(])operator(;)
 
   ident(NodeFlagStrings)operator(:) reserved(array)operator([)ident(TNodeFlag)operator(]) reserved(of) reserved(string) operator(=) operator(()
     string<delimiter(')content(nfDefect)delimiter(')>operator(,) string<delimiter(')content(nfReadOnly)delimiter(')>operator(,) string<delimiter(')content(nfChecked)delimiter(')>operator(,)
-    string<delimiter(')content(nfCopy)delimiter(')>operator(,) string<delimiter(')content(nfCut)delimiter(')>operator(,) string<delimiter(')content(nfPaste)delimiter(')>operator(\);)
+    string<delimiter(')content(nfCopy)delimiter(')>operator(,) string<delimiter(')content(nfCut)delimiter(')>operator(,) string<delimiter(')content(nfPaste)delimiter(')>operator(\))operator(;)
 
   ident(HostTypeStrings)operator(:) reserved(array)operator([)ident(TUniHostType)operator(]) reserved(of) reserved(string) operator(=) operator(()string<delimiter(')content(uhNone)delimiter(')>operator(,)
     string<delimiter(')content(uhReg)delimiter(')>operator(,) string<delimiter(')content(uhIni)delimiter(')>operator(,) string<delimiter(')content(uhRegFile)delimiter(')>operator(,)
-    string<delimiter(')content(uhUserShortcut)delimiter(')>operator(,) string<delimiter(')content(uhStandardShortcut)delimiter(')>operator(,) string<delimiter(')content(uhSystemShortcut)delimiter(')>operator(\);)
+    string<delimiter(')content(uhUserShortcut)delimiter(')>operator(,) string<delimiter(')content(uhStandardShortcut)delimiter(')>operator(,) string<delimiter(')content(uhSystemShortcut)delimiter(')>operator(\))operator(;)
 
 reserved(type)
   ident(TNodeInfo) operator(=) reserved(packed) reserved(class)
   directive(public)
     ident(HostType)operator(:) ident(TUniHostType)operator(;)
     ident(Flags)operator(:) ident(TNodeFlags)operator(;)
-    reserved(constructor) ident(Create)operator(()ident(HostType)operator(:) ident(TUniHostType) operator(=) ident(uhNone)operator(;) ident(Flags)operator(:) ident(TNodeFlags) operator(=) operator([]\);)
+    reserved(constructor) ident(Create)operator(()ident(HostType)operator(:) ident(TUniHostType) operator(=) ident(uhNone)operator(;) ident(Flags)operator(:) ident(TNodeFlags) operator(=) operator([)operator(])operator(\))operator(;)
 
-    reserved(procedure) ident(IncludeFlag)operator(()ident(Flag)operator(:) ident(TNodeFlag)operator(\);)
-    reserved(procedure) ident(ExcludeFlag)operator(()ident(Flag)operator(:) ident(TNodeFlag)operator(\);)
+    reserved(procedure) ident(IncludeFlag)operator(()ident(Flag)operator(:) ident(TNodeFlag)operator(\))operator(;)
+    reserved(procedure) ident(ExcludeFlag)operator(()ident(Flag)operator(:) ident(TNodeFlag)operator(\))operator(;)
 
     reserved(function) ident(IsHost)operator(:) ident(Boolean)operator(;)
     reserved(function) ident(IsShortcut)operator(:) ident(Boolean)operator(;)
@@ -1062,12 +1062,12 @@ reserved(type)
     reserved(function) ident(Defect)operator(:) ident(Boolean)operator(;)
   reserved(end)operator(;)
 
-reserved(function) ident(NodeInfo)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\):) ident(TNodeInfo)operator(;)
-reserved(procedure) ident(ReportStatus)operator(()reserved(const) ident(s)operator(:) reserved(string)operator(\);)
+reserved(function) ident(NodeInfo)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(:) ident(TNodeInfo)operator(;)
+reserved(procedure) ident(ReportStatus)operator(()reserved(const) ident(s)operator(:) reserved(string)operator(\))operator(;)
 
 reserved(const)
   ident(PlatformStrings)operator(:) reserved(array)operator([)integer(0)operator(..)integer(2)operator(]) reserved(of) reserved(string) operator(=)
-    operator(()string<delimiter(')content(VER_PLATFORM_WIN32s)delimiter(')>operator(,) string<delimiter(')content(VER_PLATFORM_WIN32_WINDOWS)delimiter(')>operator(,) string<delimiter(')content(VER_PLATFORM_WIN32_NT)delimiter(')>operator(\);)
+    operator(()string<delimiter(')content(VER_PLATFORM_WIN32s)delimiter(')>operator(,) string<delimiter(')content(VER_PLATFORM_WIN32_WINDOWS)delimiter(')>operator(,) string<delimiter(')content(VER_PLATFORM_WIN32_NT)delimiter(')>operator(\))operator(;)
 
 reserved(var)
   ident(PlutoDir)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(;)
@@ -1076,7 +1076,7 @@ reserved(implementation)
 
 reserved(uses) ident(SysUtils)operator(;)
 
-reserved(function) ident(NodeInfo)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\):) ident(TNodeInfo)operator(;)
+reserved(function) ident(NodeInfo)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(:) ident(TNodeInfo)operator(;)
 reserved(begin)
   reserved(if) reserved(not) ident(Assigned)operator(()ident(Node)operator(\)) reserved(then) reserved(begin)
     ident(Result) operator(:=) reserved(nil)operator(;)
@@ -1084,12 +1084,12 @@ reserved(begin)
 
   reserved(if) reserved(not) ident(Assigned)operator(()ident(Node)operator(.)ident(Data)operator(\)) reserved(then)
     ident(Node)operator(.)ident(Data) operator(:=) ident(TNodeInfo)operator(.)ident(Create)operator(;)
-  ident(Result) operator(:=) ident(TNodeInfo)operator(()ident(Node)operator(.)ident(Data)operator(\);)
+  ident(Result) operator(:=) ident(TNodeInfo)operator(()ident(Node)operator(.)ident(Data)operator(\))operator(;)
 reserved(end)operator(;)
 
 comment({ TNodeInfo })
 
-reserved(constructor) ident(TNodeInfo)operator(.)ident(Create)operator(()ident(HostType)operator(:) ident(TUniHostType)operator(;) ident(Flags)operator(:) ident(TNodeFlags)operator(\);)
+reserved(constructor) ident(TNodeInfo)operator(.)ident(Create)operator(()ident(HostType)operator(:) ident(TUniHostType)operator(;) ident(Flags)operator(:) ident(TNodeFlags)operator(\))operator(;)
 reserved(begin)
   reserved(inherited) ident(Create)operator(;)
   ident(Self)operator(.)ident(HostType) operator(:=) ident(HostType)operator(;)
@@ -1111,14 +1111,14 @@ reserved(begin)
   ident(Result) operator(:=) ident(nfDefect) reserved(in) ident(Flags)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TNodeInfo)operator(.)ident(IncludeFlag)operator(()ident(Flag)operator(:) ident(TNodeFlag)operator(\);)
+reserved(procedure) ident(TNodeInfo)operator(.)ident(IncludeFlag)operator(()ident(Flag)operator(:) ident(TNodeFlag)operator(\))operator(;)
 reserved(begin)
-  ident(Include)operator(()ident(Flags)operator(,) ident(Flag)operator(\);)
+  ident(Include)operator(()ident(Flags)operator(,) ident(Flag)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TNodeInfo)operator(.)ident(ExcludeFlag)operator(()ident(Flag)operator(:) ident(TNodeFlag)operator(\);)
+reserved(procedure) ident(TNodeInfo)operator(.)ident(ExcludeFlag)operator(()ident(Flag)operator(:) ident(TNodeFlag)operator(\))operator(;)
 reserved(begin)
-  ident(Exclude)operator(()ident(Flags)operator(,) ident(Flag)operator(\);)
+  ident(Exclude)operator(()ident(Flags)operator(,) ident(Flag)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(TNodeInfo)operator(.)ident(IsHost)operator(:) ident(Boolean)operator(;)
@@ -1133,23 +1133,23 @@ reserved(end)operator(;)
 
 reserved(function) ident(GetPlutoDir)operator(:) reserved(string)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(LWPSlash)operator(()ident(GetParam)operator(()string<delimiter(')content(-imports=)delimiter(')>operator(,) ident(MyDir)operator(\)\);)
+  ident(Result) operator(:=) ident(LWPSlash)operator(()ident(GetParam)operator(()string<delimiter(')content(-imports=)delimiter(')>operator(,) ident(MyDir)operator(\))operator(\))operator(;)
   reserved(if) reserved(not) ident(DirectoryExists)operator(()ident(Result)operator(\)) reserved(then) reserved(begin)
-    ident(ReportStatus)operator(()string<delimiter(')content(PlutoDir ")delimiter(')> operator(+) ident(Result) operator(+) string<delimiter(')content(" not found -> setting to default (MyDir\).)delimiter(')>operator(\);)
+    ident(ReportStatus)operator(()string<delimiter(')content(PlutoDir ")delimiter(')> operator(+) ident(Result) operator(+) string<delimiter(')content(" not found -> setting to default (MyDir\).)delimiter(')>operator(\))operator(;)
     ident(Result) operator(:=) ident(MyDir)operator(;)
   reserved(end)operator(;)
-  ident(ReportStatus)operator(()string<delimiter(')content(PlutoDir=)delimiter(')> operator(+) ident(Result)operator(\);)
+  ident(ReportStatus)operator(()string<delimiter(')content(PlutoDir=)delimiter(')> operator(+) ident(Result)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(var)
   ident(ReportSL)operator(:) ident(TStringList)operator(;)
   ident(ReportFileName)operator(:) reserved(string)operator(;)
 
-reserved(procedure) ident(ReportStatus)operator(()reserved(const) ident(s)operator(:) reserved(string)operator(\);)
+reserved(procedure) ident(ReportStatus)operator(()reserved(const) ident(s)operator(:) reserved(string)operator(\))operator(;)
 reserved(begin)
-  ident(ReportSL)operator(.)ident(Add)operator(()ident(s)operator(\);)
+  ident(ReportSL)operator(.)ident(Add)operator(()ident(s)operator(\))operator(;)
   reserved(try)
-    ident(ReportSL)operator(.)ident(SaveToFile)operator(()ident(ReportFileName)operator(\);)
+    ident(ReportSL)operator(.)ident(SaveToFile)operator(()ident(ReportFileName)operator(\))operator(;)
   reserved(except) reserved(end)operator(;)
 reserved(end)operator(;)
 
@@ -1287,91 +1287,91 @@ reserved(type)
     ident(TimetoRelaxMI)operator(:) ident(TMenuItem)operator(;)
     ident(N10)operator(:) ident(TMenuItem)operator(;)
 
-    reserved(procedure) ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(FormClose)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Action)operator(:) ident(TCloseAction)operator(\);)
-    reserved(procedure) ident(InsertPathClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(FormClose)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Action)operator(:) ident(TCloseAction)operator(\))operator(;)
+    reserved(procedure) ident(InsertPathClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 
-    reserved(procedure) ident(StatusBarResize)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(StatusBarDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(StatusBarResize)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(StatusBarDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
     reserved(procedure) ident(StatusBarUpdate)operator(;)
-    reserved(procedure) ident(CopyPathClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(CopyPathClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 
     reserved(procedure) ident(SetStatus)operator(;)
-    reserved(procedure) ident(GotoKey)operator(()ident(Key)operator(:) reserved(string)operator(\);)
+    reserved(procedure) ident(GotoKey)operator(()ident(Key)operator(:) reserved(string)operator(\))operator(;)
     reserved(procedure) ident(FindCLSID)operator(;)
     reserved(procedure) ident(GotoCLSID)operator(;)
     reserved(procedure) ident(UserGotoKey)operator(;)
-    reserved(procedure) ident(ShowRealPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(PathEKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(PathEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(PathEExit)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-
-    reserved(procedure) ident(AppActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(PathEKeyUp)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(ActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormDeactivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(Pluto1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(RegEdit1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(Free1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(BigVal1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SplashScreen1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(HistoryClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(Credits1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-
-    reserved(function) ident(Greeting)operator(()ident(Name)operator(:) reserved(string) operator(=) ident(NoPreBlinkHint)operator(\):) reserved(string)operator(;)
-    reserved(procedure) ident(PrefMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(EditBoolStrMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormCloseQuery)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(CanClose)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(SisyTerminate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(OnSisyChange)operator(()ident(Sender)operator(:) ident(TSisyThread)operator(;) ident(Change)operator(:) ident(TSisyChange)operator(\);)
-    reserved(procedure) ident(OnSisyValuePlus)operator(()ident(Sender)operator(:) ident(TSisyThread)operator(;) ident(Change)operator(:) ident(TSisyChange)operator(\);)
-    reserved(procedure) ident(OnSisyValueMinus)operator(()ident(Sender)operator(:) ident(TSisyThread)operator(;) ident(Change)operator(:) ident(TSisyChange)operator(\);)
-    reserved(procedure) ident(OnSisyContextChange)operator(()ident(Sender)operator(:) ident(TSisyThread)operator(;) ident(Change)operator(:) ident(TSisyChange)operator(\);)
-
-    reserved(procedure) ident(Plutoini1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(RegEdit2Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SysEdit1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(NotePad1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(WordPad1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(OpenWinDir1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(OpenProgramFolder1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ExitPluto1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(Find1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormPaint)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(ShowRealPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(PathEKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(PathEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(PathEExit)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+
+    reserved(procedure) ident(AppActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(PathEKeyUp)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(ActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormDeactivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(Pluto1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(RegEdit1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(Free1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(BigVal1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SplashScreen1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(HistoryClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(Credits1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+
+    reserved(function) ident(Greeting)operator(()ident(Name)operator(:) reserved(string) operator(=) ident(NoPreBlinkHint)operator(\))operator(:) reserved(string)operator(;)
+    reserved(procedure) ident(PrefMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(EditBoolStrMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormCloseQuery)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(CanClose)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(SisyTerminate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(OnSisyChange)operator(()ident(Sender)operator(:) ident(TSisyThread)operator(;) ident(Change)operator(:) ident(TSisyChange)operator(\))operator(;)
+    reserved(procedure) ident(OnSisyValuePlus)operator(()ident(Sender)operator(:) ident(TSisyThread)operator(;) ident(Change)operator(:) ident(TSisyChange)operator(\))operator(;)
+    reserved(procedure) ident(OnSisyValueMinus)operator(()ident(Sender)operator(:) ident(TSisyThread)operator(;) ident(Change)operator(:) ident(TSisyChange)operator(\))operator(;)
+    reserved(procedure) ident(OnSisyContextChange)operator(()ident(Sender)operator(:) ident(TSisyThread)operator(;) ident(Change)operator(:) ident(TSisyChange)operator(\))operator(;)
+
+    reserved(procedure) ident(Plutoini1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(RegEdit2Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SysEdit1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(NotePad1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(WordPad1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(OpenWinDir1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(OpenProgramFolder1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ExitPluto1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(Find1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormPaint)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 
     reserved(procedure) ident(Load)operator(;)
     reserved(procedure) ident(StatusBarDrawPanel)operator(()ident(StatusBar)operator(:) ident(TStatusBar)operator(;)
-      ident(Panel)operator(:) ident(TStatusPanel)operator(;) reserved(const) ident(Rect)operator(:) ident(TRect)operator(\);)
-    reserved(procedure) ident(PathEKeyPress)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Char)operator(\);)
-    reserved(procedure) ident(HintBlinkTTimer)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FindCLSID1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(GotoCLSID1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(CommandLineParameters1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(WebLinkMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(DeleteTempFolder1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(CurrentDir1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(RepairPluto155bBug1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(BackupRegistryscanreg1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SisyStarted)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+      ident(Panel)operator(:) ident(TStatusPanel)operator(;) reserved(const) ident(Rect)operator(:) ident(TRect)operator(\))operator(;)
+    reserved(procedure) ident(PathEKeyPress)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Char)operator(\))operator(;)
+    reserved(procedure) ident(HintBlinkTTimer)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FindCLSID1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(GotoCLSID1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(CommandLineParameters1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(WebLinkMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(DeleteTempFolder1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(CurrentDir1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(RepairPluto155bBug1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(BackupRegistryscanreg1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SisyStarted)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
     reserved(procedure) ident(StopHintBlinking)operator(;)
-    reserved(procedure) ident(Username1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SupportMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ToDoMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(MailLinkMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(IjustwantCONTACT1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ExternalHexEditMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(AnotherPluto1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(Path1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(RegisterPlugIns1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormResize)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SwapLM_CUBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ShowLoadreport1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(KillPluto1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ShowPlatform1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(MSConfig1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(TimetoRelaxMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(Username1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SupportMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ToDoMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(MailLinkMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(IjustwantCONTACT1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ExternalHexEditMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(AnotherPluto1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(Path1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(RegisterPlugIns1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormResize)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SwapLM_CUBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ShowLoadreport1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(KillPluto1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ShowPlatform1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(MSConfig1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(TimetoRelaxMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
   directive(private)
     ident(DoAutoComplete)operator(:) ident(Boolean)operator(;)
     ident(MainWinLoaded)operator(:) ident(Boolean)operator(;)
@@ -1392,22 +1392,22 @@ reserved(function) ident(TempDir)operator(:) reserved(string)operator(;)
 reserved(function) ident(PlutoUniPath)operator(:) reserved(string)operator(;)
 reserved(function) ident(PlutoIniFileName)operator(:) reserved(string)operator(;)
 
-reserved(function) ident(PathOfNode)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\):) reserved(string)operator(;)
-reserved(function) ident(CurKey)operator(()ident(AllowedShortcutTypes)operator(:) ident(TUniHostTypes) operator(=) operator([]\):) ident(TRegPath)operator(;)
+reserved(function) ident(PathOfNode)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(CurKey)operator(()ident(AllowedShortcutTypes)operator(:) ident(TUniHostTypes) operator(=) operator([)operator(])operator(\))operator(:) ident(TRegPath)operator(;)
 
 reserved(procedure) ident(ArrangePlutoStyle)operator(;)
 reserved(procedure) ident(ArrangeRegEdStyle)operator(;)
 reserved(procedure) ident(ArrangeFreeStyle)operator(;)
 reserved(procedure) ident(ArrangeBigValStyle)operator(;)
 
-reserved(procedure) ident(ActivateThis)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-reserved(procedure) ident(DeActivateThis)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(ActivateThis)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+reserved(procedure) ident(DeActivateThis)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 
-reserved(procedure) ident(SwapFonts)operator(()ident(Sender)operator(:) ident(TWinControl)operator(\);)
+reserved(procedure) ident(SwapFonts)operator(()ident(Sender)operator(:) ident(TWinControl)operator(\))operator(;)
 
-reserved(procedure) ident(AddHint)operator(()reserved(const) ident(Hint)operator(:) reserved(string)operator(;) ident(Blinking)operator(:) ident(Boolean) operator(=) ident(False)operator(\);)
-reserved(procedure) ident(AddToLastHint)operator(()ident(Appendix)operator(:) reserved(string)operator(\);)
-reserved(procedure) ident(ChangeLastHint)operator(()ident(NewHint)operator(:) reserved(string)operator(\);)
+reserved(procedure) ident(AddHint)operator(()reserved(const) ident(Hint)operator(:) reserved(string)operator(;) ident(Blinking)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(;)
+reserved(procedure) ident(AddToLastHint)operator(()ident(Appendix)operator(:) reserved(string)operator(\))operator(;)
+reserved(procedure) ident(ChangeLastHint)operator(()ident(NewHint)operator(:) reserved(string)operator(\))operator(;)
 
 reserved(implementation)
 
@@ -1423,10 +1423,10 @@ preprocessor({$R *.DFM})
 reserved(var)
   ident(SavedPlutoIniFileName)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(;)
 
-reserved(procedure) ident(AddHint)operator(()reserved(const) ident(Hint)operator(:) reserved(string)operator(;) ident(Blinking)operator(:) ident(Boolean) operator(=) ident(False)operator(\);)
+reserved(procedure) ident(AddHint)operator(()reserved(const) ident(Hint)operator(:) reserved(string)operator(;) ident(Blinking)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Assigned)operator(()ident(WorkWin)operator(\)) reserved(then)
-    ident(WorkWin)operator(.)ident(AddAHint)operator(()ident(Hint)operator(\);)
+    ident(WorkWin)operator(.)ident(AddAHint)operator(()ident(Hint)operator(\))operator(;)
 
   reserved(with) ident(MainWin) reserved(do) reserved(begin)
     ident(StopHintBlinking)operator(;)
@@ -1434,13 +1434,13 @@ reserved(begin)
     reserved(if) ident(Blinking) reserved(then) reserved(begin)
       ident(HintBlinkT)operator(.)ident(Enabled) operator(:=) ident(True)operator(;)
       reserved(if) ident(PreBlinkHint) operator(=) ident(NoPreBlinkHint) reserved(then)
-        ident(PreBlinkHint) operator(:=) ident(StatusBar)operator(.)ident(Panels)operator([)integer(0)operator(].)ident(Text)operator(;)
-      ident(StatusBar)operator(.)ident(Panels)operator([)integer(0)operator(].)ident(Text) operator(:=) ident(WorkWin)operator(.)ident(LastHint)operator(;)
+        ident(PreBlinkHint) operator(:=) ident(StatusBar)operator(.)ident(Panels)operator([)integer(0)operator(])operator(.)ident(Text)operator(;)
+      ident(StatusBar)operator(.)ident(Panels)operator([)integer(0)operator(])operator(.)ident(Text) operator(:=) ident(WorkWin)operator(.)ident(LastHint)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(AddToLastHint)operator(()ident(Appendix)operator(:) reserved(string)operator(\);)
+reserved(procedure) ident(AddToLastHint)operator(()ident(Appendix)operator(:) reserved(string)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(WorkWin)operator(.)ident(HintLB)operator(.)ident(Items) reserved(do) reserved(begin)
     reserved(if) ident(Count) operator(=) integer(0) reserved(then)
@@ -1452,7 +1452,7 @@ reserved(begin)
 comment(//  Sleep(1000\);)
 reserved(end)operator(;)
 
-reserved(procedure) ident(ChangeLastHint)operator(()ident(NewHint)operator(:) reserved(string)operator(\);)
+reserved(procedure) ident(ChangeLastHint)operator(()ident(NewHint)operator(:) reserved(string)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(WorkWin)operator(.)ident(HintLB)operator(.)ident(Items) reserved(do) reserved(begin)
     reserved(if) ident(Count) operator(=) integer(0) reserved(then)
@@ -1464,26 +1464,26 @@ reserved(begin)
 comment(//  Sleep(1000\);)
 reserved(end)operator(;)
 
-reserved(function) ident(CurKey)operator(()ident(AllowedShortcutTypes)operator(:) ident(TUniHostTypes) operator(=) operator([]\):) ident(TRegPath)operator(;)
+reserved(function) ident(CurKey)operator(()ident(AllowedShortcutTypes)operator(:) ident(TUniHostTypes) operator(=) operator([)operator(])operator(\))operator(:) ident(TRegPath)operator(;)
 reserved(var)
   ident(s)operator(:) reserved(string)operator(;)
   ident(Item)operator(:) ident(TListItem)operator(;)
 reserved(begin)
   reserved(if) ident(Assigned)operator(()ident(RegTV)operator(.)ident(Selected)operator(\)) reserved(then) reserved(begin)
-    ident(s) operator(:=) ident(PathOfNode)operator(()ident(RegTV)operator(.)ident(Selected)operator(\);)
-    reserved(if) ident(AllowedShortcutTypes) operator(<>) operator([]) reserved(then)
-      ident(s) operator(:=) ident(TraceKey)operator(()ident(s)operator(,) ident(AllowedShortcutTypes)operator(\);)
-    ident(Result)operator(.)ident(Root) operator(:=) ident(ExRegRoot)operator(()ident(s)operator(\);)
-    ident(Result)operator(.)ident(Key) operator(:=) ident(ExRegKey)operator(()ident(s)operator(\);)
+    ident(s) operator(:=) ident(PathOfNode)operator(()ident(RegTV)operator(.)ident(Selected)operator(\))operator(;)
+    reserved(if) ident(AllowedShortcutTypes) operator(<>) operator([)operator(]) reserved(then)
+      ident(s) operator(:=) ident(TraceKey)operator(()ident(s)operator(,) ident(AllowedShortcutTypes)operator(\))operator(;)
+    ident(Result)operator(.)ident(Root) operator(:=) ident(ExRegRoot)operator(()ident(s)operator(\))operator(;)
+    ident(Result)operator(.)ident(Key) operator(:=) ident(ExRegKey)operator(()ident(s)operator(\))operator(;)
 
     ident(Item) operator(:=) ident(ValueList)operator(.)ident(ItemFocused)operator(;)
     reserved(if) ident(Assigned)operator(()ident(Item)operator(\)) reserved(then)
-      ident(Result)operator(.)ident(Value) operator(:=) ident(RealValueName)operator(()ident(Item)operator(\);)
-    ident(Result)operator(.)ident(ValueSet) operator(:=) ident(Assigned)operator(()ident(Item)operator(\);)
+      ident(Result)operator(.)ident(Value) operator(:=) ident(RealValueName)operator(()ident(Item)operator(\))operator(;)
+    ident(Result)operator(.)ident(ValueSet) operator(:=) ident(Assigned)operator(()ident(Item)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(PathOfNode)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\):) reserved(string)operator(;)
+reserved(function) ident(PathOfNode)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
 
@@ -1491,16 +1491,16 @@ reserved(begin)
     ident(Exit)operator(;)
 
   reserved(if) ident(Assigned)operator(()ident(Node)operator(.)ident(Parent)operator(\)) reserved(then)
-    ident(Result) operator(:=) ident(LWPSlash)operator(()ident(PathOfNode)operator(()ident(Node)operator(.)ident(Parent)operator(\)\)) operator(+) ident(Node)operator(.)ident(Text)
+    ident(Result) operator(:=) ident(LWPSlash)operator(()ident(PathOfNode)operator(()ident(Node)operator(.)ident(Parent)operator(\))operator(\)) operator(+) ident(Node)operator(.)ident(Text)
   reserved(else)
     ident(Result) operator(:=) ident(Node)operator(.)ident(Text)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(AppActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(AppActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(ActForm)operator(:) ident(TCustomForm)operator(;)
 
-  reserved(procedure) ident(TryShow)operator(()ident(Win)operator(:) ident(TCustomForm)operator(\);)
+  reserved(procedure) ident(TryShow)operator(()ident(Win)operator(:) ident(TCustomForm)operator(\))operator(;)
   reserved(begin)
     reserved(if) ident(Assigned)operator(()ident(Win)operator(\)) reserved(and) ident(Win)operator(.)ident(Visible) reserved(then)
       ident(Win)operator(.)ident(Show)operator(;)
@@ -1508,19 +1508,19 @@ reserved(var)
 
 reserved(begin)
   ident(ActForm) operator(:=) ident(Screen)operator(.)ident(ActiveCustomForm)operator(;) comment(//LastActiveForm;)
-  ident(TryShow)operator(()ident(ValuesWin)operator(\);)
-  ident(TryShow)operator(()ident(WorkWin)operator(\);)
-  ident(TryShow)operator(()ident(TreeWin)operator(\);)
-  ident(TryShow)operator(()ident(FindWin)operator(\);)
-  ident(TryShow)operator(()ident(SplashWin)operator(\);)
-  ident(TryShow)operator(()ident(MainWin)operator(\);)
-  ident(TryShow)operator(()ident(ActForm)operator(\);)
+  ident(TryShow)operator(()ident(ValuesWin)operator(\))operator(;)
+  ident(TryShow)operator(()ident(WorkWin)operator(\))operator(;)
+  ident(TryShow)operator(()ident(TreeWin)operator(\))operator(;)
+  ident(TryShow)operator(()ident(FindWin)operator(\))operator(;)
+  ident(TryShow)operator(()ident(SplashWin)operator(\))operator(;)
+  ident(TryShow)operator(()ident(MainWin)operator(\))operator(;)
+  ident(TryShow)operator(()ident(ActForm)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 
   reserved(procedure) ident(InitHKEYString)operator(()reserved(var) ident(H)operator(:) ident(THKEYString)operator(;) reserved(const) ident(Long)operator(,) ident(Short)operator(:) reserved(string)operator(;)
-    ident(Handle)operator(:) ident(Integer) operator(=) integer(0)operator(;) ident(IsDefault)operator(:) ident(Boolean) operator(=) ident(False)operator(\);)
+    ident(Handle)operator(:) ident(Integer) operator(=) integer(0)operator(;) ident(IsDefault)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(;)
   reserved(begin)
     ident(H)operator(.)ident(Long) operator(:=) ident(Long)operator(;)
     ident(H)operator(.)ident(Short) operator(:=) ident(Short)operator(;)
@@ -1531,7 +1531,7 @@ reserved(procedure) ident(TMainWin)operator(.)ident(FormCreate)operator(()ident(
 reserved(begin)
 preprocessor({$IFDEF UNIKEY})
 preprocessor({$IFDEF CYCFS})
-  ident(RegisterUniClass)operator(()string<delimiter(')content(Y:\\programme\\unikey\\cyc_fs.uni)delimiter(')>operator(\);)
+  ident(RegisterUniClass)operator(()string<delimiter(')content(Y:\\programme\\unikey\\cyc_fs.uni)delimiter(')>operator(\))operator(;)
 preprocessor({$ENDIF})
 preprocessor({$ENDIF})
 
@@ -1545,16 +1545,16 @@ preprocessor({$ENDIF})
   ident(Caption) operator(:=) string<delimiter(')content(cYcnus.Pluto )delimiter(')> operator(+) ident(Version)operator(;)
   ident(PreBlinkHint) operator(:=) ident(NoPreBlinkHint)operator(;)
 
-  ident(SetLength)operator(()ident(HKEYStrings)operator(,) ident(Length)operator(()ident(HKEYStrings)operator(\)) operator(+) integer(2)operator(\);)
-  ident(InitHKEYString)operator(()ident(HKEYStrings)operator([)ident(LastDefaultHKEYString) operator(+) integer(1)operator(],)
-    string<delimiter(')content(HKEY_WindowsMachine)delimiter(')>operator(,) string<delimiter(')content(HKWM)delimiter(')>operator(\);)
+  ident(SetLength)operator(()ident(HKEYStrings)operator(,) ident(Length)operator(()ident(HKEYStrings)operator(\)) operator(+) integer(2)operator(\))operator(;)
+  ident(InitHKEYString)operator(()ident(HKEYStrings)operator([)ident(LastDefaultHKEYString) operator(+) integer(1)operator(])operator(,)
+    string<delimiter(')content(HKEY_WindowsMachine)delimiter(')>operator(,) string<delimiter(')content(HKWM)delimiter(')>operator(\))operator(;)
 
-  ident(InitHKEYString)operator(()ident(HKEYStrings)operator([)ident(LastDefaultHKEYString) operator(+) integer(2)operator(],)
-    string<delimiter(')content(HKEY_WindowsUser)delimiter(')>operator(,) string<delimiter(')content(HKWU)delimiter(')>operator(\);)
+  ident(InitHKEYString)operator(()ident(HKEYStrings)operator([)ident(LastDefaultHKEYString) operator(+) integer(2)operator(])operator(,)
+    string<delimiter(')content(HKEY_WindowsUser)delimiter(')>operator(,) string<delimiter(')content(HKWU)delimiter(')>operator(\))operator(;)
 
   ident(Application)operator(.)ident(HintHidePause) operator(:=) operator(-)integer(1)operator(;) comment(//that's approximately 136 years :D)
 
-  ident(StatusBar)operator(.)ident(Panels)operator([)integer(0)operator(].)ident(Width) operator(:=) ident(Screen)operator(.)ident(Width) reserved(div) integer(6)operator(;)
+  ident(StatusBar)operator(.)ident(Panels)operator([)integer(0)operator(])operator(.)ident(Width) operator(:=) ident(Screen)operator(.)ident(Width) reserved(div) integer(6)operator(;)
 
   ident(MurphyMI)operator(.)ident(Visible) operator(:=) ident(MurphyMode)operator(;)
 
@@ -1565,28 +1565,28 @@ preprocessor({$ELSE})
 preprocessor({$ENDIF})
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(GotoKey)operator(()ident(Key)operator(:) reserved(string)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(GotoKey)operator(()ident(Key)operator(:) reserved(string)operator(\))operator(;)
 reserved(var)
   ident(Full)operator(:) ident(TregPath)operator(;)
   ident(Node)operator(:) ident(TTreeNode)operator(;)
   ident(keySA)operator(:) ident(TStrA)operator(;)
   ident(i)operator(:) ident(integer)operator(;)
 
-  reserved(function) ident(NodeOfRoot)operator(()ident(Root)operator(:) reserved(string)operator(\):) ident(TTreeNode)operator(;)
+  reserved(function) ident(NodeOfRoot)operator(()ident(Root)operator(:) reserved(string)operator(\))operator(:) ident(TTreeNode)operator(;)
   reserved(var)
     ident(i)operator(:) ident(Integer)operator(;)
   reserved(begin)
     ident(Result) operator(:=) reserved(nil)operator(;)
-    ident(Root) operator(:=) ident(LongHKEY)operator(()ident(Root)operator(\);)
+    ident(Root) operator(:=) ident(LongHKEY)operator(()ident(Root)operator(\))operator(;)
 
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(RootNodes)operator(.)ident(Count)operator(-)integer(1) reserved(do)
-      reserved(if) ident(SameText)operator(()ident(TTreeNode)operator(()ident(RootNodes)operator([)ident(i)operator(]\).)ident(Text)operator(,) ident(Root)operator(\)) reserved(then) reserved(begin)
-        ident(Result) operator(:=) ident(TTreeNode)operator(()ident(RootNodes)operator([)ident(i)operator(]\);)
+      reserved(if) ident(SameText)operator(()ident(TTreeNode)operator(()ident(RootNodes)operator([)ident(i)operator(])operator(\))operator(.)ident(Text)operator(,) ident(Root)operator(\)) reserved(then) reserved(begin)
+        ident(Result) operator(:=) ident(TTreeNode)operator(()ident(RootNodes)operator([)ident(i)operator(])operator(\))operator(;)
       ident(Break)operator(;) reserved(end)operator(;)
 
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(Shortcuts)operator(\)) reserved(do)
-      reserved(if) ident(SameText)operator(()ident(Shortcuts)operator([)ident(i)operator(].)ident(Alias)operator(,) ident(Full)operator(.)ident(Root)operator(\)) reserved(then) reserved(begin)
-        ident(Result) operator(:=) ident(Shortcuts)operator([)ident(i)operator(].)ident(Node)operator(;)
+      reserved(if) ident(SameText)operator(()ident(Shortcuts)operator([)ident(i)operator(])operator(.)ident(Alias)operator(,) ident(Full)operator(.)ident(Root)operator(\)) reserved(then) reserved(begin)
+        ident(Result) operator(:=) ident(Shortcuts)operator([)ident(i)operator(])operator(.)ident(Node)operator(;)
       ident(Break)operator(;) reserved(end)operator(;)
   reserved(end)operator(;)
 
@@ -1594,25 +1594,25 @@ reserved(begin)
   ident(keySA) operator(:=) reserved(nil)operator(;)
 
   comment(//Get FullPath of the Key)
-  ident(Key) operator(:=) ident(TrimLeft)operator(()ident(Key)operator(\);)
+  ident(Key) operator(:=) ident(TrimLeft)operator(()ident(Key)operator(\))operator(;)
   reserved(if) ident(TextAtPos)operator(()ident(Key)operator(,) integer(1)operator(,) string<delimiter(')content(Reg:)delimiter(')>operator(\)) reserved(then)
-    ident(Key) operator(:=) ident(TrimLeft)operator(()ident(FromChar)operator(()ident(Key)operator(,) char<delimiter(')content(:)delimiter(')>operator(\)\);)
-  ident(Key) operator(:=) ident(UnQuote)operator(()ident(Key)operator(\);)
+    ident(Key) operator(:=) ident(TrimLeft)operator(()ident(FromChar)operator(()ident(Key)operator(,) char<delimiter(')content(:)delimiter(')>operator(\))operator(\))operator(;)
+  ident(Key) operator(:=) ident(UnQuote)operator(()ident(Key)operator(\))operator(;)
 
-  ident(Full) operator(:=) ident(RegPathOfStr)operator(()ident(Key)operator(\);)
+  ident(Full) operator(:=) ident(RegPathOfStr)operator(()ident(Key)operator(\))operator(;)
   reserved(if) ident(Trim)operator(()ident(Full)operator(.)ident(Root)operator(\)) operator(=) string<delimiter(')delimiter(')> reserved(then) reserved(begin)
-    ident(AddHint)operator(()string<delimiter(')content(Empty Path.)delimiter(')>operator(,) ident(True)operator(\);)
+    ident(AddHint)operator(()string<delimiter(')content(Empty Path.)delimiter(')>operator(,) ident(True)operator(\))operator(;)
   ident(Exit)operator(;) reserved(end)operator(;)
 
   comment(//Get Root Node)
-  ident(Node) operator(:=) ident(NodeOfRoot)operator(()ident(Full)operator(.)ident(Root)operator(\);)
+  ident(Node) operator(:=) ident(NodeOfRoot)operator(()ident(Full)operator(.)ident(Root)operator(\))operator(;)
   reserved(if) reserved(not) ident(Assigned)operator(()ident(Node)operator(\)) reserved(then) reserved(begin)
     reserved(if) reserved(not) ident(PathE)operator(.)ident(Focused) reserved(then)
-      ident(AddHint)operator(()string<delimiter(')content(Key not found:)delimiter(')> operator(+) ident(EOL) operator(+) ident(Key)operator(\);)
+      ident(AddHint)operator(()string<delimiter(')content(Key not found:)delimiter(')> operator(+) ident(EOL) operator(+) ident(Key)operator(\))operator(;)
   ident(Exit)operator(;) reserved(end)operator(;)
 
   comment(//Create an array of all SubKeys)
-  ident(keySA) operator(:=) ident(Split)operator(()ident(Full)operator(.)ident(Key)operator(,) char<delimiter(')content(\\)delimiter(')>operator(\);)
+  ident(keySA) operator(:=) ident(Split)operator(()ident(Full)operator(.)ident(Key)operator(,) char<delimiter(')content(\\)delimiter(')>operator(\))operator(;)
 
   comment(//Avoid SmartExpand)
   ident(TreeWin)operator(.)ident(DoSmartExpand) operator(:=) ident(False)operator(;) reserved(begin)
@@ -1623,16 +1623,16 @@ reserved(begin)
       reserved(if) reserved(not) ident(Node)operator(.)ident(Expanded) reserved(then) reserved(begin)
         reserved(if) reserved(not) ident(Node)operator(.)ident(Selected) reserved(then)
           ident(RegTV)operator(.)ident(Selected) operator(:=) ident(Node)operator(;)
-        ident(CheckNode)operator(()ident(Node)operator(,) ident(False)operator(\);)
+        ident(CheckNode)operator(()ident(Node)operator(,) ident(False)operator(\))operator(;)
         comment(//TreeWin.RegTVChange(Self, Node\);)
-        ident(Node)operator(.)ident(Expand)operator(()ident(False)operator(\);)
+        ident(Node)operator(.)ident(Expand)operator(()ident(False)operator(\))operator(;)
       reserved(end)operator(;)
 
       comment(//Get Node of the SubKey)
-      ident(Node) operator(:=) ident(FindNodeText)operator(()ident(Node)operator(,) ident(keySA)operator([)ident(i)operator(]\);)
+      ident(Node) operator(:=) ident(FindNodeText)operator(()ident(Node)operator(,) ident(keySA)operator([)ident(i)operator(])operator(\))operator(;)
       reserved(if) reserved(not) ident(Assigned)operator(()ident(Node)operator(\)) reserved(then) reserved(begin)
         reserved(if) reserved(not) ident(PathE)operator(.)ident(Focused) reserved(then)
-          ident(AddHint)operator(()string<delimiter(')content(Goto Key not found: )delimiter(')> operator(+) ident(KeySA)operator([)ident(i)operator(],) ident(True)operator(\);)
+          ident(AddHint)operator(()string<delimiter(')content(Goto Key not found: )delimiter(')> operator(+) ident(KeySA)operator([)ident(i)operator(])operator(,) ident(True)operator(\))operator(;)
         ident(Exit)operator(;)
       reserved(end)operator(;)
     reserved(end)operator(;)
@@ -1641,25 +1641,25 @@ reserved(begin)
 
   reserved(if) ident(Node) operator(<>) ident(RegTV)operator(.)ident(Selected) reserved(then) reserved(begin)
     ident(RegTV)operator(.)ident(Selected) operator(:=) ident(Node)operator(;)
-    ident(TreeWin)operator(.)ident(RegTVChange)operator(()ident(Self)operator(,) ident(Node)operator(\);)
+    ident(TreeWin)operator(.)ident(RegTVChange)operator(()ident(Self)operator(,) ident(Node)operator(\))operator(;)
   reserved(end)operator(;)
 
   ident(Application)operator(.)ident(ProcessMessages)operator(;)
 
   reserved(if) ident(Full)operator(.)ident(ValueSet) reserved(then)
-    ident(ValuesWin)operator(.)ident(FocusItem)operator(()ident(Full)operator(.)ident(Value)operator(,) reserved(not) operator(()ident(Active) reserved(and) ident(PathE)operator(.)ident(Focused)operator(\)\))
+    ident(ValuesWin)operator(.)ident(FocusItem)operator(()ident(Full)operator(.)ident(Value)operator(,) reserved(not) operator(()ident(Active) reserved(and) ident(PathE)operator(.)ident(Focused)operator(\))operator(\))
   reserved(else) reserved(begin)
     reserved(if) reserved(not) operator(()ident(Active) reserved(and) ident(PathE)operator(.)ident(Focused)operator(\)) reserved(then) comment(//if not user is currently editing the path)
-      ident(TreeWin)operator(.)ident(FocusControl)operator(()ident(RegTV)operator(\);)
+      ident(TreeWin)operator(.)ident(FocusControl)operator(()ident(RegTV)operator(\))operator(;)
 
     reserved(if) ident(LastChar)operator(()ident(Full)operator(.)ident(Key)operator(\)) operator(=) char<delimiter(')content(\\)delimiter(')> reserved(then)
-      ident(Node)operator(.)ident(Expand)operator(()ident(False)operator(\);)
+      ident(Node)operator(.)ident(Expand)operator(()ident(False)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(SwapFonts)operator(()ident(Sender)operator(:) ident(TWinControl)operator(\);)
+reserved(procedure) ident(SwapFonts)operator(()ident(Sender)operator(:) ident(TWinControl)operator(\))operator(;)
 
-  reserved(function) ident(OtherFont)operator(()ident(N)operator(:) ident(TFontName)operator(\):) ident(TFontName)operator(;)
+  reserved(function) ident(OtherFont)operator(()ident(N)operator(:) ident(TFontName)operator(\))operator(:) ident(TFontName)operator(;)
   reserved(begin)
     ident(Result) operator(:=) string<delimiter(')content(Courier New)delimiter(')>operator(;)
     reserved(if) ident(N) operator(=) ident(Result) reserved(then)
@@ -1667,10 +1667,10 @@ reserved(procedure) ident(SwapFonts)operator(()ident(Sender)operator(:) ident(TW
   reserved(end)operator(;)
 
 reserved(begin)
-  ident(TEdit)operator(()ident(Sender)operator(\).)ident(Font)operator(.)ident(Name) operator(:=) ident(OtherFont)operator(()ident(TTreeView)operator(()ident(Sender)operator(\).)ident(Font)operator(.)ident(Name)operator(\);)
+  ident(TEdit)operator(()ident(Sender)operator(\))operator(.)ident(Font)operator(.)ident(Name) operator(:=) ident(OtherFont)operator(()ident(TTreeView)operator(()ident(Sender)operator(\))operator(.)ident(Font)operator(.)ident(Name)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(ActivateThis)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(ActivateThis)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) reserved(not) ident(Assigned)operator(()ident(Sender)operator(\)) reserved(then)
     ident(Exit)operator(;)
@@ -1678,12 +1678,12 @@ reserved(begin)
   reserved(with) ident(TEdit)operator(()ident(Sender)operator(\)) reserved(do) reserved(begin)
     reserved(if) ident(Tag) operator(<>) ident(EditControlFlag) reserved(then)
       ident(Exit)operator(;)
-    ident(Color) operator(:=) ident(RealColor)operator(()ident(clVeryBrightBlue)operator(\);)
+    ident(Color) operator(:=) ident(RealColor)operator(()ident(clVeryBrightBlue)operator(\))operator(;)
     ident(Font)operator(.)ident(Color) operator(:=) ident(clBlack)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(DeActivateThis)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(DeActivateThis)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) reserved(not) ident(Assigned)operator(()ident(Sender)operator(\)) reserved(then)
     ident(Exit)operator(;)
@@ -1691,7 +1691,7 @@ reserved(begin)
   reserved(with) ident(TEdit)operator(()ident(Sender)operator(\)) reserved(do) reserved(begin)
     reserved(if) ident(Tag) operator(<>) ident(EditControlFlag) reserved(then)
       ident(Exit)operator(;)
-    ident(Color) operator(:=) ident(RealColor)operator(()ident(clDarkGray)operator(\);)
+    ident(Color) operator(:=) ident(RealColor)operator(()ident(clDarkGray)operator(\))operator(;)
     ident(Font)operator(.)ident(Color) operator(:=) ident(clWhite)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
@@ -1701,35 +1701,35 @@ reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 
   reserved(procedure) ident(CreateSisyThread)operator(()reserved(const) ident(Name)operator(:) reserved(string)operator(;) reserved(const) ident(KeyName)operator(:) reserved(string)operator(;)
-    ident(Key)operator(:) ident(HKEY)operator(;) ident(StatusLabel)operator(:) ident(TLabel)operator(\);)
+    ident(Key)operator(:) ident(HKEY)operator(;) ident(StatusLabel)operator(:) ident(TLabel)operator(\))operator(;)
   reserved(var)
     ident(Sisy)operator(:) ident(TSisyThread)operator(;)
   reserved(begin)
-    ident(ChangeLastHint)operator(()string<delimiter(')content(Creating )delimiter(')> operator(+) ident(Name) operator(+) string<delimiter(')content(...)delimiter(')>operator(\);)
-    ident(Sisy) operator(:=) ident(TSisyThread)operator(.)ident(CreateIt)operator(()ident(Name)operator(,) ident(KeyName)operator(,) ident(Key)operator(,) ident(StatusLabel)operator(,) ident(PlutoKey)operator(\);)
+    ident(ChangeLastHint)operator(()string<delimiter(')content(Creating )delimiter(')> operator(+) ident(Name) operator(+) string<delimiter(')content(...)delimiter(')>operator(\))operator(;)
+    ident(Sisy) operator(:=) ident(TSisyThread)operator(.)ident(CreateIt)operator(()ident(Name)operator(,) ident(KeyName)operator(,) ident(Key)operator(,) ident(StatusLabel)operator(,) ident(PlutoKey)operator(\))operator(;)
     ident(Sisy)operator(.)ident(OnChange) operator(:=) ident(MainWin)operator(.)ident(OnSisyChange)operator(;)
 comment(//    Sisy.OnSpecialChange[cValuePlus] := MainWin.OnSisyValuePlus;)
 comment(//    Sisy.OnSpecialChange[cValueMinus] := MainWin.OnSisyValueMinus;)
 comment(//    Sisy.OnSpecialChange[cContextChange] := MainWin.OnSisyContextChange;)
-    ident(Sisys)operator(.)ident(Add)operator(()ident(Sisy)operator(\);)
-    ident(AddToLastHint)operator(()string<delimiter(')content(OK)delimiter(')>operator(\);)
+    ident(Sisys)operator(.)ident(Add)operator(()ident(Sisy)operator(\))operator(;)
+    ident(AddToLastHint)operator(()string<delimiter(')content(OK)delimiter(')>operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
-  ident(AddHint)operator(()string<delimiter(')content(Starting Sisyphus )delimiter(')> operator(+) ident(SisyVersion) operator(+) string<delimiter(')content(...)delimiter(')>operator(\);)
+  ident(AddHint)operator(()string<delimiter(')content(Starting Sisyphus )delimiter(')> operator(+) ident(SisyVersion) operator(+) string<delimiter(')content(...)delimiter(')>operator(\))operator(;)
 
   ident(Sisys) operator(:=) ident(TSisyList)operator(.)ident(Create)operator(;)
   ident(WorkWin)operator(.)ident(LoadSisyFilter)operator(;)
 
-  ident(CreateSisyThread)operator(()string<delimiter(')content(Sisy HKU)delimiter(')>operator(,) string<delimiter(')content(HKU)delimiter(')>operator(,) ident(HKU)operator(,) ident(WorkWin)operator(.)ident(SisyHKUL)operator(\);)
-  ident(CreateSisyThread)operator(()string<delimiter(')content(Sisy HKLM)delimiter(')>operator(,) string<delimiter(')content(HKLM)delimiter(')>operator(,) ident(HKLM)operator(,) ident(WorkWin)operator(.)ident(SisyHKLML)operator(\);)
+  ident(CreateSisyThread)operator(()string<delimiter(')content(Sisy HKU)delimiter(')>operator(,) string<delimiter(')content(HKU)delimiter(')>operator(,) ident(HKU)operator(,) ident(WorkWin)operator(.)ident(SisyHKUL)operator(\))operator(;)
+  ident(CreateSisyThread)operator(()string<delimiter(')content(Sisy HKLM)delimiter(')>operator(,) string<delimiter(')content(HKLM)delimiter(')>operator(,) ident(HKLM)operator(,) ident(WorkWin)operator(.)ident(SisyHKLML)operator(\))operator(;)
 
-  ident(ChangeLastHint)operator(()string<delimiter(')content(Initializing Sisyphus...)delimiter(')>operator(\);)
+  ident(ChangeLastHint)operator(()string<delimiter(')content(Initializing Sisyphus...)delimiter(')>operator(\))operator(;)
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Sisys)operator(.)ident(Count)operator(-)integer(1) reserved(do)
-    reserved(with) ident(TSisyThread)operator(()ident(Sisys)operator([)ident(i)operator(]\)) reserved(do) reserved(begin)
+    reserved(with) ident(TSisyThread)operator(()ident(Sisys)operator([)ident(i)operator(])operator(\)) reserved(do) reserved(begin)
       reserved(if) ident(Name) operator(=) string<delimiter(')content(Sisy HKU)delimiter(')> reserved(then)
         reserved(with) ident(WorkWin)operator(.)ident(SisyHKUCB) reserved(do) reserved(begin)
-          ident(Settings)operator(.)ident(KeyName) operator(:=) ident(StrOfUni)operator(()ident(Uni)operator(.)ident(Path)operator(\);)
+          ident(Settings)operator(.)ident(KeyName) operator(:=) ident(StrOfUni)operator(()ident(Uni)operator(.)ident(Path)operator(\))operator(;)
           ident(Settings)operator(.)ident(Load)operator(;)
           ident(Settings)operator(.)ident(AutoSave) operator(:=) ident(True)operator(;)
           reserved(if) ident(Checked) reserved(then)
@@ -1737,7 +1737,7 @@ reserved(begin)
         reserved(end)
       reserved(else) reserved(if) ident(Name) operator(=) string<delimiter(')content(Sisy HKLM)delimiter(')> reserved(then)
         reserved(with) ident(WorkWin)operator(.)ident(SisyHKLMCB) reserved(do) reserved(begin)
-          ident(Settings)operator(.)ident(KeyName) operator(:=) ident(StrOfUni)operator(()ident(Uni)operator(.)ident(Path)operator(\);)
+          ident(Settings)operator(.)ident(KeyName) operator(:=) ident(StrOfUni)operator(()ident(Uni)operator(.)ident(Path)operator(\))operator(;)
           ident(Settings)operator(.)ident(Load)operator(;)
           ident(Settings)operator(.)ident(AutoSave) operator(:=) ident(True)operator(;)
           reserved(if) ident(Checked) reserved(then)
@@ -1749,11 +1749,11 @@ reserved(end)operator(;)
 
 reserved(procedure) ident(CreateSpyThread)operator(;)
 reserved(begin)
-  ident(AddHint)operator(()string<delimiter(')content(Creating SpyThread...)delimiter(')>operator(\);)
-  ident(SpyThread) operator(:=) ident(TRegSpyThread)operator(.)ident(CreateIt)operator(()ident(tpLowest)operator(\);)
-  ident(WorkWin)operator(.)ident(SpyDelayIEChange)operator(()ident(MainWin)operator(\);)
-  ident(WorkWin)operator(.)ident(SpyTestLClick)operator(()ident(MainWin)operator(\);)
-  ident(AddToLastHint)operator(()string<delimiter(')content(OK)delimiter(')>operator(\);)
+  ident(AddHint)operator(()string<delimiter(')content(Creating SpyThread...)delimiter(')>operator(\))operator(;)
+  ident(SpyThread) operator(:=) ident(TRegSpyThread)operator(.)ident(CreateIt)operator(()ident(tpLowest)operator(\))operator(;)
+  ident(WorkWin)operator(.)ident(SpyDelayIEChange)operator(()ident(MainWin)operator(\))operator(;)
+  ident(WorkWin)operator(.)ident(SpyTestLClick)operator(()ident(MainWin)operator(\))operator(;)
+  ident(AddToLastHint)operator(()string<delimiter(')content(OK)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(ShowParams)operator(;)
@@ -1762,8 +1762,8 @@ reserved(var)
 reserved(begin)
   reserved(if) ident(Switch)operator(()string<delimiter(')content(params?)delimiter(')>operator(\)) reserved(then) reserved(begin)
     ident(SL) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
-    ident(GetParams)operator(()ident(SL)operator(\);)
-    ident(ShowMessage)operator(()ident(SL)operator(.)ident(Text)operator(\);)
+    ident(GetParams)operator(()ident(SL)operator(\))operator(;)
+    ident(ShowMessage)operator(()ident(SL)operator(.)ident(Text)operator(\))operator(;)
     ident(SL)operator(.)ident(Free)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
@@ -1772,11 +1772,11 @@ reserved(procedure) ident(GotoParamKey)operator(;)
 reserved(var)
   ident(s)operator(:) reserved(string)operator(;)
 reserved(begin)
-  ident(s) operator(:=) ident(ParamStr)operator(()integer(1)operator(\);)
+  ident(s) operator(:=) ident(ParamStr)operator(()integer(1)operator(\))operator(;)
   reserved(if) operator(()ident(s) operator(<>) string<delimiter(')delimiter(')>operator(\))
    reserved(and) operator(()ident(s)operator([)integer(1)operator(]) operator(<>) char<delimiter(')content(-)delimiter(')>operator(\)) reserved(then) reserved(begin) comment(//Params have '-' as prefix)
-    ident(AddHint)operator(()string<delimiter(')content(Goto Key )delimiter(')> operator(+) ident(Quote)operator(()ident(s)operator(\)) operator(+) string<delimiter(')content(...)delimiter(')>operator(\);)
-    ident(MainWin)operator(.)ident(GotoKey)operator(()ident(s)operator(\);)
+    ident(AddHint)operator(()string<delimiter(')content(Goto Key )delimiter(')> operator(+) ident(Quote)operator(()ident(s)operator(\)) operator(+) string<delimiter(')content(...)delimiter(')>operator(\))operator(;)
+    ident(MainWin)operator(.)ident(GotoKey)operator(()ident(s)operator(\))operator(;)
   reserved(end) reserved(else) reserved(begin)
     ident(RegTV)operator(.)ident(Selected) operator(:=) ident(RegTV)operator(.)ident(TopItem)operator(;)
   reserved(end)operator(;)
@@ -1790,7 +1790,7 @@ reserved(begin)
   ident(CreateSpyThread)operator(;)
   ident(CreateSisyThreads)operator(;)
 
-  ident(AddHint)operator(()ident(Greeting)operator(,) ident(True)operator(\);)
+  ident(AddHint)operator(()ident(Greeting)operator(,) ident(True)operator(\))operator(;)
 
   ident(ShowParams)operator(;)
   ident(GotoParamKey)operator(;)
@@ -1799,13 +1799,13 @@ reserved(begin)
     ident(SplashWin)operator(.)ident(SetFocus)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(CopyPathClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(CopyPathClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(Clipboard)operator(.)ident(AsText) operator(:=) ident(StatusBar)operator(.)ident(Panels)operator([)integer(1)operator(].)ident(Text)operator(;)
+  ident(Clipboard)operator(.)ident(AsText) operator(:=) ident(StatusBar)operator(.)ident(Panels)operator([)integer(1)operator(])operator(.)ident(Text)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TMainWin)operator(.)ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(begin)
   reserved(if) operator(()ident(ssAlt) reserved(in) ident(shift)operator(\)) reserved(and) operator(()ident(Key) operator(=) ident(VK_F4)operator(\)) reserved(then) reserved(begin)
     ident(Key) operator(:=) integer(0)operator(;)
@@ -1814,30 +1814,30 @@ reserved(begin)
 
   reserved(if) ident(ssCtrl) reserved(in) ident(Shift) reserved(then)
     reserved(case) ident(Key) reserved(of)
-      ident(Byte)operator(()char<delimiter(')content(W)delimiter(')>operator(\):) reserved(begin)
+      ident(Byte)operator(()char<delimiter(')content(W)delimiter(')>operator(\))operator(:) reserved(begin)
           ident(MainPC)operator(.)ident(ActivePage) operator(:=) ident(WorkWin)operator(.)ident(WorkPage)operator(;)
           reserved(if) ident(Assigned)operator(()ident(MainPC)operator(.)ident(ActivePage)operator(\)) reserved(then)
-            ident(WorkWin)operator(.)ident(FocusControl)operator(()ident(TWinControl)operator(()ident(ShowPC)operator(.)ident(ActivePage)operator(.)ident(Tag)operator(\)\))
+            ident(WorkWin)operator(.)ident(FocusControl)operator(()ident(TWinControl)operator(()ident(ShowPC)operator(.)ident(ActivePage)operator(.)ident(Tag)operator(\))operator(\))
         reserved(end)operator(;)
 
-      ident(Byte)operator(()char<delimiter(')content(H)delimiter(')>operator(\):) ident(MainPC)operator(.)ident(ActivePage) operator(:=) ident(WorkWin)operator(.)ident(HintPage)operator(;)
+      ident(Byte)operator(()char<delimiter(')content(H)delimiter(')>operator(\))operator(:) ident(MainPC)operator(.)ident(ActivePage) operator(:=) ident(WorkWin)operator(.)ident(HintPage)operator(;)
 
-      ident(Byte)operator(()char<delimiter(')content(L)delimiter(')>operator(\):) ident(MainWin)operator(.)ident(FindCLSID)operator(;)
+      ident(Byte)operator(()char<delimiter(')content(L)delimiter(')>operator(\))operator(:) ident(MainWin)operator(.)ident(FindCLSID)operator(;)
     reserved(end)operator(;)
 
-  reserved(if) ident(Shift) operator(=) operator([]) reserved(then)
+  reserved(if) ident(Shift) operator(=) operator([)operator(]) reserved(then)
     reserved(case) ident(Key) reserved(of)
-      ident(VK_F6)operator(:) ident(TreeWin)operator(.)ident(FocusControl)operator(()ident(RegTV)operator(\);)
+      ident(VK_F6)operator(:) ident(TreeWin)operator(.)ident(FocusControl)operator(()ident(RegTV)operator(\))operator(;)
 
       ident(VK_F7)operator(:) reserved(with) ident(ValueList) reserved(do) reserved(begin)
-          ident(ValuesWin)operator(.)ident(FocusControl)operator(()ident(ValueList)operator(\);)
+          ident(ValuesWin)operator(.)ident(FocusControl)operator(()ident(ValueList)operator(\))operator(;)
           reserved(if) operator(()ident(Selected) operator(=) reserved(nil)operator(\)) reserved(and) operator(()ident(Items)operator(.)ident(Count) operator(>) integer(0)operator(\)) reserved(then) reserved(begin)
-            ident(Selected) operator(:=) ident(Items)operator([)integer(0)operator(];)
+            ident(Selected) operator(:=) ident(Items)operator([)integer(0)operator(])operator(;)
             ident(ItemFocused) operator(:=) ident(Selected)operator(;)
           reserved(end)operator(;)
         reserved(end)operator(;)
 
-      ident(VK_F8)operator(:) ident(WorkWin)operator(.)ident(FocusControl)operator(()ident(MainPC)operator(\);)
+      ident(VK_F8)operator(:) ident(WorkWin)operator(.)ident(FocusControl)operator(()ident(MainPC)operator(\))operator(;)
     reserved(end)operator(;)
 
   reserved(if) ident(Key) operator(=) ident(VK_SCROLL) reserved(then) reserved(begin)
@@ -1846,21 +1846,21 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(StatusBarResize)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(StatusBarResize)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(StatusBar) reserved(do)
-    ident(Panels)operator([)integer(1)operator(].)ident(Width) operator(:=)
-      ident(Width) operator(-) operator(()ident(Panels)operator([)integer(0)operator(].)ident(Width) operator(+) ident(Panels)operator([)integer(2)operator(].)ident(Width) operator(+) ident(Panels)operator([)integer(3)operator(].)ident(Width)operator(\);)
+    ident(Panels)operator([)integer(1)operator(])operator(.)ident(Width) operator(:=)
+      ident(Width) operator(-) operator(()ident(Panels)operator([)integer(0)operator(])operator(.)ident(Width) operator(+) ident(Panels)operator([)integer(2)operator(])operator(.)ident(Width) operator(+) ident(Panels)operator([)integer(3)operator(])operator(.)ident(Width)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(StatusBarDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(StatusBarDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(ShowRealPathMIClick)operator(()ident(Sender)operator(\);)
+  ident(ShowRealPathMIClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(InsertPathClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(InsertPathClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(GotoKey)operator(()ident(Clipboard)operator(.)ident(AsText)operator(\);)
+  ident(GotoKey)operator(()ident(Clipboard)operator(.)ident(AsText)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TMainWin)operator(.)ident(SetStatus)operator(;)
@@ -1873,34 +1873,34 @@ reserved(var)
   ident(Inf)operator(:) ident(TRegKeyInfo)operator(;)
 reserved(begin)
   ident(OpenCurKey)operator(;)
-  ident(MainReg)operator(.)ident(GetKeyInfo)operator(()ident(Inf)operator(\);)
+  ident(MainReg)operator(.)ident(GetKeyInfo)operator(()ident(Inf)operator(\))operator(;)
   ident(MainReg)operator(.)ident(CloseKey)operator(;)
 
-  ident(StatusBar)operator(.)ident(Panels)operator([)integer(2)operator(].)ident(Text) operator(:=) ident(StrNumerus)operator(()ident(Inf)operator(.)ident(NumSubKeys)operator(,) string<delimiter(')content(key)delimiter(')>operator(,) string<delimiter(')content(keys)delimiter(')>operator(,) string<delimiter(')content(no)delimiter(')>operator(\);)
-  ident(StatusBar)operator(.)ident(Panels)operator([)integer(3)operator(].)ident(Text) operator(:=) ident(StrNumerus)operator(()ident(Inf)operator(.)ident(NumValues)operator(,) string<delimiter(')content(value)delimiter(')>operator(,) string<delimiter(')content(values)delimiter(')>operator(,) string<delimiter(')content(no)delimiter(')>operator(\);)
+  ident(StatusBar)operator(.)ident(Panels)operator([)integer(2)operator(])operator(.)ident(Text) operator(:=) ident(StrNumerus)operator(()ident(Inf)operator(.)ident(NumSubKeys)operator(,) string<delimiter(')content(key)delimiter(')>operator(,) string<delimiter(')content(keys)delimiter(')>operator(,) string<delimiter(')content(no)delimiter(')>operator(\))operator(;)
+  ident(StatusBar)operator(.)ident(Panels)operator([)integer(3)operator(])operator(.)ident(Text) operator(:=) ident(StrNumerus)operator(()ident(Inf)operator(.)ident(NumValues)operator(,) string<delimiter(')content(value)delimiter(')>operator(,) string<delimiter(')content(values)delimiter(')>operator(,) string<delimiter(')content(no)delimiter(')>operator(\))operator(;)
 
   reserved(if) ident(ShowRealPathMI)operator(.)ident(Checked) reserved(then)
-    ident(StatusBar)operator(.)ident(Panels)operator([)integer(1)operator(].)ident(Text) operator(:=) ident(StrOfRegPath)operator(()ident(CurKey)operator(()ident(uhShortcuts)operator(\)\))
+    ident(StatusBar)operator(.)ident(Panels)operator([)integer(1)operator(])operator(.)ident(Text) operator(:=) ident(StrOfRegPath)operator(()ident(CurKey)operator(()ident(uhShortcuts)operator(\))operator(\))
   reserved(else)
-    ident(StatusBar)operator(.)ident(Panels)operator([)integer(1)operator(].)ident(Text) operator(:=) ident(StrOfRegPath)operator(()ident(CurKey)operator(()ident(uhNonSystemShortcuts)operator(\)\);)
+    ident(StatusBar)operator(.)ident(Panels)operator([)integer(1)operator(])operator(.)ident(Text) operator(:=) ident(StrOfRegPath)operator(()ident(CurKey)operator(()ident(uhNonSystemShortcuts)operator(\))operator(\))operator(;)
 
   reserved(if) reserved(not) ident(PathE)operator(.)ident(Focused) reserved(then)
-    ident(PathE)operator(.)ident(Text) operator(:=) ident(StrOfRegPath)operator(()ident(CurKey)operator(\);)
+    ident(PathE)operator(.)ident(Text) operator(:=) ident(StrOfRegPath)operator(()ident(CurKey)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(ShowRealPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(ShowRealPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(ShowRealPathMI)operator(.)ident(Checked) operator(:=) reserved(not) ident(ShowRealPathMI)operator(.)ident(Checked)operator(;)
   ident(StatusBarUpdate)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TMainWin)operator(.)ident(PathEKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(var)
   ident(Pos)operator(:) ident(Integer)operator(;)
   ident(s)operator(:) reserved(string)operator(;)
 reserved(begin)
-  ident(DoAutoComplete) operator(:=) reserved(not) operator(()ident(Key) reserved(in) operator([)ident(VK_DELETE)operator(,) ident(VK_BACK)operator(,) ident(VK_ESCAPE)operator(]\);)
+  ident(DoAutoComplete) operator(:=) reserved(not) operator(()ident(Key) reserved(in) operator([)ident(VK_DELETE)operator(,) ident(VK_BACK)operator(,) ident(VK_ESCAPE)operator(])operator(\))operator(;)
   
   reserved(case) ident(Key) reserved(of)
     ident(VK_BACK)operator(:)
@@ -1910,13 +1910,13 @@ reserved(begin)
 
         reserved(if) ident(ssCtrl) reserved(in) ident(Shift) reserved(then)
           reserved(repeat)
-            ident(Dec)operator(()ident(Pos)operator(\);)
+            ident(Dec)operator(()ident(Pos)operator(\))operator(;)
           reserved(until) operator(()ident(Pos) operator(<) integer(1)operator(\)) reserved(or) operator(()ident(s)operator([)ident(Pos)operator(]) operator(=) char<delimiter(')content(\\)delimiter(')>operator(\))
         reserved(else) reserved(if) ident(PathE)operator(.)ident(SelLength) operator(=) integer(0) reserved(then)
           ident(Exit)operator(;)
 
-        ident(PathE)operator(.)ident(Text) operator(:=) ident(Copy)operator(()ident(s)operator(,) integer(1)operator(,) ident(Pos)operator(\);)
-        ident(PathE)operator(.)ident(SelStart) operator(:=) ident(Length)operator(()ident(s)operator(\);)
+        ident(PathE)operator(.)ident(Text) operator(:=) ident(Copy)operator(()ident(s)operator(,) integer(1)operator(,) ident(Pos)operator(\))operator(;)
+        ident(PathE)operator(.)ident(SelStart) operator(:=) ident(Length)operator(()ident(s)operator(\))operator(;)
         ident(Key) operator(:=) integer(0)operator(;)
         ident(UserGotoKey)operator(;)
       reserved(end)operator(;)
@@ -1925,13 +1925,13 @@ reserved(begin)
       reserved(with) ident(PathE) reserved(do) reserved(begin)
         reserved(if) ident(SelLength) operator(=) integer(0) reserved(then)
           ident(Exit)operator(;)
-        ident(Text) operator(:=) ident(StrOfRegPath)operator(()ident(CurKey)operator(\);)
-        ident(SelStart) operator(:=) ident(Length)operator(()ident(Text)operator(\);)
+        ident(Text) operator(:=) ident(StrOfRegPath)operator(()ident(CurKey)operator(\))operator(;)
+        ident(SelStart) operator(:=) ident(Length)operator(()ident(Text)operator(\))operator(;)
       reserved(end)operator(;)
 
     ident(VK_RETURN)operator(:) reserved(begin)
       reserved(if) ident(CurKey)operator(.)ident(ValueSet) reserved(then)
-        ident(ValuesWin)operator(.)ident(ValueListDblClick)operator(()ident(Self)operator(\);)
+        ident(ValuesWin)operator(.)ident(ValueListDblClick)operator(()ident(Self)operator(\))operator(;)
       ident(Key) operator(:=) integer(0)operator(;)
     reserved(end)operator(;)
     
@@ -1944,8 +1944,8 @@ reserved(begin)
         ident(s) operator(:=) ident(PathE)operator(.)ident(Text)operator(;)
         ident(Pos) operator(:=) ident(PathE)operator(.)ident(SelStart) operator(+) integer(1)operator(;)
         reserved(repeat)
-          ident(Inc)operator(()ident(Pos)operator(\);)
-        reserved(until) operator(()ident(Pos) operator(>) ident(Length)operator(()ident(s)operator(\)\)) reserved(or) operator(()ident(s)operator([)ident(Pos)operator(]) operator(=) char<delimiter(')content(\\)delimiter(')>operator(\);)
+          ident(Inc)operator(()ident(Pos)operator(\))operator(;)
+        reserved(until) operator(()ident(Pos) operator(>) ident(Length)operator(()ident(s)operator(\))operator(\)) reserved(or) operator(()ident(s)operator([)ident(Pos)operator(]) operator(=) char<delimiter(')content(\\)delimiter(')>operator(\))operator(;)
 
         ident(PathE)operator(.)ident(SelStart) operator(:=) ident(Pos) operator(-) integer(1)operator(;)
       reserved(end)operator(;)
@@ -1960,8 +1960,8 @@ reserved(begin)
           ident(s) operator(:=) ident(Text)operator(;)
           ident(Pos) operator(:=) ident(SelStart)operator(;)
           reserved(repeat)
-            ident(Dec)operator(()ident(Pos)operator(\);)
-          reserved(until) operator(()ident(Pos) operator(<) integer(1)operator(\)) reserved(or) operator(()ident(s)operator([)ident(Pos)operator(]) operator(=) char<delimiter(')content(\\)delimiter(')>operator(\);)
+            ident(Dec)operator(()ident(Pos)operator(\))operator(;)
+          reserved(until) operator(()ident(Pos) operator(<) integer(1)operator(\)) reserved(or) operator(()ident(s)operator([)ident(Pos)operator(]) operator(=) char<delimiter(')content(\\)delimiter(')>operator(\))operator(;)
 
           reserved(if) ident(Pos) operator(<) integer(1) reserved(then)
             ident(Pos) operator(:=) integer(1)operator(;)
@@ -1974,24 +1974,24 @@ reserved(end)operator(;)
 
 reserved(procedure) ident(TMainWin)operator(.)ident(UserGotoKey)operator(;)
 reserved(begin)
-  ident(GotoKey)operator(()ident(PathE)operator(.)ident(Text)operator(\);)
+  ident(GotoKey)operator(()ident(PathE)operator(.)ident(Text)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(PathEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(PathEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(Prefix)operator(,) ident(Suffix)operator(,) ident(Key)operator(,) ident(Path)operator(,) ident(Root)operator(:) reserved(string)operator(;)
   ident(i)operator(,) ident(p)operator(,) ident(Len)operator(:) ident(Integer)operator(;)
   ident(SL)operator(:) ident(TStringList)operator(;)
-  ident(CompleteKind)operator(:) operator(()ident(ckRoots)operator(,) ident(ckKeys)operator(,) ident(ckValues)operator(\);)
+  ident(CompleteKind)operator(:) operator(()ident(ckRoots)operator(,) ident(ckKeys)operator(,) ident(ckValues)operator(\))operator(;)
 
-  reserved(procedure) ident(GetRootNames)operator(()ident(Strings)operator(:) ident(TStrings)operator(\);)
+  reserved(procedure) ident(GetRootNames)operator(()ident(Strings)operator(:) ident(TStrings)operator(\))operator(;)
   reserved(var)
     ident(Node)operator(:) ident(TTreeNode)operator(;)
   reserved(begin)
     ident(SL)operator(.)ident(Clear)operator(;)
     ident(Node) operator(:=) ident(RegTV)operator(.)ident(Items)operator(.)ident(GetFirstNode)operator(;)
     reserved(while) ident(Assigned)operator(()ident(Node)operator(\)) reserved(do) reserved(begin)
-      ident(SL)operator(.)ident(Add)operator(()ident(Node)operator(.)ident(Text)operator(\);)
+      ident(SL)operator(.)ident(Add)operator(()ident(Node)operator(.)ident(Text)operator(\))operator(;)
       ident(Node) operator(:=) ident(Node)operator(.)ident(GetNextSibling)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
@@ -2001,7 +2001,7 @@ reserved(begin)
     ident(Exit)operator(;)
 
   ident(Key) operator(:=) ident(PathE)operator(.)ident(Text)operator(;)
-  ident(Root) operator(:=) ident(TraceKey)operator(()ident(ExRegRoot)operator(()ident(Key)operator(\)\);)
+  ident(Root) operator(:=) ident(TraceKey)operator(()ident(ExRegRoot)operator(()ident(Key)operator(\))operator(\))operator(;)
 
   reserved(if) reserved(not) ident(CharIn)operator(()ident(Key)operator(,) char<delimiter(')content(\\)delimiter(')>operator(\)) reserved(then)
     ident(CompleteKind) operator(:=) ident(ckRoots)
@@ -2017,15 +2017,15 @@ reserved(begin)
   reserved(end)operator(;)
 
   ident(ckKeys)operator(:) reserved(begin)
-    ident(Path) operator(:=) ident(ExRegFullKey)operator(()ident(Key)operator(\);)
-    ident(Prefix) operator(:=) ident(UntilLastChar)operator(()ident(Path)operator(,) char<delimiter(')content(\\)delimiter(')>operator(\);)
-    ident(Suffix) operator(:=) ident(FromLastChar)operator(()ident(Path)operator(,) char<delimiter(')content(\\)delimiter(')>operator(\);)
+    ident(Path) operator(:=) ident(ExRegFullKey)operator(()ident(Key)operator(\))operator(;)
+    ident(Prefix) operator(:=) ident(UntilLastChar)operator(()ident(Path)operator(,) char<delimiter(')content(\\)delimiter(')>operator(\))operator(;)
+    ident(Suffix) operator(:=) ident(FromLastChar)operator(()ident(Path)operator(,) char<delimiter(')content(\\)delimiter(')>operator(\))operator(;)
   reserved(end)operator(;)
 
   ident(ckValues)operator(:) reserved(begin)
-    ident(p) operator(:=) ident(Pos)operator(()string<delimiter(')content(\\\\)delimiter(')>operator(,) ident(Key)operator(\);)
-    ident(Prefix) operator(:=) ident(Copy)operator(()ident(Key)operator(,) integer(1)operator(,) ident(p) operator(-) integer(1)operator(\);)
-    ident(Suffix) operator(:=) ident(Copy)operator(()ident(Key)operator(,) ident(p) operator(+) integer(2)operator(,) ident(Length)operator(()ident(Key)operator(\)) operator(-) ident(p) operator(-) integer(1)operator(\);)
+    ident(p) operator(:=) ident(Pos)operator(()string<delimiter(')content(\\\\)delimiter(')>operator(,) ident(Key)operator(\))operator(;)
+    ident(Prefix) operator(:=) ident(Copy)operator(()ident(Key)operator(,) integer(1)operator(,) ident(p) operator(-) integer(1)operator(\))operator(;)
+    ident(Suffix) operator(:=) ident(Copy)operator(()ident(Key)operator(,) ident(p) operator(+) integer(2)operator(,) ident(Length)operator(()ident(Key)operator(\)) operator(-) ident(p) operator(-) integer(1)operator(\))operator(;)
   reserved(end)operator(;)
 
   reserved(else)
@@ -2035,37 +2035,37 @@ reserved(begin)
 
   reserved(if) ident(CompleteKind) reserved(in) operator([)ident(ckKeys)operator(,) ident(ckValues)operator(]) reserved(then)
     reserved(with) ident(MainReg) reserved(do) reserved(begin)
-      ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(ExRegRoot)operator(()ident(Root)operator(\)\);)
-      ident(OpenKey)operator(()ident(ExRegKey)operator(()ident(Root)operator(\)\);)
-      ident(OpenKey)operator(()ident(ExRegKey)operator(()ident(Prefix)operator(\)\);)
+      ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(ExRegRoot)operator(()ident(Root)operator(\))operator(\))operator(;)
+      ident(OpenKey)operator(()ident(ExRegKey)operator(()ident(Root)operator(\))operator(\))operator(;)
+      ident(OpenKey)operator(()ident(ExRegKey)operator(()ident(Prefix)operator(\))operator(\))operator(;)
 
       reserved(if) ident(CompleteKind) operator(=) ident(ckValues) reserved(then) reserved(begin)
         reserved(if) reserved(not) ident(HasValues) reserved(then)
           ident(Exit)operator(;)
-        ident(GetValueNames)operator(()ident(SL)operator(\);)
+        ident(GetValueNames)operator(()ident(SL)operator(\))operator(;)
       reserved(end) reserved(else) reserved(if) ident(CompleteKind) operator(=) ident(ckKeys) reserved(then) reserved(begin)
         reserved(if) reserved(not) ident(HasSubKeys) reserved(then)
           ident(Exit)operator(;)
-        ident(GetKeyNames)operator(()ident(SL)operator(\);)
+        ident(GetKeyNames)operator(()ident(SL)operator(\))operator(;)
       reserved(end)operator(;)
 
       ident(CloseKey)operator(;)
     reserved(end)
   reserved(else) reserved(begin)
-    ident(GetRootNames)operator(()ident(SL)operator(\);)
+    ident(GetRootNames)operator(()ident(SL)operator(\))operator(;)
   reserved(end)operator(;)
 
   reserved(if) ident(Suffix) operator(=) string<delimiter(')delimiter(')> reserved(then) reserved(begin)
     reserved(if) operator(()ident(SL)operator(.)ident(Count) operator(>) integer(0)operator(\)) reserved(and) reserved(not) ident(StrIn)operator(()ident(SL)operator(,) string<delimiter(')delimiter(')>operator(\)) reserved(then)
-      ident(Suffix) operator(:=) ident(SL)operator([)integer(0)operator(];)
+      ident(Suffix) operator(:=) ident(SL)operator([)integer(0)operator(])operator(;)
   reserved(end) reserved(else) reserved(begin)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do)
-      reserved(if) ident(TextAtBegin)operator(()ident(SL)operator([)ident(i)operator(],) ident(Suffix)operator(\)) reserved(then) reserved(begin)
-        ident(Suffix) operator(:=) ident(SL)operator([)ident(i)operator(];)
+      reserved(if) ident(TextAtBegin)operator(()ident(SL)operator([)ident(i)operator(])operator(,) ident(Suffix)operator(\)) reserved(then) reserved(begin)
+        ident(Suffix) operator(:=) ident(SL)operator([)ident(i)operator(])operator(;)
       ident(Break)operator(;) reserved(end)operator(;)
   reserved(end)operator(;)
 
-  ident(Len) operator(:=) ident(Length)operator(()ident(PathE)operator(.)ident(Text)operator(\);)
+  ident(Len) operator(:=) ident(Length)operator(()ident(PathE)operator(.)ident(Text)operator(\))operator(;)
 
   reserved(if) ident(CompleteKind) operator(=) ident(ckValues) reserved(then)
     ident(Prefix) operator(:=) ident(Prefix) operator(+) string<delimiter(')content(\\\\)delimiter(')>
@@ -2084,9 +2084,9 @@ reserved(begin)
   ident(SL)operator(.)ident(Free)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(PathEExit)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(PathEExit)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(DeActivateThis)operator(()ident(PathE)operator(\);)
+  ident(DeActivateThis)operator(()ident(PathE)operator(\))operator(;)
   ident(DoAutoComplete) operator(:=) ident(False)operator(;)
 reserved(end)operator(;)
 
@@ -2102,7 +2102,7 @@ reserved(begin)
 
   reserved(with) ident(WorkWin) reserved(do) reserved(begin)
     ident(Top) operator(:=) integer(0)operator(;)
-    ident(Width) operator(:=) ident(Max)operator(()ident(MainWin)operator(.)ident(ClientWidth) reserved(div) integer(3)operator(,) ident(WorkWin)operator(.)ident(Constraints)operator(.)ident(MinWidth)operator(\);)
+    ident(Width) operator(:=) ident(Max)operator(()ident(MainWin)operator(.)ident(ClientWidth) reserved(div) integer(3)operator(,) ident(WorkWin)operator(.)ident(Constraints)operator(.)ident(MinWidth)operator(\))operator(;)
     ident(Left) operator(:=) ident(ValuesWin)operator(.)ident(Width) operator(-) ident(Width)operator(;)
     ident(Height) operator(:=) ident(MainWin)operator(.)ident(ClientHeight) operator(-) integer(43) operator(-) ident(ValuesWin)operator(.)ident(Height)operator(;)
     comment(//Align := alRight;)
@@ -2130,7 +2130,7 @@ reserved(begin)
   reserved(end)operator(;)
 
   reserved(with) ident(WorkWin) reserved(do) reserved(begin)
-    ident(Width) operator(:=) ident(Max)operator(()ident(Screen)operator(.)ident(WorkAreaWidth) reserved(div) integer(3)operator(,) ident(Constraints)operator(.)ident(MinWidth) operator(+) integer(2) operator(*) ident(Space)operator(\);)
+    ident(Width) operator(:=) ident(Max)operator(()ident(Screen)operator(.)ident(WorkAreaWidth) reserved(div) integer(3)operator(,) ident(Constraints)operator(.)ident(MinWidth) operator(+) integer(2) operator(*) ident(Space)operator(\))operator(;)
     ident(Align) operator(:=) ident(alRight)operator(;)
   reserved(end)operator(;)
 
@@ -2172,7 +2172,7 @@ reserved(begin)
                ident(MainWin)operator(.)ident(Constraints)operator(.)ident(MinHeight)operator(;)
 
   reserved(with) ident(ValuesWin) reserved(do) reserved(begin)
-    ident(Height) operator(:=) ident(Screen)operator(.)ident(WorkAreaHeight) operator(-) ident(Max)operator(()ident(Screen)operator(.)ident(Height) reserved(div) integer(3)operator(,) ident(MinHeight)operator(\);)
+    ident(Height) operator(:=) ident(Screen)operator(.)ident(WorkAreaHeight) operator(-) ident(Max)operator(()ident(Screen)operator(.)ident(Height) reserved(div) integer(3)operator(,) ident(MinHeight)operator(\))operator(;)
     ident(Align) operator(:=) ident(alBottom)operator(;)
   reserved(end)operator(;)
 
@@ -2214,70 +2214,70 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TMainWin)operator(.)ident(PathEKeyUp)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(begin)
-  reserved(if) reserved(not) operator(()ident(Key) reserved(in) operator([)ident(VK_DELETE)operator(,) ident(VK_BACK)operator(,) ident(VK_ESCAPE)operator(]\)) reserved(then)
+  reserved(if) reserved(not) operator(()ident(Key) reserved(in) operator([)ident(VK_DELETE)operator(,) ident(VK_BACK)operator(,) ident(VK_ESCAPE)operator(])operator(\)) reserved(then)
     ident(UserGotoKey)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(ActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(ActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(ActivateThis)operator(()ident(Sender)operator(\);)
+  ident(ActivateThis)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(FormActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(FormActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Assigned)operator(()ident(ActiveControl)operator(\)) reserved(and) operator(()ident(ActiveControl)operator(.)ident(Tag) operator(=) ident(EditControlFlag)operator(\)) reserved(then)
-    ident(ActivateThis)operator(()ident(ActiveControl)operator(\);)
+    ident(ActivateThis)operator(()ident(ActiveControl)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(FormDeactivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(FormDeactivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Assigned)operator(()ident(ActiveControl)operator(\)) reserved(and) operator(()ident(ActiveControl)operator(.)ident(Tag) operator(=) ident(EditControlFlag)operator(\)) reserved(then)
-    ident(DeActivateThis)operator(()ident(ActiveControl)operator(\);)
+    ident(DeActivateThis)operator(()ident(ActiveControl)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(Pluto1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(Pluto1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(ArrangePlutoStyle)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(RegEdit1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(RegEdit1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(ArrangeRegEdStyle)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(Free1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(Free1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(ArrangeFreeStyle)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(BigVal1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(BigVal1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(ArrangeBigValStyle)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(SplashScreen1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(SplashScreen1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(SplashWin)operator(.)ident(Show)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(HistoryClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(HistoryClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(NotePad)operator(()ident(PlutoDir) operator(+) string<delimiter(')content(version.txt)delimiter(')>operator(\);)
+  ident(NotePad)operator(()ident(PlutoDir) operator(+) string<delimiter(')content(version.txt)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(WebLinkMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(WebLinkMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(Browse)operator(()string<delimiter(')content(http://)delimiter(')> operator(+) ident(TMenuItem)operator(()ident(Sender)operator(\).)ident(Caption)operator(\);)
+  ident(Browse)operator(()string<delimiter(')content(http://)delimiter(')> operator(+) ident(TMenuItem)operator(()ident(Sender)operator(\))operator(.)ident(Caption)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(SupportMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(SupportMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(Browse)operator(()string<delimiter(')content(http://cYcnus.de/php/phpbb/viewforum.php?f=1)delimiter(')>operator(\);)
+  ident(Browse)operator(()string<delimiter(')content(http://cYcnus.de/php/phpbb/viewforum.php?f=1)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(Credits1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(Credits1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(FileName)operator(:) reserved(string)operator(;)
 reserved(begin)
@@ -2287,7 +2287,7 @@ reserved(begin)
   reserved(else) reserved(begin)
     ident(FileName) operator(:=) ident(PlutoDir) operator(+) string<delimiter(')content(credits.htm)delimiter(')>operator(;)
     reserved(if) ident(FileExists)operator(()ident(FileName)operator(\)) reserved(then)
-      ident(ExecFile)operator(()ident(FileName)operator(\);)
+      ident(ExecFile)operator(()ident(FileName)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
@@ -2295,12 +2295,12 @@ reserved(function) ident(GetCLSIDFromClipboard)operator(:) reserved(string)opera
 reserved(var)
   ident(CLSID)operator(:) reserved(string)operator(;)
 reserved(begin)
-  ident(CLSID) operator(:=) ident(BetweenChars)operator(()ident(Clipboard)operator(.)ident(AsText)operator(,) char<delimiter(')content({)delimiter(')>operator(,) char<delimiter(')content(})delimiter(')>operator(,) ident(True)operator(\);)
+  ident(CLSID) operator(:=) ident(BetweenChars)operator(()ident(Clipboard)operator(.)ident(AsText)operator(,) char<delimiter(')content({)delimiter(')>operator(,) char<delimiter(')content(})delimiter(')>operator(,) ident(True)operator(\))operator(;)
   reserved(if) ident(CLSID) operator(=) string<delimiter(')delimiter(')> reserved(then) reserved(begin)
     ident(Result) operator(:=) ident(Clipboard)operator(.)ident(AsText)operator(;)
     ident(InputQuery)operator(()string<delimiter(')content(No CLSID in Clipboard.)delimiter(')>operator(,)
       string<delimiter(')content(Use following format:)delimiter(')> operator(+) ident(EOL) operator(+)
-      string<delimiter(')content({00000000-0000-0000-0000-000000000000})delimiter(')>operator(,) ident(Result)operator(\);)
+      string<delimiter(')content({00000000-0000-0000-0000-000000000000})delimiter(')>operator(,) ident(Result)operator(\))operator(;)
   ident(Exit)operator(;) reserved(end) reserved(else)
     ident(Result) operator(:=) ident(CLSID)operator(;)
 reserved(end)operator(;)
@@ -2310,11 +2310,11 @@ reserved(var)
   ident(CLSID)operator(,) ident(Desc)operator(:) reserved(string)operator(;)
 reserved(begin)
   ident(CLSID) operator(:=) ident(GetCLSIDFromClipboard)operator(;)
-  ident(Desc) operator(:=) ident(RegNameOfCLSID)operator(()ident(CLSID)operator(\);)
+  ident(Desc) operator(:=) ident(RegNameOfCLSID)operator(()ident(CLSID)operator(\))operator(;)
   reserved(if) ident(Desc) operator(<>) string<delimiter(')delimiter(')> reserved(then)
     ident(InputQuery)operator(()string<delimiter(')content(Your CLSID is...)delimiter(')>operator(,) ident(CLSID)operator(,) ident(Desc)operator(\))
   reserved(else)
-    ident(ShowMessage)operator(()string<delimiter(')content(CLSID not found: )delimiter(')> operator(+) ident(CLSID) operator(+) char<delimiter(')content(.)delimiter(')>operator(\);)
+    ident(ShowMessage)operator(()string<delimiter(')content(CLSID not found: )delimiter(')> operator(+) ident(CLSID) operator(+) char<delimiter(')content(.)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TMainWin)operator(.)ident(GotoCLSID)operator(;)
@@ -2322,20 +2322,20 @@ reserved(var)
   ident(CLSID)operator(,) ident(Desc)operator(:) reserved(string)operator(;)
 reserved(begin)
   ident(CLSID) operator(:=) ident(GetCLSIDFromClipboard)operator(;)
-  ident(Desc) operator(:=) ident(RegNameOfCLSID)operator(()ident(CLSID)operator(\);)
+  ident(Desc) operator(:=) ident(RegNameOfCLSID)operator(()ident(CLSID)operator(\))operator(;)
   reserved(if) ident(Desc) operator(<>) string<delimiter(')delimiter(')> reserved(then) reserved(begin)
-    ident(GotoKey)operator(()string<delimiter(')content(HKCR\\CLSID\\)delimiter(')> operator(+) ident(CLSID)operator(\);)
-    ident(TreeWin)operator(.)ident(FocusControl)operator(()ident(RegTV)operator(\);)
+    ident(GotoKey)operator(()string<delimiter(')content(HKCR\\CLSID\\)delimiter(')> operator(+) ident(CLSID)operator(\))operator(;)
+    ident(TreeWin)operator(.)ident(FocusControl)operator(()ident(RegTV)operator(\))operator(;)
   reserved(end) reserved(else)
-    ident(ShowMessage)operator(()string<delimiter(')content(CLSID not found: )delimiter(')> operator(+) ident(CLSID) operator(+) char<delimiter(')content(.)delimiter(')>operator(\);)
+    ident(ShowMessage)operator(()string<delimiter(')content(CLSID not found: )delimiter(')> operator(+) ident(CLSID) operator(+) char<delimiter(')content(.)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(TMainWin)operator(.)ident(Greeting)operator(()ident(Name)operator(:) reserved(string) operator(=) ident(NoPreBlinkHint)operator(\):) reserved(string)operator(;)
+reserved(function) ident(TMainWin)operator(.)ident(Greeting)operator(()ident(Name)operator(:) reserved(string) operator(=) ident(NoPreBlinkHint)operator(\))operator(:) reserved(string)operator(;)
 reserved(const)
   ident(Alias)operator(:) reserved(array)operator([)integer(0)operator(..)integer(4)operator(]) reserved(of) reserved(string) operator(=)
-    operator(()string<delimiter(')content(Licenser)delimiter(')>operator(,) string<delimiter(')content(Murphy)delimiter(')>operator(,) string<delimiter(')content(Sleeper)delimiter(')>operator(,) string<delimiter(')content(Leon)delimiter(')>operator(,)  string<delimiter(')content(Great Admin)delimiter(')>operator(\);)
+    operator(()string<delimiter(')content(Licenser)delimiter(')>operator(,) string<delimiter(')content(Murphy)delimiter(')>operator(,) string<delimiter(')content(Sleeper)delimiter(')>operator(,) string<delimiter(')content(Leon)delimiter(')>operator(,)  string<delimiter(')content(Great Admin)delimiter(')>operator(\))operator(;)
   ident(RealNames)operator(:) reserved(array)operator([)integer(0)operator(..)integer(4)operator(]) reserved(of) reserved(string) operator(=)
-    operator(()string<delimiter(')content(Heinz)delimiter(')>operator(,)    string<delimiter(')content(Korny)delimiter(')>operator(,)  string<delimiter(')content(Sven)delimiter(')>operator(,)    string<delimiter(')content(Simon)delimiter(')>operator(,) string<delimiter(')content(Korny ;-\))delimiter(')>operator(\);)
+    operator(()string<delimiter(')content(Heinz)delimiter(')>operator(,)    string<delimiter(')content(Korny)delimiter(')>operator(,)  string<delimiter(')content(Sven)delimiter(')>operator(,)    string<delimiter(')content(Simon)delimiter(')>operator(,) string<delimiter(')content(Korny ;-\))delimiter(')>operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
   ident(s)operator(:) reserved(string)operator(;)
@@ -2345,11 +2345,11 @@ reserved(begin)
     
   reserved(if) ident(Trim)operator(()ident(Name)operator(\)) operator(=) string<delimiter(')delimiter(')> reserved(then)
     ident(s) operator(:=) string<delimiter(')content(No name?)delimiter(')>
-  reserved(else) reserved(if) ident(SameText)operator(()ident(Trim)operator(()ident(Name)operator(\),) string<delimiter(')content(Pluto-User)delimiter(')>operator(\)) reserved(then)
+  reserved(else) reserved(if) ident(SameText)operator(()ident(Trim)operator(()ident(Name)operator(\))operator(,) string<delimiter(')content(Pluto-User)delimiter(')>operator(\)) reserved(then)
     ident(s) operator(:=) string<delimiter(')content(Hi!)delimiter(')>
   reserved(else)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) integer(4) reserved(do)
-      reserved(if) ident(SameText)operator(()ident(Name)operator(,) ident(Alias)operator([)ident(i)operator(]\)) reserved(then) reserved(begin)
+      reserved(if) ident(SameText)operator(()ident(Name)operator(,) ident(Alias)operator([)ident(i)operator(])operator(\)) reserved(then) reserved(begin)
         ident(s) operator(:=) string<delimiter(')content(Hi )delimiter(')> operator(+) ident(RealNames)operator([)ident(i)operator(]) operator(+) string<delimiter(')content(! This is a cYcnus.EasterEgg)delimiter(')>operator(;)
       ident(Break)operator(;) reserved(end)
   reserved(else) reserved(if) ident(Length)operator(()ident(Name)operator(\)) operator(>) integer(20) reserved(then)
@@ -2361,7 +2361,7 @@ reserved(begin)
   ident(Result) operator(:=) ident(s)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(PrefMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(PrefMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(PrefWin)operator(.)ident(Show)operator(;)
 reserved(end)operator(;)
@@ -2369,7 +2369,7 @@ reserved(end)operator(;)
 reserved(function) ident(TempDir)operator(:) reserved(string)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(PlutoDir) operator(+) string<delimiter(')content(temp\\)delimiter(')>operator(;)
-  reserved(if) reserved(not) operator(()ident(DirectoryExists)operator(()ident(Result)operator(\)) reserved(or) ident(CreateDir)operator(()ident(Result)operator(\)\)) reserved(then)
+  reserved(if) reserved(not) operator(()ident(DirectoryExists)operator(()ident(Result)operator(\)) reserved(or) ident(CreateDir)operator(()ident(Result)operator(\))operator(\)) reserved(then)
     ident(Result) operator(:=) ident(PlutoDir)operator(;)
 reserved(end)operator(;)
 
@@ -2401,15 +2401,15 @@ reserved(begin)
   ident(Result) operator(:=) string<delimiter(')content(Ini <)delimiter(')> operator(+) ident(PlutoIniFileName) operator(+) string<delimiter(')content(>:)delimiter(')>operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(EditBoolStrMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(EditBoolStrMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(NotePad)operator(()ident(PlutoDir) operator(+) ident(BoolStrFileName)operator(\);)
+  ident(NotePad)operator(()ident(PlutoDir) operator(+) ident(BoolStrFileName)operator(\))operator(;)
   ident(ShowMessage)operator(()string<delimiter(')content(Click OK when you finished editing.)delimiter(')> operator(+) ident(EOL) operator(+)
-              string<delimiter(')content((Pluto will reload the Boolean Strings.\))delimiter(')>operator(\);)
+              string<delimiter(')content((Pluto will reload the Boolean Strings.\))delimiter(')>operator(\))operator(;)
   ident(WorkWin)operator(.)ident(LoadBoolStr)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(SisyStarted)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(SisyStarted)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 comment({var
   NextSisyIndex: Integer;
   NextSisy: TSisyThread;          })
@@ -2432,18 +2432,18 @@ reserved(begin)
   end; })
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(SisyTerminate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(SisyTerminate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Assigned)operator(()ident(Sisys)operator(\)) reserved(then)
-    ident(Sisys)operator(.)ident(Delete)operator(()ident(Sisys)operator(.)ident(IndexOf)operator(()ident(Sender)operator(\)\);)
-  ident(AddHint)operator(()string<delimiter(')content(Sisyphus )delimiter(')> operator(+) ident(Quote)operator(()ident(TSisyThread)operator(()ident(Sender)operator(\).)ident(Name)operator(\)) operator(+) string<delimiter(')content( destroyed.)delimiter(')>operator(\);)
+    ident(Sisys)operator(.)ident(Delete)operator(()ident(Sisys)operator(.)ident(IndexOf)operator(()ident(Sender)operator(\))operator(\))operator(;)
+  ident(AddHint)operator(()string<delimiter(')content(Sisyphus )delimiter(')> operator(+) ident(Quote)operator(()ident(TSisyThread)operator(()ident(Sender)operator(\))operator(.)ident(Name)operator(\)) operator(+) string<delimiter(')content( destroyed.)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(FormCloseQuery)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(CanClose)operator(:) ident(Boolean)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(FormCloseQuery)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(CanClose)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 
-  reserved(procedure) ident(TerminateThread)operator(()ident(Thread)operator(:) ident(TThread)operator(;) ident(Name)operator(:) reserved(string)operator(\);)
+  reserved(procedure) ident(TerminateThread)operator(()ident(Thread)operator(:) ident(TThread)operator(;) ident(Name)operator(:) reserved(string)operator(\))operator(;)
   reserved(const)
     ident(ThreadTimeOut) operator(=) integer(3000)operator(;)
   reserved(begin)
@@ -2455,8 +2455,8 @@ reserved(var)
         reserved(if) integer(0) operator(<>) ident(WaitForSingleObject)operator(()ident(Handle)operator(,) ident(ThreadTimeOut)operator(\)) reserved(then) reserved(begin)
           ident(ShowMessage)operator(()string<delimiter(')content(Timeout: Killing Thread: )delimiter(')> operator(+) ident(Name) operator(+) ident(EOL) operator(+)
             string<delimiter(')content(This is a critical error and may cause memory leaks and crashes.)delimiter(')> operator(+) ident(EOL) operator(+)
-            string<delimiter(')content(We recommend to reboot your system before you continue.)delimiter(')>operator(\);)
-          ident(Windows)operator(.)ident(TerminateThread)operator(()ident(Handle)operator(,) integer(0)operator(\);)
+            string<delimiter(')content(We recommend to reboot your system before you continue.)delimiter(')>operator(\))operator(;)
+          ident(Windows)operator(.)ident(TerminateThread)operator(()ident(Handle)operator(,) integer(0)operator(\))operator(;)
         reserved(end) reserved(else)
           ident(Thread)operator(.)ident(Free)operator(;)
       reserved(end)operator(;)
@@ -2466,38 +2466,38 @@ reserved(begin)
   ident(CanClose) operator(:=) ident(False)operator(;)
 
   reserved(try)
-    ident(AddHint)operator(()string<delimiter(')content(Stopping SisyphusThreads...)delimiter(')>operator(\);)
+    ident(AddHint)operator(()string<delimiter(')content(Stopping SisyphusThreads...)delimiter(')>operator(\))operator(;)
     reserved(if) ident(Assigned)operator(()ident(Sisys)operator(\)) reserved(then)
       reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Sisys)operator(.)ident(Count)operator(-)integer(1) reserved(do)
-        ident(TSisyThread)operator(()ident(Sisys)operator([)ident(i)operator(]\).)ident(Suspend)operator(;)
-    ident(AddToLastHint)operator(()string<delimiter(')content(OK)delimiter(')>operator(\);)
+        ident(TSisyThread)operator(()ident(Sisys)operator([)ident(i)operator(])operator(\))operator(.)ident(Suspend)operator(;)
+    ident(AddToLastHint)operator(()string<delimiter(')content(OK)delimiter(')>operator(\))operator(;)
 
-    ident(AddHint)operator(()string<delimiter(')content(Wait for SpyThread...)delimiter(')>operator(\);)
-    ident(TerminateThread)operator(()ident(SpyThread)operator(,) string<delimiter(')content(SpyThread)delimiter(')>operator(\);)
-    ident(AddToLastHint)operator(()string<delimiter(')content(OK)delimiter(')>operator(\);)
+    ident(AddHint)operator(()string<delimiter(')content(Wait for SpyThread...)delimiter(')>operator(\))operator(;)
+    ident(TerminateThread)operator(()ident(SpyThread)operator(,) string<delimiter(')content(SpyThread)delimiter(')>operator(\))operator(;)
+    ident(AddToLastHint)operator(()string<delimiter(')content(OK)delimiter(')>operator(\))operator(;)
 
-    ident(AddHint)operator(()string<delimiter(')content(Wait for SisyphusThreads...)delimiter(')>operator(\);)
+    ident(AddHint)operator(()string<delimiter(')content(Wait for SisyphusThreads...)delimiter(')>operator(\))operator(;)
     reserved(if) ident(Assigned)operator(()ident(Sisys)operator(\)) reserved(then)
       reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Sisys)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin)
-        ident(ChangeLastHint)operator(()string<delimiter(')content(Wait for SisyphusThreads...)delimiter(')> operator(+) ident(TSisyThread)operator(()ident(Sisys)operator([)ident(i)operator(]\).)ident(Name)operator(\);)
-        ident(TerminateThread)operator(()ident(TSisyThread)operator(()ident(Sisys)operator([)ident(i)operator(]\),) ident(TSisyThread)operator(()ident(Sisys)operator([)ident(i)operator(]\).)ident(Name)operator(\);)
+        ident(ChangeLastHint)operator(()string<delimiter(')content(Wait for SisyphusThreads...)delimiter(')> operator(+) ident(TSisyThread)operator(()ident(Sisys)operator([)ident(i)operator(])operator(\))operator(.)ident(Name)operator(\))operator(;)
+        ident(TerminateThread)operator(()ident(TSisyThread)operator(()ident(Sisys)operator([)ident(i)operator(])operator(\))operator(,) ident(TSisyThread)operator(()ident(Sisys)operator([)ident(i)operator(])operator(\))operator(.)ident(Name)operator(\))operator(;)
       reserved(end)operator(;)
-    ident(ChangeLastHint)operator(()string<delimiter(')content(Wait for SisyphusThreads...OK)delimiter(')>operator(\);)
+    ident(ChangeLastHint)operator(()string<delimiter(')content(Wait for SisyphusThreads...OK)delimiter(')>operator(\))operator(;)
   reserved(except)
     reserved(with) ident(WorkWin)operator(.)ident(HintLB)operator(.)ident(Items) reserved(do)
       ident(ShowMessage)operator(()string<delimiter(')content(Error while trying to terminate threads.)delimiter(')> operator(+) ident(EOL) operator(+)
         string<delimiter(')content(Last Message:)delimiter(')> operator(+) ident(EOL) operator(+)
-        ident(Strings)operator([)ident(Count) operator(-) integer(1)operator(]\);)
+        ident(Strings)operator([)ident(Count) operator(-) integer(1)operator(])operator(\))operator(;)
     ident(CanClose) operator(:=) ident(True)operator(;)
   reserved(end)operator(;)
 
-  ident(AddHint)operator(()string<delimiter(')content(Terminating successfull.)delimiter(')>operator(\);)
+  ident(AddHint)operator(()string<delimiter(')content(Terminating successfull.)delimiter(')>operator(\))operator(;)
   ident(CanClose) operator(:=) ident(True)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(FormClose)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Action)operator(:) ident(TCloseAction)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(FormClose)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Action)operator(:) ident(TCloseAction)operator(\))operator(;)
 
-  reserved(procedure) ident(TryClose)operator(()ident(Win)operator(:) ident(TCustomForm)operator(\);)
+  reserved(procedure) ident(TryClose)operator(()ident(Win)operator(:) ident(TCustomForm)operator(\))operator(;)
   reserved(begin)
     reserved(if) ident(Assigned)operator(()ident(Win)operator(\)) reserved(and) ident(Win)operator(.)ident(Visible) reserved(then)
       ident(Win)operator(.)ident(Close)operator(;)
@@ -2511,83 +2511,83 @@ reserved(begin)
   reserved(if) ident(DontSavePrefs) reserved(then)
     ident(Exit)operator(;)
 
-  ident(AddHint)operator(()string<delimiter(')content(Saving settings...)delimiter(')>operator(\);)
+  ident(AddHint)operator(()string<delimiter(')content(Saving settings...)delimiter(')>operator(\))operator(;)
 
   reserved(try)
-    ident(TryClose)operator(()ident(WorkWin)operator(\);)
-    ident(TryClose)operator(()ident(ValuesWin)operator(\);)
-    ident(TryClose)operator(()ident(TreeWin)operator(\);)
-    ident(TryClose)operator(()ident(FindWin)operator(\);)
-    ident(TryClose)operator(()ident(SplashWin)operator(\);)
-    ident(TryClose)operator(()ident(PrefWin)operator(\);)
+    ident(TryClose)operator(()ident(WorkWin)operator(\))operator(;)
+    ident(TryClose)operator(()ident(ValuesWin)operator(\))operator(;)
+    ident(TryClose)operator(()ident(TreeWin)operator(\))operator(;)
+    ident(TryClose)operator(()ident(FindWin)operator(\))operator(;)
+    ident(TryClose)operator(()ident(SplashWin)operator(\))operator(;)
+    ident(TryClose)operator(()ident(PrefWin)operator(\))operator(;)
   reserved(except)
     ident(DontSavePrefs) operator(:=) ident(True)operator(;) comment(//try again without pref saving)
   reserved(end)operator(;)
 
   reserved(with) ident(PlutoKey)operator(.)ident(GetKey)operator(()string<delimiter(')content(Window)delimiter(')>operator(\)) reserved(do)
     reserved(try)
-      ident(WriteBool)operator(()string<delimiter(')content(Maximized)delimiter(')>operator(,) ident(WindowState) operator(=) ident(wsMaximized)operator(\);)
+      ident(WriteBool)operator(()string<delimiter(')content(Maximized)delimiter(')>operator(,) ident(WindowState) operator(=) ident(wsMaximized)operator(\))operator(;)
       reserved(if) ident(WindowState) operator(=) ident(wsNormal) reserved(then) reserved(begin)
-        ident(WriteInteger)operator(()string<delimiter(')content(Left)delimiter(')>operator(,) ident(Left)operator(\);)
-        ident(WriteInteger)operator(()string<delimiter(')content(Top)delimiter(')>operator(,) ident(Top)operator(\);)
-        ident(WriteInteger)operator(()string<delimiter(')content(Width)delimiter(')>operator(,) ident(Width)operator(\);)
-        ident(WriteInteger)operator(()string<delimiter(')content(Height)delimiter(')>operator(,) ident(Height)operator(\);)
+        ident(WriteInteger)operator(()string<delimiter(')content(Left)delimiter(')>operator(,) ident(Left)operator(\))operator(;)
+        ident(WriteInteger)operator(()string<delimiter(')content(Top)delimiter(')>operator(,) ident(Top)operator(\))operator(;)
+        ident(WriteInteger)operator(()string<delimiter(')content(Width)delimiter(')>operator(,) ident(Width)operator(\))operator(;)
+        ident(WriteInteger)operator(()string<delimiter(')content(Height)delimiter(')>operator(,) ident(Height)operator(\))operator(;)
       reserved(end)operator(;)
     reserved(finally)
       ident(Free)operator(;)
     reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(Plutoini1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(Plutoini1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(NotePad)operator(()ident(PlutoIniFileName)operator(\);)
+  ident(NotePad)operator(()ident(PlutoIniFileName)operator(\))operator(;)
   ident(ShowMessage)operator(()string<delimiter(')content(Click OK when you finished editing.)delimiter(')> operator(+) ident(EOL) operator(+)
-              string<delimiter(')content((Pluto will reload )delimiter(')> operator(+) ident(PlutoIniFileName) operator(+) char<delimiter(')content(\))delimiter(')>operator(\);)
+              string<delimiter(')content((Pluto will reload )delimiter(')> operator(+) ident(PlutoIniFileName) operator(+) char<delimiter(')content(\))delimiter(')>operator(\))operator(;)
   ident(PrefWin)operator(.)ident(PrefHost)operator(.)ident(Load)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(RegEdit2Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(RegEdit2Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(RegEdit)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(SysEdit1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(SysEdit1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(SysEdit)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(NotePad1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(NotePad1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(NotePad)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(WordPad1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(WordPad1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(WordPad)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(OpenWinDir1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(OpenWinDir1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(ExploreFolder)operator(()ident(WinDir)operator(\);)
+  ident(ExploreFolder)operator(()ident(WinDir)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(OpenProgramFolder1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(OpenProgramFolder1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(ExploreFolder)operator(()ident(MyDir)operator(\);)
+  ident(ExploreFolder)operator(()ident(MyDir)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(ExitPluto1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(ExitPluto1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(Close)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(Find1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(Find1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(FindWin)operator(.)ident(SfRootKeyRB)operator(.)ident(Checked) operator(:=) ident(True)operator(;)
   ident(FindWin)operator(.)ident(Show)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(FormPaint)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(FormPaint)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Started) reserved(and) reserved(not) ident(MainWinLoaded) reserved(then) reserved(begin)
     ident(MainWinLoaded) operator(:=) ident(True)operator(;)
@@ -2596,14 +2596,14 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TMainWin)operator(.)ident(StatusBarDrawPanel)operator(()ident(StatusBar)operator(:) ident(TStatusBar)operator(;)
-  ident(Panel)operator(:) ident(TStatusPanel)operator(;) reserved(const) ident(Rect)operator(:) ident(TRect)operator(\);)
+  ident(Panel)operator(:) ident(TStatusPanel)operator(;) reserved(const) ident(Rect)operator(:) ident(TRect)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(StatusBar)operator(.)ident(Canvas) reserved(do) reserved(begin)
     ident(Brush)operator(.)ident(Color) operator(:=) ident(clBlack)operator(;)
-    ident(FillRect)operator(()ident(Rect)operator(\);)
+    ident(FillRect)operator(()ident(Rect)operator(\))operator(;)
     reserved(with) ident(Font) reserved(do) reserved(begin)
       ident(Name) operator(:=) string<delimiter(')content(MS Sans Serif)delimiter(')>operator(;)
-      ident(Style) operator(:=) operator([];)
+      ident(Style) operator(:=) operator([)operator(])operator(;)
       reserved(case) ident(Panel)operator(.)ident(Index) reserved(of)
         integer(0)operator(:) reserved(if) ident(HintBlinkT)operator(.)ident(Enabled) reserved(then)
              ident(Color) operator(:=) ident(clBrightRed)
@@ -2616,21 +2616,21 @@ reserved(begin)
     reserved(end)operator(;)
 
     reserved(if) ident(Panel)operator(.)ident(Alignment) operator(=) ident(taRightJustify) reserved(then)
-      ident(TextOut)operator(()ident(Rect)operator(.)ident(Right) operator(-) ident(TextWidth)operator(()ident(Panel)operator(.)ident(Text)operator(\),) ident(Rect)operator(.)ident(Top)operator(,) ident(Panel)operator(.)ident(Text)operator(\))
+      ident(TextOut)operator(()ident(Rect)operator(.)ident(Right) operator(-) ident(TextWidth)operator(()ident(Panel)operator(.)ident(Text)operator(\))operator(,) ident(Rect)operator(.)ident(Top)operator(,) ident(Panel)operator(.)ident(Text)operator(\))
     reserved(else)
-      ident(TextOut)operator(()ident(Rect)operator(.)ident(Left)operator(,) ident(Rect)operator(.)ident(Top)operator(,) ident(Panel)operator(.)ident(Text)operator(\);)
+      ident(TextOut)operator(()ident(Rect)operator(.)ident(Left)operator(,) ident(Rect)operator(.)ident(Top)operator(,) ident(Panel)operator(.)ident(Text)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(PathEKeyPress)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Char)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(PathEKeyPress)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Char)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Key) operator(=) char(#127) reserved(then) comment(//Silly key management)
     ident(Key) operator(:=) char(#0)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(HintBlinkTTimer)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(HintBlinkTTimer)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(StatusBar)operator(.)ident(Panels)operator([)integer(0)operator(].)ident(Text) operator(:=) string<delimiter(')content(Ready)delimiter(')>operator(;)
+  ident(StatusBar)operator(.)ident(Panels)operator([)integer(0)operator(])operator(.)ident(Text) operator(:=) string<delimiter(')content(Ready)delimiter(')>operator(;)
   ident(StopHintBlinking)operator(;)
 reserved(end)operator(;)
 
@@ -2640,38 +2640,38 @@ reserved(begin)
   ident(PreBlinkHint) operator(:=) ident(NoPreBlinkHint)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(FindCLSID1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(FindCLSID1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(FindCLSID)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(GotoCLSID1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(GotoCLSID1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(GotoCLSID)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(CommandLineParameters1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(CommandLineParameters1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(NotePad)operator(()ident(PlutoDir) operator(+) string<delimiter(')content(Params.txt)delimiter(')>operator(\);)
+  ident(NotePad)operator(()ident(PlutoDir) operator(+) string<delimiter(')content(Params.txt)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(DeleteTempFolder1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(DeleteTempFolder1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(mrYes) operator(=) ident(MessageDlg)operator(()string<delimiter(')content(Deleting )delimiter(')> operator(+) ident(Quote)operator(()ident(TempDir) operator(+) string<delimiter(')content(*.*)delimiter(')> operator(+) ident(EOL)operator(,) char<delimiter(')content(")delimiter(')>operator(\)) operator(+)
-                        string<delimiter(')content(Are you sure?)delimiter(')>operator(,) ident(mtConfirmation)operator(,) operator([)ident(mbYes)operator(,) ident(mbCancel)operator(],) integer(0)operator(\)) reserved(then)
-    ident(DeleteFiles)operator(()ident(TempDir) operator(+) string<delimiter(')content(*.*)delimiter(')>operator(,) ident(False)operator(\);)
+                        string<delimiter(')content(Are you sure?)delimiter(')>operator(,) ident(mtConfirmation)operator(,) operator([)ident(mbYes)operator(,) ident(mbCancel)operator(])operator(,) integer(0)operator(\)) reserved(then)
+    ident(DeleteFiles)operator(()ident(TempDir) operator(+) string<delimiter(')content(*.*)delimiter(')>operator(,) ident(False)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(CurrentDir1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(CurrentDir1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(ShowMessage)operator(()string<delimiter(')content(MyDir: )delimiter(')> operator(+) ident(MyDir) operator(+) ident(EOL) operator(+)
               string<delimiter(')content(PlutoDir: )delimiter(')> operator(+) ident(PlutoDir) operator(+) ident(EOL) operator(+)
               string<delimiter(')content(CurrentDir: )delimiter(')> operator(+) ident(GetCurrentDir) operator(+) ident(EOL) operator(+)
               string<delimiter(')content(Params: )delimiter(')> operator(+) ident(EOL) operator(+)
-              ident(GetParams)operator(()ident(EOL)operator(\)\);)
+              ident(GetParams)operator(()ident(EOL)operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(RepairPluto155bBug1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(RepairPluto155bBug1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(Msg)operator(:) reserved(string)operator(;)
   ident(Reg)operator(:) ident(TXRegistry)operator(;)
@@ -2680,7 +2680,7 @@ reserved(begin)
 
   reserved(try)
     ident(Reg)operator(.)ident(RootKey) operator(:=) ident(HKCU)operator(;)
-    ident(Reg)operator(.)ident(OpenKey)operator(()string<delimiter(')content(Software)delimiter(')>operator(\);)
+    ident(Reg)operator(.)ident(OpenKey)operator(()string<delimiter(')content(Software)delimiter(')>operator(\))operator(;)
     ident(Msg) operator(:=) string<delimiter(')delimiter(')>operator(;)
     reserved(if) ident(Reg)operator(.)ident(KeyExists)operator(()string<delimiter(')content(Sisyphus)delimiter(')>operator(\)) reserved(then)
       ident(Msg) operator(:=) ident(Msg) operator(+) string<delimiter(')content(HKCU\\Software\\Sisyphus)delimiter(')> operator(+) ident(EOL)operator(;)
@@ -2691,7 +2691,7 @@ reserved(begin)
     reserved(if) ident(Reg)operator(.)ident(KeyExists)operator(()string<delimiter(')content(View)delimiter(')>operator(\)) reserved(then)
       ident(Msg) operator(:=) ident(Msg) operator(+) string<delimiter(')content(HKCU\\Software\\View)delimiter(')> operator(+) ident(EOL)operator(;)
     reserved(if) ident(Msg) operator(=) string<delimiter(')delimiter(')> reserved(then) reserved(begin)
-      ident(ShowMessage)operator(()string<delimiter(')content(No bug detected :-\))delimiter(')>operator(\);)
+      ident(ShowMessage)operator(()string<delimiter(')content(No bug detected :-\))delimiter(')>operator(\))operator(;)
     reserved(end) reserved(else) reserved(begin)
       ident(Msg) operator(:=)
         string<delimiter(')content(Hi folks!)delimiter(')> operator(+) ident(EOL) operator(+)
@@ -2716,39 +2716,39 @@ reserved(begin)
         string<delimiter(')content(Cancel: Do nothing.)delimiter(')> operator(+) ident(EOL) operator(+)
         string<delimiter(')content(Yes to All: Delete all keys.)delimiter(')>operator(;)
 
-      reserved(case) ident(MessageDlg)operator(()ident(Msg)operator(,) ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(,) ident(mbYesToAll)operator(,) ident(mbCancel)operator(],) integer(0)operator(\)) reserved(of)
+      reserved(case) ident(MessageDlg)operator(()ident(Msg)operator(,) ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(,) ident(mbYesToAll)operator(,) ident(mbCancel)operator(])operator(,) integer(0)operator(\)) reserved(of)
         ident(mrYes)operator(:) reserved(begin)
           reserved(if) ident(Reg)operator(.)ident(KeyExists)operator(()string<delimiter(')content(Main)delimiter(')>operator(\))
            reserved(and) operator(()ident(mrYes)operator(=)ident(MessageDlg)operator(()string<delimiter(')content(Delete HKU\\Software\\Main ?)delimiter(')>operator(,)
-           ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(],) integer(0)operator(\)\)) reserved(then)
-             ident(Reg)operator(.)ident(DeleteKey)operator(()string<delimiter(')content(Main)delimiter(')>operator(\);)
+           ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(])operator(,) integer(0)operator(\))operator(\)) reserved(then)
+             ident(Reg)operator(.)ident(DeleteKey)operator(()string<delimiter(')content(Main)delimiter(')>operator(\))operator(;)
 
           reserved(if) ident(Reg)operator(.)ident(KeyExists)operator(()string<delimiter(')content(Sisyphus)delimiter(')>operator(\))
            reserved(and) operator(()ident(mrYes)operator(=)ident(MessageDlg)operator(()string<delimiter(')content(Delete HKU\\Software\\Sisyphus ?)delimiter(')>operator(,)
-           ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(],) integer(0)operator(\)\)) reserved(then)
-            ident(Reg)operator(.)ident(DeleteKey)operator(()string<delimiter(')content(Sisyphus)delimiter(')>operator(\);)
+           ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(])operator(,) integer(0)operator(\))operator(\)) reserved(then)
+            ident(Reg)operator(.)ident(DeleteKey)operator(()string<delimiter(')content(Sisyphus)delimiter(')>operator(\))operator(;)
 
           reserved(if) ident(Reg)operator(.)ident(KeyExists)operator(()string<delimiter(')content(Spy)delimiter(')>operator(\))
            reserved(and) operator(()ident(mrYes)operator(=)ident(MessageDlg)operator(()string<delimiter(')content(Delete HKU\\Software\\Spy ?)delimiter(')>operator(,)
-           ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(],) integer(0)operator(\)\)) reserved(then)
-            ident(Reg)operator(.)ident(DeleteKey)operator(()string<delimiter(')content(Spy)delimiter(')>operator(\);)
+           ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(])operator(,) integer(0)operator(\))operator(\)) reserved(then)
+            ident(Reg)operator(.)ident(DeleteKey)operator(()string<delimiter(')content(Spy)delimiter(')>operator(\))operator(;)
 
           reserved(if) ident(Reg)operator(.)ident(KeyExists)operator(()string<delimiter(')content(View)delimiter(')>operator(\))
            reserved(and) operator(()ident(mrYes)operator(=)ident(MessageDlg)operator(()string<delimiter(')content(Delete HKU\\Software\\View ?)delimiter(')>operator(,)
-           ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(],) integer(0)operator(\)\)) reserved(then)
-            ident(Reg)operator(.)ident(DeleteKey)operator(()string<delimiter(')content(View)delimiter(')>operator(\);)
+           ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(])operator(,) integer(0)operator(\))operator(\)) reserved(then)
+            ident(Reg)operator(.)ident(DeleteKey)operator(()string<delimiter(')content(View)delimiter(')>operator(\))operator(;)
         reserved(end)operator(;)
 
         ident(mrYesToAll)operator(:) reserved(begin)
-          ident(Reg)operator(.)ident(DeleteKey)operator(()string<delimiter(')content(Main)delimiter(')>operator(\);)
-          ident(Reg)operator(.)ident(DeleteKey)operator(()string<delimiter(')content(Sisyphus)delimiter(')>operator(\);)
-          ident(Reg)operator(.)ident(DeleteKey)operator(()string<delimiter(')content(Spy)delimiter(')>operator(\);)
-          ident(Reg)operator(.)ident(DeleteKey)operator(()string<delimiter(')content(View)delimiter(')>operator(\);)
+          ident(Reg)operator(.)ident(DeleteKey)operator(()string<delimiter(')content(Main)delimiter(')>operator(\))operator(;)
+          ident(Reg)operator(.)ident(DeleteKey)operator(()string<delimiter(')content(Sisyphus)delimiter(')>operator(\))operator(;)
+          ident(Reg)operator(.)ident(DeleteKey)operator(()string<delimiter(')content(Spy)delimiter(')>operator(\))operator(;)
+          ident(Reg)operator(.)ident(DeleteKey)operator(()string<delimiter(')content(View)delimiter(')>operator(\))operator(;)
         reserved(end)operator(;)
 
         ident(mrNo)operator(:) reserved(begin)
           ident(TreeWin)operator(.)ident(SetFocus)operator(;)
-          ident(GotoKey)operator(()string<delimiter(')content(HKCU\\Software\\)delimiter(')>operator(\);)
+          ident(GotoKey)operator(()string<delimiter(')content(HKCU\\Software\\)delimiter(')>operator(\))operator(;)
         reserved(end)operator(;)
       reserved(end)operator(;)
     reserved(end)operator(;)
@@ -2758,42 +2758,42 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(BackupRegistryscanreg1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(BackupRegistryscanreg1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(ExecFile)operator(()string<delimiter(')content(scanreg)delimiter(')>operator(\);)
+  ident(ExecFile)operator(()string<delimiter(')content(scanreg)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(Username1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(Username1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(ShowMessage)operator(()ident(UserName)operator(\);)
+  ident(ShowMessage)operator(()ident(UserName)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(ToDoMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(ToDoMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(NotePad)operator(()ident(PlutoDir) operator(+) string<delimiter(')content(ToDo.txt)delimiter(')>operator(\);)
+  ident(NotePad)operator(()ident(PlutoDir) operator(+) string<delimiter(')content(ToDo.txt)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(MailLinkMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(MailLinkMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(MailTo)operator(()ident(TMenuItem)operator(()ident(Sender)operator(\).)ident(Caption)operator(\);)
+  ident(MailTo)operator(()ident(TMenuItem)operator(()ident(Sender)operator(\))operator(.)ident(Caption)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(IjustwantCONTACT1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(IjustwantCONTACT1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(MailTo)operator(()string<delimiter(')content(pluto@cYcnus.de)delimiter(')>operator(\);)
+  ident(MailTo)operator(()string<delimiter(')content(pluto@cYcnus.de)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(ExternalHexEditMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(ExternalHexEditMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(ExecFile)operator(()ident(PrefWin)operator(.)ident(ExternalHexEditE)operator(.)ident(Text)operator(\);)
+  ident(ExecFile)operator(()ident(PrefWin)operator(.)ident(ExternalHexEditE)operator(.)ident(Text)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(AnotherPluto1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(AnotherPluto1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(ExecFile)operator(()ident(Application)operator(.)ident(ExeName)operator(\);)
+  ident(ExecFile)operator(()ident(Application)operator(.)ident(ExeName)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(Path1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(Path1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
 preprocessor({$IFDEF UNIKEY})
   ident(UserUniPath) operator(:=) ident(InputBox)operator(()string<delimiter(')content(UniKey)delimiter(')>operator(,) string<delimiter(')content(Input an UniPath.)delimiter(')> operator(+) ident(EOL) operator(+)
@@ -2804,19 +2804,19 @@ preprocessor({$IFDEF UNIKEY})
     string<delimiter(')content(Reg: HKCU)delimiter(')> operator(+) ident(EOL) operator(+)
     string<delimiter(')content(Ini <)delimiter(')> operator(+) ident(MyDir) operator(+) string<delimiter(')content(pluto.ini>:)delimiter(')> operator(+) ident(EOL) operator(+)
     string<delimiter(')content(Ini <)delimiter(')> operator(+) ident(MyDir) operator(+) string<delimiter(')content(pluto.ini>:[View])delimiter(')> operator(+) ident(EOL)operator(,)
-    ident(UserUniPath)operator(\);)
+    ident(UserUniPath)operator(\))operator(;)
 preprocessor({$ENDIF})
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(RegisterPlugIns1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(RegisterPlugIns1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
 preprocessor({$IFDEF UNIKEY})
   reserved(if) ident(UniPluginOD)operator(.)ident(Execute) reserved(then)
-    ident(RegisterUniClass)operator(()ident(UniPluginOD)operator(.)ident(FileName)operator(\);)
+    ident(RegisterUniClass)operator(()ident(UniPluginOD)operator(.)ident(FileName)operator(\))operator(;)
 preprocessor({$ENDIF})
 reserved(end)operator(;)
   
-reserved(procedure) ident(TMainWin)operator(.)ident(FormResize)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(FormResize)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(ArrangeIcons)operator(;)
   ident(ArrangePlutoStyle)operator(;)
@@ -2825,47 +2825,47 @@ reserved(begin)
   ident(TreeWin)operator(.)ident(WindowState) operator(:=) ident(wsNormal)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(SwapLM_CUBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(SwapLM_CUBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(Path)operator(:) reserved(string)operator(;)
 reserved(begin)
-  ident(Path) operator(:=) ident(TraceKey)operator(()ident(PathE)operator(.)ident(Text)operator(,) ident(uhShortcuts)operator(\);)
+  ident(Path) operator(:=) ident(TraceKey)operator(()ident(PathE)operator(.)ident(Text)operator(,) ident(uhShortcuts)operator(\))operator(;)
   reserved(if) ident(SwapHKU_HKLM)operator(()ident(Path)operator(\)) reserved(then) reserved(begin)
     ident(PathE)operator(.)ident(Text) operator(:=) ident(Path)operator(;)
     ident(UserGotoKey)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(ShowLoadreport1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(ShowLoadreport1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(NotePad)operator(()ident(MyDir) operator(+) string<delimiter(')content(loadreport.txt)delimiter(')>operator(\);)
+  ident(NotePad)operator(()ident(MyDir) operator(+) string<delimiter(')content(loadreport.txt)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(KillPluto1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(KillPluto1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(Application)operator(.)ident(Terminate)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(ShowPlatform1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(ShowPlatform1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(ShowMessage)operator(()ident(Format)operator(()string<delimiter(')content(Platform: %s)delimiter(')> operator(+) ident(EOL) operator(+)
     string<delimiter(')content(Versin: %d.%d Build %d)delimiter(')>operator(,)
-    operator([)ident(PlatformStrings)operator([)ident(Win32Platform)operator(],)
-     ident(Win32MajorVersion)operator(,) ident(Win32MinorVersion)operator(,) ident(Win32BuildNumber)operator(]\)\);)
+    operator([)ident(PlatformStrings)operator([)ident(Win32Platform)operator(])operator(,)
+     ident(Win32MajorVersion)operator(,) ident(Win32MinorVersion)operator(,) ident(Win32BuildNumber)operator(])operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(MSConfig1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(MSConfig1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(ExecFile)operator(()string<delimiter(')content(msconfig)delimiter(')>operator(\);)
+  ident(ExecFile)operator(()string<delimiter(')content(msconfig)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(TimetoRelaxMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(TimetoRelaxMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(RelaxFile)operator(:) reserved(string)operator(;)
 reserved(begin)
   reserved(with) ident(PlutoKey)operator(.)ident(GetKey)operator(()string<delimiter(')content(Main)delimiter(')>operator(\)) reserved(do)
     reserved(try)
-      ident(RelaxFile) operator(:=) ident(ReadString)operator(()string<delimiter(')content(Relax)delimiter(')>operator(\);)
+      ident(RelaxFile) operator(:=) ident(ReadString)operator(()string<delimiter(')content(Relax)delimiter(')>operator(\))operator(;)
     reserved(finally)
       ident(Free)operator(;)
     reserved(end)operator(;)
@@ -2882,32 +2882,32 @@ reserved(begin)
       string<delimiter(')content(And don)char('')content(t forget:)delimiter(')> operator(+) ident(EOL) operator(+)
       string<delimiter(')content(R E L A X ! ! !)delimiter(')>operator(\))
   reserved(else)
-    ident(ExecFile)operator(()ident(RelaxFile)operator(\);)
+    ident(ExecFile)operator(()ident(RelaxFile)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(OnSisyChange)operator(()ident(Sender)operator(:) ident(TSisyThread)operator(;) ident(Change)operator(:) ident(TSisyChange)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(OnSisyChange)operator(()ident(Sender)operator(:) ident(TSisyThread)operator(;) ident(Change)operator(:) ident(TSisyChange)operator(\))operator(;)
 
   reserved(procedure) ident(UpdateValue)operator(;)
   reserved(var)
     ident(Reg)operator(:) ident(TXRegistry)operator(;)
     ident(Index)operator(:) ident(Integer)operator(;)
   reserved(begin)
-    reserved(if) reserved(not) ident(SameRegPath)operator(()ident(ExRegFullKey)operator(()ident(Change)operator(.)ident(Path)operator(\),) ident(PathOfNode)operator(()ident(RegTV)operator(.)ident(Selected)operator(\)\)) reserved(then)
+    reserved(if) reserved(not) ident(SameRegPath)operator(()ident(ExRegFullKey)operator(()ident(Change)operator(.)ident(Path)operator(\))operator(,) ident(PathOfNode)operator(()ident(RegTV)operator(.)ident(Selected)operator(\))operator(\)) reserved(then)
       ident(Exit)operator(;)
 
     ident(Reg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(;)
     reserved(try)
-      ident(Reg)operator(.)ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(ExRegRoot)operator(()ident(Change)operator(.)ident(Path)operator(\)\);)
-      reserved(if) ident(Reg)operator(.)ident(OpenKey)operator(()ident(ExRegKey)operator(()ident(Change)operator(.)ident(Path)operator(\)\)) reserved(then)
+      ident(Reg)operator(.)ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(ExRegRoot)operator(()ident(Change)operator(.)ident(Path)operator(\))operator(\))operator(;)
+      reserved(if) ident(Reg)operator(.)ident(OpenKey)operator(()ident(ExRegKey)operator(()ident(Change)operator(.)ident(Path)operator(\))operator(\)) reserved(then)
         reserved(with) ident(ValuesWin) reserved(do) reserved(begin)
-          ident(Index) operator(:=) ident(FindItemByRealName)operator(()ident(ExRegValue)operator(()ident(Change)operator(.)ident(Path)operator(\)\);)
+          ident(Index) operator(:=) ident(FindItemByRealName)operator(()ident(ExRegValue)operator(()ident(Change)operator(.)ident(Path)operator(\))operator(\))operator(;)
           reserved(if) ident(Index) operator(>) operator(-)integer(1) reserved(then) reserved(begin)
             reserved(if) ident(Change)operator(.)ident(Typ) operator(=) ident(cValueMinus) reserved(then)
               ident(ValueList)operator(.)ident(Items)operator(.)ident(Delete)operator(()ident(Index)operator(\))
             reserved(else) reserved(if) ident(Change)operator(.)ident(Typ) operator(=) ident(cContextChange) reserved(then)
-              ident(UpdateValue)operator(()ident(Reg)operator(,) ident(ValueList)operator(.)ident(Items)operator([)ident(Index)operator(]\);)
+              ident(UpdateValue)operator(()ident(Reg)operator(,) ident(ValueList)operator(.)ident(Items)operator([)ident(Index)operator(])operator(\))operator(;)
           reserved(end) reserved(else) reserved(if) ident(Change)operator(.)ident(Typ) operator(=) ident(cValuePlus) reserved(then)
-            ident(AddValue)operator(()ident(Reg)operator(,) ident(ExRegValue)operator(()ident(Change)operator(.)ident(Path)operator(\)\);)
+            ident(AddValue)operator(()ident(Reg)operator(,) ident(ExRegValue)operator(()ident(Change)operator(.)ident(Path)operator(\))operator(\))operator(;)
         reserved(end)operator(;)
     reserved(finally)
       ident(Reg)operator(.)ident(Free)operator(;)
@@ -2915,66 +2915,66 @@ reserved(procedure) ident(TMainWin)operator(.)ident(OnSisyChange)operator(()iden
   reserved(end)operator(;)
 
 reserved(begin)
-  ident(AddHint)operator(()ident(Sender)operator(.)ident(Name) operator(+) string<delimiter(')content( notified )delimiter(')> operator(+) ident(Change)operator(.)ident(Path)operator(\);)
+  ident(AddHint)operator(()ident(Sender)operator(.)ident(Name) operator(+) string<delimiter(')content( notified )delimiter(')> operator(+) ident(Change)operator(.)ident(Path)operator(\))operator(;)
   reserved(if) ident(Change)operator(.)ident(Typ) reserved(in) operator([)ident(cValueMinus)operator(,) ident(cValuePlus)operator(,) ident(cContextChange)operator(]) reserved(then)
     ident(UpdateValue)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(OnSisyValuePlus)operator(()ident(Sender)operator(:) ident(TSisyThread)operator(;) ident(Change)operator(:) ident(TSisyChange)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(OnSisyValuePlus)operator(()ident(Sender)operator(:) ident(TSisyThread)operator(;) ident(Change)operator(:) ident(TSisyChange)operator(\))operator(;)
 reserved(var)
   ident(Reg)operator(:) ident(TXRegistry)operator(;)
 reserved(begin)
-  reserved(if) reserved(not) ident(SameRegPath)operator(()ident(ExRegFullKey)operator(()ident(Change)operator(.)ident(Path)operator(\),) ident(PathOfNode)operator(()ident(RegTV)operator(.)ident(Selected)operator(\)\)) reserved(then)
+  reserved(if) reserved(not) ident(SameRegPath)operator(()ident(ExRegFullKey)operator(()ident(Change)operator(.)ident(Path)operator(\))operator(,) ident(PathOfNode)operator(()ident(RegTV)operator(.)ident(Selected)operator(\))operator(\)) reserved(then)
     ident(Exit)operator(;)
 
   ident(Reg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(;)
   reserved(try)
-    ident(Reg)operator(.)ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(ExRegRoot)operator(()ident(Change)operator(.)ident(Path)operator(\)\);)
-    reserved(if) ident(Reg)operator(.)ident(OpenKey)operator(()ident(ExRegKey)operator(()ident(Change)operator(.)ident(Path)operator(\)\)) reserved(then)
-      ident(ValuesWin)operator(.)ident(AddValue)operator(()ident(Reg)operator(,) ident(ExRegValue)operator(()ident(Change)operator(.)ident(Path)operator(\)\);)
+    ident(Reg)operator(.)ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(ExRegRoot)operator(()ident(Change)operator(.)ident(Path)operator(\))operator(\))operator(;)
+    reserved(if) ident(Reg)operator(.)ident(OpenKey)operator(()ident(ExRegKey)operator(()ident(Change)operator(.)ident(Path)operator(\))operator(\)) reserved(then)
+      ident(ValuesWin)operator(.)ident(AddValue)operator(()ident(Reg)operator(,) ident(ExRegValue)operator(()ident(Change)operator(.)ident(Path)operator(\))operator(\))operator(;)
   reserved(finally)
     ident(Reg)operator(.)ident(Free)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(OnSisyValueMinus)operator(()ident(Sender)operator(:) ident(TSisyThread)operator(;) ident(Change)operator(:) ident(TSisyChange)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(OnSisyValueMinus)operator(()ident(Sender)operator(:) ident(TSisyThread)operator(;) ident(Change)operator(:) ident(TSisyChange)operator(\))operator(;)
 reserved(var)
   ident(Reg)operator(:) ident(TXRegistry)operator(;)
   ident(Index)operator(:) ident(Integer)operator(;)
 reserved(begin)
-  reserved(if) reserved(not) ident(SameRegPath)operator(()ident(ExRegFullKey)operator(()ident(Change)operator(.)ident(Path)operator(\),) ident(PathOfNode)operator(()ident(RegTV)operator(.)ident(Selected)operator(\)\)) reserved(then)
+  reserved(if) reserved(not) ident(SameRegPath)operator(()ident(ExRegFullKey)operator(()ident(Change)operator(.)ident(Path)operator(\))operator(,) ident(PathOfNode)operator(()ident(RegTV)operator(.)ident(Selected)operator(\))operator(\)) reserved(then)
     ident(Exit)operator(;)
 
   ident(Reg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(;)
   reserved(try)
-    ident(Reg)operator(.)ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(ExRegRoot)operator(()ident(Change)operator(.)ident(Path)operator(\)\);)
-    reserved(if) ident(Reg)operator(.)ident(OpenKey)operator(()ident(ExRegKey)operator(()ident(Change)operator(.)ident(Path)operator(\)\)) reserved(then)
+    ident(Reg)operator(.)ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(ExRegRoot)operator(()ident(Change)operator(.)ident(Path)operator(\))operator(\))operator(;)
+    reserved(if) ident(Reg)operator(.)ident(OpenKey)operator(()ident(ExRegKey)operator(()ident(Change)operator(.)ident(Path)operator(\))operator(\)) reserved(then)
       reserved(with) ident(ValuesWin) reserved(do) reserved(begin)
-        ident(Index) operator(:=) ident(FindItemByRealName)operator(()ident(ExRegValue)operator(()ident(Change)operator(.)ident(Path)operator(\)\);)
+        ident(Index) operator(:=) ident(FindItemByRealName)operator(()ident(ExRegValue)operator(()ident(Change)operator(.)ident(Path)operator(\))operator(\))operator(;)
         reserved(if) ident(Index) operator(>) operator(-)integer(1) reserved(then)
-          ident(ValueList)operator(.)ident(Items)operator(.)ident(Delete)operator(()ident(Index)operator(\);)
+          ident(ValueList)operator(.)ident(Items)operator(.)ident(Delete)operator(()ident(Index)operator(\))operator(;)
       reserved(end)operator(;)
   reserved(finally)
     ident(Reg)operator(.)ident(Free)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TMainWin)operator(.)ident(OnSisyContextChange)operator(()ident(Sender)operator(:) ident(TSisyThread)operator(;) ident(Change)operator(:) ident(TSisyChange)operator(\);)
+reserved(procedure) ident(TMainWin)operator(.)ident(OnSisyContextChange)operator(()ident(Sender)operator(:) ident(TSisyThread)operator(;) ident(Change)operator(:) ident(TSisyChange)operator(\))operator(;)
 reserved(var)
   ident(Reg)operator(:) ident(TXRegistry)operator(;)
   ident(Index)operator(:) ident(Integer)operator(;)
 reserved(begin)
-  reserved(if) reserved(not) ident(SameRegPath)operator(()ident(ExRegFullKey)operator(()ident(Change)operator(.)ident(Path)operator(\),) ident(PathOfNode)operator(()ident(RegTV)operator(.)ident(Selected)operator(\)\)) reserved(then)
+  reserved(if) reserved(not) ident(SameRegPath)operator(()ident(ExRegFullKey)operator(()ident(Change)operator(.)ident(Path)operator(\))operator(,) ident(PathOfNode)operator(()ident(RegTV)operator(.)ident(Selected)operator(\))operator(\)) reserved(then)
     ident(Exit)operator(;)
 
   ident(Reg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(;)
   reserved(try)
-    ident(Reg)operator(.)ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(ExRegRoot)operator(()ident(Change)operator(.)ident(Path)operator(\)\);)
-    reserved(if) ident(Reg)operator(.)ident(OpenKey)operator(()ident(ExRegKey)operator(()ident(Change)operator(.)ident(Path)operator(\)\)) reserved(then)
+    ident(Reg)operator(.)ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(ExRegRoot)operator(()ident(Change)operator(.)ident(Path)operator(\))operator(\))operator(;)
+    reserved(if) ident(Reg)operator(.)ident(OpenKey)operator(()ident(ExRegKey)operator(()ident(Change)operator(.)ident(Path)operator(\))operator(\)) reserved(then)
       reserved(with) ident(ValuesWin) reserved(do) reserved(begin)
-        ident(Index) operator(:=) ident(FindItemByRealName)operator(()ident(ExRegValue)operator(()ident(Change)operator(.)ident(Path)operator(\)\);)
+        ident(Index) operator(:=) ident(FindItemByRealName)operator(()ident(ExRegValue)operator(()ident(Change)operator(.)ident(Path)operator(\))operator(\))operator(;)
         reserved(if) ident(Index) operator(>) operator(-)integer(1) reserved(then)
-          ident(UpdateValue)operator(()ident(Reg)operator(,) ident(ValueList)operator(.)ident(Items)operator([)ident(Index)operator(]\);)
+          ident(UpdateValue)operator(()ident(Reg)operator(,) ident(ValueList)operator(.)ident(Items)operator([)ident(Index)operator(])operator(\))operator(;)
       reserved(end)operator(;)
   reserved(finally)
     ident(Reg)operator(.)ident(Free)operator(;)
@@ -3080,44 +3080,44 @@ reserved(type)
     ident(DefaultB)operator(:) ident(TButton)operator(;)
     ident(SaveB)operator(:) ident(TButton)operator(;)
     reserved(procedure) ident(PrefPCDrawTab)operator(()ident(Control)operator(:) ident(TCustomTabControl)operator(;)
-      ident(TabIndex)operator(:) ident(Integer)operator(;) reserved(const) ident(Rect)operator(:) ident(TRect)operator(;) ident(Active)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(PrefHostLoaded)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(StandardPreviewChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(DataPreviewChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(UserNameEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+      ident(TabIndex)operator(:) ident(Integer)operator(;) reserved(const) ident(Rect)operator(:) ident(TRect)operator(;) ident(Active)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(PrefHostLoaded)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(StandardPreviewChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(DataPreviewChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(UserNameEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
     reserved(procedure) ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-      ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(FormDeactivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+      ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(FormDeactivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
     reserved(procedure) ident(PrefValuesPCDrawTab)operator(()ident(Control)operator(:) ident(TCustomTabControl)operator(;)
-      ident(TabIndex)operator(:) ident(Integer)operator(;) reserved(const) ident(Rect)operator(:) ident(TRect)operator(;) ident(Active)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(ShowDwordAsHexClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(MainPreviewEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(DeActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ReloadBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(RunExternalHexEditBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SelectExternalHexEditBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ExternalHexEditEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(DefaultBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(RegisterAppCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SaveBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(StringPreviewChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ShowTreeViewLinesCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ShowListViewGridCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(DefaultValueNameEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+      ident(TabIndex)operator(:) ident(Integer)operator(;) reserved(const) ident(Rect)operator(:) ident(TRect)operator(;) ident(Active)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(ShowDwordAsHexClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(MainPreviewEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(DeActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ReloadBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(RunExternalHexEditBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SelectExternalHexEditBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ExternalHexEditEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(DefaultBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(RegisterAppCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SaveBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(StringPreviewChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ShowTreeViewLinesCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ShowListViewGridCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(DefaultValueNameEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
     reserved(procedure) ident(LoadPrefs)operator(;)
-    reserved(procedure) ident(UseExtendedModelCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(IntegrationPageShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(GotoPlutoKeyBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(KeysSingleClickCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ValuesSingleClickCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(QuotersEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SplashScreenCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(UseExtendedModelCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(IntegrationPageShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(GotoPlutoKeyBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(KeysSingleClickCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ValuesSingleClickCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(QuotersEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SplashScreenCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
     reserved(procedure) ident(SaveBMouseMove)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,)
-      ident(Y)operator(:) ident(Integer)operator(\);)
+      ident(Y)operator(:) ident(Integer)operator(\))operator(;)
   directive(public)
     ident(StringQuoterBegin)operator(,) ident(StringQuoterEnd)operator(:) reserved(string)operator(;)
   reserved(end)operator(;)
@@ -3133,13 +3133,13 @@ reserved(uses)
 preprocessor({$R *.dfm})
 
 reserved(procedure) ident(TPrefWin)operator(.)ident(PrefPCDrawTab)operator(()ident(Control)operator(:) ident(TCustomTabControl)operator(;)
-  ident(TabIndex)operator(:) ident(Integer)operator(;) reserved(const) ident(Rect)operator(:) ident(TRect)operator(;) ident(Active)operator(:) ident(Boolean)operator(\);)
+  ident(TabIndex)operator(:) ident(Integer)operator(;) reserved(const) ident(Rect)operator(:) ident(TRect)operator(;) ident(Active)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(var)
   ident(PC)operator(:) ident(TPageControl)operator(;)
   ident(Page)operator(:) ident(TTabSheet)operator(;)
 reserved(begin)
-  ident(PC) operator(:=) ident(TPageControl)operator(()ident(Control)operator(\);)
-  ident(Page) operator(:=) ident(PC)operator(.)ident(Pages)operator([)ident(TabIndex)operator(];)
+  ident(PC) operator(:=) ident(TPageControl)operator(()ident(Control)operator(\))operator(;)
+  ident(Page) operator(:=) ident(PC)operator(.)ident(Pages)operator([)ident(TabIndex)operator(])operator(;)
   reserved(with) ident(PC)operator(.)ident(Canvas)operator(.)ident(Font) reserved(do) reserved(begin)
     reserved(if) ident(Page)operator(.)ident(Caption) operator(=) string<delimiter(')content(Common)delimiter(')> reserved(then)
       ident(Color) operator(:=) ident(clWhite)
@@ -3157,30 +3157,30 @@ reserved(begin)
 
   reserved(with) ident(PC)operator(.)ident(Canvas) reserved(do)
     reserved(if) ident(Active) reserved(then) reserved(begin)
-      ident(Font)operator(.)ident(Style) operator(:=) operator([)ident(fsBold)operator(];)
+      ident(Font)operator(.)ident(Style) operator(:=) operator([)ident(fsBold)operator(])operator(;)
       ident(Brush)operator(.)ident(Color) operator(:=) ident(clDarkGray)operator(;)
-      ident(FillRect)operator(()ident(Rect)operator(\);)
-      ident(TextOut)operator(()ident(Rect)operator(.)ident(Left) operator(+) integer(5)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(3)operator(,) ident(Page)operator(.)ident(Caption)operator(\);)
+      ident(FillRect)operator(()ident(Rect)operator(\))operator(;)
+      ident(TextOut)operator(()ident(Rect)operator(.)ident(Left) operator(+) integer(5)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(3)operator(,) ident(Page)operator(.)ident(Caption)operator(\))operator(;)
     reserved(end) reserved(else) reserved(begin)
-      ident(Font)operator(.)ident(Style) operator(:=) operator([];)
+      ident(Font)operator(.)ident(Style) operator(:=) operator([)operator(])operator(;)
       ident(Brush)operator(.)ident(Color) operator(:=) ident(clDarkGray)operator(;)
-      ident(FillRect)operator(()ident(Rect)operator(\);)
-      ident(TextOut)operator(()ident(Rect)operator(.)ident(Left) operator(+) integer(3)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(2)operator(,) ident(Page)operator(.)ident(Caption)operator(\);)
+      ident(FillRect)operator(()ident(Rect)operator(\))operator(;)
+      ident(TextOut)operator(()ident(Rect)operator(.)ident(Left) operator(+) integer(3)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(2)operator(,) ident(Page)operator(.)ident(Caption)operator(\))operator(;)
     reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(PrefHostLoaded)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(PrefHostLoaded)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(PrefHost)operator(.)ident(KeyName) operator(:=) ident(PlutoUniPath)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(StandardPreviewChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(StandardPreviewChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Started) reserved(then)
     ident(RegTV)operator(.)ident(Repaint)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(DataPreviewChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(DataPreviewChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) reserved(not) ident(Started) reserved(then)
     ident(Exit)operator(;)
@@ -3189,45 +3189,45 @@ reserved(begin)
   ident(RegTV)operator(.)ident(Repaint)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(UserNameEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(UserNameEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(StatusBar)operator(.)ident(Panels)operator([)integer(0)operator(].)ident(Text) operator(:=) ident(MainWin)operator(.)ident(Greeting)operator(;)
+  ident(StatusBar)operator(.)ident(Panels)operator([)integer(0)operator(])operator(.)ident(Text) operator(:=) ident(MainWin)operator(.)ident(Greeting)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TPrefWin)operator(.)ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Key) operator(=) ident(VK_ESCAPE) reserved(then)
     ident(Close)operator(;)
     
   reserved(if) ident(Key) operator(=) ident(VK_SCROLL) reserved(then)
-    ident(MainWin)operator(.)ident(FormKeyDown)operator(()ident(Sender)operator(,) ident(Key)operator(,) ident(Shift)operator(\);)
+    ident(MainWin)operator(.)ident(FormKeyDown)operator(()ident(Sender)operator(,) ident(Key)operator(,) ident(Shift)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(FormDeactivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(FormDeactivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(ActiveControl)operator(.)ident(Tag) operator(=) ident(EditControlFlag) reserved(then)
-    ident(DeActivateThis)operator(()ident(ActiveControl)operator(\);)
+    ident(DeActivateThis)operator(()ident(ActiveControl)operator(\))operator(;)
 
   ident(AlphaBlendValue) operator(:=) integer(127)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(FormActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(FormActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Started) reserved(and) operator(()ident(ActiveControl)operator(.)ident(Tag) operator(=) ident(EditControlFlag)operator(\)) reserved(then)
-    ident(ActivateThis)operator(()ident(ActiveControl)operator(\);)
+    ident(ActivateThis)operator(()ident(ActiveControl)operator(\))operator(;)
 
   ident(AlphaBlendValue) operator(:=) integer(255)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TPrefWin)operator(.)ident(PrefValuesPCDrawTab)operator(()ident(Control)operator(:) ident(TCustomTabControl)operator(;)
-  ident(TabIndex)operator(:) ident(Integer)operator(;) reserved(const) ident(Rect)operator(:) ident(TRect)operator(;) ident(Active)operator(:) ident(Boolean)operator(\);)
+  ident(TabIndex)operator(:) ident(Integer)operator(;) reserved(const) ident(Rect)operator(:) ident(TRect)operator(;) ident(Active)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(var)
   ident(PC)operator(:) ident(TPageControl)operator(;)
   ident(Page)operator(:) ident(TTabSheet)operator(;)
 reserved(begin)
-  ident(PC) operator(:=) ident(TPageControl)operator(()ident(Control)operator(\);)
-  ident(Page) operator(:=) ident(PC)operator(.)ident(Pages)operator([)ident(TabIndex)operator(];)
+  ident(PC) operator(:=) ident(TPageControl)operator(()ident(Control)operator(\))operator(;)
+  ident(Page) operator(:=) ident(PC)operator(.)ident(Pages)operator([)ident(TabIndex)operator(])operator(;)
   reserved(with) ident(PC)operator(.)ident(Canvas)operator(.)ident(Font) reserved(do) reserved(begin)
     reserved(if) ident(Page) operator(=) ident(StringPage) reserved(then)
       ident(Color) operator(:=) ident(clBrightRed)
@@ -3241,100 +3241,100 @@ reserved(begin)
 
   reserved(with) ident(PC)operator(.)ident(Canvas) reserved(do)
     reserved(if) ident(Active) reserved(then) reserved(begin)
-      ident(Font)operator(.)ident(Style) operator(:=) operator([)ident(fsBold)operator(];)
+      ident(Font)operator(.)ident(Style) operator(:=) operator([)ident(fsBold)operator(])operator(;)
       ident(Brush)operator(.)ident(Color) operator(:=) ident(clDarkGray)operator(;)
-      ident(FillRect)operator(()ident(Rect)operator(\);)
-      ident(TextOut)operator(()ident(Rect)operator(.)ident(Left) operator(+) integer(18) operator(+) integer(5)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(3)operator(,) ident(Page)operator(.)ident(Caption)operator(\);)
-      ident(PC)operator(.)ident(Images)operator(.)ident(Draw)operator(()ident(PC)operator(.)ident(Canvas)operator(,) ident(Rect)operator(.)ident(Left) operator(+) integer(4)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(2)operator(,) ident(Page)operator(.)ident(ImageIndex)operator(\);)
+      ident(FillRect)operator(()ident(Rect)operator(\))operator(;)
+      ident(TextOut)operator(()ident(Rect)operator(.)ident(Left) operator(+) integer(18) operator(+) integer(5)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(3)operator(,) ident(Page)operator(.)ident(Caption)operator(\))operator(;)
+      ident(PC)operator(.)ident(Images)operator(.)ident(Draw)operator(()ident(PC)operator(.)ident(Canvas)operator(,) ident(Rect)operator(.)ident(Left) operator(+) integer(4)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(2)operator(,) ident(Page)operator(.)ident(ImageIndex)operator(\))operator(;)
     reserved(end) reserved(else) reserved(begin)
-      ident(Font)operator(.)ident(Style) operator(:=) operator([];)
+      ident(Font)operator(.)ident(Style) operator(:=) operator([)operator(])operator(;)
       ident(Brush)operator(.)ident(Color) operator(:=) ident(clDarkGray)operator(;)
-      ident(FillRect)operator(()ident(Rect)operator(\);)
-      ident(TextOut)operator(()ident(Rect)operator(.)ident(Left) operator(+) integer(18) operator(+) integer(3)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(2)operator(,) ident(Page)operator(.)ident(Caption)operator(\);)
-      ident(PC)operator(.)ident(Images)operator(.)ident(Draw)operator(()ident(PC)operator(.)ident(Canvas)operator(,) ident(Rect)operator(.)ident(Left) operator(+) integer(1)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(1)operator(,) ident(Page)operator(.)ident(ImageIndex)operator(\);)
+      ident(FillRect)operator(()ident(Rect)operator(\))operator(;)
+      ident(TextOut)operator(()ident(Rect)operator(.)ident(Left) operator(+) integer(18) operator(+) integer(3)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(2)operator(,) ident(Page)operator(.)ident(Caption)operator(\))operator(;)
+      ident(PC)operator(.)ident(Images)operator(.)ident(Draw)operator(()ident(PC)operator(.)ident(Canvas)operator(,) ident(Rect)operator(.)ident(Left) operator(+) integer(1)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(1)operator(,) ident(Page)operator(.)ident(ImageIndex)operator(\))operator(;)
     reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(ShowDwordAsHexClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(ShowDwordAsHexClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(DWordPreviewL)operator(.)ident(Caption) operator(:=) string<delimiter(')content(Preview: )delimiter(')> operator(+) ident(ValuesU)operator(.)ident(DataPreviewOfContext)operator(()
-    ident(RegContext)operator(()ident(rdCardinal)operator(,) ident(Reverse)operator(()ident(ByteAOfHex)operator(()ident(HexOfCard)operator(()integer(1234567890)operator(,) integer(8)operator(\)\)\)\)\);)
-  ident(DataPreviewChange)operator(()ident(Self)operator(\);)
+    ident(RegContext)operator(()ident(rdCardinal)operator(,) ident(Reverse)operator(()ident(ByteAOfHex)operator(()ident(HexOfCard)operator(()integer(1234567890)operator(,) integer(8)operator(\))operator(\))operator(\))operator(\))operator(\))operator(;)
+  ident(DataPreviewChange)operator(()ident(Self)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(MainPreviewEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(MainPreviewEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(MainPreviewE)operator(.)ident(Text) operator(=) string<delimiter(')delimiter(')> reserved(then)
     ident(MainPreviewCB)operator(.)ident(Caption) operator(:=) string<delimiter(')content(&Show Preview for Default Value)delimiter(')>
   reserved(else)
     ident(MainPreviewCB)operator(.)ident(Caption) operator(:=) string<delimiter(')content(&Show Preview for )delimiter(')> operator(+)
-      ident(Quote)operator(()ident(MainPreviewE)operator(.)ident(Text)operator(\);)
+      ident(Quote)operator(()ident(MainPreviewE)operator(.)ident(Text)operator(\))operator(;)
 
-  ident(StandardPreviewChange)operator(()ident(Self)operator(\);)
+  ident(StandardPreviewChange)operator(()ident(Self)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(UserNameE)operator(.)ident(DefaultValue) operator(:=) ident(UserName)operator(;)
-  ident(MainPreviewEChange)operator(()ident(Self)operator(\);)
+  ident(MainPreviewEChange)operator(()ident(Self)operator(\))operator(;)
   ident(PrefPC)operator(.)ident(ActivePageIndex) operator(:=) integer(0)operator(;)
   ident(PrefValuesPC)operator(.)ident(ActivePageIndex) operator(:=) integer(0)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(ActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(ActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(ActivateThis)operator(()ident(Sender)operator(\);)
+  ident(ActivateThis)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(DeActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(DeActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(DeActivateThis)operator(()ident(Sender)operator(\);)
+  ident(DeActivateThis)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(ReloadBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(ReloadBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(LoadPrefs)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(RunExternalHexEditBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(RunExternalHexEditBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(FileName)operator(,) ident(TestValue)operator(:) reserved(string)operator(;)
 reserved(begin)
   ident(FileName) operator(:=) ident(TempDir) operator(+) string<delimiter(')content(~test.bin)delimiter(')>operator(;)
   ident(TestValue) operator(:=) string<delimiter(')content(This is only a test.)delimiter(')> operator(+) ident(EOL) operator(+)
                string<delimiter(')content(Everything seems to be OK.)delimiter(')>operator(;)
-  reserved(if) ident(SaveByteA)operator(()ident(ByteAOfStr)operator(()ident(TestValue)operator(\),) ident(FileName)operator(\)) reserved(then)
+  reserved(if) ident(SaveByteA)operator(()ident(ByteAOfStr)operator(()ident(TestValue)operator(\))operator(,) ident(FileName)operator(\)) reserved(then)
     ident(ExecFileWith)operator(()ident(ExternalHexEditE)operator(.)ident(Text)operator(,) ident(FileName)operator(\))
   reserved(else)
     ident(ShowMessage)operator(()string<delimiter(')content(Could not write into file:)delimiter(')> operator(+) ident(EOL) operator(+)
-                ident(FileName)operator(\);)
+                ident(FileName)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(SelectExternalHexEditBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(SelectExternalHexEditBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(SelectExternalHexEditOD) reserved(do) reserved(begin)
-    ident(InitialDir) operator(:=) ident(ExtractPath)operator(()ident(ExternalHexEditE)operator(.)ident(Text)operator(\);)
-    ident(FileName) operator(:=) ident(ExtractFileName)operator(()ident(ExternalHexEditE)operator(.)ident(Text)operator(\);)
+    ident(InitialDir) operator(:=) ident(ExtractPath)operator(()ident(ExternalHexEditE)operator(.)ident(Text)operator(\))operator(;)
+    ident(FileName) operator(:=) ident(ExtractFileName)operator(()ident(ExternalHexEditE)operator(.)ident(Text)operator(\))operator(;)
     reserved(if) ident(Execute) reserved(and) ident(FileExists)operator(()ident(FileName)operator(\)) reserved(then)
       ident(ExternalHexEditE)operator(.)ident(Text) operator(:=) ident(FileName)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(ExternalHexEditEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(ExternalHexEditEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(RunExternalHexEditB)operator(.)ident(Enabled) operator(:=) ident(FileExists)operator(()ident(ExternalHexEditE)operator(.)ident(Text)operator(\);)
+  ident(RunExternalHexEditB)operator(.)ident(Enabled) operator(:=) ident(FileExists)operator(()ident(ExternalHexEditE)operator(.)ident(Text)operator(\))operator(;)
   reserved(if) ident(Assigned)operator(()ident(WorkWin)operator(\)) reserved(then)
     ident(WorkWin)operator(.)ident(ExternalEditB)operator(.)ident(Enabled) operator(:=) ident(RunExternalHexEditB)operator(.)ident(Enabled)operator(;)
   reserved(if) ident(Assigned)operator(()ident(MainWin)operator(\)) reserved(then)
     ident(MainWin)operator(.)ident(ExternalHexEditMI)operator(.)ident(Enabled) operator(:=) ident(RunExternalHexEditB)operator(.)ident(Enabled)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(DefaultBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(DefaultBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(mrYes)operator(=)ident(MessageDlg)operator(()string<delimiter(')content(Do you really want to reset the preferences)delimiter(')> operator(+) ident(EOL) operator(+)
    string<delimiter(')content(to their defaults?)delimiter(')> operator(+) ident(EOL) operator(+)
-   string<delimiter(')content((This can not be undone.\))delimiter(')>operator(,) ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbCancel)operator(],) integer(0)operator(\)) reserved(then) reserved(begin)
-    ident(CopyFile)operator(()ident(PChar)operator(()ident(PlutoIniFileName)operator(\),) ident(PChar)operator(()ident(PlutoIniFileName) operator(+) string<delimiter(')content(.backup)delimiter(')>operator(\),) ident(False)operator(\);)
+   string<delimiter(')content((This can not be undone.\))delimiter(')>operator(,) ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbCancel)operator(])operator(,) integer(0)operator(\)) reserved(then) reserved(begin)
+    ident(CopyFile)operator(()ident(PChar)operator(()ident(PlutoIniFileName)operator(\))operator(,) ident(PChar)operator(()ident(PlutoIniFileName) operator(+) string<delimiter(')content(.backup)delimiter(')>operator(\))operator(,) ident(False)operator(\))operator(;)
     comment(//PrefHost.KeyName :=  'Ini <' + PlutoIniFileName + '.backup>:';)
     comment(//PrefHost.Save;)
     comment(//PrefHost.KeyName := PlutoUniPath;)
@@ -3342,53 +3342,53 @@ reserved(begin)
    reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(RegisterAppCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(RegisterAppCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(TXRegistry)operator(.)ident(Create) reserved(do)
     reserved(try)
       ident(RootKey) operator(:=) ident(HKLM)operator(;)
-      ident(OpenKey)operator(()string<delimiter(')content(Software\\Microsoft\\Windows\\CurrentVersion\\App Paths)delimiter(')>operator(\);)
+      ident(OpenKey)operator(()string<delimiter(')content(Software\\Microsoft\\Windows\\CurrentVersion\\App Paths)delimiter(')>operator(\))operator(;)
       reserved(if) ident(RegisterAppCB)operator(.)ident(Checked) reserved(then) reserved(begin)
-        ident(OpenKey)operator(()string<delimiter(')content(pluto.exe)delimiter(')>operator(,) ident(True)operator(\);)
-        ident(WriteString)operator(()string<delimiter(')delimiter(')>operator(,) ident(GetFileNew)operator(()ident(Application)operator(.)ident(ExeName)operator(\)\);)
+        ident(OpenKey)operator(()string<delimiter(')content(pluto.exe)delimiter(')>operator(,) ident(True)operator(\))operator(;)
+        ident(WriteString)operator(()string<delimiter(')delimiter(')>operator(,) ident(GetFileNew)operator(()ident(Application)operator(.)ident(ExeName)operator(\))operator(\))operator(;)
       reserved(end) reserved(else)
-        ident(DeleteKey)operator(()string<delimiter(')content(pluto.exe)delimiter(')>operator(\);)
+        ident(DeleteKey)operator(()string<delimiter(')content(pluto.exe)delimiter(')>operator(\))operator(;)
     reserved(finally)
       ident(Free)operator(;)
     reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(SaveBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(SaveBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(PrefHost)operator(.)ident(Save)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(StringPreviewChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(StringPreviewChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(StringPreviewL)operator(.)ident(Caption) operator(:=) string<delimiter(')content(Preview: )delimiter(')> operator(+) ident(ValuesU)operator(.)ident(DataPreviewOfContext)operator(()
-    ident(RegContext)operator(()ident(rdString)operator(,) ident(ByteAOfStr)operator(()string<delimiter(')content(%windir%)delimiter(')>operator(\)\)\);)
-  ident(DataPreviewChange)operator(()ident(Self)operator(\);)
+    ident(RegContext)operator(()ident(rdString)operator(,) ident(ByteAOfStr)operator(()string<delimiter(')content(%windir%)delimiter(')>operator(\))operator(\))operator(\))operator(;)
+  ident(DataPreviewChange)operator(()ident(Self)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(ShowTreeViewLinesCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(ShowTreeViewLinesCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(RegTV) reserved(do) reserved(begin)
     ident(ShowLines) operator(:=) ident(ShowTreeViewLinesCB)operator(.)ident(Checked)operator(;)
     ident(ShowButtons) operator(:=) ident(ShowLines)operator(;)
   reserved(end)operator(;)
-  ident(StandardPreviewChange)operator(()ident(Sender)operator(\);)
+  ident(StandardPreviewChange)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(ShowListViewGridCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(ShowListViewGridCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(ValueList)operator(.)ident(GridLines) operator(:=) ident(ShowListViewGridCB)operator(.)ident(Checked)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(DefaultValueNameEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(DefaultValueNameEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(DefaultValueCaption) operator(:=) ident(DefaultValueNameE)operator(.)ident(Text)operator(;)
   reserved(if) ident(Started) reserved(then)
-    ident(TreeWin)operator(.)ident(RegTVChange)operator(()ident(Self)operator(,) ident(RegTV)operator(.)ident(Selected)operator(\);)
+    ident(TreeWin)operator(.)ident(RegTVChange)operator(()ident(Self)operator(,) ident(RegTV)operator(.)ident(Selected)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TPrefWin)operator(.)ident(LoadPrefs)operator(;)
@@ -3396,46 +3396,46 @@ reserved(begin)
   ident(PrefHost)operator(.)ident(Load)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(UseExtendedModelCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(UseExtendedModelCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(WorkWin)operator(.)ident(MultiStringTypeRG)operator(.)ident(ItemIndex) operator(:=) ident(Integer)operator(()ident(UseExtendedModelCB)operator(.)ident(Checked)operator(\);)
-  ident(DataPreviewChange)operator(()ident(Sender)operator(\);)
+  ident(WorkWin)operator(.)ident(MultiStringTypeRG)operator(.)ident(ItemIndex) operator(:=) ident(Integer)operator(()ident(UseExtendedModelCB)operator(.)ident(Checked)operator(\))operator(;)
+  ident(DataPreviewChange)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(IntegrationPageShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(IntegrationPageShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(TXRegistry)operator(.)ident(Create) reserved(do)
     reserved(try)
       ident(RootKey) operator(:=) ident(HKLM)operator(;)
-      ident(OpenKey)operator(()string<delimiter(')content(Software\\Microsoft\\Windows\\CurrentVersion\\App Paths\\pluto.exe)delimiter(')>operator(\);)
-      ident(RegisterAppCB)operator(.)ident(Checked) operator(:=) ident(SameFileName)operator(()ident(GetFileNew)operator(()ident(ReadString)operator(()string<delimiter(')delimiter(')>operator(\)\),)
-        ident(GetFileNew)operator(()ident(Application)operator(.)ident(ExeName)operator(\)\);)
+      ident(OpenKey)operator(()string<delimiter(')content(Software\\Microsoft\\Windows\\CurrentVersion\\App Paths\\pluto.exe)delimiter(')>operator(\))operator(;)
+      ident(RegisterAppCB)operator(.)ident(Checked) operator(:=) ident(SameFileName)operator(()ident(GetFileNew)operator(()ident(ReadString)operator(()string<delimiter(')delimiter(')>operator(\))operator(\))operator(,)
+        ident(GetFileNew)operator(()ident(Application)operator(.)ident(ExeName)operator(\))operator(\))operator(;)
     reserved(finally)
       ident(Free)operator(;)
     reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(GotoPlutoKeyBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(GotoPlutoKeyBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(MainWin)operator(.)ident(GotoKey)operator(()string<delimiter(')content(HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\App Paths\\pluto.exe)delimiter(')>operator(\);)
+  ident(MainWin)operator(.)ident(GotoKey)operator(()string<delimiter(')content(HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\App Paths\\pluto.exe)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(FormShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(FormShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(PrefHost)operator(.)ident(Load)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(KeysSingleClickCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(KeysSingleClickCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(TreeWin)operator(.)ident(CheckRegTVHotTrack)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(ValuesSingleClickCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(ValuesSingleClickCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(ValuesWin)operator(.)ident(CheckValueListHotTrack)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(QuotersEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(QuotersEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(QBegin)operator(,) ident(QEnd)operator(:) reserved(string)operator(;)
 reserved(begin)
@@ -3443,32 +3443,32 @@ reserved(begin)
     reserved(if) ident(Text) operator(=) string<delimiter(')delimiter(')> reserved(then)
       ident(QBegin) operator(:=) string<delimiter(')delimiter(')>
     reserved(else)
-      ident(QBegin) operator(:=) ident(Text)operator([)integer(1)operator(];)
+      ident(QBegin) operator(:=) ident(Text)operator([)integer(1)operator(])operator(;)
     reserved(if) ident(Length)operator(()ident(Text)operator(\)) operator(<) integer(2) reserved(then)
       ident(QEnd) operator(:=) ident(QBegin)
     reserved(else)
-      ident(QEnd) operator(:=) ident(Text)operator([)integer(2)operator(];)
+      ident(QEnd) operator(:=) ident(Text)operator([)integer(2)operator(])operator(;)
   reserved(end)operator(;)
 
   reserved(if) operator(()ident(QBegin) operator(<>) ident(StringQuoterBegin)operator(\)) reserved(or) operator(()ident(QEnd) operator(<>) ident(StringQuoterEnd)operator(\)) reserved(then) reserved(begin)
     ident(StringQuoterBegin) operator(:=) ident(QBegin)operator(;)
     ident(StringQuoterEnd) operator(:=) ident(QEnd)operator(;)
-    ident(StringPreviewChange)operator(()ident(Self)operator(\);)
+    ident(StringPreviewChange)operator(()ident(Self)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TPrefWin)operator(.)ident(SplashScreenCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TPrefWin)operator(.)ident(SplashScreenCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Started) reserved(and) ident(Assigned)operator(()ident(SplashWin)operator(\)) reserved(then)
     ident(SplashWin)operator(.)ident(SplashScreenCB)operator(.)ident(Checked) operator(:=) ident(SplashScreenCB)operator(.)ident(Checked)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TPrefWin)operator(.)ident(SaveBMouseMove)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,)
-  ident(Y)operator(:) ident(Integer)operator(\);)
+  ident(Y)operator(:) ident(Integer)operator(\))operator(;)
 reserved(begin)
   ident(Label2)operator(.)ident(Font)operator(.)ident(Color) operator(:=) ident(clBrightRed)operator(;)
   ident(Application)operator(.)ident(ProcessMessages)operator(;)
-  ident(Sleep)operator(()integer(200)operator(\);)
+  ident(Sleep)operator(()integer(200)operator(\))operator(;)
   ident(Label2)operator(.)ident(Font)operator(.)ident(Color) operator(:=) ident(clWhite)operator(;)
 reserved(end)operator(;)
 
@@ -3501,8 +3501,8 @@ reserved(type)
     ident(FOnValue)operator(:) ident(TRegScanValueEvent)operator(;)
     ident(FOnFaileKey)operator(:) ident(TRegScanKeyEvent)operator(;)
   directive(protected)
-    reserved(procedure) ident(ScanKey)operator(()ident(Key)operator(:) ident(HKEY)operator(;) reserved(const) ident(KeyName)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\);) directive(virtual)operator(;)
-    reserved(procedure) ident(ScanValues)operator(()ident(Key)operator(:) ident(HKEY)operator(;) ident(Info)operator(:) ident(TRegKeyInfo)operator(\);) directive(virtual)operator(;)
+    reserved(procedure) ident(ScanKey)operator(()ident(Key)operator(:) ident(HKEY)operator(;) reserved(const) ident(KeyName)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(;) directive(virtual)operator(;)
+    reserved(procedure) ident(ScanValues)operator(()ident(Key)operator(:) ident(HKEY)operator(;) ident(Info)operator(:) ident(TRegKeyInfo)operator(\))operator(;) directive(virtual)operator(;)
 
   directive(public)
     ident(Path)operator(:) reserved(string)operator(;)
@@ -3514,7 +3514,7 @@ reserved(type)
     reserved(function) ident(CurrentPath)operator(:) reserved(string)operator(;)
   directive(published)
     reserved(constructor) ident(CreateIt)operator(()ident(PriorityLevel)operator(:) ident(TThreadPriority)operator(;)
-      ident(DoScanValues)operator(:) ident(Boolean) operator(=) ident(True)operator(;) ident(Tasks)operator(:) ident(TRegScanTasks) operator(=) reserved(nil)operator(\);)
+      ident(DoScanValues)operator(:) ident(Boolean) operator(=) ident(True)operator(;) ident(Tasks)operator(:) ident(TRegScanTasks) operator(=) reserved(nil)operator(\))operator(;)
 
     reserved(property) ident(OnKey)operator(:) ident(TRegScanKeyEvent) directive(read) ident(FOnKey) directive(write) ident(FOnKey)operator(;)
     reserved(property) ident(OnValue)operator(:) ident(TRegScanValueEvent) directive(read) ident(FOnValue) directive(write) ident(FOnValue)operator(;)
@@ -3526,9 +3526,9 @@ reserved(implementation)
 comment({ TRegScanThread })
 
 reserved(constructor) ident(TRegScanThread)operator(.)ident(CreateIt)operator(()ident(PriorityLevel)operator(:) ident(TThreadPriority)operator(;)
-  ident(DoScanValues)operator(:) ident(Boolean) operator(=) ident(True)operator(;) ident(Tasks)operator(:) ident(TRegScanTasks) operator(=) reserved(nil)operator(\);)
+  ident(DoScanValues)operator(:) ident(Boolean) operator(=) ident(True)operator(;) ident(Tasks)operator(:) ident(TRegScanTasks) operator(=) reserved(nil)operator(\))operator(;)
 reserved(begin)
-  reserved(inherited) ident(Create)operator(()ident(True)operator(\);)
+  reserved(inherited) ident(Create)operator(()ident(True)operator(\))operator(;)
   ident(Priority) operator(:=) ident(PriorityLevel)operator(;)
   ident(FreeOnTerminate) operator(:=) ident(False)operator(;)   
   ident(Self)operator(.)ident(DoScanValues) operator(:=) ident(DoScanValues)operator(;)
@@ -3550,49 +3550,49 @@ reserved(begin)
   ident(ValuesOK) operator(:=) integer(0)operator(;)
 
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(Tasks)operator(\)) reserved(do) reserved(begin)
-    ident(CurrentTask) operator(:=) ident(Tasks)operator([)ident(i)operator(];)
+    ident(CurrentTask) operator(:=) ident(Tasks)operator([)ident(i)operator(])operator(;)
     reserved(with) ident(CurrentTask) reserved(do) reserved(begin)
-      ident(Inc)operator(()ident(Keys)operator(\);)
-      ident(ScanKey)operator(()ident(Key)operator(\);)
+      ident(Inc)operator(()ident(Keys)operator(\))operator(;)
+      ident(ScanKey)operator(()ident(Key)operator(\))operator(;)
     reserved(end)operator(;)
 
     reserved(if) ident(Terminated) reserved(then) ident(Break)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TRegScanThread)operator(.)ident(ScanValues)operator(()ident(Key)operator(:) ident(HKEY)operator(;) ident(Info)operator(:) ident(TRegKeyInfo)operator(\);)
+reserved(procedure) ident(TRegScanThread)operator(.)ident(ScanValues)operator(()ident(Key)operator(:) ident(HKEY)operator(;) ident(Info)operator(:) ident(TRegKeyInfo)operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
   ident(MaxLen)operator(,) ident(NameLen)operator(,) ident(Len)operator(,) ident(Typ)operator(:) ident(Cardinal)operator(;)
   ident(p)operator(:) ident(PChar)operator(;)
   ident(Buffer)operator(:) ident(TByteA)operator(;)
 
-  reserved(procedure) ident(ScanValue)operator(()ident(ValueName)operator(:) reserved(string)operator(;) ident(Typ)operator(:) ident(TRegDataType)operator(;) ident(Data)operator(:) ident(TByteA)operator(\);)
+  reserved(procedure) ident(ScanValue)operator(()ident(ValueName)operator(:) reserved(string)operator(;) ident(Typ)operator(:) ident(TRegDataType)operator(;) ident(Data)operator(:) ident(TByteA)operator(\))operator(;)
   reserved(begin)
     reserved(if) ident(Assigned)operator(()ident(OnValue)operator(\)) reserved(then)
-      ident(OnValue)operator(()ident(Self)operator(,) ident(ValueName)operator(,) ident(RegContext)operator(()ident(Typ)operator(,) ident(Data)operator(\)\);)
-    ident(Inc)operator(()ident(ValuesOK)operator(\);)
+      ident(OnValue)operator(()ident(Self)operator(,) ident(ValueName)operator(,) ident(RegContext)operator(()ident(Typ)operator(,) ident(Data)operator(\))operator(\))operator(;)
+    ident(Inc)operator(()ident(ValuesOK)operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
   ident(MaxLen) operator(:=) ident(Info)operator(.)ident(MaxValueLen) operator(+) integer(1)operator(;) comment(//Include Nullbyte)
-  ident(SetLength)operator(()ident(Buffer)operator(,) ident(Info)operator(.)ident(MaxDataLen)operator(\);)
-  ident(GetMem)operator(()ident(p)operator(,) ident(MaxLen)operator(\);)
+  ident(SetLength)operator(()ident(Buffer)operator(,) ident(Info)operator(.)ident(MaxDataLen)operator(\))operator(;)
+  ident(GetMem)operator(()ident(p)operator(,) ident(MaxLen)operator(\))operator(;)
 
-  ident(Inc)operator(()ident(Values)operator(,) ident(Info)operator(.)ident(NumValues)operator(\);)
+  ident(Inc)operator(()ident(Values)operator(,) ident(Info)operator(.)ident(NumValues)operator(\))operator(;)
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Info)operator(.)ident(NumValues)operator(-)integer(1) reserved(do) reserved(begin)
     ident(NameLen) operator(:=) ident(MaxLen)operator(;)
     ident(Len) operator(:=) ident(Info)operator(.)ident(MaxDataLen)operator(;)
-    reserved(if) ident(Success)operator(()ident(RegEnumValue)operator(()ident(Key)operator(,) ident(i)operator(,) ident(p)operator(,) ident(NameLen)operator(,) reserved(nil)operator(,) operator(@)ident(Typ)operator(,) ident(Pointer)operator(()ident(Buffer)operator(\),)
-     operator(@)ident(Len)operator(\)\)) reserved(then)
-      ident(ScanValue)operator(()ident(Copy)operator(()ident(p)operator(,) integer(0)operator(,) ident(NameLen)operator(\),) ident(Typ)operator(,) ident(Copy)operator(()ident(Buffer)operator(,) integer(0)operator(,) ident(Len)operator(\)\))
+    reserved(if) ident(Success)operator(()ident(RegEnumValue)operator(()ident(Key)operator(,) ident(i)operator(,) ident(p)operator(,) ident(NameLen)operator(,) reserved(nil)operator(,) operator(@)ident(Typ)operator(,) ident(Pointer)operator(()ident(Buffer)operator(\))operator(,)
+     operator(@)ident(Len)operator(\))operator(\)) reserved(then)
+      ident(ScanValue)operator(()ident(Copy)operator(()ident(p)operator(,) integer(0)operator(,) ident(NameLen)operator(\))operator(,) ident(Typ)operator(,) ident(Copy)operator(()ident(Buffer)operator(,) integer(0)operator(,) ident(Len)operator(\))operator(\))
     reserved(else)
       ident(Yield)operator(;)
   reserved(end)operator(;)
-  ident(FreeMem)operator(()ident(p)operator(,) ident(MaxLen)operator(\);)
+  ident(FreeMem)operator(()ident(p)operator(,) ident(MaxLen)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TRegScanThread)operator(.)ident(ScanKey)operator(()ident(Key)operator(:) ident(HKEY)operator(;) reserved(const) ident(KeyName)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\);)
+reserved(procedure) ident(TRegScanThread)operator(.)ident(ScanKey)operator(()ident(Key)operator(:) ident(HKEY)operator(;) reserved(const) ident(KeyName)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
   ident(NewHKEY)operator(:) ident(HKEY)operator(;)
@@ -3606,41 +3606,41 @@ reserved(begin)
   reserved(with) ident(Info) reserved(do) reserved(begin)
     reserved(if) reserved(not) ident(Success)operator(()ident(RegQueryInfoKey)operator(()ident(Key)operator(,) reserved(nil)operator(,) reserved(nil)operator(,) reserved(nil)operator(,) operator(@)ident(NumSubKeys)operator(,)
      operator(@)ident(MaxSubKeyLen)operator(,) reserved(nil)operator(,) operator(@)ident(NumValues)operator(,) operator(@)ident(MaxValueLen)operator(,) operator(@)ident(MaxDataLen)operator(,)
-     reserved(nil)operator(,) reserved(nil)operator(\)\)) reserved(then)
+     reserved(nil)operator(,) reserved(nil)operator(\))operator(\)) reserved(then)
       ident(Exit)operator(;)
 
     reserved(if) ident(Assigned)operator(()ident(OnKey)operator(\)) reserved(then)
-      ident(OnKey)operator(()ident(Self)operator(,) ident(KeyName)operator(,) ident(Key)operator(,) ident(Info)operator(\);)
+      ident(OnKey)operator(()ident(Self)operator(,) ident(KeyName)operator(,) ident(Key)operator(,) ident(Info)operator(\))operator(;)
     reserved(if) ident(DoScanValues) reserved(and) operator(()ident(NumValues) operator(>) integer(0)operator(\)) reserved(then)
-      ident(ScanValues)operator(()ident(Key)operator(,) ident(Info)operator(\);)
+      ident(ScanValues)operator(()ident(Key)operator(,) ident(Info)operator(\))operator(;)
 
     reserved(if) ident(Info)operator(.)ident(NumSubKeys) operator(>) integer(0) reserved(then) reserved(begin)
-      ident(Inc)operator(()ident(Keys)operator(,) ident(NumSubKeys)operator(\);)
+      ident(Inc)operator(()ident(Keys)operator(,) ident(NumSubKeys)operator(\))operator(;)
 
       ident(Len) operator(:=) ident(MaxSubKeyLen) operator(+) integer(1)operator(;)
-      ident(GetMem)operator(()ident(p)operator(,) ident(Len)operator(\);)
+      ident(GetMem)operator(()ident(p)operator(,) ident(Len)operator(\))operator(;)
 
       reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(NumSubKeys)operator(-)integer(1) reserved(do) reserved(begin)
         ident(l) operator(:=) ident(Len)operator(;)
-        ident(RegEnumKeyEx)operator(()ident(Key)operator(,) ident(i)operator(,) ident(p)operator(,) ident(l)operator(,) reserved(nil)operator(,) reserved(nil)operator(,) reserved(nil)operator(,) reserved(nil)operator(\);)
-        reserved(if) ident(Success)operator(()ident(RegOpenKey)operator(()ident(Key)operator(,) ident(p)operator(,) ident(NewHKEY)operator(\)\)) reserved(then) reserved(begin)
-          ident(z) operator(:=) ident(Length)operator(()ident(Path)operator(\);)
+        ident(RegEnumKeyEx)operator(()ident(Key)operator(,) ident(i)operator(,) ident(p)operator(,) ident(l)operator(,) reserved(nil)operator(,) reserved(nil)operator(,) reserved(nil)operator(,) reserved(nil)operator(\))operator(;)
+        reserved(if) ident(Success)operator(()ident(RegOpenKey)operator(()ident(Key)operator(,) ident(p)operator(,) ident(NewHKEY)operator(\))operator(\)) reserved(then) reserved(begin)
+          ident(z) operator(:=) ident(Length)operator(()ident(Path)operator(\))operator(;)
           ident(Path) operator(:=) ident(Path) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(p)operator(;)
-          ident(ScanKey)operator(()ident(NewHKEY)operator(,) ident(p)operator(\);)
-          ident(RegCloseKey)operator(()ident(NewHKEY)operator(\);)
-          ident(SetLength)operator(()ident(Path)operator(,) ident(z)operator(\);)
+          ident(ScanKey)operator(()ident(NewHKEY)operator(,) ident(p)operator(\))operator(;)
+          ident(RegCloseKey)operator(()ident(NewHKEY)operator(\))operator(;)
+          ident(SetLength)operator(()ident(Path)operator(,) ident(z)operator(\))operator(;)
         reserved(end) reserved(else)
           reserved(if) ident(Assigned)operator(()ident(OnFaileKey)operator(\)) reserved(then)
-            ident(OnFaileKey)operator(()ident(Self)operator(,) ident(p)operator(,) ident(Key)operator(,) ident(Info)operator(\);)
+            ident(OnFaileKey)operator(()ident(Self)operator(,) ident(p)operator(,) ident(Key)operator(,) ident(Info)operator(\))operator(;)
 
         reserved(if) ident(Terminated) reserved(then)
           ident(Break)operator(;)
       reserved(end)operator(;)
-      ident(FreeMem)operator(()ident(p)operator(,) ident(Len)operator(\);)
+      ident(FreeMem)operator(()ident(p)operator(,) ident(Len)operator(\))operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 
-  ident(Inc)operator(()ident(KeysOK)operator(\);)
+  ident(Inc)operator(()ident(KeysOK)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TRegScanThread)operator(.)ident(Execute)operator(;)
@@ -3653,13 +3653,13 @@ reserved(begin)
     ident(Free)operator(;)
   reserved(end)operator(;)
 
-  ident(WriteLn)operator(()string<delimiter(')content(finished.)delimiter(')>operator(\);)
-  ident(WriteLn)operator(()  ident(Format)operator(()string<delimiter(')content(Keys:   %6d counted (%3d failed\))delimiter(')>operator(,) operator([)ident(Keys)operator(,) ident(Keys) operator(-) ident(KeysOK)operator(]\)\);)
+  ident(WriteLn)operator(()string<delimiter(')content(finished.)delimiter(')>operator(\))operator(;)
+  ident(WriteLn)operator(()  ident(Format)operator(()string<delimiter(')content(Keys:   %6d counted (%3d failed\))delimiter(')>operator(,) operator([)ident(Keys)operator(,) ident(Keys) operator(-) ident(KeysOK)operator(])operator(\))operator(\))operator(;)
   reserved(if) ident(DoScanValues) reserved(then)
-    ident(WriteLn)operator(()ident(Format)operator(()string<delimiter(')content(Values: %6d counted (%3d failed\))delimiter(')>operator(,) operator([)ident(Values)operator(,) ident(Values) operator(-) ident(ValuesOK)operator(]\)\);)
-  ident(WriteLn)operator(()string<delimiter(')content(t )delimiter(')> operator(+) ident(Format)operator(()string<delimiter(')content(%.2f)delimiter(')>operator(,) operator([)ident(Secs)operator(]\)) operator(+) string<delimiter(')content( seconds)delimiter(')>operator(\);)
+    ident(WriteLn)operator(()ident(Format)operator(()string<delimiter(')content(Values: %6d counted (%3d failed\))delimiter(')>operator(,) operator([)ident(Values)operator(,) ident(Values) operator(-) ident(ValuesOK)operator(])operator(\))operator(\))operator(;)
+  ident(WriteLn)operator(()string<delimiter(')content(t )delimiter(')> operator(+) ident(Format)operator(()string<delimiter(')content(%.2f)delimiter(')>operator(,) operator([)ident(Secs)operator(])operator(\)) operator(+) string<delimiter(')content( seconds)delimiter(')>operator(\))operator(;)
   reserved(if) ident(Secs) operator(>) integer(0) reserved(then)
-    ident(WriteLn)operator(()string<delimiter(')content(r )delimiter(')> operator(+) ident(Format)operator(()string<delimiter(')content(%.0f)delimiter(')>operator(,) operator([)ident(Keys) operator(/) ident(Secs)operator(]\)) operator(+) string<delimiter(')content( k/s)delimiter(')>operator(\);)
+    ident(WriteLn)operator(()string<delimiter(')content(r )delimiter(')> operator(+) ident(Format)operator(()string<delimiter(')content(%.0f)delimiter(')>operator(,) operator([)ident(Keys) operator(/) ident(Secs)operator(])operator(\)) operator(+) string<delimiter(')content( k/s)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(TRegScanThread)operator(.)ident(CurrentPath)operator(:) reserved(string)operator(;)
@@ -3694,7 +3694,7 @@ reserved(implementation)
 
 reserved(procedure) ident(Register)operator(;)
 reserved(begin)
-  ident(RegisterComponents)operator(()string<delimiter(')content(pluto)delimiter(')>operator(,) operator([)ident(TRegTV)operator(]\);)
+  ident(RegisterComponents)operator(()string<delimiter(')content(pluto)delimiter(')>operator(,) operator([)ident(TRegTV)operator(])operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(end)operator(.)
@@ -3712,7 +3712,7 @@ reserved(type)
     comment(//DIC: TByteA;)
     ident(Typ)operator(:) ident(TXRegDataType)operator(;)
     ident(Data)operator(:) ident(TByteA)operator(;)
-    reserved(constructor) ident(Create)operator(()ident(AName)operator(:) reserved(string)operator(\);)
+    reserved(constructor) ident(Create)operator(()ident(AName)operator(:) reserved(string)operator(\))operator(;)
   reserved(end)operator(;)
 
   ident(TSpyKey) operator(=) reserved(class)
@@ -3722,9 +3722,9 @@ reserved(type)
     ident(Next)operator(:) ident(TSpyKey)operator(;)
     ident(Keys)operator(:) ident(TSpyKey)operator(;)
     ident(Values)operator(:) ident(TSpyValue)operator(;)
-    reserved(procedure) ident(Spy)operator(()ident(AHKEY)operator(:) ident(HKEY)operator(\);)
+    reserved(procedure) ident(Spy)operator(()ident(AHKEY)operator(:) ident(HKEY)operator(\))operator(;)
     reserved(function) ident(Path)operator(:) reserved(string)operator(;)
-    reserved(constructor) ident(Create)operator(()ident(AParent)operator(:) ident(TSpyKey)operator(;) ident(AName)operator(:) reserved(string)operator(\);)
+    reserved(constructor) ident(Create)operator(()ident(AParent)operator(:) ident(TSpyKey)operator(;) ident(AName)operator(:) reserved(string)operator(\))operator(;)
     reserved(destructor) ident(Destroy)operator(;) directive(override)operator(;)
   reserved(end)operator(;)
 
@@ -3738,7 +3738,7 @@ reserved(implementation)
 reserved(uses)
   ident(Plutomain)operator(;)
 
-reserved(procedure) ident(AddChange)operator(()ident(M)operator(:) reserved(string)operator(\);)
+reserved(procedure) ident(AddChange)operator(()ident(M)operator(:) reserved(string)operator(\))operator(;)
 reserved(begin)
   ident(Yield)operator(;)
   comment(//AddHint(M\);)
@@ -3746,7 +3746,7 @@ reserved(end)operator(;)
 
 comment({ TSpyValue })
 
-reserved(constructor) ident(TSpyValue)operator(.)ident(Create)operator(()ident(AName)operator(:) reserved(string)operator(\);)
+reserved(constructor) ident(TSpyValue)operator(.)ident(Create)operator(()ident(AName)operator(:) reserved(string)operator(\))operator(;)
 reserved(begin)
   ident(Name) operator(:=) ident(AName)operator(;)
   ident(Next) operator(:=) reserved(nil)operator(;)
@@ -3754,7 +3754,7 @@ reserved(end)operator(;)
 
 comment({ TSpyKey })
 
-reserved(constructor) ident(TSpyKey)operator(.)ident(Create)operator(()ident(AParent)operator(:) ident(TSpyKey)operator(;) ident(AName)operator(:) reserved(string)operator(\);)
+reserved(constructor) ident(TSpyKey)operator(.)ident(Create)operator(()ident(AParent)operator(:) ident(TSpyKey)operator(;) ident(AName)operator(:) reserved(string)operator(\))operator(;)
 reserved(begin)
   ident(Name) operator(:=) ident(AName)operator(;)
   ident(Parent) operator(:=) ident(AParent)operator(;)
@@ -3796,7 +3796,7 @@ reserved(begin)
   ident(Result) operator(:=) ident(Result) operator(+) ident(Name)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TSpyKey)operator(.)ident(Spy)operator(()ident(AHKEY)operator(:) ident(HKEY)operator(\);)
+reserved(procedure) ident(TSpyKey)operator(.)ident(Spy)operator(()ident(AHKEY)operator(:) ident(HKEY)operator(\))operator(;)
 reserved(var)
   ident(SL)operator(:) ident(TStringList)operator(;)
 
@@ -3808,7 +3808,7 @@ reserved(var)
     comment(//OK, this part is a little bit complicate. So I will comment very much.)
     comment(//First, two terms are important:)
     comment(//<REAL> means the list of values that will be read from the registry now:)
-    ident(Reg)operator(.)ident(GetValueNames)operator(()ident(SL)operator(\);)
+    ident(Reg)operator(.)ident(GetValueNames)operator(()ident(SL)operator(\))operator(;)
     comment(//So <REAL> is TStringList.)
 
     comment(//<CURRENT> means the image that was saved before.)
@@ -3848,21 +3848,21 @@ reserved(var)
         reserved(if) ident(Assigned)operator(()ident(Value)operator(\)) reserved(then) reserved(begin)
           ident(SearchValue) operator(:=) ident(Value)operator(;)
           reserved(while) ident(Assigned)operator(()ident(SearchValue)operator(.)ident(Next)operator(\)) reserved(do)
-            reserved(if) operator(()ident(SearchValue)operator(.)ident(Next)operator(.)ident(Name) operator(=) ident(SL)operator([)ident(i)operator(]\)) reserved(then) reserved(begin)
+            reserved(if) operator(()ident(SearchValue)operator(.)ident(Next)operator(.)ident(Name) operator(=) ident(SL)operator([)ident(i)operator(])operator(\)) reserved(then) reserved(begin)
               comment(//cV\\)
               ident(NewValue) operator(:=) ident(SearchValue)operator(.)ident(Next)operator(;)
-              ident(AddChange)operator(()string<delimiter(')content(cV\\ )delimiter(')> operator(+) ident(Path)operator(\);)
+              ident(AddChange)operator(()string<delimiter(')content(cV\\ )delimiter(')> operator(+) ident(Path)operator(\))operator(;)
               ident(SearchValue)operator(.)ident(Next) operator(:=) ident(SearchValue)operator(.)ident(Next)operator(.)ident(Next)operator(;)
             ident(Break)operator(;) reserved(end)operator(;)
         reserved(end)operator(;)
 
         reserved(if) reserved(not) ident(Assigned)operator(()ident(NewValue)operator(\)) reserved(then) reserved(begin)
           comment(//cV+  No, not found! So it is new...)
-          ident(NewValue) operator(:=) ident(TSpyValue)operator(.)ident(Create)operator(()ident(SL)operator([)ident(i)operator(]\);)
-          ident(AddChange)operator(()string<delimiter(')content(cV+ )delimiter(')> operator(+) ident(Path) operator(+) string<delimiter(')content(\\\\)delimiter(')> operator(+) ident(NewValue)operator(.)ident(Name)operator(\);)
+          ident(NewValue) operator(:=) ident(TSpyValue)operator(.)ident(Create)operator(()ident(SL)operator([)ident(i)operator(])operator(\))operator(;)
+          ident(AddChange)operator(()string<delimiter(')content(cV+ )delimiter(')> operator(+) ident(Path) operator(+) string<delimiter(')content(\\\\)delimiter(')> operator(+) ident(NewValue)operator(.)ident(Name)operator(\))operator(;)
           reserved(with) ident(NewValue) reserved(do) reserved(begin)
-            ident(Typ) operator(:=) ident(Reg)operator(.)ident(GetDataType)operator(()ident(SL)operator([)ident(i)operator(]\);)
-            ident(Data) operator(:=) ident(Reg)operator(.)ident(ReadBin)operator(()ident(SL)operator([)ident(i)operator(]\);)
+            ident(Typ) operator(:=) ident(Reg)operator(.)ident(GetDataType)operator(()ident(SL)operator([)ident(i)operator(])operator(\))operator(;)
+            ident(Data) operator(:=) ident(Reg)operator(.)ident(ReadBin)operator(()ident(SL)operator([)ident(i)operator(])operator(\))operator(;)
           reserved(end)operator(;)
         reserved(end)operator(;)
 
@@ -3897,7 +3897,7 @@ reserved(var)
       comment(//cV- So, here really something HAS been deleted)
       ident(LastValue) operator(:=) ident(Value)operator(;)
       ident(Value) operator(:=) ident(Value)operator(.)ident(Next)operator(;)
-      ident(AddChange)operator(()string<delimiter(')content(cV- )delimiter(')> operator(+) ident(Path) operator(+) string<delimiter(')content(\\\\)delimiter(')> operator(+) ident(LastValue)operator(.)ident(Name)operator(\);)
+      ident(AddChange)operator(()string<delimiter(')content(cV- )delimiter(')> operator(+) ident(Path) operator(+) string<delimiter(')content(\\\\)delimiter(')> operator(+) ident(LastValue)operator(.)ident(Name)operator(\))operator(;)
       ident(LastValue)operator(.)ident(Free)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
@@ -3911,16 +3911,16 @@ reserved(var)
     comment(//So, finally <CURRENT> = <REAL>. That means we now can compare the data:)
     ident(Value) operator(:=) ident(Values)operator(;)
     reserved(while) ident(Assigned)operator(()ident(Value)operator(\)) reserved(do) reserved(begin)
-      ident(Typ) operator(:=) ident(Reg)operator(.)ident(GetDataType)operator(()ident(Value)operator(.)ident(Name)operator(\);)
-      ident(Data) operator(:=) ident(Reg)operator(.)ident(ReadBin)operator(()ident(Value)operator(.)ident(Name)operator(\);)
+      ident(Typ) operator(:=) ident(Reg)operator(.)ident(GetDataType)operator(()ident(Value)operator(.)ident(Name)operator(\))operator(;)
+      ident(Data) operator(:=) ident(Reg)operator(.)ident(ReadBin)operator(()ident(Value)operator(.)ident(Name)operator(\))operator(;)
       reserved(if) ident(Typ) operator(<>) ident(Value)operator(.)ident(Typ) reserved(then) reserved(begin)
         comment(//cT#)
-        ident(AddChange)operator(()string<delimiter(')content(cT# )delimiter(')> operator(+) ident(Path) operator(+) string<delimiter(')content(\\\\)delimiter(')> operator(+) ident(Value)operator(.)ident(Name)operator(\);)
+        ident(AddChange)operator(()string<delimiter(')content(cT# )delimiter(')> operator(+) ident(Path) operator(+) string<delimiter(')content(\\\\)delimiter(')> operator(+) ident(Value)operator(.)ident(Name)operator(\))operator(;)
         ident(Value)operator(.)ident(Typ) operator(:=) ident(Typ)operator(;)
       reserved(end)operator(;)
       reserved(if) reserved(not) ident(SameByteA)operator(()ident(Data)operator(,) ident(Value)operator(.)ident(Data)operator(\)) reserved(then) reserved(begin)
         comment(//cD#)
-        ident(AddChange)operator(()string<delimiter(')content(cD# )delimiter(')> operator(+) ident(Path) operator(+) string<delimiter(')content(\\\\)delimiter(')> operator(+) ident(Value)operator(.)ident(Name)operator(\);)
+        ident(AddChange)operator(()string<delimiter(')content(cD# )delimiter(')> operator(+) ident(Path) operator(+) string<delimiter(')content(\\\\)delimiter(')> operator(+) ident(Value)operator(.)ident(Name)operator(\))operator(;)
         ident(Value)operator(.)ident(Data) operator(:=) ident(Data)operator(;)
       reserved(end)operator(;)
 
@@ -3937,7 +3937,7 @@ reserved(var)
     comment(//OK, this part is a little bit complicate. So I will comment very much.)
     comment(//First, two terms are important:)
     comment(//<REAL> means the list of keys that will be read from the registry now:)
-    ident(Reg)operator(.)ident(GetKeyNames)operator(()ident(SL)operator(\);)
+    ident(Reg)operator(.)ident(GetKeyNames)operator(()ident(SL)operator(\))operator(;)
     comment(//So <REAL> is TStringList.)
 
     comment(//<CURRENT> means the image that was saved before.)
@@ -3966,8 +3966,8 @@ reserved(var)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin)
       reserved(if) ident(Assigned)operator(()ident(Key)operator(\)) reserved(and) operator(()ident(SL)operator([)ident(i)operator(]) operator(=) ident(Key)operator(.)ident(Name)operator(\)) reserved(then) reserved(begin)
         comment(//cK=  Normally (0.9999\) everything's the same)
-        ident(RegOpenKey)operator(()ident(AHKEY)operator(,) ident(PChar)operator(()ident(SL)operator([)ident(i)operator(]\),) ident(NewHKEY)operator(\);)
-        ident(Key)operator(.)ident(Spy)operator(()ident(NewHKEY)operator(\);)
+        ident(RegOpenKey)operator(()ident(AHKEY)operator(,) ident(PChar)operator(()ident(SL)operator([)ident(i)operator(])operator(\))operator(,) ident(NewHKEY)operator(\))operator(;)
+        ident(Key)operator(.)ident(Spy)operator(()ident(NewHKEY)operator(\))operator(;)
         ident(LastKey) operator(:=) ident(Key)operator(;)
         ident(Key) operator(:=) ident(Key)operator(.)ident(Next)operator(;)
       reserved(end) reserved(else) reserved(begin) comment(//Something's different? Yes, the IMPORTANT rest (0.0001\)\))
@@ -3979,21 +3979,21 @@ reserved(var)
         reserved(if) ident(Assigned)operator(()ident(Key)operator(\)) reserved(then) reserved(begin)
           ident(SearchKey) operator(:=) ident(Key)operator(;)
           reserved(while) ident(Assigned)operator(()ident(SearchKey)operator(.)ident(Next)operator(\)) reserved(do)
-            reserved(if) operator(()ident(SearchKey)operator(.)ident(Next)operator(.)ident(Name) operator(=) ident(SL)operator([)ident(i)operator(]\)) reserved(then) reserved(begin)
+            reserved(if) operator(()ident(SearchKey)operator(.)ident(Next)operator(.)ident(Name) operator(=) ident(SL)operator([)ident(i)operator(])operator(\)) reserved(then) reserved(begin)
               comment(//cK\\)
               ident(NewKey) operator(:=) ident(SearchKey)operator(.)ident(Next)operator(;)
-              ident(AddChange)operator(()string<delimiter(')content(cK\\ )delimiter(')> operator(+) ident(Path)operator(\);)
+              ident(AddChange)operator(()string<delimiter(')content(cK\\ )delimiter(')> operator(+) ident(Path)operator(\))operator(;)
               ident(SearchKey)operator(.)ident(Next) operator(:=) ident(SearchKey)operator(.)ident(Next)operator(.)ident(Next)operator(;)
             ident(Break)operator(;) reserved(end)operator(;)
         reserved(end)operator(;)
 
         reserved(if) reserved(not) ident(Assigned)operator(()ident(NewKey)operator(\)) reserved(then) reserved(begin)
           comment(//cK+  No, not found! So it is new...)
-          ident(NewKey) operator(:=) ident(TSpyKey)operator(.)ident(Create)operator(()ident(Self)operator(,) ident(SL)operator([)ident(i)operator(]\);)
-          ident(AddChange)operator(()string<delimiter(')content(cK+ )delimiter(')> operator(+) ident(Path) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(NewKey)operator(.)ident(Name)operator(\);)
+          ident(NewKey) operator(:=) ident(TSpyKey)operator(.)ident(Create)operator(()ident(Self)operator(,) ident(SL)operator([)ident(i)operator(])operator(\))operator(;)
+          ident(AddChange)operator(()string<delimiter(')content(cK+ )delimiter(')> operator(+) ident(Path) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(NewKey)operator(.)ident(Name)operator(\))operator(;)
 
-          ident(RegOpenKey)operator(()ident(AHKEY)operator(,) ident(PChar)operator(()ident(SL)operator([)ident(i)operator(]\),) ident(NewHKEY)operator(\);)
-          ident(NewKey)operator(.)ident(Spy)operator(()ident(NewHKEY)operator(\);)
+          ident(RegOpenKey)operator(()ident(AHKEY)operator(,) ident(PChar)operator(()ident(SL)operator([)ident(i)operator(])operator(\))operator(,) ident(NewHKEY)operator(\))operator(;)
+          ident(NewKey)operator(.)ident(Spy)operator(()ident(NewHKEY)operator(\))operator(;)
         reserved(end)operator(;)
 
         comment(//The new object now must be placed after the last key)
@@ -4027,7 +4027,7 @@ reserved(var)
       comment(//cV- So, here really something HAS been deleted)
       ident(LastKey) operator(:=) ident(Key)operator(;)
       ident(Key) operator(:=) ident(Key)operator(.)ident(Next)operator(;)
-      ident(AddChange)operator(()string<delimiter(')content(cK- )delimiter(')> operator(+) ident(Path) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(LastKey)operator(.)ident(Name)operator(\);)
+      ident(AddChange)operator(()string<delimiter(')content(cK- )delimiter(')> operator(+) ident(Path) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(LastKey)operator(.)ident(Name)operator(\))operator(;)
       ident(LastKey)operator(.)ident(Free)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
@@ -4046,7 +4046,7 @@ reserved(begin)
     ident(CompareKeys)operator(;)
 
   reserved(finally)
-    ident(RegCloseKey)operator(()ident(AHKEY)operator(\);)
+    ident(RegCloseKey)operator(()ident(AHKEY)operator(\))operator(;)
   reserved(end)operator(;)
 
   ident(SL)operator(.)ident(Free)operator(;)
@@ -4054,8 +4054,8 @@ reserved(end)operator(;)
 
 reserved(initialization)
   ident(Reg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(;)
-  ident(HKLMSpyKey) operator(:=) ident(TSpyKey)operator(.)ident(Create)operator(()reserved(nil)operator(,) string<delimiter(')content(HKEY_LOCAL_MACHINE)delimiter(')>operator(\);)
-  ident(HKUSpyKey) operator(:=) ident(TSpyKey)operator(.)ident(Create)operator(()reserved(nil)operator(,) string<delimiter(')content(HKEY_USERS)delimiter(')>operator(\);)
+  ident(HKLMSpyKey) operator(:=) ident(TSpyKey)operator(.)ident(Create)operator(()reserved(nil)operator(,) string<delimiter(')content(HKEY_LOCAL_MACHINE)delimiter(')>operator(\))operator(;)
+  ident(HKUSpyKey) operator(:=) ident(TSpyKey)operator(.)ident(Create)operator(()reserved(nil)operator(,) string<delimiter(')content(HKEY_USERS)delimiter(')>operator(\))operator(;)
 
 reserved(finalization)
   ident(Reg)operator(.)ident(Free)operator(;)
@@ -4079,21 +4079,21 @@ reserved(type)
   ident(TSisyChangeType) operator(=) operator(()ident(cNone)operator(,) ident(cError)operator(,)
                      ident(cKeyPlus)operator(,) ident(cKeyMinus)operator(,)
                      ident(cValuePlus)operator(,) ident(cValueMinus)operator(,)
-                     ident(cContextChange)operator(\);)
+                     ident(cContextChange)operator(\))operator(;)
 
 reserved(const)
   ident(SisyChangeStrings)operator(:) reserved(array)operator([)ident(TSisyChangeType)operator(]) reserved(of) reserved(string) operator(=)
                      operator(()char<delimiter(')content(?)delimiter(')>operator(,) string<delimiter(')content(Error)delimiter(')>operator(,)
                       string<delimiter(')content(cK+)delimiter(')>operator(,) string<delimiter(')content(cK-)delimiter(')>operator(,)
                       string<delimiter(')content(cV+)delimiter(')>operator(,) string<delimiter(')content(cV-)delimiter(')>operator(,)
-                      string<delimiter(')content(cC)delimiter(')>operator(\);)
+                      string<delimiter(')content(cC)delimiter(')>operator(\))operator(;)
 
 reserved(type)
   ident(TSpyValue) operator(=) reserved(class)
     ident(Name)operator(:) reserved(string)operator(;)
     ident(Next)operator(:) ident(TSpyValue)operator(;)
     ident(Context)operator(:) ident(TRegContext)operator(;)
-    reserved(constructor) ident(Create)operator(()reserved(const) ident(Name)operator(:) reserved(string)operator(;) ident(Context)operator(:) ident(TRegContext)operator(\);)
+    reserved(constructor) ident(Create)operator(()reserved(const) ident(Name)operator(:) reserved(string)operator(;) ident(Context)operator(:) ident(TRegContext)operator(\))operator(;)
   reserved(end)operator(;)
 
   ident(TSisyThread) operator(=) reserved(class)operator(;)
@@ -4105,9 +4105,9 @@ reserved(type)
     ident(Next)operator(:) ident(TSpyKey)operator(;)
     ident(Keys)operator(:) ident(TSpyKey)operator(;)
     ident(Values)operator(:) ident(TSpyValue)operator(;)
-    reserved(procedure) ident(Spy)operator(()ident(AHKEY)operator(:) ident(HKEY)operator(;) ident(Sisy)operator(:) ident(TSisyThread)operator(\);)
+    reserved(procedure) ident(Spy)operator(()ident(AHKEY)operator(:) ident(HKEY)operator(;) ident(Sisy)operator(:) ident(TSisyThread)operator(\))operator(;)
     reserved(function) ident(Path)operator(:) reserved(string)operator(;)
-    reserved(constructor) ident(Create)operator(()ident(AParent)operator(:) ident(TSpyKey)operator(;) ident(AName)operator(:) reserved(string)operator(\);)
+    reserved(constructor) ident(Create)operator(()ident(AParent)operator(:) ident(TSpyKey)operator(;) ident(AName)operator(:) reserved(string)operator(\))operator(;)
     reserved(destructor) ident(Destroy)operator(;) directive(override)operator(;)
   reserved(end)operator(;)
 
@@ -4117,7 +4117,7 @@ reserved(type)
     ident(Path)operator(:) reserved(string)operator(;)
     ident(Old)operator(,) ident(New)operator(:) ident(TRegContext)operator(;)
     reserved(constructor) ident(Create)operator(()ident(ATyp)operator(:) ident(TSisyChangeType)operator(;) reserved(const) ident(APath)operator(:) reserved(string)operator(;)
-      ident(AOldContext)operator(:) ident(TRegContext)operator(;) ident(ANewContext)operator(:) ident(TRegContext)operator(\);)
+      ident(AOldContext)operator(:) ident(TRegContext)operator(;) ident(ANewContext)operator(:) ident(TRegContext)operator(\))operator(;)
     reserved(procedure) ident(ReportToPluto)operator(;)
   reserved(end)operator(;)
 
@@ -4133,13 +4133,13 @@ reserved(type)
     reserved(procedure) ident(FreeKey)operator(;)
     reserved(procedure) ident(IncKeyCount)operator(;)
     reserved(procedure) ident(IncKeyIndex)operator(;)
-    reserved(function) ident(GetSpecialChange)operator(()ident(ChangeType)operator(:) ident(TSisyChangeType)operator(\):) ident(TSisyChangeEvent)operator(;)
+    reserved(function) ident(GetSpecialChange)operator(()ident(ChangeType)operator(:) ident(TSisyChangeType)operator(\))operator(:) ident(TSisyChangeEvent)operator(;)
     reserved(procedure) ident(SetSpecialChange)operator(()ident(ChangeType)operator(:) ident(TSisyChangeType)operator(;)
-      reserved(const) ident(Value)operator(:) ident(TSisyChangeEvent)operator(\);)
+      reserved(const) ident(Value)operator(:) ident(TSisyChangeEvent)operator(\))operator(;)
   directive(protected)
     reserved(procedure) ident(AddValueChange)operator(()ident(Typ)operator(:) ident(TSisyChangeType)operator(;) reserved(const) ident(Path)operator(:) reserved(string)operator(;)
-      ident(Old)operator(,) ident(New)operator(:) ident(TRegContext)operator(\);)
-    reserved(procedure) ident(AddKeyChange)operator(()ident(Typ)operator(:) ident(TSisyChangeType)operator(;) reserved(const) ident(Path)operator(:) reserved(string)operator(\);)
+      ident(Old)operator(,) ident(New)operator(:) ident(TRegContext)operator(\))operator(;)
+    reserved(procedure) ident(AddKeyChange)operator(()ident(Typ)operator(:) ident(TSisyChangeType)operator(;) reserved(const) ident(Path)operator(:) reserved(string)operator(\))operator(;)
     reserved(procedure) ident(Execute)operator(;) directive(override)operator(;)
     reserved(procedure) ident(ShowInfo)operator(;)
     reserved(procedure) ident(NotifyChange)operator(;)
@@ -4160,26 +4160,26 @@ reserved(type)
     ident(Uni)operator(:) ident(TUniKey)operator(;)
     ident(MaxValueCountToScan)operator(,) ident(MaxKeyCountToScan)operator(,) ident(MaxDataLenToScan)operator(:) ident(Cardinal)operator(;)
     reserved(constructor) ident(CreateIt)operator(()reserved(const) ident(AName)operator(,) ident(AKeyName)operator(:) reserved(string)operator(;) ident(AHKEY)operator(:) ident(HKEY)operator(;)
-      ident(ALabel)operator(:) ident(TLabel)operator(;) ident(AUniKey)operator(:) ident(TUniKey)operator(\);)
+      ident(ALabel)operator(:) ident(TLabel)operator(;) ident(AUniKey)operator(:) ident(TUniKey)operator(\))operator(;)
     reserved(destructor) ident(Destroy)operator(;) directive(override)operator(;)
 
     reserved(property) ident(OnChange)operator(:) ident(TSisyChangeEvent) directive(read) ident(FOnChange) directive(write) ident(FOnChange)operator(;)
-    reserved(property) ident(OnSpecialChange)operator([)ident(ChangeType)operator(:) ident(TSisyChangeType)operator(]:) ident(TSisyChangeEvent)
+    reserved(property) ident(OnSpecialChange)operator([)ident(ChangeType)operator(:) ident(TSisyChangeType)operator(])operator(:) ident(TSisyChangeEvent)
       directive(read) ident(GetSpecialChange) directive(write) ident(SetSpecialChange)operator(;)
   reserved(end)operator(;)
 
   ident(TSisyList) operator(=) reserved(class)operator(()ident(TList)operator(\))
   directive(protected)
-    reserved(function) ident(GetSisy)operator(()ident(Index)operator(:) ident(Integer)operator(\):) ident(TSisyThread)operator(;)
-    reserved(procedure) ident(PutSisy)operator(()ident(Index)operator(:) ident(Integer)operator(;) ident(Sisy)operator(:) ident(TSisyThread)operator(\);)
+    reserved(function) ident(GetSisy)operator(()ident(Index)operator(:) ident(Integer)operator(\))operator(:) ident(TSisyThread)operator(;)
+    reserved(procedure) ident(PutSisy)operator(()ident(Index)operator(:) ident(Integer)operator(;) ident(Sisy)operator(:) ident(TSisyThread)operator(\))operator(;)
   directive(public)
     reserved(procedure) ident(Suspend)operator(;)
     reserved(procedure) ident(Resume)operator(;)
-    reserved(property) ident(Items)operator([)ident(Index)operator(:) ident(Integer)operator(]:) ident(TSisyThread) directive(read) ident(GetSisy) directive(write) ident(PutSisy)operator(;) ident(default)operator(;)
+    reserved(property) ident(Items)operator([)ident(Index)operator(:) ident(Integer)operator(])operator(:) ident(TSisyThread) directive(read) ident(GetSisy) directive(write) ident(PutSisy)operator(;) ident(default)operator(;)
   reserved(end)operator(;)
 
-reserved(procedure) ident(SetSisyChangeState)operator(()ident(Node)operator(:) ident(TTreeNode)operator(;) ident(Active)operator(:) ident(Boolean)operator(\);)
-reserved(function) ident(SisyChangeActivated)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\):) ident(Boolean)operator(;)
+reserved(procedure) ident(SetSisyChangeState)operator(()ident(Node)operator(:) ident(TTreeNode)operator(;) ident(Active)operator(:) ident(Boolean)operator(\))operator(;)
+reserved(function) ident(SisyChangeActivated)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(:) ident(Boolean)operator(;)
 
 reserved(var)
   ident(SisyFilter)operator(:) ident(TStringList)operator(;)
@@ -4188,22 +4188,22 @@ reserved(implementation)
 
 reserved(uses) ident(plutomain)operator(,) ident(workU)operator(,) ident(ValuesU)operator(;)
 
-reserved(procedure) ident(SetSisyChangeState)operator(()ident(Node)operator(:) ident(TTreeNode)operator(;) ident(Active)operator(:) ident(Boolean)operator(\);)
+reserved(procedure) ident(SetSisyChangeState)operator(()ident(Node)operator(:) ident(TTreeNode)operator(;) ident(Active)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(begin)
-  ident(Node)operator(.)ident(Data) operator(:=) ident(Pointer)operator(()reserved(not) ident(Active)operator(\);)
+  ident(Node)operator(.)ident(Data) operator(:=) ident(Pointer)operator(()reserved(not) ident(Active)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(SisyChangeActivated)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(SisyChangeActivated)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(Node)operator(.)ident(Data) operator(=) ident(Pointer)operator(()ident(False)operator(\);)
+  ident(Result) operator(:=) ident(Node)operator(.)ident(Data) operator(=) ident(Pointer)operator(()ident(False)operator(\))operator(;)
 reserved(end)operator(;)
 
 comment({ TSisyThread })
 
 reserved(constructor) ident(TSisyThread)operator(.)ident(CreateIt)operator(()reserved(const) ident(AName)operator(,) ident(AKeyName)operator(:) reserved(string)operator(;)
-  ident(AHKEY)operator(:) ident(HKEY)operator(;) ident(ALabel)operator(:) ident(TLabel)operator(;) ident(AUniKey)operator(:) ident(TUniKey)operator(\);)
+  ident(AHKEY)operator(:) ident(HKEY)operator(;) ident(ALabel)operator(:) ident(TLabel)operator(;) ident(AUniKey)operator(:) ident(TUniKey)operator(\))operator(;)
 reserved(begin)
-  reserved(inherited) ident(Create)operator(()ident(True)operator(\);)      comment(// Create thread suspended)
+  reserved(inherited) ident(Create)operator(()ident(True)operator(\))operator(;)      comment(// Create thread suspended)
 
   ident(Started) operator(:=) ident(False)operator(;)
   ident(DoReport) operator(:=) ident(True)operator(;)
@@ -4218,15 +4218,15 @@ reserved(begin)
   ident(Reg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(;)
   ident(TheClock) operator(:=) ident(TClock)operator(.)ident(Create)operator(;)
 
-  ident(Uni) operator(:=) ident(AUniKey)operator(.)ident(GetKey)operator(()ident(Name)operator(\);)
-  ident(Priority) operator(:=) ident(TThreadPriority)operator(()ident(Uni)operator(.)ident(ReadInteger)operator(()string<delimiter(')content(Priority)delimiter(')>operator(,) ident(Integer)operator(()ident(tpLowest)operator(\)\)\);)
-  ident(PrevKeyCount) operator(:=) ident(Uni)operator(.)ident(ReadInteger)operator(()string<delimiter(')content(KeyCount)delimiter(')>operator(,) integer(0)operator(\);)
+  ident(Uni) operator(:=) ident(AUniKey)operator(.)ident(GetKey)operator(()ident(Name)operator(\))operator(;)
+  ident(Priority) operator(:=) ident(TThreadPriority)operator(()ident(Uni)operator(.)ident(ReadInteger)operator(()string<delimiter(')content(Priority)delimiter(')>operator(,) ident(Integer)operator(()ident(tpLowest)operator(\))operator(\))operator(\))operator(;)
+  ident(PrevKeyCount) operator(:=) ident(Uni)operator(.)ident(ReadInteger)operator(()string<delimiter(')content(KeyCount)delimiter(')>operator(,) integer(0)operator(\))operator(;)
 
-  ident(MaxKeyCountToScan) operator(:=) ident(Cardinal)operator(()ident(Uni)operator(.)ident(ReadInteger)operator(()string<delimiter(')content(ScanTuner: MaxKeys)delimiter(')>operator(,) operator(-)integer(1)operator(\)\);)
-  ident(MaxValueCountToScan) operator(:=) ident(Cardinal)operator(()ident(Uni)operator(.)ident(ReadInteger)operator(()string<delimiter(')content(ScanTuner: MaxValues)delimiter(')>operator(,) operator(-)integer(1)operator(\)\);)
-  ident(MaxDataLenToScan) operator(:=) ident(Cardinal)operator(()ident(Uni)operator(.)ident(ReadInteger)operator(()string<delimiter(')content(ScanTuner: MaxDataLen)delimiter(')>operator(,) operator(-)integer(1)operator(\)\);)
+  ident(MaxKeyCountToScan) operator(:=) ident(Cardinal)operator(()ident(Uni)operator(.)ident(ReadInteger)operator(()string<delimiter(')content(ScanTuner: MaxKeys)delimiter(')>operator(,) operator(-)integer(1)operator(\))operator(\))operator(;)
+  ident(MaxValueCountToScan) operator(:=) ident(Cardinal)operator(()ident(Uni)operator(.)ident(ReadInteger)operator(()string<delimiter(')content(ScanTuner: MaxValues)delimiter(')>operator(,) operator(-)integer(1)operator(\))operator(\))operator(;)
+  ident(MaxDataLenToScan) operator(:=) ident(Cardinal)operator(()ident(Uni)operator(.)ident(ReadInteger)operator(()string<delimiter(')content(ScanTuner: MaxDataLen)delimiter(')>operator(,) operator(-)integer(1)operator(\))operator(\))operator(;)
 
-  ident(Key) operator(:=) ident(TSpyKey)operator(.)ident(Create)operator(()reserved(nil)operator(,) ident(AKeyName)operator(\);)
+  ident(Key) operator(:=) ident(TSpyKey)operator(.)ident(Create)operator(()reserved(nil)operator(,) ident(AKeyName)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TSisyThread)operator(.)ident(FreeKey)operator(;)
@@ -4238,14 +4238,14 @@ reserved(end)operator(;)
 
 reserved(destructor) ident(TSisyThread)operator(.)ident(Destroy)operator(;)
 reserved(begin)
-  ident(Synchronize)operator(()ident(FreeKey)operator(\);)
+  ident(Synchronize)operator(()ident(FreeKey)operator(\))operator(;)
   reserved(inherited)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TSisyThread)operator(.)ident(Execute)operator(;)
 reserved(begin)
   ident(InfoForShow) operator(:=) ident(Name) operator(+) string<delimiter(')content( initializing...)delimiter(')>operator(;)
-  ident(Synchronize)operator(()ident(ShowInfo)operator(\);)
+  ident(Synchronize)operator(()ident(ShowInfo)operator(\))operator(;)
 
   ident(TheClock)operator(.)ident(Restart)operator(;)
   ident(Started) operator(:=) ident(False)operator(;)
@@ -4254,7 +4254,7 @@ reserved(begin)
       ident(KeyIndex) operator(:=) integer(0)operator(;)
 
      comment({ ===================== })
-      ident(Key)operator(.)ident(Spy)operator(()ident(KeyHKEY)operator(,) ident(Self)operator(\);)
+      ident(Key)operator(.)ident(Spy)operator(()ident(KeyHKEY)operator(,) ident(Self)operator(\))operator(;)
      comment({ ===================== })
 
       reserved(if) ident(Terminated) reserved(then)
@@ -4264,19 +4264,19 @@ reserved(begin)
       ident(TheClock)operator(.)ident(Restart)operator(;)
       reserved(if) reserved(not) ident(Started) reserved(then) reserved(begin)
         ident(Started) operator(:=) ident(True)operator(;)
-        ident(Uni)operator(.)ident(WriteInteger)operator(()string<delimiter(')content(KeyCount)delimiter(')>operator(,) ident(KeyCount)operator(\);)
+        ident(Uni)operator(.)ident(WriteInteger)operator(()string<delimiter(')content(KeyCount)delimiter(')>operator(,) ident(KeyCount)operator(\))operator(;)
         reserved(if) ident(Assigned)operator(()ident(OnStarted)operator(\)) reserved(then)
-          ident(OnStarted)operator(()ident(Self)operator(\);)
+          ident(OnStarted)operator(()ident(Self)operator(\))operator(;)
       reserved(end)operator(;)
     reserved(except)
-      ident(ShowMessage)operator(()string<delimiter(')content(Error in Sisyphus)delimiter(')>operator(\);)
+      ident(ShowMessage)operator(()string<delimiter(')content(Error in Sisyphus)delimiter(')>operator(\))operator(;)
     reserved(end)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TSisyThread)operator(.)ident(AddValueChange)operator(()ident(Typ)operator(:) ident(TSisyChangeType)operator(;) reserved(const) ident(Path)operator(:) reserved(string)operator(;)
-  ident(Old)operator(,) ident(New)operator(:) ident(TRegContext)operator(\);)
+  ident(Old)operator(,) ident(New)operator(:) ident(TRegContext)operator(\))operator(;)
 
-  reserved(procedure) ident(TryNotify)operator(()ident(Event)operator(:) ident(TSisyCHangeEvent)operator(\);)
+  reserved(procedure) ident(TryNotify)operator(()ident(Event)operator(:) ident(TSisyCHangeEvent)operator(\))operator(;)
   reserved(begin)
 
   reserved(end)operator(;)
@@ -4285,16 +4285,16 @@ reserved(begin)
   reserved(if) reserved(not) operator(()ident(Started) reserved(and) ident(DoReport)operator(\)) reserved(then)
     ident(Exit)operator(;)
 
-  ident(CurrentChange) operator(:=) ident(TSisyChange)operator(.)ident(Create)operator(()ident(Typ)operator(,) ident(Path)operator(,) ident(Old)operator(,) ident(New)operator(\);)
-  ident(Synchronize)operator(()ident(ReportCurrentChange)operator(\);)
-  ident(Synchronize)operator(()ident(NotifyChange)operator(\);)
+  ident(CurrentChange) operator(:=) ident(TSisyChange)operator(.)ident(Create)operator(()ident(Typ)operator(,) ident(Path)operator(,) ident(Old)operator(,) ident(New)operator(\))operator(;)
+  ident(Synchronize)operator(()ident(ReportCurrentChange)operator(\))operator(;)
+  ident(Synchronize)operator(()ident(NotifyChange)operator(\))operator(;)
 
 comment(//  CurrentChange.Free; //this makes Pluto itself)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TSisyThread)operator(.)ident(AddKeyChange)operator(()ident(Typ)operator(:) ident(TSisyChangeType)operator(;) reserved(const) ident(Path)operator(:) reserved(string)operator(\);)
+reserved(procedure) ident(TSisyThread)operator(.)ident(AddKeyChange)operator(()ident(Typ)operator(:) ident(TSisyChangeType)operator(;) reserved(const) ident(Path)operator(:) reserved(string)operator(\))operator(;)
 reserved(begin)
-  ident(AddValueChange)operator(()ident(Typ)operator(,) ident(Path)operator(,) ident(ZeroRegContext)operator(,) ident(ZeroRegContext)operator(\);)
+  ident(AddValueChange)operator(()ident(Typ)operator(,) ident(Path)operator(,) ident(ZeroRegContext)operator(,) ident(ZeroRegContext)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TSisyThread)operator(.)ident(ShowInfo)operator(;)
@@ -4316,7 +4316,7 @@ reserved(begin)
   reserved(if) ident(Started) reserved(then)
     ident(Exit)operator(;)
 
-  ident(Inc)operator(()ident(KeyCount)operator(\);)
+  ident(Inc)operator(()ident(KeyCount)operator(\))operator(;)
 
   reserved(if) operator(()ident(KeyCount) reserved(and) hex($1FF)operator(\)) operator(=) integer(0) reserved(then) reserved(begin)
     reserved(if) ident(KeyCount) operator(>) ident(PrevKeyCount) reserved(then)
@@ -4324,12 +4324,12 @@ reserved(begin)
 
     ident(c) operator(:=) integer(0)operator(;)
     reserved(if) ident(PrevkeyCount) operator(>) integer(0) reserved(then)
-      ident(c) operator(:=) ident(Round)operator((()ident(KeyCount) operator(*) ident(StatusPoints)operator(\)) operator(/) ident(PrevKeyCount)operator(\);)
+      ident(c) operator(:=) ident(Round)operator(()operator(()ident(KeyCount) operator(*) ident(StatusPoints)operator(\)) operator(/) ident(PrevKeyCount)operator(\))operator(;)
     ident(InfoForShow) operator(:=) char<delimiter(')content(|)delimiter(')> operator(+) ident(MulStr)operator(()char<delimiter(')content(.)delimiter(')>operator(,) ident(c)operator(\)) operator(+) ident(MulStr)operator(()char<delimiter(')content( )delimiter(')>operator(,) ident(StatusPoints) operator(-) ident(c)operator(\)) operator(+) char<delimiter(')content(|)delimiter(')> operator(+)
       ident(Format)operator(()string<delimiter(')content( (%0.1f s\) %d/%d k )delimiter(')>operator(,)
-        operator([)ident(TheClock)operator(.)ident(SecondsPassed)operator(,) ident(KeyCount)operator(,) ident(PrevKeyCount)operator(]\);)
+        operator([)ident(TheClock)operator(.)ident(SecondsPassed)operator(,) ident(KeyCount)operator(,) ident(PrevKeyCount)operator(])operator(\))operator(;)
 
-    ident(Synchronize)operator(()ident(ShowInfo)operator(\);)
+    ident(Synchronize)operator(()ident(ShowInfo)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
@@ -4340,31 +4340,31 @@ reserved(begin)
   reserved(if) reserved(not) ident(Started) reserved(then)
     ident(Exit)operator(;)
 
-  ident(Inc)operator(()ident(KeyIndex)operator(\);)
+  ident(Inc)operator(()ident(KeyIndex)operator(\))operator(;)
 
-  reserved(if) operator((()ident(KeyIndex) reserved(and) hex($1FF)operator(\)) operator(=) integer(0)operator(\)) reserved(and) operator(()ident(KeyCount) operator(>) integer(0)operator(\)) reserved(then) reserved(begin)
+  reserved(if) operator(()operator(()ident(KeyIndex) reserved(and) hex($1FF)operator(\)) operator(=) integer(0)operator(\)) reserved(and) operator(()ident(KeyCount) operator(>) integer(0)operator(\)) reserved(then) reserved(begin)
     reserved(if) ident(KeyIndex) operator(>) ident(KeyCount) reserved(then)
       ident(KeyCount) operator(:=) ident(KeyIndex)operator(;)
 
     ident(c) operator(:=) integer(0)operator(;)
     reserved(if) ident(KeyCount) operator(>) integer(0) reserved(then)
-      ident(c) operator(:=) ident(Round)operator((()ident(KeyIndex) operator(*) ident(StatusPoints)operator(\)) operator(/) ident(KeyCount)operator(\);)
+      ident(c) operator(:=) ident(Round)operator(()operator(()ident(KeyIndex) operator(*) ident(StatusPoints)operator(\)) operator(/) ident(KeyCount)operator(\))operator(;)
 
     ident(InfoForShow) operator(:=) char<delimiter(')content(|)delimiter(')> operator(+) ident(MulStr)operator(()char<delimiter(')content(:)delimiter(')>operator(,) ident(c)operator(\)) operator(+) ident(MulStr)operator(()char<delimiter(')content(.)delimiter(')>operator(,) ident(StatusPoints) operator(-) ident(c)operator(\)) operator(+) char<delimiter(')content(|)delimiter(')> operator(+)
-      ident(Format)operator(()string<delimiter(')content( (%0.1f s\) %d/%d k )delimiter(')>operator(,) operator([)ident(SecsPerRound)operator(,) ident(KeyIndex)operator(,) ident(KeyCount)operator(]\);)
+      ident(Format)operator(()string<delimiter(')content( (%0.1f s\) %d/%d k )delimiter(')>operator(,) operator([)ident(SecsPerRound)operator(,) ident(KeyIndex)operator(,) ident(KeyCount)operator(])operator(\))operator(;)
 
-    ident(Synchronize)operator(()ident(ShowInfo)operator(\);)
+    ident(Synchronize)operator(()ident(ShowInfo)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(TSisyThread)operator(.)ident(GetSpecialChange)operator(()ident(ChangeType)operator(:) ident(TSisyChangeType)operator(\):)
+reserved(function) ident(TSisyThread)operator(.)ident(GetSpecialChange)operator(()ident(ChangeType)operator(:) ident(TSisyChangeType)operator(\))operator(:)
   ident(TSisyChangeEvent)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(FOnSpecialChanges)operator([)ident(ChangeType)operator(];)
+  ident(Result) operator(:=) ident(FOnSpecialChanges)operator([)ident(ChangeType)operator(])operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TSisyThread)operator(.)ident(SetSpecialChange)operator(()ident(ChangeType)operator(:) ident(TSisyChangeType)operator(;)
-  reserved(const) ident(Value)operator(:) ident(TSisyChangeEvent)operator(\);)
+  reserved(const) ident(Value)operator(:) ident(TSisyChangeEvent)operator(\))operator(;)
 reserved(begin)
   ident(FOnSpecialChanges)operator([)ident(ChangeType)operator(]) operator(:=) ident(Value)operator(;)
 reserved(end)operator(;)
@@ -4373,17 +4373,17 @@ reserved(procedure) ident(TSisyThread)operator(.)ident(NotifyChange)operator(;)
 reserved(var)
   ident(Event)operator(:) ident(TSisyChangeEvent)operator(;)
 reserved(begin)
-  ident(Event) operator(:=) ident(FOnSpecialChanges)operator([)ident(CurrentChange)operator(.)ident(Typ)operator(];)
+  ident(Event) operator(:=) ident(FOnSpecialChanges)operator([)ident(CurrentChange)operator(.)ident(Typ)operator(])operator(;)
   reserved(if) ident(Assigned)operator(()ident(Event)operator(\)) reserved(then)
-    ident(Event)operator(()ident(Self)operator(,) ident(CurrentChange)operator(\);)
+    ident(Event)operator(()ident(Self)operator(,) ident(CurrentChange)operator(\))operator(;)
 
   reserved(if) ident(Assigned)operator(()ident(FOnChange)operator(\)) reserved(then)
-    ident(FOnChange)operator(()ident(Self)operator(,) ident(CurrentChange)operator(\);)
+    ident(FOnChange)operator(()ident(Self)operator(,) ident(CurrentChange)operator(\))operator(;)
 reserved(end)operator(;)
 
 comment({ TSpyValue })
 
-reserved(constructor) ident(TSpyValue)operator(.)ident(Create)operator(()reserved(const) ident(Name)operator(:) reserved(string)operator(;) ident(Context)operator(:) ident(TRegContext)operator(\);)
+reserved(constructor) ident(TSpyValue)operator(.)ident(Create)operator(()reserved(const) ident(Name)operator(:) reserved(string)operator(;) ident(Context)operator(:) ident(TRegContext)operator(\))operator(;)
 reserved(begin)
   ident(Self)operator(.)ident(Name) operator(:=) ident(Name)operator(;)
   ident(Next) operator(:=) reserved(nil)operator(;)
@@ -4392,7 +4392,7 @@ reserved(end)operator(;)
 
 comment({ TSpyKey })
 
-reserved(constructor) ident(TSpyKey)operator(.)ident(Create)operator(()ident(AParent)operator(:) ident(TSpyKey)operator(;) ident(AName)operator(:) reserved(string)operator(\);)
+reserved(constructor) ident(TSpyKey)operator(.)ident(Create)operator(()ident(AParent)operator(:) ident(TSpyKey)operator(;) ident(AName)operator(:) reserved(string)operator(\))operator(;)
 reserved(begin)
   ident(Name) operator(:=) ident(AName)operator(;)
   ident(Parent) operator(:=) ident(AParent)operator(;)
@@ -4434,7 +4434,7 @@ reserved(begin)
   ident(Result) operator(:=) ident(Result) operator(+) ident(Name)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TSpyKey)operator(.)ident(Spy)operator(()ident(AHKEY)operator(:) ident(HKEY)operator(;) ident(Sisy)operator(:) ident(TSisyThread)operator(\);)
+reserved(procedure) ident(TSpyKey)operator(.)ident(Spy)operator(()ident(AHKEY)operator(:) ident(HKEY)operator(;) ident(Sisy)operator(:) ident(TSisyThread)operator(\))operator(;)
 reserved(var)
   ident(SL)operator(:) ident(TStringList)operator(;)
   ident(LastKey)operator(:) ident(TSpyKey)operator(;)
@@ -4447,7 +4447,7 @@ reserved(var)
     comment(//OK, this part is a little bit complicate. So I will comment very much.)
     comment(//First, two terms are important:)
     comment(//<REAL> means the list of values that will be read from the registry now:)
-    ident(Sisy)operator(.)ident(Reg)operator(.)ident(GetValueNames)operator(()ident(SL)operator(\);)
+    ident(Sisy)operator(.)ident(Reg)operator(.)ident(GetValueNames)operator(()ident(SL)operator(\))operator(;)
     reserved(if) ident(Cardinal)operator(()ident(SL)operator(.)ident(Count)operator(\)) operator(>) ident(Sisy)operator(.)ident(MaxValueCountToScan) reserved(then)
       ident(Exit)operator(;)
     comment(//So <REAL> is TStringList.)
@@ -4501,11 +4501,11 @@ reserved(var)
 
         reserved(if) reserved(not) ident(Assigned)operator(()ident(NewValue)operator(\)) reserved(then) reserved(begin)
           comment(//cV+  No, not found! So it is new...)
-          ident(NewValue) operator(:=) ident(TSpyValue)operator(.)ident(Create)operator(()ident(SL)operator([)ident(i)operator(],) ident(Sisy)operator(.)ident(Reg)operator(.)ident(ReadContext)operator(()ident(SL)operator([)ident(i)operator(]\)\);)
+          ident(NewValue) operator(:=) ident(TSpyValue)operator(.)ident(Create)operator(()ident(SL)operator([)ident(i)operator(])operator(,) ident(Sisy)operator(.)ident(Reg)operator(.)ident(ReadContext)operator(()ident(SL)operator([)ident(i)operator(])operator(\))operator(\))operator(;)
           comment({ ================ cV+ ================ })
-          reserved(if) ident(Sisy)operator(.)ident(Started) reserved(and) ident(Sisy)operator(.)ident(Reg)operator(.)ident(ValueReallyExists)operator(()ident(SL)operator([)ident(i)operator(]\)) reserved(then)
+          reserved(if) ident(Sisy)operator(.)ident(Started) reserved(and) ident(Sisy)operator(.)ident(Reg)operator(.)ident(ValueReallyExists)operator(()ident(SL)operator([)ident(i)operator(])operator(\)) reserved(then)
             ident(Sisy)operator(.)ident(AddValueChange)operator(()ident(cValuePlus)operator(,) ident(Path) operator(+) string<delimiter(')content(\\\\)delimiter(')> operator(+) ident(NewValue)operator(.)ident(Name)operator(,)
-              ident(ZeroRegContext)operator(,) ident(NewValue)operator(.)ident(Context)operator(\);)
+              ident(ZeroRegContext)operator(,) ident(NewValue)operator(.)ident(Context)operator(\))operator(;)
         reserved(end)operator(;)
 
         comment(//The new object now must be placed after the last value)
@@ -4541,7 +4541,7 @@ reserved(var)
       comment({ ================ cV- ================ })
       reserved(if) ident(Sisy)operator(.)ident(Started) reserved(and) reserved(not) ident(Sisy)operator(.)ident(Reg)operator(.)ident(ValueReallyExists)operator(()ident(LastValue)operator(.)ident(Name)operator(\)) reserved(then)
         ident(Sisy)operator(.)ident(AddValueChange)operator(()ident(cValueMinus)operator(,) ident(Path) operator(+) string<delimiter(')content(\\\\)delimiter(')> operator(+) ident(LastValue)operator(.)ident(Name)operator(,)
-          ident(LastValue)operator(.)ident(Context)operator(,) ident(ZeroRegContext)operator(\);)
+          ident(LastValue)operator(.)ident(Context)operator(,) ident(ZeroRegContext)operator(\))operator(;)
       ident(LastValue)operator(.)ident(Free)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
@@ -4556,14 +4556,14 @@ reserved(var)
     comment(//So, finally <CURRENT> = <REAL>. That means we now can compare the data:)
     ident(Value) operator(:=) ident(Values)operator(;)
     reserved(while) ident(Assigned)operator(()ident(Value)operator(\)) reserved(and) reserved(not) ident(Sisy)operator(.)ident(Terminated) reserved(do) reserved(begin)
-      ident(Size) operator(:=) ident(Sisy)operator(.)ident(Reg)operator(.)ident(GetDataSize)operator(()ident(Value)operator(.)ident(Name)operator(\);)
-      reserved(if) operator(()ident(Size) operator(=) ident(Cardinal)operator((-)integer(1)operator(\)\)) reserved(or)
+      ident(Size) operator(:=) ident(Sisy)operator(.)ident(Reg)operator(.)ident(GetDataSize)operator(()ident(Value)operator(.)ident(Name)operator(\))operator(;)
+      reserved(if) operator(()ident(Size) operator(=) ident(Cardinal)operator(()operator(-)integer(1)operator(\))operator(\)) reserved(or)
        operator(()ident(Size) operator(<=) ident(Sisy)operator(.)ident(MaxDataLenToScan)operator(\)) reserved(then) reserved(begin)
-        ident(Context) operator(:=) ident(Sisy)operator(.)ident(Reg)operator(.)ident(ReadContext)operator(()ident(Value)operator(.)ident(Name)operator(\);)
+        ident(Context) operator(:=) ident(Sisy)operator(.)ident(Reg)operator(.)ident(ReadContext)operator(()ident(Value)operator(.)ident(Name)operator(\))operator(;)
         reserved(if) reserved(not) ident(SameContext)operator(()ident(Context)operator(,) ident(Value)operator(.)ident(Context)operator(\)) reserved(then) reserved(begin)
           comment({ ================ cC ================ })
           ident(Sisy)operator(.)ident(AddValueChange)operator(()ident(cContextChange)operator(,) ident(Path) operator(+) string<delimiter(')content(\\\\)delimiter(')> operator(+) ident(Value)operator(.)ident(Name)operator(,)
-            ident(Value)operator(.)ident(Context)operator(,) ident(Context)operator(\);)
+            ident(Value)operator(.)ident(Context)operator(,) ident(Context)operator(\))operator(;)
           ident(Value)operator(.)ident(Context) operator(:=) ident(Context)operator(;)
         reserved(end)operator(;)
       reserved(end)operator(;)
@@ -4583,7 +4583,7 @@ reserved(var)
     comment(//First, two terms are important:)
     comment(//<REAL> means the list of keys that will be read from the registry now:)
 
-    ident(Sisy)operator(.)ident(Reg)operator(.)ident(GetKeyNames)operator(()ident(SL)operator(\);)
+    ident(Sisy)operator(.)ident(Reg)operator(.)ident(GetKeyNames)operator(()ident(SL)operator(\))operator(;)
     reserved(if) ident(Cardinal)operator(()ident(SL)operator(.)ident(Count)operator(\)) operator(>) ident(Sisy)operator(.)ident(MaxKeyCountToScan) reserved(then)
       ident(Exit)operator(;)
     comment(//So <REAL> is TStringList.)
@@ -4614,11 +4614,11 @@ reserved(var)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin)
       reserved(if) ident(Assigned)operator(()ident(Key)operator(\)) reserved(and) operator(()ident(SL)operator([)ident(i)operator(]) operator(=) ident(Key)operator(.)ident(Name)operator(\)) reserved(then) reserved(begin)
         comment(//cK=  Normally (0.9999\) everything's the same)
-        reserved(if) ident(Success)operator(()ident(RegOpenKey)operator(()ident(AHKEY)operator(,) ident(PChar)operator(()ident(SL)operator([)ident(i)operator(]\),) ident(NewHKEY)operator(\)\)) reserved(then)
+        reserved(if) ident(Success)operator(()ident(RegOpenKey)operator(()ident(AHKEY)operator(,) ident(PChar)operator(()ident(SL)operator([)ident(i)operator(])operator(\))operator(,) ident(NewHKEY)operator(\))operator(\)) reserved(then)
           reserved(try)
-            ident(Key)operator(.)ident(Spy)operator(()ident(NewHKEY)operator(,) ident(Sisy)operator(\);)
+            ident(Key)operator(.)ident(Spy)operator(()ident(NewHKEY)operator(,) ident(Sisy)operator(\))operator(;)
           reserved(finally)
-            ident(RegCloseKey)operator(()ident(NewHKEY)operator(\);)
+            ident(RegCloseKey)operator(()ident(NewHKEY)operator(\))operator(;)
           reserved(end)operator(;)
         reserved(if) ident(Sisy)operator(.)ident(Terminated) reserved(then)
           ident(Exit)operator(;)
@@ -4646,20 +4646,20 @@ reserved(var)
 
         reserved(if) reserved(not) ident(Assigned)operator(()ident(NewKey)operator(\)) reserved(then) reserved(begin) comment(//if we didn't find it)
           comment(//cK+ No, not found! So it is new...)
-          ident(NewKey) operator(:=) ident(TSpyKey)operator(.)ident(Create)operator(()ident(Self)operator(,) ident(SL)operator([)ident(i)operator(]\);)
+          ident(NewKey) operator(:=) ident(TSpyKey)operator(.)ident(Create)operator(()ident(Self)operator(,) ident(SL)operator([)ident(i)operator(])operator(\))operator(;)
           ident(Sisy)operator(.)ident(IncKeyCount)operator(;)
           ident(Sisy)operator(.)ident(Reg)operator(.)ident(CurrentKey) operator(:=) ident(AHKEY)operator(;)
           comment({ ================ cK+ ================ })
-          reserved(if) ident(Sisy)operator(.)ident(Started) reserved(and) ident(Sisy)operator(.)ident(Reg)operator(.)ident(KeyExists)operator(()ident(SL)operator([)ident(i)operator(]\)) reserved(then)
-            ident(Sisy)operator(.)ident(AddKeyChange)operator(()ident(cKeyPlus)operator(,) ident(Path) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(NewKey)operator(.)ident(Name)operator(\);)
+          reserved(if) ident(Sisy)operator(.)ident(Started) reserved(and) ident(Sisy)operator(.)ident(Reg)operator(.)ident(KeyExists)operator(()ident(SL)operator([)ident(i)operator(])operator(\)) reserved(then)
+            ident(Sisy)operator(.)ident(AddKeyChange)operator(()ident(cKeyPlus)operator(,) ident(Path) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(NewKey)operator(.)ident(Name)operator(\))operator(;)
 
           ident(SavedDoReport) operator(:=) ident(Sisy)operator(.)ident(DoReport)operator(;)
-          reserved(if) ident(Success)operator(()ident(RegOpenKey)operator(()ident(AHKEY)operator(,) ident(PChar)operator(()ident(SL)operator([)ident(i)operator(]\),) ident(NewHKEY)operator(\)\)) reserved(then)
+          reserved(if) ident(Success)operator(()ident(RegOpenKey)operator(()ident(AHKEY)operator(,) ident(PChar)operator(()ident(SL)operator([)ident(i)operator(])operator(\))operator(,) ident(NewHKEY)operator(\))operator(\)) reserved(then)
             reserved(try)
               ident(Sisy)operator(.)ident(DoReport) operator(:=) ident(False)operator(;)
-              ident(NewKey)operator(.)ident(Spy)operator(()ident(NewHKEY)operator(,) ident(Sisy)operator(\);) comment(//<-- recursion itself)
+              ident(NewKey)operator(.)ident(Spy)operator(()ident(NewHKEY)operator(,) ident(Sisy)operator(\))operator(;) comment(//<-- recursion itself)
             reserved(finally)
-              ident(RegCloseKey)operator(()ident(NewHKEY)operator(\);)
+              ident(RegCloseKey)operator(()ident(NewHKEY)operator(\))operator(;)
               ident(Sisy)operator(.)ident(DoReport) operator(:=) ident(SavedDoReport)operator(;)
             reserved(end)operator(;)
 
@@ -4700,7 +4700,7 @@ reserved(var)
       ident(Sisy)operator(.)ident(Reg)operator(.)ident(CurrentKey) operator(:=) ident(AHKEY)operator(;)
       comment({ ================ cK- ================ })
       reserved(if) ident(Sisy)operator(.)ident(Started) reserved(and) reserved(not) ident(Sisy)operator(.)ident(Reg)operator(.)ident(KeyExists)operator(()ident(LastKey)operator(.)ident(Name)operator(\)) reserved(then)
-        ident(Sisy)operator(.)ident(AddKeyChange)operator(()ident(cKeyMinus)operator(,) ident(Path) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(LastKey)operator(.)ident(Name)operator(\);)
+        ident(Sisy)operator(.)ident(AddKeyChange)operator(()ident(cKeyMinus)operator(,) ident(Path) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(LastKey)operator(.)ident(Name)operator(\))operator(;)
       ident(LastKey)operator(.)ident(Free)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
@@ -4730,7 +4730,7 @@ reserved(end)operator(;)
 comment({ TSisyChange })
 
 reserved(constructor) ident(TSisyChange)operator(.)ident(Create)operator(()ident(ATyp)operator(:) ident(TSisyChangeType)operator(;) reserved(const) ident(APath)operator(:) reserved(string)operator(;)
-  ident(AOldContext)operator(:) ident(TRegContext)operator(;) ident(ANewContext)operator(:) ident(TRegContext)operator(\);)
+  ident(AOldContext)operator(:) ident(TRegContext)operator(;) ident(ANewContext)operator(:) ident(TRegContext)operator(\))operator(;)
 reserved(begin)
   reserved(inherited) ident(Create)operator(;)
   ident(Typ) operator(:=) ident(ATyp)operator(;)
@@ -4746,7 +4746,7 @@ reserved(var)
   ident(NewNode)operator(:) ident(Boolean)operator(;)
   ident(i)operator(:) ident(Integer)operator(;)
 
-  reserved(function) ident(IconOfSisyChangeType)operator(()ident(Typ)operator(:) ident(TSisyChangeType)operator(\):) ident(Integer)operator(;)
+  reserved(function) ident(IconOfSisyChangeType)operator(()ident(Typ)operator(:) ident(TSisyChangeType)operator(\))operator(:) ident(Integer)operator(;)
   reserved(begin)
     ident(Result) operator(:=) operator(-)integer(1)operator(;)
     reserved(case) ident(Typ) reserved(of)
@@ -4755,7 +4755,7 @@ reserved(var)
     reserved(end)operator(;)
   reserved(end)operator(;)
 
-  reserved(function) ident(FindNode)operator(()ident(Text)operator(:) reserved(string)operator(\):) ident(TTreeNode)operator(;)
+  reserved(function) ident(FindNode)operator(()ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(TTreeNode)operator(;)
   reserved(begin)
     ident(Result) operator(:=) ident(WorkWin)operator(.)ident(SisyTV)operator(.)ident(Items)operator(.)ident(GetFirstNode)operator(;)
     reserved(while) ident(Assigned)operator(()ident(Result)operator(\)) reserved(do) reserved(begin)
@@ -4770,16 +4770,16 @@ reserved(begin)
     ident(Exit)operator(;)
 
   reserved(if) ident(Typ) reserved(in) operator([)ident(cContextChange)operator(,) ident(cValueMinus)operator(,) ident(cValuePlus)operator(]) reserved(then) reserved(begin)
-    ident(Root) operator(:=) ident(ExRegFullKey)operator(()ident(Path)operator(\);)
-    ident(SubPath) operator(:=) ident(ExRegValue)operator(()ident(Path)operator(\);)
+    ident(Root) operator(:=) ident(ExRegFullKey)operator(()ident(Path)operator(\))operator(;)
+    ident(SubPath) operator(:=) ident(ExRegValue)operator(()ident(Path)operator(\))operator(;)
   reserved(end) reserved(else) reserved(begin)
-    ident(Root) operator(:=) ident(UntilLastChar)operator(()ident(ExRegFullKey)operator(()ident(Path)operator(\),) char<delimiter(')content(\\)delimiter(')>operator(\);)
-    ident(SubPath) operator(:=) ident(FromLastChar)operator(()ident(ExRegFullKey)operator(()ident(Path)operator(\),) char<delimiter(')content(\\)delimiter(')>operator(\);)
+    ident(Root) operator(:=) ident(UntilLastChar)operator(()ident(ExRegFullKey)operator(()ident(Path)operator(\))operator(,) char<delimiter(')content(\\)delimiter(')>operator(\))operator(;)
+    ident(SubPath) operator(:=) ident(FromLastChar)operator(()ident(ExRegFullKey)operator(()ident(Path)operator(\))operator(,) char<delimiter(')content(\\)delimiter(')>operator(\))operator(;)
   reserved(end)operator(;)
 
   reserved(with) ident(WorkWin) reserved(do)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(SisyFilter)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin)
-      reserved(if) ident(TextAtPos)operator(()ident(Root)operator(,) integer(1)operator(,) ident(SisyFilter)operator([)ident(i)operator(]\)) reserved(then) reserved(begin)
+      reserved(if) ident(TextAtPos)operator(()ident(Root)operator(,) integer(1)operator(,) ident(SisyFilter)operator([)ident(i)operator(])operator(\)) reserved(then) reserved(begin)
         comment(//show that it's working)
         reserved(with) ident(FilterChangesB) reserved(do) reserved(begin)
           ident(Caption) operator(:=) string<delimiter(')content(Filter..!)delimiter(')>operator(;)
@@ -4793,20 +4793,20 @@ reserved(begin)
   reserved(with) ident(WorkWin)operator(.)ident(SisyTV)operator(.)ident(Items) reserved(do) reserved(begin)
     ident(BeginUpdate)operator(;)
     reserved(try)
-      ident(RootNode) operator(:=) ident(FindNode)operator(()ident(Root)operator(\);)
-      ident(NewNode) operator(:=) reserved(not) ident(Assigned)operator(()ident(RootNode)operator(\);)
+      ident(RootNode) operator(:=) ident(FindNode)operator(()ident(Root)operator(\))operator(;)
+      ident(NewNode) operator(:=) reserved(not) ident(Assigned)operator(()ident(RootNode)operator(\))operator(;)
       reserved(if) ident(NewNode) reserved(then) reserved(begin)
-        ident(RootNode) operator(:=) ident(AddChild)operator(()reserved(nil)operator(,) ident(Root)operator(\);)
+        ident(RootNode) operator(:=) ident(AddChild)operator(()reserved(nil)operator(,) ident(Root)operator(\))operator(;)
         ident(RootNode)operator(.)ident(ImageIndex) operator(:=) ident(iconGroup)operator(;)
       reserved(end) reserved(else) reserved(if) reserved(not) ident(SisyChangeActivated)operator(()ident(RootNode)operator(\)) reserved(then) reserved(begin)
         ident(EndUpdate)operator(;)
       ident(Exit) reserved(end)operator(;)
 
-      ident(Node) operator(:=) ident(AddChildObject)operator(()ident(RootNode)operator(,) ident(SubPath)operator(,) ident(Self)operator(\);)
-      ident(Node)operator(.)ident(ImageIndex) operator(:=) ident(IconOfSisyChangeType)operator(()ident(Typ)operator(\);)
+      ident(Node) operator(:=) ident(AddChildObject)operator(()ident(RootNode)operator(,) ident(SubPath)operator(,) ident(Self)operator(\))operator(;)
+      ident(Node)operator(.)ident(ImageIndex) operator(:=) ident(IconOfSisyChangeType)operator(()ident(Typ)operator(\))operator(;)
       reserved(if) ident(Typ) operator(=) ident(cContextChange) reserved(then) reserved(begin)
-        ident(AddChild)operator(()ident(Node)operator(,) ident(DataPreviewOfContext)operator(()ident(Old)operator(\)\).)ident(ImageIndex) operator(:=) ident(iconOldContext)operator(;)
-        ident(AddChild)operator(()ident(Node)operator(,) ident(DataPreviewOfContext)operator(()ident(New)operator(\)\).)ident(ImageIndex) operator(:=) ident(iconNewContext)operator(;)
+        ident(AddChild)operator(()ident(Node)operator(,) ident(DataPreviewOfContext)operator(()ident(Old)operator(\))operator(\))operator(.)ident(ImageIndex) operator(:=) ident(iconOldContext)operator(;)
+        ident(AddChild)operator(()ident(Node)operator(,) ident(DataPreviewOfContext)operator(()ident(New)operator(\))operator(\))operator(.)ident(ImageIndex) operator(:=) ident(iconNewContext)operator(;)
       reserved(end)operator(;)
     reserved(finally)
       ident(EndUpdate)operator(;)
@@ -4814,7 +4814,7 @@ reserved(begin)
   reserved(end)operator(;)
 
   reserved(if) ident(NewNode) reserved(and) ident(WorkWin)operator(.)ident(SisyExpandGroupsCB)operator(.)ident(Checked) reserved(then)
-    ident(RootNode)operator(.)ident(Expand)operator(()ident(False)operator(\);)
+    ident(RootNode)operator(.)ident(Expand)operator(()ident(False)operator(\))operator(;)
 
   reserved(if) reserved(not) ident(RootNode)operator(.)ident(Expanded) reserved(then)
     ident(RootNode)operator(.)ident(ImageIndex) operator(:=) ident(iconGroupBlinking)operator(;)
@@ -4822,14 +4822,14 @@ reserved(end)operator(;)
 
 comment({ TSisyList })
 
-reserved(function) ident(TSisyList)operator(.)ident(GetSisy)operator(()ident(Index)operator(:) ident(Integer)operator(\):) ident(TSisyThread)operator(;)
+reserved(function) ident(TSisyList)operator(.)ident(GetSisy)operator(()ident(Index)operator(:) ident(Integer)operator(\))operator(:) ident(TSisyThread)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(Get)operator(()ident(Index)operator(\);)
+  ident(Result) operator(:=) ident(Get)operator(()ident(Index)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TSisyList)operator(.)ident(PutSisy)operator(()ident(Index)operator(:) ident(Integer)operator(;) ident(Sisy)operator(:) ident(TSisyThread)operator(\);)
+reserved(procedure) ident(TSisyList)operator(.)ident(PutSisy)operator(()ident(Index)operator(:) ident(Integer)operator(;) ident(Sisy)operator(:) ident(TSisyThread)operator(\))operator(;)
 reserved(begin)
-  ident(Put)operator(()ident(Index)operator(,) ident(Sisy)operator(\);)
+  ident(Put)operator(()ident(Index)operator(,) ident(Sisy)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TSisyList)operator(.)ident(Resume)operator(;)
@@ -4837,7 +4837,7 @@ reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Count)operator(-)integer(1) reserved(do)
-    ident(Items)operator([)ident(i)operator(].)ident(Resume)operator(;)
+    ident(Items)operator([)ident(i)operator(])operator(.)ident(Resume)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TSisyList)operator(.)ident(Suspend)operator(;)
@@ -4845,7 +4845,7 @@ reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Count)operator(-)integer(1) reserved(do)
-    ident(Items)operator([)ident(i)operator(].)ident(Resume)operator(;)
+    ident(Items)operator([)ident(i)operator(])operator(.)ident(Resume)operator(;)
 reserved(end)operator(;)
 
 reserved(initialization)
@@ -4874,13 +4874,13 @@ reserved(type)
     ident(LinkLabel1)operator(:) ident(TLinkLabel)operator(;)
     ident(LinkLabel2)operator(:) ident(TLinkLabel)operator(;)
     ident(LogoL)operator(:) ident(TLabel)operator(;)
-    reserved(procedure) ident(StartBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormHide)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(StartBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormHide)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
     reserved(procedure) ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-      ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(SplashScreenCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+      ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(SplashScreenCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(var)
@@ -4892,12 +4892,12 @@ reserved(uses) ident(plutomain)operator(,) ident(TreeU)operator(,) ident(WorkU)o
 
 preprocessor({$R *.DFM})
 
-reserved(procedure) ident(TSplashWin)operator(.)ident(StartBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TSplashWin)operator(.)ident(StartBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(Close)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TSplashWin)operator(.)ident(FormShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TSplashWin)operator(.)ident(FormShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(const)
   ident(Messages)operator(:) reserved(array)operator([)integer(0)operator(..)integer(12)operator(]) reserved(of) reserved(string) operator(=) operator(()string<delimiter(')content(Let)char('')content(s see...)delimiter(')>operator(,)
                                       string<delimiter(')content(Ready)delimiter(')>operator(,)
@@ -4912,14 +4912,14 @@ reserved(const)
                                       string<delimiter(')content(Oh yeah)delimiter(')>operator(,)
                                       string<delimiter(')content(Yabadabadoo!)delimiter(')>operator(,)
                                       string<delimiter(')content(Don)char('')content(t worry, be happy!)delimiter(')>
-                                      operator(\);)
+                                      operator(\))operator(;)
 reserved(var)
   ident(ImageFile)operator(:) reserved(string)operator(;)
 reserved(begin)
   ident(Left) operator(:=) operator(()ident(Screen)operator(.)ident(Width) operator(-) ident(Width)operator(\)) reserved(div) integer(2)operator(;)
   ident(Top) operator(:=) operator(()ident(Screen)operator(.)ident(Height) operator(-) ident(Height)operator(\)) reserved(div) integer(2)operator(;)
 
-  ident(StartB)operator(.)ident(Caption) operator(:=) ident(Messages)operator([)ident(Random)operator(()ident(Length)operator(()ident(Messages)operator(\)\)];)
+  ident(StartB)operator(.)ident(Caption) operator(:=) ident(Messages)operator([)ident(Random)operator(()ident(Length)operator(()ident(Messages)operator(\))operator(\))operator(])operator(;)
   ident(SplashWin)operator(.)ident(SplashScreenCB)operator(.)ident(Load)operator(;)
 
   ident(Caption) operator(:=) string<delimiter(')content(cYcnus.Pluto )delimiter(')> operator(+) ident(Version) operator(+) string<delimiter(')content( says )delimiter(')> operator(+) ident(MainWin)operator(.)ident(Greeting)operator(;)
@@ -4929,7 +4929,7 @@ reserved(begin)
     reserved(if) ident(FileEx)operator(()ident(ImageFile)operator(\)) reserved(then) reserved(begin)
       reserved(with) ident(Image1)operator(.)ident(Picture) reserved(do)
         reserved(if) ident(Graphic) operator(=) reserved(nil) reserved(then)
-          ident(LoadFromFile)operator(()ident(ImageFile)operator(\);)
+          ident(LoadFromFile)operator(()ident(ImageFile)operator(\))operator(;)
       reserved(if) reserved(not) ident(Switch)operator(()string<delimiter(')content(MurphyMode)delimiter(')>operator(\)) reserved(then)
         ident(LogoL)operator(.)ident(Visible) operator(:=) ident(False)operator(;)
       ident(Exit)operator(;)
@@ -4939,32 +4939,32 @@ reserved(begin)
     reserved(if) ident(FileEx)operator(()ident(ImageFile)operator(\)) reserved(then) reserved(begin)
       reserved(with) ident(Image1)operator(.)ident(Picture) reserved(do)
         reserved(if) ident(Graphic) operator(=) reserved(nil) reserved(then)
-          ident(LoadFromFile)operator(()ident(ImageFile)operator(\);)
+          ident(LoadFromFile)operator(()ident(ImageFile)operator(\))operator(;)
     reserved(end)operator(;)
   reserved(except)
-    ident(ShowMessage)operator(()string<delimiter(')content(Could not load Splash Screen image!)delimiter(')>operator(\);)
+    ident(ShowMessage)operator(()string<delimiter(')content(Could not load Splash Screen image!)delimiter(')>operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TSplashWin)operator(.)ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TSplashWin)operator(.)ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(Hide)operator(;)
   ident(Randomize)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TSplashWin)operator(.)ident(FormHide)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TSplashWin)operator(.)ident(FormHide)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   comment(//Image1.Picture.Bitmap.FreeImage;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TSplashWin)operator(.)ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Key) operator(=) ident(VK_ESCAPE) reserved(then)
     ident(Close)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TSplashWin)operator(.)ident(SplashScreenCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TSplashWin)operator(.)ident(SplashScreenCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Started) reserved(then)
     ident(PrefWin)operator(.)ident(SplashScreenCB)operator(.)ident(Checked) operator(:=) ident(SplashScreenCB)operator(.)ident(Checked)operator(;)
@@ -5001,12 +5001,12 @@ reserved(type)
     ident(Restart)operator(:) ident(Boolean)operator(;)
     ident(Mess)operator(:) reserved(string)operator(;)
     ident(Delay)operator(:) ident(Integer)operator(;)
-    reserved(function) ident(Alive)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\):) ident(Boolean)operator(;)
+    reserved(function) ident(Alive)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(:) ident(Boolean)operator(;)
     reserved(procedure) ident(Spy)operator(;)
-    reserved(procedure) ident(Reload)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\);)
+    reserved(procedure) ident(Reload)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
     reserved(procedure) ident(ReloadValues)operator(;)
-    reserved(procedure) ident(AddTrace)operator(()ident(Trace)operator(:) reserved(string)operator(\);)
-    reserved(constructor) ident(CreateIt)operator(()ident(PriorityLevel)operator(:) ident(TThreadPriority)operator(\);)
+    reserved(procedure) ident(AddTrace)operator(()ident(Trace)operator(:) reserved(string)operator(\))operator(;)
+    reserved(constructor) ident(CreateIt)operator(()ident(PriorityLevel)operator(:) ident(TThreadPriority)operator(\))operator(;)
     reserved(destructor) ident(Destroy)operator(;) directive(override)operator(;)
   reserved(end)operator(;)
 
@@ -5016,9 +5016,9 @@ reserved(uses) ident(plutomain)operator(,) ident(TreeU)operator(,) ident(WorkU)o
 
 comment({ TRegSpyThread })
 
-reserved(constructor) ident(TRegSpyThread)operator(.)ident(CreateIt)operator(()ident(PriorityLevel)operator(:) ident(TThreadPriority)operator(\);)
+reserved(constructor) ident(TRegSpyThread)operator(.)ident(CreateIt)operator(()ident(PriorityLevel)operator(:) ident(TThreadPriority)operator(\))operator(;)
 reserved(begin)
-  reserved(inherited) ident(Create)operator(()ident(True)operator(\);)      comment(// Create thread suspended)
+  reserved(inherited) ident(Create)operator(()ident(True)operator(\))operator(;)      comment(// Create thread suspended)
   ident(Priority) operator(:=) ident(PriorityLevel)operator(;)   comment(// Set Priority Level)
   ident(FreeOnTerminate) operator(:=) ident(False)operator(;)     comment(// Thread frees itself when terminated)
   ident(Reg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(;)
@@ -5031,14 +5031,14 @@ reserved(begin)
     ident(Restart) operator(:=) ident(False)operator(;)
     reserved(try)
       reserved(if) reserved(not) ident(Terminated) reserved(then)
-        ident(Sleep)operator(()ident(Delay)operator(\);)
+        ident(Sleep)operator(()ident(Delay)operator(\))operator(;)
       reserved(if) reserved(not) ident(Terminated) reserved(then)
         ident(Spy)operator(;)
     reserved(except) reserved(end)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(TRegSpyThread)operator(.)ident(Alive)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(TRegSpyThread)operator(.)ident(Alive)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(False)operator(;)
 
@@ -5064,18 +5064,18 @@ reserved(end)operator(;)
 
 reserved(procedure) ident(TRegSpyThread)operator(.)ident(SaveCheckNode)operator(;)
 reserved(begin)
-  ident(Dead) operator(:=) reserved(not) ident(Alive)operator(()ident(CurNode)operator(\);)
+  ident(Dead) operator(:=) reserved(not) ident(Alive)operator(()ident(CurNode)operator(\))operator(;)
   reserved(if) ident(Dead) reserved(then)
     ident(Exit)operator(;)
 
-  ident(CheckNode)operator(()ident(CurNode)operator(,) ident(False)operator(\);)
+  ident(CheckNode)operator(()ident(CurNode)operator(,) ident(False)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TRegSpyThread)operator(.)ident(SaveGetDif)operator(;)
 reserved(var)
   ident(Real)operator(,) ident(Cur)operator(:) ident(TStringList)operator(;)
 reserved(begin)
-  ident(Dead) operator(:=) reserved(not) ident(Alive)operator(()ident(CurNode)operator(\);)
+  ident(Dead) operator(:=) reserved(not) ident(Alive)operator(()ident(CurNode)operator(\))operator(;)
   reserved(if) ident(Dead) reserved(then)
     ident(Exit)operator(;)
 
@@ -5090,15 +5090,15 @@ reserved(begin)
 
   ident(Real) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
 
-  ident(Reg)operator(.)ident(GetKeyNames)operator(()ident(Real)operator(\);)
+  ident(Reg)operator(.)ident(GetKeyNames)operator(()ident(Real)operator(\))operator(;)
   ident(Reg)operator(.)ident(CloseKey)operator(;)
 
-  ident(Cur) operator(:=) ident(GetChildNames)operator(()ident(CurNode)operator(\);)
+  ident(Cur) operator(:=) ident(GetChildNames)operator(()ident(CurNode)operator(\))operator(;)
 
   reserved(if) operator(()ident(Cur)operator(.)ident(Count) operator(=) integer(0)operator(\)) reserved(and) operator(()ident(Real)operator(.)ident(Count) operator(=) integer(0)operator(\)) reserved(then)
     ident(Dead) operator(:=) ident(True)operator(;)
 
-  ident(dif) operator(:=) ident(TSLComp)operator(.)ident(Create)operator(()ident(Cur)operator(,) ident(Real)operator(,) ident(False)operator(\);)
+  ident(dif) operator(:=) ident(TSLComp)operator(.)ident(Create)operator(()ident(Cur)operator(,) ident(Real)operator(,) ident(False)operator(\))operator(;)
 
   ident(Cur)operator(.)ident(Free)operator(;)
   ident(Real)operator(.)ident(Free)operator(;)
@@ -5109,7 +5109,7 @@ reserved(var)
   ident(TN)operator(:) ident(TTreeNode)operator(;)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
-  ident(Dead) operator(:=) reserved(not) ident(Alive)operator(()ident(CurNode)operator(\);)
+  ident(Dead) operator(:=) reserved(not) ident(Alive)operator(()ident(CurNode)operator(\))operator(;)
   reserved(if) ident(Dead) reserved(then)
     ident(Exit)operator(;)
 
@@ -5118,11 +5118,11 @@ reserved(begin)
 
   reserved(if) ident(CurNode)operator(.)ident(Expanded) reserved(then)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(dif)operator(.)ident(OnlyA)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin)
-      ident(TN) operator(:=) ident(FindNode)operator(()ident(CurNode)operator(,) ident(dif)operator(.)ident(OnlyA)operator([)ident(i)operator(]\);)
+      ident(TN) operator(:=) ident(FindNode)operator(()ident(CurNode)operator(,) ident(dif)operator(.)ident(OnlyA)operator([)ident(i)operator(])operator(\))operator(;)
       reserved(if) ident(Assigned)operator(()ident(TN)operator(\)) reserved(then) reserved(begin)
-        ident(RegTV)operator(.)ident(Selected) operator(:=) ident(GetNextBest)operator(()ident(TN)operator(\);)
+        ident(RegTV)operator(.)ident(Selected) operator(:=) ident(GetNextBest)operator(()ident(TN)operator(\))operator(;)
         ident(TN)operator(.)ident(Delete)operator(;)
-        ident(AddTrace)operator(()string<delimiter(')content(Key deleted: )delimiter(')> operator(+) ident(dif)operator(.)ident(OnlyA)operator([)ident(i)operator(]\);)
+        ident(AddTrace)operator(()string<delimiter(')content(Key deleted: )delimiter(')> operator(+) ident(dif)operator(.)ident(OnlyA)operator([)ident(i)operator(])operator(\))operator(;)
       reserved(end)operator(;)
     reserved(end)
   reserved(else)
@@ -5134,12 +5134,12 @@ reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
   ident(TN)operator(:) ident(TTreeNode)operator(;)
 reserved(begin)
-  ident(Dead) operator(:=) reserved(not) ident(Alive)operator(()ident(CurNode)operator(\);)
+  ident(Dead) operator(:=) reserved(not) ident(Alive)operator(()ident(CurNode)operator(\))operator(;)
   reserved(if) ident(Dead) reserved(then)
     ident(Exit)operator(;)
 
   ident(CurChildren) operator(:=) reserved(nil)operator(;)
-  ident(SetLength)operator(()ident(CurChildren)operator(,) ident(CurNode)operator(.)ident(Count)operator(\);)
+  ident(SetLength)operator(()ident(CurChildren)operator(,) ident(CurNode)operator(.)ident(Count)operator(\))operator(;)
 
   ident(i) operator(:=) integer(0)operator(;)
   ident(TN) operator(:=) ident(CurNode)operator(.)ident(GetFirstChild)operator(;)
@@ -5147,8 +5147,8 @@ reserved(begin)
     reserved(if) ident(i) operator(<=) ident(High)operator(()ident(CurChildren)operator(\)) reserved(then)
       ident(CurChildren)operator([)ident(i)operator(]) operator(:=) ident(TN)
     reserved(else)
-      ident(ShowMessage)operator(()string<delimiter(')content(Error: Too much children)delimiter(')>operator(\);)
-    ident(Inc)operator(()ident(i)operator(\);)
+      ident(ShowMessage)operator(()string<delimiter(')content(Error: Too much children)delimiter(')>operator(\))operator(;)
+    ident(Inc)operator(()ident(i)operator(\))operator(;)
     ident(TN) operator(:=) ident(CurNode)operator(.)ident(GetNextChild)operator(()ident(TN)operator(\))
   reserved(end)operator(;)
 reserved(end)operator(;)
@@ -5157,7 +5157,7 @@ reserved(procedure) ident(TRegSpyThread)operator(.)ident(SaveAddNew)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
-  ident(Dead) operator(:=) reserved(not) ident(Alive)operator(()ident(CurNode)operator(\);)
+  ident(Dead) operator(:=) reserved(not) ident(Alive)operator(()ident(CurNode)operator(\))operator(;)
   reserved(if) ident(Dead) reserved(then)
     ident(Exit)operator(;)
 
@@ -5165,14 +5165,14 @@ reserved(begin)
     ident(Exit)operator(;)
 
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Dif)operator(.)ident(OnlyB)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin)  comment(//Erstellt/hinbenannt)
-    ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()ident(CurNode)operator(,) ident(Dif)operator(.)ident(OnlyB)operator([)ident(i)operator(]\);)
-    ident(AddTrace)operator(()string<delimiter(')content(New Key: )delimiter(')> operator(+) ident(dif)operator(.)ident(OnlyB)operator([)ident(i)operator(]\);)
+    ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()ident(CurNode)operator(,) ident(Dif)operator(.)ident(OnlyB)operator([)ident(i)operator(])operator(\))operator(;)
+    ident(AddTrace)operator(()string<delimiter(')content(New Key: )delimiter(')> operator(+) ident(dif)operator(.)ident(OnlyB)operator([)ident(i)operator(])operator(\))operator(;)
     ident(MainWin)operator(.)ident(StatusBarUpdate)operator(;)
     comment(//AddHint('Neuer Schlüssel: ' + CurNode.Text + '\\' + Dif.OnlyB[i]\);)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TRegSpyThread)operator(.)ident(Reload)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\);)
+reserved(procedure) ident(TRegSpyThread)operator(.)ident(Reload)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
   ident(TN)operator(:) ident(TTreeNode)operator(;)
@@ -5187,43 +5187,43 @@ reserved(begin)
   ident(zCurNode) operator(:=) ident(CurNode)operator(;)
   reserved(try)
     comment(//Mess := 'SaveCheckNode';)
-    ident(Synchronize)operator(()ident(SaveCheckNode)operator(\);)
+    ident(Synchronize)operator(()ident(SaveCheckNode)operator(\))operator(;)
     reserved(if) ident(Dead) reserved(or) ident(Terminated) reserved(then)
       ident(Exit)operator(;)
 
     comment(//Mess := 'SaveGetDif';)
-    ident(Synchronize)operator(()ident(SaveGetDif)operator(\);)
+    ident(Synchronize)operator(()ident(SaveGetDif)operator(\))operator(;)
     reserved(if) ident(Dead) reserved(or) ident(Terminated) reserved(then)
       ident(Exit)operator(;)
 
     comment(//Mess := 'SaveDeleteDead';)
-    ident(Synchronize)operator(()ident(SaveDeleteDead)operator(\);)
+    ident(Synchronize)operator(()ident(SaveDeleteDead)operator(\))operator(;)
     reserved(if) ident(Dead) reserved(or) ident(Terminated) reserved(then)
       ident(Exit)operator(;)
 
     comment(//Mess := 'SaveGetChildren';)
-    ident(Synchronize)operator(()ident(SaveGetChildren)operator(\);)
+    ident(Synchronize)operator(()ident(SaveGetChildren)operator(\))operator(;)
     reserved(if) ident(Dead) reserved(or) ident(Terminated) reserved(then)
       ident(Exit)operator(;)
 
     comment(//Mess := 'SaveGetChildren';)
-    ident(Synchronize)operator(()ident(SaveAddNew)operator(\);)
+    ident(Synchronize)operator(()ident(SaveAddNew)operator(\))operator(;)
     reserved(if) ident(Dead) reserved(or) ident(Terminated) reserved(then)
       ident(Exit)operator(;)
 
     ident(Dif)operator(.)ident(Free)operator(;)
 
     comment(//Mess := 'MyChildren';)
-    ident(SetLength)operator(()ident(MyChildren)operator(,) ident(Length)operator(()ident(CurChildren)operator(\)\);)
+    ident(SetLength)operator(()ident(MyChildren)operator(,) ident(Length)operator(()ident(CurChildren)operator(\))operator(\))operator(;)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(MyChildren)operator(\)) reserved(do)
-      ident(MyChildren)operator([)ident(i)operator(]) operator(:=) ident(CurChildren)operator([)ident(i)operator(];)
+      ident(MyChildren)operator([)ident(i)operator(]) operator(:=) ident(CurChildren)operator([)ident(i)operator(])operator(;)
 
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(MyChildren)operator(\)) reserved(do) reserved(begin)
-      ident(TN) operator(:=) ident(MyChildren)operator([)ident(i)operator(];)
+      ident(TN) operator(:=) ident(MyChildren)operator([)ident(i)operator(])operator(;)
       reserved(if) ident(Alive)operator(()ident(TN)operator(\)) reserved(then)
         comment(//if TN.Expanded then)
         comment(//if NodeVisible(TN\) then)
-          ident(Reload)operator(()ident(TN)operator(\);)
+          ident(Reload)operator(()ident(TN)operator(\))operator(;)
         comment(//else)
          comment(//Break;)
       reserved(if) ident(Restart) reserved(or) ident(Terminated) reserved(then)
@@ -5234,24 +5234,24 @@ reserved(begin)
   reserved(except)
     reserved(if) ident(Terminated) reserved(then)
       ident(Exit)operator(;)
-    ident(AddHint)operator(()string<delimiter(')content(Error in Spy: )delimiter(')> operator(+) ident(Mess)operator(\);)
+    ident(AddHint)operator(()string<delimiter(')content(Error in Spy: )delimiter(')> operator(+) ident(Mess)operator(\))operator(;)
     ident(WorkWin)operator(.)ident(Label7)operator(.)ident(Caption) operator(:=) string<delimiter(')content(ERROR)delimiter(')>operator(;)
   reserved(end)operator(;)
   ident(CurNode) operator(:=) ident(zCurNode)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(FindItemByRealName)operator(()ident(LV)operator(:) ident(TListView)operator(;) ident(Text)operator(:) reserved(string)operator(\):) ident(TListItem)operator(;)
+reserved(function) ident(FindItemByRealName)operator(()ident(LV)operator(:) ident(TListView)operator(;) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(TListItem)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) reserved(nil)operator(;)
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(LV)operator(.)ident(Items)operator(.)ident(Count)operator(-)integer(1) reserved(do)
-    reserved(if) ident(LV)operator(.)ident(Items)operator([)ident(i)operator(].)ident(Caption) operator(=) ident(Text) reserved(then) reserved(begin)
-      ident(Result) operator(:=) ident(LV)operator(.)ident(Items)operator([)ident(i)operator(];)
+    reserved(if) ident(LV)operator(.)ident(Items)operator([)ident(i)operator(])operator(.)ident(Caption) operator(=) ident(Text) reserved(then) reserved(begin)
+      ident(Result) operator(:=) ident(LV)operator(.)ident(Items)operator([)ident(i)operator(])operator(;)
     ident(Exit)operator(;) reserved(end)operator(;)
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(LV)operator(.)ident(Items)operator(.)ident(Count)operator(-)integer(1) reserved(do)
-    reserved(if) ident(SameText)operator(()ident(RealValueName)operator(()ident(LV)operator(.)ident(Items)operator([)ident(i)operator(]\),) ident(Text)operator(\)) reserved(then) reserved(begin)
-      ident(Result) operator(:=) ident(LV)operator(.)ident(Items)operator([)ident(i)operator(];)
+    reserved(if) ident(SameText)operator(()ident(RealValueName)operator(()ident(LV)operator(.)ident(Items)operator([)ident(i)operator(])operator(\))operator(,) ident(Text)operator(\)) reserved(then) reserved(begin)
+      ident(Result) operator(:=) ident(LV)operator(.)ident(Items)operator([)ident(i)operator(])operator(;)
     ident(Break)operator(;) reserved(end)operator(;)
 reserved(end)operator(;)
 
@@ -5269,38 +5269,38 @@ reserved(begin)
     ident(Exit)operator(;)
 
   ident(Real) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
-  ident(Reg)operator(.)ident(GetValueNames)operator(()ident(Real)operator(\);)
+  ident(Reg)operator(.)ident(GetValueNames)operator(()ident(Real)operator(\))operator(;)
 
   ident(Cur) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
   reserved(with) ident(ValueList)operator(.)ident(Items) reserved(do)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Count)operator(-)integer(1) reserved(do)
-      ident(Cur)operator(.)ident(Add)operator(()ident(RealValueName)operator(()ident(Item)operator([)ident(i)operator(]\)\);)
+      ident(Cur)operator(.)ident(Add)operator(()ident(RealValueName)operator(()ident(Item)operator([)ident(i)operator(])operator(\))operator(\))operator(;)
 
-  ident(Dif) operator(:=) ident(TSLComp)operator(.)ident(Create)operator(()ident(Cur)operator(,) ident(Real)operator(,) ident(False)operator(\);)
+  ident(Dif) operator(:=) ident(TSLComp)operator(.)ident(Create)operator(()ident(Cur)operator(,) ident(Real)operator(,) ident(False)operator(\))operator(;)
   ident(Real)operator(.)ident(Free)operator(;)
   ident(Cur)operator(.)ident(Free)operator(;)
 
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Dif)operator(.)ident(OnlyA)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin) comment(//Gelöscht/wegbenannt)
-    ident(Item) operator(:=) ident(FindItemByRealName)operator(()ident(ValueList)operator(,) ident(Dif)operator(.)ident(OnlyA)operator([)ident(i)operator(]\);)
+    ident(Item) operator(:=) ident(FindItemByRealName)operator(()ident(ValueList)operator(,) ident(Dif)operator(.)ident(OnlyA)operator([)ident(i)operator(])operator(\))operator(;)
     reserved(if) ident(Assigned)operator(()ident(Item)operator(\)) reserved(then) reserved(begin)
       ident(Item)operator(.)ident(Delete)operator(;)
-      ident(AddTrace)operator(()string<delimiter(')content(Value deleted: )delimiter(')> operator(+) ident(Dif)operator(.)ident(OnlyA)operator([)ident(i)operator(]\);)
+      ident(AddTrace)operator(()string<delimiter(')content(Value deleted: )delimiter(')> operator(+) ident(Dif)operator(.)ident(OnlyA)operator([)ident(i)operator(])operator(\))operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(ValueList)operator(.)ident(Items)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin)    comment(//Daten)
-    ident(Item) operator(:=) ident(ValueList)operator(.)ident(Items)operator([)ident(i)operator(];)
+    ident(Item) operator(:=) ident(ValueList)operator(.)ident(Items)operator([)ident(i)operator(])operator(;)
     comment({if Item.SubItems.Count < 2 then begin
       ShowMessage('Fehler in Sync.'\);
     Exit end; })
     reserved(if) ident(ValuesWin)operator(.)ident(UpdateValue)operator(()ident(Reg)operator(,) ident(Item)operator(\)) reserved(then)
       ident(AddTrace)operator(()string<delimiter(')content(Value Changed: )delimiter(')> operator(+) ident(Item)operator(.)ident(Caption) operator(+) string<delimiter(')content( = )delimiter(')> operator(+)
-        ident(ValueDataPreview)operator(()ident(Reg)operator(.)ident(ReadContext)operator(()ident(RealValueName)operator(()ident(Item)operator(\)\)\)\);)
+        ident(ValueDataPreview)operator(()ident(Reg)operator(.)ident(ReadContext)operator(()ident(RealValueName)operator(()ident(Item)operator(\))operator(\))operator(\))operator(\))operator(;)
   reserved(end)operator(;)
 
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(dif)operator(.)ident(OnlyB)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin)  comment(//Erstellt/hinbenannt)
-    ident(ValuesWin)operator(.)ident(AddValue)operator(()ident(Reg)operator(,) ident(dif)operator(.)ident(OnlyB)operator([)ident(i)operator(]\);)
-    ident(AddTrace)operator(()string<delimiter(')content(New Value: )delimiter(')> operator(+) ident(Dif)operator(.)ident(OnlyB)operator([)ident(i)operator(]\);)
+    ident(ValuesWin)operator(.)ident(AddValue)operator(()ident(Reg)operator(,) ident(dif)operator(.)ident(OnlyB)operator([)ident(i)operator(])operator(\))operator(;)
+    ident(AddTrace)operator(()string<delimiter(')content(New Value: )delimiter(')> operator(+) ident(Dif)operator(.)ident(OnlyB)operator([)ident(i)operator(])operator(\))operator(;)
   reserved(end)operator(;)
 
   ident(Reg)operator(.)ident(CloseKey)operator(;)
@@ -5314,22 +5314,22 @@ reserved(var)
 reserved(begin)
   reserved(with) ident(TClock)operator(.)ident(Create) reserved(do) reserved(begin)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(RootNodes)operator(.)ident(Count)operator(-)integer(1) reserved(do)
-      ident(Reload)operator(()ident(TTreeNode)operator(()ident(RootNodes)operator([)ident(i)operator(]\)\);)
+      ident(Reload)operator(()ident(TTreeNode)operator(()ident(RootNodes)operator([)ident(i)operator(])operator(\))operator(\))operator(;)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(Shortcuts)operator(\)) reserved(do)
-      ident(Reload)operator(()ident(Shortcuts)operator([)ident(i)operator(].)ident(Node)operator(\);)
-    ident(Synchronize)operator(()ident(ReloadValues)operator(\);)
+      ident(Reload)operator(()ident(Shortcuts)operator([)ident(i)operator(])operator(.)ident(Node)operator(\))operator(;)
+    ident(Synchronize)operator(()ident(ReloadValues)operator(\))operator(;)
     ident(a) operator(:=) ident(SecondsPassed) operator(*) integer(1000)operator(;)
   ident(Free)operator(;) reserved(end)operator(;)
 
   reserved(if) ident(a) operator(>) integer(0) reserved(then)
-    ident(WorkWin)operator(.)ident(Label7)operator(.)ident(Caption) operator(:=) string<delimiter(')content(Spy: )delimiter(')> operator(+) ident(Format)operator(()string<delimiter(')content(%0.2f)delimiter(')>operator(,) operator([)ident(a)operator(]\)) operator(+) string<delimiter(')content( s)delimiter(')>operator(;)
+    ident(WorkWin)operator(.)ident(Label7)operator(.)ident(Caption) operator(:=) string<delimiter(')content(Spy: )delimiter(')> operator(+) ident(Format)operator(()string<delimiter(')content(%0.2f)delimiter(')>operator(,) operator([)ident(a)operator(])operator(\)) operator(+) string<delimiter(')content( s)delimiter(')>operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TRegSpyThread)operator(.)ident(AddTrace)operator(()ident(Trace)operator(:) reserved(string)operator(\);)
+reserved(procedure) ident(TRegSpyThread)operator(.)ident(AddTrace)operator(()ident(Trace)operator(:) reserved(string)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(WorkWin) reserved(do)
     reserved(if) ident(ListTracesCB)operator(.)ident(Checked) reserved(then)
-      ident(SpyLB)operator(.)ident(Items)operator(.)ident(Add)operator(()ident(Trace)operator(\);)
+      ident(SpyLB)operator(.)ident(Items)operator(.)ident(Add)operator(()ident(Trace)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(destructor) ident(TRegSpyThread)operator(.)ident(Destroy)operator(;)
@@ -5380,66 +5380,66 @@ reserved(type)
     ident(N5)operator(:) ident(TMenuItem)operator(;)
     ident(ExportAsReg)operator(:) ident(TMenuItem)operator(;)
     ident(ExportD)operator(:) ident(TSaveDialog)operator(;)
-    reserved(procedure) ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(RegTVClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(RegTVChange)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\);)
-    reserved(procedure) ident(RegTVChanging)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;) reserved(var) ident(AllowChange)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(RegTVCollapsing)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;) reserved(var) ident(AllowCollapse)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(RegTVCustomDrawItem)operator(()ident(Sender)operator(:) ident(TCustomTreeView)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;) ident(State)operator(:) ident(TCustomDrawState)operator(;) reserved(var) ident(DefaultDraw)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(RegTVDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(RegTVDeletion)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\);)
-    reserved(procedure) ident(RegTVDragDrop)operator(()ident(Sender)operator(,) ident(Source)operator(:) ident(TObject)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\);)
-    reserved(procedure) ident(RegTVDragOver)operator(()ident(Sender)operator(,) ident(Source)operator(:) ident(TObject)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(;) ident(State)operator(:) ident(TDragState)operator(;) reserved(var) ident(Accept)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(RegTVEdited)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;) reserved(var) ident(S)operator(:) ident(String)operator(\);)
-    reserved(procedure) ident(RegTVEditing)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;) reserved(var) ident(AllowEdit)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(RegTVEndDrag)operator(()ident(Sender)operator(,) ident(Target)operator(:) ident(TObject)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\);)
-    reserved(procedure) ident(RegTVEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(RegTVExpanded)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\);)
-    reserved(procedure) ident(RegTVExpanding)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;) reserved(var) ident(AllowExpansion)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(RegTVGetSelectedIndex)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\);)
-    reserved(procedure) ident(RegTVKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(RegTVMouseDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Button)operator(:) ident(TMouseButton)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\);)
-    reserved(procedure) ident(RegTVStartDrag)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(DragObject)operator(:) ident(TDragObject)operator(\);)
-
-    reserved(function) ident(CreateKey)operator(()ident(Subkey)operator(:) ident(Boolean)operator(\):) ident(Boolean)operator(;)
+    reserved(procedure) ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(RegTVClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(RegTVChange)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
+    reserved(procedure) ident(RegTVChanging)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;) reserved(var) ident(AllowChange)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(RegTVCollapsing)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;) reserved(var) ident(AllowCollapse)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(RegTVCustomDrawItem)operator(()ident(Sender)operator(:) ident(TCustomTreeView)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;) ident(State)operator(:) ident(TCustomDrawState)operator(;) reserved(var) ident(DefaultDraw)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(RegTVDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(RegTVDeletion)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
+    reserved(procedure) ident(RegTVDragDrop)operator(()ident(Sender)operator(,) ident(Source)operator(:) ident(TObject)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\))operator(;)
+    reserved(procedure) ident(RegTVDragOver)operator(()ident(Sender)operator(,) ident(Source)operator(:) ident(TObject)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(;) ident(State)operator(:) ident(TDragState)operator(;) reserved(var) ident(Accept)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(RegTVEdited)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;) reserved(var) ident(S)operator(:) reserved(String)operator(\))operator(;)
+    reserved(procedure) ident(RegTVEditing)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;) reserved(var) ident(AllowEdit)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(RegTVEndDrag)operator(()ident(Sender)operator(,) ident(Target)operator(:) ident(TObject)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\))operator(;)
+    reserved(procedure) ident(RegTVEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(RegTVExpanded)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
+    reserved(procedure) ident(RegTVExpanding)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;) reserved(var) ident(AllowExpansion)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(RegTVGetSelectedIndex)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
+    reserved(procedure) ident(RegTVKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(RegTVMouseDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Button)operator(:) ident(TMouseButton)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\))operator(;)
+    reserved(procedure) ident(RegTVStartDrag)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(DragObject)operator(:) ident(TDragObject)operator(\))operator(;)
+
+    reserved(function) ident(CreateKey)operator(()ident(Subkey)operator(:) ident(Boolean)operator(\))operator(:) ident(Boolean)operator(;)
     reserved(procedure) ident(CloneKey)operator(;)
     reserved(procedure) ident(DeleteKey)operator(;)
     reserved(procedure) ident(NewShortcut)operator(;)
-    reserved(procedure) ident(MoveKey)operator(()reserved(const) ident(Src)operator(,) ident(Trg)operator(:) ident(TRegPath)operator(;) ident(CopyWanted)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(MoveValues)operator(()ident(SrcNode)operator(,) ident(TrgNode)operator(:) ident(TTreeNode)operator(;) ident(CopyWanted)operator(:) ident(Boolean)operator(\);)
-
-    reserved(procedure) ident(NewSubKeyMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(NewKeyMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(CreateShortcutMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(TraceMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(DeleteMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(DublicateMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FindMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(RegTVPUPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(RegTVKeyPress)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Char)operator(\);)
+    reserved(procedure) ident(MoveKey)operator(()reserved(const) ident(Src)operator(,) ident(Trg)operator(:) ident(TRegPath)operator(;) ident(CopyWanted)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(MoveValues)operator(()ident(SrcNode)operator(,) ident(TrgNode)operator(:) ident(TTreeNode)operator(;) ident(CopyWanted)operator(:) ident(Boolean)operator(\))operator(;)
+
+    reserved(procedure) ident(NewSubKeyMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(NewKeyMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(CreateShortcutMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(TraceMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(DeleteMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(DublicateMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FindMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(RegTVPUPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(RegTVKeyPress)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Char)operator(\))operator(;)
     reserved(procedure) ident(RegTVAdvancedCustomDrawItem)operator(()ident(Sender)operator(:) ident(TCustomTreeView)operator(;)
       ident(Node)operator(:) ident(TTreeNode)operator(;) ident(State)operator(:) ident(TCustomDrawState)operator(;) ident(Stage)operator(:) ident(TCustomDrawStage)operator(;)
-      reserved(var) ident(PaintImages)operator(,) ident(DefaultDraw)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(RenameMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(CopyPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(InsertPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(RegTVGetImageIndex)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\);)
+      reserved(var) ident(PaintImages)operator(,) ident(DefaultDraw)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(RenameMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(CopyPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(InsertPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(RegTVGetImageIndex)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
     reserved(procedure) ident(CheckRegTVHotTrack)operator(;)
-    reserved(procedure) ident(PasteKeyMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(CutPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-
-    reserved(procedure) ident(OpenNextLevel)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\);)
-    reserved(procedure) ident(EditShortcutMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SubKeylist1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ValueNameslist1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(KeyInfosMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(PasteKeyMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(CutPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+
+    reserved(procedure) ident(OpenNextLevel)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
+    reserved(procedure) ident(EditShortcutMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SubKeylist1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ValueNameslist1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(KeyInfosMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
     reserved(function) ident(GetKeyInfos)operator(:) reserved(string)operator(;)
-    reserved(procedure) ident(ExportAsRegClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormClose)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Action)operator(:) ident(TCloseAction)operator(\);)
+    reserved(procedure) ident(ExportAsRegClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormClose)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Action)operator(:) ident(TCloseAction)operator(\))operator(;)
 
     reserved(procedure) ident(Load)operator(;)
-    reserved(procedure) ident(Reg4WriterTerminate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(Reg4WriterTerminate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
   directive(private)
     ident(DragNode)operator(:) ident(TTreeNode)operator(;)
     ident(NoAsterisk)operator(:) ident(Boolean)operator(;) comment(//To prevent NumPadMULTIPLY and asterisk errors)
@@ -5451,23 +5451,23 @@ reserved(type)
   reserved(end)operator(;)
 
 reserved(procedure) ident(CheckNode)operator(()ident(Node)operator(:) ident(TTreeNode)operator(;) ident(OnlyOnce)operator(:) ident(Boolean) operator(=) ident(True)operator(;)
-  ident(TakeNodeSelected)operator(:) ident(Boolean) operator(=) ident(False)operator(\);)
+  ident(TakeNodeSelected)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(;)
 
 reserved(function) ident(AddShortcut)operator(()ident(Alias)operator(,) ident(RealPath)operator(:) reserved(string)operator(;) ident(Icon)operator(:) ident(Integer)operator(;)
-  ident(AHostType)operator(:) ident(TUniHostType) operator(=) ident(uhUserShortcut)operator(;) ident(WriteIni)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) ident(TTreeNode)operator(;)
-reserved(function) ident(ShortcutIndex)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\):) ident(Integer)operator(;)
+  ident(AHostType)operator(:) ident(TUniHostType) operator(=) ident(uhUserShortcut)operator(;) ident(WriteIni)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) ident(TTreeNode)operator(;)
+reserved(function) ident(ShortcutIndex)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(:) ident(Integer)operator(;)
 
 reserved(function) ident(TraceKey)operator(()reserved(const) ident(Path)operator(:) reserved(string)operator(;) ident(AllowedShortcutTypes)operator(:) ident(TUniHostTypes) operator(=)
-  ident(uhNonSystemShortcuts)operator(\):) reserved(string)operator(;)
+  ident(uhNonSystemShortcuts)operator(\))operator(:) reserved(string)operator(;)
 
 reserved(type)
-  ident(TOpenNodeMode) operator(=) operator(()ident(onNodeNil)operator(,) ident(onError)operator(,) ident(onReadOnly)operator(,) ident(onFull)operator(\);)
+  ident(TOpenNodeMode) operator(=) operator(()ident(onNodeNil)operator(,) ident(onError)operator(,) ident(onReadOnly)operator(,) ident(onFull)operator(\))operator(;)
 
 reserved(const)
-  ident(onOK) operator(=) operator([)ident(onFull)operator(,) ident(onReadOnly)operator(];)
+  ident(onOK) operator(=) operator([)ident(onFull)operator(,) ident(onReadOnly)operator(])operator(;)
 
-reserved(function) ident(OpenNode)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\):) ident(TOpenNodeMode)operator(;)
-reserved(function) ident(OpenNodeOK)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(OpenNode)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(:) ident(TOpenNodeMode)operator(;)
+reserved(function) ident(OpenNodeOK)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(function) ident(OpenCurKey)operator(:) ident(Boolean)operator(;)
 reserved(function) ident(OpenCurParent)operator(:) ident(Boolean)operator(;)
 
@@ -5490,17 +5490,17 @@ reserved(uses)
 preprocessor({$R *.dfm})
 
 preprocessor({$IFDEF UNIKEY})
-reserved(function) ident(UniOfNode)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\):) ident(TUniKey)operator(;)
+reserved(function) ident(UniOfNode)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(:) ident(TUniKey)operator(;)
 reserved(var)
   ident(UniPath)operator(:) ident(TUniPath)operator(;)
 reserved(begin)
-  ident(UniPath) operator(:=) ident(UniOfStr)operator(()ident(UserUniPath)operator(\);)
-  ident(UniPath)operator(.)ident(Path) operator(:=) ident(Join)operator(()ident(Copy)operator(()ident(NodePath)operator(()ident(Node)operator(\),) integer(1)operator(,) ident(MaxInt)operator(\),) char<delimiter(')content(/)delimiter(')>operator(\);)
-  ident(Result) operator(:=) ident(TUniKey)operator(.)ident(CreateU)operator(()ident(UniPath)operator(,) ident(reTryToSolve)operator(\);)
+  ident(UniPath) operator(:=) ident(UniOfStr)operator(()ident(UserUniPath)operator(\))operator(;)
+  ident(UniPath)operator(.)ident(Path) operator(:=) ident(Join)operator(()ident(Copy)operator(()ident(NodePath)operator(()ident(Node)operator(\))operator(,) integer(1)operator(,) ident(MaxInt)operator(\))operator(,) char<delimiter(')content(/)delimiter(')>operator(\))operator(;)
+  ident(Result) operator(:=) ident(TUniKey)operator(.)ident(CreateU)operator(()ident(UniPath)operator(,) ident(reTryToSolve)operator(\))operator(;)
 reserved(end)operator(;)
 preprocessor({$ENDIF})      
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(TreeU)operator(.)ident(RegTV) operator(:=) ident(RegTV)operator(;)
 
@@ -5527,14 +5527,14 @@ reserved(begin)
   ident(TraceMI)operator(.)ident(ImageIndex) operator(:=) ident(iconKeyTrace)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(KeyIsDown)operator(()ident(VK_CONTROL)operator(\)) reserved(then) reserved(begin)
-    ident(TraceMIClick)operator(()ident(Sender)operator(\);)
+    ident(TraceMIClick)operator(()ident(Sender)operator(\))operator(;)
   ident(Exit)operator(;) reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVChange)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVChange)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
 reserved(var)
   ident(Reg)operator(:) ident(TXRegistry)operator(;)
   ident(OpenRe)operator(:) ident(TOpenNodeMode)operator(;)
@@ -5546,60 +5546,60 @@ preprocessor({$IFDEF UNIKEY})
   ident(i)operator(:) ident(Integer)operator(;)
 
   reserved(procedure) ident(AppendSubItemData)operator(()ident(SubItems)operator(:) ident(TStrings)operator(;) ident(Uni)operator(:) ident(TUniKey)operator(;)
-    reserved(const) ident(ValueName)operator(:) reserved(string)operator(\);)
+    reserved(const) ident(ValueName)operator(:) reserved(string)operator(\))operator(;)
   reserved(var)
     ident(SL)operator(:) ident(TStringList)operator(;)
 
-    reserved(procedure) ident(Add)operator(()reserved(const) ident(s)operator(:) reserved(string)operator(\);)
+    reserved(procedure) ident(Add)operator(()reserved(const) ident(s)operator(:) reserved(string)operator(\))operator(;)
     reserved(begin)
-      ident(SubItems)operator(.)ident(Append)operator(()ident(s)operator(\);)
+      ident(SubItems)operator(.)ident(Append)operator(()ident(s)operator(\))operator(;)
     reserved(end)operator(;)
 
   reserved(begin)
     ident(SL) operator(:=) reserved(nil)operator(;)
     reserved(try)
-      ident(Add)operator(()string<delimiter(')content(beta)delimiter(')>operator(\);)
+      ident(Add)operator(()string<delimiter(')content(beta)delimiter(')>operator(\))operator(;)
 
       reserved(case) ident(Uni)operator(.)ident(GetDataType)operator(()ident(ValueName)operator(\)) reserved(of)
 
       ident(udString)operator(,) ident(udExpandString)operator(:) reserved(begin)
-        ident(Add)operator(()string<delimiter(')content(String)delimiter(')>operator(\);)
-        ident(Add)operator(()ident(Uni)operator(.)ident(ReadString)operator(()ident(ValueName)operator(\)\);)
+        ident(Add)operator(()string<delimiter(')content(String)delimiter(')>operator(\))operator(;)
+        ident(Add)operator(()ident(Uni)operator(.)ident(ReadString)operator(()ident(ValueName)operator(\))operator(\))operator(;)
       reserved(end)operator(;)
 
       ident(udCardinal)operator(,) ident(udCardBigEndian)operator(,) ident(udInteger)operator(:) reserved(begin)
-        ident(Add)operator(()string<delimiter(')content(Numeric)delimiter(')>operator(\);)
-        ident(Add)operator(()ident(IntToStr)operator(()ident(Uni)operator(.)ident(ReadInteger)operator(()ident(ValueName)operator(\)\)\);)
+        ident(Add)operator(()string<delimiter(')content(Numeric)delimiter(')>operator(\))operator(;)
+        ident(Add)operator(()ident(IntToStr)operator(()ident(Uni)operator(.)ident(ReadInteger)operator(()ident(ValueName)operator(\))operator(\))operator(\))operator(;)
       reserved(end)operator(;)
 
       ident(udBinary)operator(,) ident(udNone)operator(:) reserved(begin)
-        ident(Add)operator(()string<delimiter(')content(Binary)delimiter(')>operator(\);)
-        ident(Add)operator(()ident(FriendlyStr)operator(()ident(Uni)operator(.)ident(ReadBinary)operator(()ident(ValueName)operator(\)\)\);)
+        ident(Add)operator(()string<delimiter(')content(Binary)delimiter(')>operator(\))operator(;)
+        ident(Add)operator(()ident(FriendlyStr)operator(()ident(Uni)operator(.)ident(ReadBinary)operator(()ident(ValueName)operator(\))operator(\))operator(\))operator(;)
       reserved(end)operator(;)
 
       ident(udBoolean)operator(:) reserved(begin)
-        ident(Add)operator(()string<delimiter(')content(Boolean)delimiter(')>operator(\);)
-        ident(Add)operator(()ident(StrOfBool)operator(()ident(Uni)operator(.)ident(ReadBool)operator(()ident(ValueName)operator(\)\)\);)
+        ident(Add)operator(()string<delimiter(')content(Boolean)delimiter(')>operator(\))operator(;)
+        ident(Add)operator(()ident(StrOfBool)operator(()ident(Uni)operator(.)ident(ReadBool)operator(()ident(ValueName)operator(\))operator(\))operator(\))operator(;)
       reserved(end)operator(;)
 
       ident(udStringList)operator(:) reserved(begin)
-        ident(Add)operator(()string<delimiter(')content(List)delimiter(')>operator(\);)
+        ident(Add)operator(()string<delimiter(')content(List)delimiter(')>operator(\))operator(;)
         reserved(if) reserved(not) ident(Assigned)operator(()ident(SL)operator(\)) reserved(then)
           ident(SL) operator(:=) ident(TStringList)operator(.)ident(Create)
         reserved(else)
           ident(SL)operator(.)ident(Clear)operator(;)
-        ident(Uni)operator(.)ident(ReadStringList)operator(()ident(ValueName)operator(,) ident(SL)operator(\);)
-        ident(Add)operator(()ident(Join)operator(()ident(SL)operator(,) ident(MultiStringSeparator)operator(\)\);)
+        ident(Uni)operator(.)ident(ReadStringList)operator(()ident(ValueName)operator(,) ident(SL)operator(\))operator(;)
+        ident(Add)operator(()ident(Join)operator(()ident(SL)operator(,) ident(MultiStringSeparator)operator(\))operator(\))operator(;)
       reserved(end)operator(;)
 
       ident(udColor)operator(:) reserved(begin)
-        ident(Add)operator(()string<delimiter(')content(Color)delimiter(')>operator(\);)
-        ident(Add)operator(()ident(ColorToString)operator(()ident(Uni)operator(.)ident(ReadColor)operator(()ident(ValueName)operator(\)\)\);)
+        ident(Add)operator(()string<delimiter(')content(Color)delimiter(')>operator(\))operator(;)
+        ident(Add)operator(()ident(ColorToString)operator(()ident(Uni)operator(.)ident(ReadColor)operator(()ident(ValueName)operator(\))operator(\))operator(\))operator(;)
       reserved(end)operator(;)
 
       reserved(else)
         ident(Add)operator(()string<delimiter(')content(Unsupported Data Type: )delimiter(')> operator(+)
-        ident(IntToStr)operator(()ident(Cardinal)operator(()ident(Uni)operator(.)ident(GetDataType)operator(()ident(ValueName)operator(\)\)\)\);)
+        ident(IntToStr)operator(()ident(Cardinal)operator(()ident(Uni)operator(.)ident(GetDataType)operator(()ident(ValueName)operator(\))operator(\))operator(\))operator(\))operator(;)
       reserved(end)operator(;) comment(//case)
 
     reserved(finally)
@@ -5613,7 +5613,7 @@ preprocessor({$ENDIF})
 reserved(begin)
   ident(SpaceCount) operator(:=) integer(0)operator(;) comment(//Easteregg)
 
-  ident(CheckNode)operator(()ident(Node)operator(,) ident(False)operator(\);)
+  ident(CheckNode)operator(()ident(Node)operator(,) ident(False)operator(\))operator(;)
   ident(CantWrite) operator(:=) ident(False)operator(;)
 
   reserved(try)
@@ -5622,21 +5622,21 @@ reserved(begin)
     reserved(try)
 
 preprocessor({$IFDEF UNIKEY})
-      reserved(if) ident(RootOfNode)operator(()ident(Node)operator(\).)ident(ImageIndex) operator(=) ident(iconHostUni) reserved(then) reserved(begin)
+      reserved(if) ident(RootOfNode)operator(()ident(Node)operator(\))operator(.)ident(ImageIndex) operator(=) ident(iconHostUni) reserved(then) reserved(begin)
         ident(ValueNames) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
         ident(ValueList)operator(.)ident(Clear)operator(;)
 
-        ident(Uni) operator(:=) ident(UniOfNode)operator(()ident(Node)operator(\);)
+        ident(Uni) operator(:=) ident(UniOfNode)operator(()ident(Node)operator(\))operator(;)
         comment({Uni := CreateUniSubKey(UserUniPath, Copy(NodePath(Node\), 1, MaxInt\),
           reFaile\); })
         reserved(if) ident(Assigned)operator(()ident(Uni)operator(\)) reserved(then)
         reserved(try)
-          ident(Uni)operator(.)ident(GetValueNames)operator(()ident(ValueNames)operator(\);)
+          ident(Uni)operator(.)ident(GetValueNames)operator(()ident(ValueNames)operator(\))operator(;)
 
           reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(ValueNames)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin)
-            ident(Item) operator(:=) ident(ValuesWin)operator(.)ident(AddValue)operator(()ident(Reg)operator(,) ident(ValueNames)operator([)ident(i)operator(],) ident(False)operator(\);)
+            ident(Item) operator(:=) ident(ValuesWin)operator(.)ident(AddValue)operator(()ident(Reg)operator(,) ident(ValueNames)operator([)ident(i)operator(])operator(,) ident(False)operator(\))operator(;)
             ident(Item)operator(.)ident(ImageIndex) operator(:=) ident(iconHostUni2)operator(;)
-            ident(AppendSubItemData)operator(()ident(Item)operator(.)ident(SubItems)operator(,) ident(Uni)operator(,) ident(ValueNames)operator([)ident(i)operator(]\);)
+            ident(AppendSubItemData)operator(()ident(Item)operator(.)ident(SubItems)operator(,) ident(Uni)operator(,) ident(ValueNames)operator([)ident(i)operator(])operator(\))operator(;)
           reserved(end)operator(;)
 
         reserved(finally)
@@ -5647,20 +5647,20 @@ preprocessor({$IFDEF UNIKEY})
       reserved(end) reserved(else) reserved(begin)
 preprocessor({$ENDIF})
 
-      ident(OpenRe) operator(:=) ident(OpenNode)operator(()ident(Reg)operator(,) ident(Node)operator(\);)
+      ident(OpenRe) operator(:=) ident(OpenNode)operator(()ident(Reg)operator(,) ident(Node)operator(\))operator(;)
       reserved(if) ident(OpenRe) reserved(in) ident(onOK) reserved(then) reserved(begin)
-        ident(ValuesWin)operator(.)ident(LoadValues)operator(()ident(Reg)operator(\);)
+        ident(ValuesWin)operator(.)ident(LoadValues)operator(()ident(Reg)operator(\))operator(;)
         reserved(if) ident(OpenRe) operator(=) ident(onReadOnly) reserved(then) reserved(begin)
-          ident(AddHint)operator(()string<delimiter(')content(Read only)delimiter(')>operator(,) ident(True)operator(\);)
+          ident(AddHint)operator(()string<delimiter(')content(Read only)delimiter(')>operator(,) ident(True)operator(\))operator(;)
           ident(CantWrite) operator(:=) ident(True)operator(;)
         reserved(end)operator(;)
       reserved(end) reserved(else) reserved(if) ident(OpenRe) operator(=) ident(onError) reserved(then) reserved(begin)
         ident(ValueList)operator(.)ident(Clear)operator(;)
         ident(CantWrite) operator(:=) ident(True)operator(;)
         reserved(if) ident(Node)operator(.)ident(Level) operator(=) integer(0) reserved(then) reserved(begin)
-          ident(AddHint)operator(()string<delimiter(')content(Shortcut target not found)delimiter(')>operator(,) ident(True)operator(\);)
+          ident(AddHint)operator(()string<delimiter(')content(Shortcut target not found)delimiter(')>operator(,) ident(True)operator(\))operator(;)
         reserved(end) reserved(else)
-          ident(AddHint)operator(()string<delimiter(')content(Key not found: )delimiter(')> operator(+) ident(Node)operator(.)ident(Text)operator(,) ident(True)operator(\);)
+          ident(AddHint)operator(()string<delimiter(')content(Key not found: )delimiter(')> operator(+) ident(Node)operator(.)ident(Text)operator(,) ident(True)operator(\))operator(;)
       reserved(end)operator(;)
 
 preprocessor({$IFDEF UNIKEY})
@@ -5672,9 +5672,9 @@ preprocessor({$ENDIF})
     reserved(end)operator(;)
 
     ident(CantWrite) operator(:=) ident(CantWrite) reserved(or) reserved(not) ident(Assigned)operator(()ident(Node)operator(\))
-      reserved(or) ident(NodeInfo)operator(()           ident(Node) operator(\).)ident(ReadOnly)  comment(//Node itself)
-      reserved(or) ident(NodeInfo)operator(()ident(RootOfNode)operator(()ident(Node)operator(\)\).)ident(ReadOnly)  comment(//or host)
-      reserved(or) operator(()ident(SameText)operator(()ident(CurKey)operator(()ident(uhNonSystemShortcuts)operator(\).)ident(Root)operator(,) string<delimiter(')content(HKEY_DYN_DATA)delimiter(')>operator(\)\);)
+      reserved(or) ident(NodeInfo)operator(()           ident(Node) operator(\))operator(.)ident(ReadOnly)  comment(//Node itself)
+      reserved(or) ident(NodeInfo)operator(()ident(RootOfNode)operator(()ident(Node)operator(\))operator(\))operator(.)ident(ReadOnly)  comment(//or host)
+      reserved(or) operator(()ident(SameText)operator(()ident(CurKey)operator(()ident(uhNonSystemShortcuts)operator(\))operator(.)ident(Root)operator(,) string<delimiter(')content(HKEY_DYN_DATA)delimiter(')>operator(\))operator(\))operator(;)
 
     ident(MainWin)operator(.)ident(SetStatus)operator(;)
     ident(WorkWin)operator(.)ident(InfoMemo)operator(.)ident(Text) operator(:=) ident(GetKeyInfos)operator(;)
@@ -5685,23 +5685,23 @@ preprocessor({$ENDIF})
 reserved(end)operator(;)
 
 reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVChanging)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;)
-  reserved(var) ident(AllowChange)operator(:) ident(Boolean)operator(\);)
+  reserved(var) ident(AllowChange)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(begin)
   ident(CantWrite) operator(:=) ident(False)operator(;)
-  ident(AllowChange) operator(:=) ident(Assigned)operator(()ident(Node)operator(\);)
+  ident(AllowChange) operator(:=) ident(Assigned)operator(()ident(Node)operator(\))operator(;)
  comment(// CheckNode(Node, True\);)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVCollapsing)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;)
-  reserved(var) ident(AllowCollapse)operator(:) ident(Boolean)operator(\);)
+  reserved(var) ident(AllowCollapse)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(begin)
   ident(SpyThread)operator(.)ident(Restart) operator(:=) ident(True)operator(;)
   ident(Node)operator(.)ident(DeleteChildren)operator(;)
-  ident(RegTVChange)operator(()ident(Sender)operator(,) ident(Node)operator(\);)
+  ident(RegTVChange)operator(()ident(Sender)operator(,) ident(Node)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVCustomDrawItem)operator(()ident(Sender)operator(:) ident(TCustomTreeView)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;)
-  ident(State)operator(:) ident(TCustomDrawState)operator(;) reserved(var) ident(DefaultDraw)operator(:) ident(Boolean)operator(\);)
+  ident(State)operator(:) ident(TCustomDrawState)operator(;) reserved(var) ident(DefaultDraw)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(var)
   ident(Info)operator(:) ident(TNodeInfo)operator(;)
 reserved(begin)
@@ -5710,16 +5710,16 @@ reserved(begin)
     Node.Delete;
   Exit; end;})
 
-  ident(Info) operator(:=) ident(NodeInfo)operator(()ident(Node)operator(\);)
-  reserved(with) ident(TTreeView)operator(()ident(Sender)operator(\).)ident(Canvas)operator(.)ident(Font) reserved(do) reserved(begin)
+  ident(Info) operator(:=) ident(NodeInfo)operator(()ident(Node)operator(\))operator(;)
+  reserved(with) ident(TTreeView)operator(()ident(Sender)operator(\))operator(.)ident(Canvas)operator(.)ident(Font) reserved(do) reserved(begin)
     reserved(if) ident(Info)operator(.)ident(Defect) reserved(then) reserved(begin)
-      ident(Style) operator(:=) operator([];)
+      ident(Style) operator(:=) operator([)operator(])operator(;)
       ident(Color) operator(:=) hex($AAAAAA)
     reserved(end) reserved(else) reserved(begin)
       reserved(case) ident(Info)operator(.)ident(HostType) reserved(of)
 
       ident(uhReg)operator(:) reserved(begin)
-        ident(Style) operator(:=) operator([)ident(fsBold)operator(];)
+        ident(Style) operator(:=) operator([)ident(fsBold)operator(])operator(;)
         ident(Color) operator(:=) ident(clCyan)operator(;)
       reserved(end)operator(;)
 
@@ -5734,22 +5734,22 @@ reserved(begin)
       end; })
 
       ident(uhSystemShortcut)operator(:) reserved(begin)
-        ident(Style) operator(:=) operator([];)
+        ident(Style) operator(:=) operator([)operator(])operator(;)
         ident(Color) operator(:=) ident(clBrightCyan)operator(;)
       reserved(end)operator(;)
 
       ident(uhStandardShortcut)operator(:) reserved(begin)
-        ident(Style) operator(:=) operator([)ident(fsBold)operator(];)
+        ident(Style) operator(:=) operator([)ident(fsBold)operator(])operator(;)
         ident(Color) operator(:=) hex($EEEEEE)operator(;)
       reserved(end)operator(;)
 
       ident(uhUserShortcut)operator(:) reserved(begin)
-        ident(Style) operator(:=) operator([];)
+        ident(Style) operator(:=) operator([)operator(])operator(;)
         ident(Color) operator(:=) hex($EEEEEE)operator(;)
       reserved(end)operator(;)
 
       reserved(else)
-        ident(Style) operator(:=) operator([];)
+        ident(Style) operator(:=) operator([)operator(])operator(;)
         reserved(if) ident(Info)operator(.)ident(ReadOnly) reserved(then)
           ident(Color) operator(:=) ident(clBrightRed)
         reserved(else)
@@ -5760,7 +5760,7 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(Node)operator(:) ident(TTreeNode)operator(;)
   ident(MouseX)operator(:) ident(Integer)operator(;)
@@ -5770,49 +5770,49 @@ reserved(begin)
   reserved(if) reserved(not) ident(Assigned)operator(()ident(Node)operator(\)) reserved(then)
     ident(Exit)operator(;)
 
-  ident(MouseX) operator(:=) ident(RegTV)operator(.)ident(ScreenToClient)operator(()ident(Mouse)operator(.)ident(CursorPos)operator(\).)ident(X)operator(;)
-  ident(NodeRect) operator(:=) ident(Node)operator(.)ident(DisplayRect)operator(()ident(True)operator(\);)
+  ident(MouseX) operator(:=) ident(RegTV)operator(.)ident(ScreenToClient)operator(()ident(Mouse)operator(.)ident(CursorPos)operator(\))operator(.)ident(X)operator(;)
+  ident(NodeRect) operator(:=) ident(Node)operator(.)ident(DisplayRect)operator(()ident(True)operator(\))operator(;)
   reserved(if) ident(MouseX) operator(>) ident(NodeRect)operator(.)ident(Right) reserved(then) reserved(begin)
     reserved(with) ident(ValuesWin) reserved(do) reserved(begin)
-      ident(FocusItem)operator(()ident(PrefWin)operator(.)ident(MainPreviewE)operator(.)ident(Text)operator(\);)
-      ident(ValueListDblClick)operator(()ident(Self)operator(\);)
+      ident(FocusItem)operator(()ident(PrefWin)operator(.)ident(MainPreviewE)operator(.)ident(Text)operator(\))operator(;)
+      ident(ValueListDblClick)operator(()ident(Self)operator(\))operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVDeletion)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVDeletion)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Assigned)operator(()ident(SpyThread)operator(\)) reserved(then)
     ident(SpyThread)operator(.)ident(Restart) operator(:=) ident(True)operator(;)
   reserved(if) ident(Node)operator(.)ident(Selected) reserved(then)
-    ident(RegTV)operator(.)ident(Selected) operator(:=) ident(GetNextBest)operator(()ident(Node)operator(\);)
-  ident(NodeInfo)operator(()ident(Node)operator(\).)ident(Free)operator(;)
+    ident(RegTV)operator(.)ident(Selected) operator(:=) ident(GetNextBest)operator(()ident(Node)operator(\))operator(;)
+  ident(NodeInfo)operator(()ident(Node)operator(\))operator(.)ident(Free)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVDragDrop)operator(()ident(Sender)operator(,) ident(Source)operator(:) ident(TObject)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVDragDrop)operator(()ident(Sender)operator(,) ident(Source)operator(:) ident(TObject)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\))operator(;)
 
   reserved(procedure) ident(DragKey)operator(;)
   reserved(var)
     ident(Src)operator(,) ident(Trg)operator(:) ident(TRegPath)operator(;)
     ident(Node)operator(:) ident(TTreeNode)operator(;)
   reserved(begin)
-    ident(Src) operator(:=) ident(RegPathOfStr)operator(()ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(DragNode)operator(\)\)\);)
-    ident(Trg) operator(:=) ident(RegPathOfStr)operator(()ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(RegTV)operator(.)ident(DropTarget)operator(\)\)\);)
+    ident(Src) operator(:=) ident(RegPathOfStr)operator(()ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(DragNode)operator(\))operator(\))operator(\))operator(;)
+    ident(Trg) operator(:=) ident(RegPathOfStr)operator(()ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(RegTV)operator(.)ident(DropTarget)operator(\))operator(\))operator(\))operator(;)
     ident(Trg)operator(.)ident(Key) operator(:=) ident(Trg)operator(.)ident(Key) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(DragNode)operator(.)ident(Text)operator(;)
 
-    ident(MoveKey)operator(()ident(Src)operator(,) ident(Trg)operator(,) ident(KeyIsDown)operator(()ident(VK_CONTROL)operator(\)\);)
+    ident(MoveKey)operator(()ident(Src)operator(,) ident(Trg)operator(,) ident(KeyIsDown)operator(()ident(VK_CONTROL)operator(\))operator(\))operator(;)
 
     ident(Node) operator(:=) ident(RegTV)operator(.)ident(DropTarget)operator(;)
     reserved(if) ident(Node)operator(.)ident(Expanded) reserved(then)
-      ident(Node)operator(.)ident(Collapse)operator(()ident(False)operator(\);)
+      ident(Node)operator(.)ident(Collapse)operator(()ident(False)operator(\))operator(;)
     ident(Node)operator(.)ident(Expanded) operator(:=) ident(False)operator(;)
-    ident(CheckNode)operator(()ident(Node)operator(,) ident(False)operator(,) ident(True)operator(\);)
-    ident(Node)operator(.)ident(Expand)operator(()ident(False)operator(\);)
+    ident(CheckNode)operator(()ident(Node)operator(,) ident(False)operator(,) ident(True)operator(\))operator(;)
+    ident(Node)operator(.)ident(Expand)operator(()ident(False)operator(\))operator(;)
   reserved(end)operator(;)
 
   reserved(procedure) ident(DragValues)operator(;)
   reserved(begin)
-    ident(MoveValues)operator(()ident(RegTV)operator(.)ident(Selected)operator(,) ident(RegTV)operator(.)ident(DropTarget)operator(,) ident(KeyIsDown)operator(()ident(VK_CONTROL)operator(\)\);)
+    ident(MoveValues)operator(()ident(RegTV)operator(.)ident(Selected)operator(,) ident(RegTV)operator(.)ident(DropTarget)operator(,) ident(KeyIsDown)operator(()ident(VK_CONTROL)operator(\))operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
@@ -5823,7 +5823,7 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVDragOver)operator(()ident(Sender)operator(,) ident(Source)operator(:) ident(TObject)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(;)
-  ident(State)operator(:) ident(TDragState)operator(;) reserved(var) ident(Accept)operator(:) ident(Boolean)operator(\);)
+  ident(State)operator(:) ident(TDragState)operator(;) reserved(var) ident(Accept)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(begin)
   ident(Accept) operator(:=) ident(False)operator(;)
   reserved(if) reserved(not) ident(Assigned)operator(()ident(RegTV)operator(.)ident(DropTarget)operator(\)) reserved(then)
@@ -5843,7 +5843,7 @@ reserved(begin)
   ident(Accept) operator(:=) ident(True)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVEdited)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;) reserved(var) ident(S)operator(:) reserved(string)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVEdited)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;) reserved(var) ident(S)operator(:) reserved(string)operator(\))operator(;)
 reserved(var)
   ident(old)operator(,) ident(tmp)operator(:) reserved(string)operator(;)
   ident(i)operator(:) ident(Integer)operator(;)
@@ -5854,29 +5854,29 @@ reserved(begin)
 
   ident(Old) operator(:=) ident(Node)operator(.)ident(Text)operator(;)
 
-  reserved(if) ident(NodeInfo)operator(()ident(Node)operator(\).)ident(HostType) operator(=) ident(uhUserShortcut) reserved(then) reserved(begin)
-    ident(i) operator(:=) ident(ShortcutIndex)operator(()ident(Node)operator(\);)
+  reserved(if) ident(NodeInfo)operator(()ident(Node)operator(\))operator(.)ident(HostType) operator(=) ident(uhUserShortcut) reserved(then) reserved(begin)
+    ident(i) operator(:=) ident(ShortcutIndex)operator(()ident(Node)operator(\))operator(;)
     reserved(if) ident(i) operator(=) operator(-)integer(1) reserved(then) reserved(begin)
-      ident(ShowMessage)operator(()string<delimiter(')content(Shortcut not found!)delimiter(')>operator(\);)
+      ident(ShowMessage)operator(()string<delimiter(')content(Shortcut not found!)delimiter(')>operator(\))operator(;)
       ident(s) operator(:=) ident(old)operator(;)
     ident(Exit)operator(;) reserved(end)operator(;)
 
-    ident(Shortcut) operator(:=) operator(@)ident(Shortcuts)operator([)ident(i)operator(];)
+    ident(Shortcut) operator(:=) operator(@)ident(Shortcuts)operator([)ident(i)operator(])operator(;)
     ident(Shortcut)operator(.)ident(Alias) operator(:=) ident(s)operator(;)
 
     reserved(with) ident(TIniFile)operator(.)ident(Create)operator(()ident(PlutoDir) operator(+) string<delimiter(')content(Shortcuts.ini)delimiter(')>operator(\)) reserved(do)
       reserved(try)
-        ident(DeleteKey)operator(()string<delimiter(')content(Shortcuts)delimiter(')>operator(,) ident(Old)operator(\);)
-        ident(WriteString)operator(()string<delimiter(')content(Shortcuts)delimiter(')>operator(,) ident(Shortcut)operator(.)ident(Alias)operator(,) ident(Shortcut)operator(.)ident(RealPath)operator(\);)
+        ident(DeleteKey)operator(()string<delimiter(')content(Shortcuts)delimiter(')>operator(,) ident(Old)operator(\))operator(;)
+        ident(WriteString)operator(()string<delimiter(')content(Shortcuts)delimiter(')>operator(,) ident(Shortcut)operator(.)ident(Alias)operator(,) ident(Shortcut)operator(.)ident(RealPath)operator(\))operator(;)
       reserved(finally)
         ident(Free)operator(;)
       reserved(end)operator(;)
     ident(Node)operator(.)ident(Text) operator(:=) ident(s)operator(;)
-    ident(RegTVChange)operator(()ident(Self)operator(,) ident(Node)operator(\);)
+    ident(RegTVChange)operator(()ident(Self)operator(,) ident(Node)operator(\))operator(;)
   ident(Exit)operator(;) reserved(end)operator(;)
 
   reserved(if) ident(s) operator(=) string<delimiter(')delimiter(')> reserved(then) reserved(begin)
-    ident(ShowMessage)operator(()string<delimiter(')content(KeyNames cannot be empty.)delimiter(')>operator(\);)
+    ident(ShowMessage)operator(()string<delimiter(')content(KeyNames cannot be empty.)delimiter(')>operator(\))operator(;)
     ident(s) operator(:=) ident(old)operator(;)
   ident(Exit)operator(;) reserved(end)operator(;)
 
@@ -5885,21 +5885,21 @@ reserved(begin)
   ident(Node)operator(.)ident(Text) operator(:=) ident(s)operator(;)
 
   reserved(if) ident(Length)operator(()ident(s)operator(\)) operator(>) ident(RegMaxKeyLen) reserved(then) reserved(begin)
-    ident(s) operator(:=) ident(Copy)operator(()ident(s)operator(,) integer(1)operator(,) ident(RegMaxKeyLen)operator(\);)
+    ident(s) operator(:=) ident(Copy)operator(()ident(s)operator(,) integer(1)operator(,) ident(RegMaxKeyLen)operator(\))operator(;)
     reserved(if) ident(MessageDlg)operator(()
      string<delimiter(')content(The maximum size of a key name is )delimiter(')> operator(+) ident(IntToStr)operator(()ident(RegMaxKeyLen)operator(\)) operator(+) string<delimiter(')content( characters.)delimiter(')> operator(+) ident(EOL) operator(+)
      string<delimiter(')content(Shorten the key name to:)delimiter(')> operator(+) ident(EOL) operator(+)
-     ident(Quote)operator(()ident(StringWrap)operator(()ident(s)operator(,) integer(80)operator(\)\),)
-     ident(mtConfirmation)operator(,) operator([)ident(mbOK)operator(,) ident(mbCancel)operator(],) integer(0)operator(\)) operator(<>) ident(mrOK) reserved(then) reserved(begin)
+     ident(Quote)operator(()ident(StringWrap)operator(()ident(s)operator(,) integer(80)operator(\))operator(\))operator(,)
+     ident(mtConfirmation)operator(,) operator([)ident(mbOK)operator(,) ident(mbCancel)operator(])operator(,) integer(0)operator(\)) operator(<>) ident(mrOK) reserved(then) reserved(begin)
       ident(s) operator(:=) ident(Old)operator(;)
       ident(SpyThread)operator(.)ident(Resume)operator(;)
       ident(Exit)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 
-  reserved(if) ident(CharIn)operator(()ident(s)operator(,) operator([)char(#0)operator(..)char(#31)operator(,) char<delimiter(')content(\\)delimiter(')>operator(]\)) reserved(then) reserved(begin)
-    ident(s) operator(:=) ident(ReplaceChars)operator(()ident(s)operator(,) operator([)char(#0)operator(..)char(#31)operator(],) char<delimiter(')content(#)delimiter(')>operator(\);)
-    ident(s) operator(:=) ident(ReplaceChars)operator(()ident(s)operator(,) char<delimiter(')content(\\)delimiter(')>operator(,) char<delimiter(')content(-)delimiter(')>operator(\);)
+  reserved(if) ident(CharIn)operator(()ident(s)operator(,) operator([)char(#0)operator(..)char(#31)operator(,) char<delimiter(')content(\\)delimiter(')>operator(])operator(\)) reserved(then) reserved(begin)
+    ident(s) operator(:=) ident(ReplaceChars)operator(()ident(s)operator(,) operator([)char(#0)operator(..)char(#31)operator(])operator(,) char<delimiter(')content(#)delimiter(')>operator(\))operator(;)
+    ident(s) operator(:=) ident(ReplaceChars)operator(()ident(s)operator(,) char<delimiter(')content(\\)delimiter(')>operator(,) char<delimiter(')content(-)delimiter(')>operator(\))operator(;)
 
     reserved(if) ident(MessageDlg)operator(()string<delimiter(')content(The following characters are not allowed in KeyNames:)delimiter(')> operator(+) ident(EOL) operator(+)
      string<delimiter(')content(- Control chars (0-31\))delimiter(')> operator(+) ident(EOL) operator(+)
@@ -5907,7 +5907,7 @@ reserved(begin)
      string<delimiter(')content(The following name is allowed:)delimiter(')> operator(+) ident(EOL) operator(+)
      ident(s) operator(+) ident(EOL) operator(+)
      string<delimiter(')content(Use this name instead?)delimiter(')>operator(,)
-     ident(mtConfirmation)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(],) integer(0)operator(\)) operator(<>) ident(mrYes) reserved(then) reserved(begin)
+     ident(mtConfirmation)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(])operator(,) integer(0)operator(\)) operator(<>) ident(mrYes) reserved(then) reserved(begin)
       ident(s) operator(:=) ident(Old)operator(;)
       ident(SpyThread)operator(.)ident(Resume)operator(;)
       ident(Exit)operator(;)
@@ -5921,19 +5921,19 @@ reserved(begin)
        operator(()ident(mrIgnore) operator(=) ident(MessageDlg)operator(()
          string<delimiter(')content(Key already exists.)delimiter(')> operator(+) ident(EOL) operator(+)
          string<delimiter(')content(Click Ignore to overwrite the key.)delimiter(')>operator(,)
-         ident(mtConfirmation)operator(,) operator([)ident(mbCancel)operator(,) ident(mbIgnore)operator(],) integer(0)operator(\))
+         ident(mtConfirmation)operator(,) operator([)ident(mbCancel)operator(,) ident(mbIgnore)operator(])operator(,) integer(0)operator(\))
        operator(\)) reserved(then) reserved(begin)
-        ident(MainReg)operator(.)ident(DeleteKey)operator(()ident(s)operator(\);)
-        ident(MainReg)operator(.)ident(MoveKey)operator(()ident(Old)operator(,) ident(s)operator(,) ident(True)operator(\);)
+        ident(MainReg)operator(.)ident(DeleteKey)operator(()ident(s)operator(\))operator(;)
+        ident(MainReg)operator(.)ident(MoveKey)operator(()ident(Old)operator(,) ident(s)operator(,) ident(True)operator(\))operator(;)
         ident(Node)operator(.)ident(Text) operator(:=) ident(Old)operator(;)
       reserved(end) reserved(else) reserved(begin)
         ident(s) operator(:=) ident(Old)operator(;)
       reserved(end)operator(;)
     reserved(end) reserved(else) reserved(begin)  comment(//change CharCase)
       ident(tmp) operator(:=) ident(MainReg)operator(.)ident(GetFreeKeyName)operator(;)
-      ident(AddHint)operator(()string<delimiter(')content(Forced change of case using temporary key )delimiter(')> operator(+) ident(Quote)operator(()ident(tmp)operator(\)\);)
-      ident(MainReg)operator(.)ident(MoveKey)operator(()ident(Old)operator(,) ident(tmp)operator(,) ident(True)operator(\);)
-      ident(MainReg)operator(.)ident(MoveKey)operator(()ident(tmp)operator(,) ident(s)operator(,) ident(True)operator(\);)
+      ident(AddHint)operator(()string<delimiter(')content(Forced change of case using temporary key )delimiter(')> operator(+) ident(Quote)operator(()ident(tmp)operator(\))operator(\))operator(;)
+      ident(MainReg)operator(.)ident(MoveKey)operator(()ident(Old)operator(,) ident(tmp)operator(,) ident(True)operator(\))operator(;)
+      ident(MainReg)operator(.)ident(MoveKey)operator(()ident(tmp)operator(,) ident(s)operator(,) ident(True)operator(\))operator(;)
     reserved(end)operator(;)
   reserved(finally)
     ident(MainReg)operator(.)ident(CloseKey)operator(;)
@@ -5941,27 +5941,27 @@ reserved(begin)
 
   ident(Node)operator(.)ident(Text) operator(:=) ident(s)operator(;)
   ident(SpyThread)operator(.)ident(Resume)operator(;)
-  ident(RegTVChange)operator(()ident(Sender)operator(,) ident(Node)operator(\);)
+  ident(RegTVChange)operator(()ident(Sender)operator(,) ident(Node)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVEditing)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;)
-  reserved(var) ident(AllowEdit)operator(:) ident(Boolean)operator(\);)
+  reserved(var) ident(AllowEdit)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(begin)
-  ident(CheckNode)operator(()ident(Node)operator(,) ident(False)operator(\);)
+  ident(CheckNode)operator(()ident(Node)operator(,) ident(False)operator(\))operator(;)
   reserved(if) ident(RegTV)operator(.)ident(Selected) operator(<>) ident(Node) reserved(then)
     ident(Exit)operator(;)
-  ident(AllowEdit) operator(:=) operator(()ident(NodeInfo)operator(()ident(Node)operator(\).)ident(HostType) reserved(in) operator([)ident(uhNone)operator(,) ident(uhUserShortcut)operator(]\))
+  ident(AllowEdit) operator(:=) operator(()ident(NodeInfo)operator(()ident(Node)operator(\))operator(.)ident(HostType) reserved(in) operator([)ident(uhNone)operator(,) ident(uhUserShortcut)operator(])operator(\))
                reserved(and) operator(()reserved(not) ident(CantWrite)operator(\))
                reserved(and) ident(OpenCurKey)operator(;)
   ident(MainReg)operator(.)ident(CloseKey)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVEndDrag)operator(()ident(Sender)operator(,) ident(Target)operator(:) ident(TObject)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVEndDrag)operator(()ident(Sender)operator(,) ident(Target)operator(:) ident(TObject)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\))operator(;)
 reserved(begin)
   ident(DragNode) operator(:=) reserved(nil)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) reserved(not) ident(Started) reserved(then)
     ident(Exit)operator(;)
@@ -5969,7 +5969,7 @@ reserved(begin)
   ident(MainWin)operator(.)ident(SetStatus)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVExpanded)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVExpanded)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
 reserved(begin)
   reserved(if) reserved(not) ident(DoSmartExpand) reserved(or) reserved(not) ident(PrefWin)operator(.)ident(SmartExpandCB)operator(.)ident(Checked) reserved(then)
     ident(Exit)operator(;)
@@ -5977,20 +5977,20 @@ reserved(begin)
   reserved(if) reserved(not) ident(Assigned)operator(()ident(Node)operator(\)) reserved(then)
     ident(Exit)operator(;)
 
-  ident(RegTVChange)operator(()ident(Sender)operator(,) ident(Node)operator(\);)
+  ident(RegTVChange)operator(()ident(Sender)operator(,) ident(Node)operator(\))operator(;)
 
   comment(//SmartExpand)
   reserved(if) operator(()ident(Node)operator(.)ident(Count) operator(>) integer(0)operator(\)) reserved(and) operator(()ident(ValueList)operator(.)ident(Items)operator(.)ident(Count) operator(=) integer(0)operator(\)) reserved(then) reserved(begin)
     ident(RegTV)operator(.)ident(Selected) operator(:=) ident(Node)operator(.)ident(GetFirstChild)operator(;)
-    ident(RegTVChange)operator(()ident(Sender)operator(,) ident(RegTV)operator(.)ident(Selected)operator(\);)
+    ident(RegTVChange)operator(()ident(Sender)operator(,) ident(RegTV)operator(.)ident(Selected)operator(\))operator(;)
   reserved(end)operator(;)
 
   reserved(if) ident(Node)operator(.)ident(Count) operator(=) integer(1) reserved(then)
-    ident(Node)operator(.)ident(GetFirstChild)operator(.)ident(Expand)operator(()ident(False)operator(\);)
+    ident(Node)operator(.)ident(GetFirstChild)operator(.)ident(Expand)operator(()ident(False)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVExpanding)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;)
-  reserved(var) ident(AllowExpansion)operator(:) ident(Boolean)operator(\);)
+  reserved(var) ident(AllowExpansion)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(var)
   ident(SL)operator(:) ident(TStringList)operator(;)
   ident(Reg)operator(:) ident(TXRegistry)operator(;)
@@ -5999,17 +5999,17 @@ preprocessor({$IFDEF UNIKEY})
   ident(Uni)operator(:) ident(TUniKey)operator(;)
 preprocessor({$ENDIF})
 
-  reserved(procedure) ident(AddKeys)operator(()ident(TreeView)operator(:) ident(TTreeView)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;) ident(SL)operator(:) ident(TStrings)operator(\);)
+  reserved(procedure) ident(AddKeys)operator(()ident(TreeView)operator(:) ident(TTreeView)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;) ident(SL)operator(:) ident(TStrings)operator(\))operator(;)
   reserved(var)
     ident(i)operator(:) ident(Integer)operator(;)
   reserved(begin)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do)
-      ident(TreeView)operator(.)ident(Items)operator(.)ident(AddNode)operator(()ident(TTreeNode)operator(.)ident(Create)operator(()ident(TreeView)operator(.)ident(Items)operator(\),) ident(Node)operator(,) ident(SL)operator([)ident(i)operator(],)
-        reserved(nil)operator(,) ident(naAddChild)operator(\);)
+      ident(TreeView)operator(.)ident(Items)operator(.)ident(AddNode)operator(()ident(TTreeNode)operator(.)ident(Create)operator(()ident(TreeView)operator(.)ident(Items)operator(\))operator(,) ident(Node)operator(,) ident(SL)operator([)ident(i)operator(])operator(,)
+        reserved(nil)operator(,) ident(naAddChild)operator(\))operator(;)
   reserved(end)operator(;)
 
   reserved(procedure) ident(AddKeysProgressive)operator(()ident(TreeView)operator(:) ident(TTreeView)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;)
-    ident(SL)operator(:) ident(TStrings)operator(\);)
+    ident(SL)operator(:) ident(TStrings)operator(\))operator(;)
   reserved(var)
     ident(i)operator(,) ident(delta)operator(:) ident(Integer)operator(;)
     ident(GaugeRect)operator(,) ident(FullRect)operator(:) ident(TRect)operator(;)
@@ -6018,12 +6018,12 @@ preprocessor({$ENDIF})
     ident(delta) operator(:=) ident(SL)operator(.)ident(Count) reserved(div) integer(100)operator(;)
     ident(GaugeWidth) operator(:=) integer(100)operator(;)
     reserved(with) ident(TreeView)operator(.)ident(Canvas) reserved(do) reserved(begin)
-      ident(FullRect) operator(:=) ident(Node)operator(.)ident(DisplayRect)operator(()ident(True)operator(\);)
+      ident(FullRect) operator(:=) ident(Node)operator(.)ident(DisplayRect)operator(()ident(True)operator(\))operator(;)
       reserved(with) ident(FullRect) reserved(do) reserved(begin)
         ident(Left) operator(:=) ident(Right) operator(+) integer(40)operator(;)
         ident(Right) operator(:=) ident(Left) operator(+) ident(GaugeWidth) operator(+) integer(2)operator(;)
-        ident(Inc)operator(()ident(Top)operator(,) integer(5)operator(\);)
-        ident(Dec)operator(()ident(Bottom)operator(,) integer(5)operator(\);)
+        ident(Inc)operator(()ident(Top)operator(,) integer(5)operator(\))operator(;)
+        ident(Dec)operator(()ident(Bottom)operator(,) integer(5)operator(\))operator(;)
       reserved(end)operator(;)
       reserved(with) ident(Pen) reserved(do) reserved(begin)
         ident(Width) operator(:=) integer(1)operator(;)
@@ -6031,26 +6031,26 @@ preprocessor({$ENDIF})
       reserved(end)operator(;)
       ident(Pen)operator(.)ident(Color) operator(:=) ident(clBrightBlue)operator(;)
       ident(Brush)operator(.)ident(Style) operator(:=) ident(bsClear)operator(;)
-      ident(Rectangle)operator(()ident(FullRect)operator(\);)
+      ident(Rectangle)operator(()ident(FullRect)operator(\))operator(;)
       ident(Pen)operator(.)ident(Style) operator(:=) ident(psClear)operator(;)
     reserved(end)operator(;)
 
     ident(GaugeRect) operator(:=) ident(FullRect)operator(;)
     reserved(with) ident(GaugeRect) reserved(do) reserved(begin)
-      ident(Inc)operator(()ident(Left)operator(\);)
-      ident(Inc)operator(()ident(Top)operator(\);)
-      ident(Dec)operator(()ident(Bottom)operator(\);)
+      ident(Inc)operator(()ident(Left)operator(\))operator(;)
+      ident(Inc)operator(()ident(Top)operator(\))operator(;)
+      ident(Dec)operator(()ident(Bottom)operator(\))operator(;)
     reserved(end)operator(;)
 
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin)
-      ident(TreeView)operator(.)ident(Items)operator(.)ident(AddNode)operator(()ident(TTreeNode)operator(.)ident(Create)operator(()ident(TreeView)operator(.)ident(Items)operator(\),) ident(Node)operator(,) ident(SL)operator([)ident(i)operator(],)
-        reserved(nil)operator(,) ident(naAddChild)operator(\);)
+      ident(TreeView)operator(.)ident(Items)operator(.)ident(AddNode)operator(()ident(TTreeNode)operator(.)ident(Create)operator(()ident(TreeView)operator(.)ident(Items)operator(\))operator(,) ident(Node)operator(,) ident(SL)operator([)ident(i)operator(])operator(,)
+        reserved(nil)operator(,) ident(naAddChild)operator(\))operator(;)
 
-      reserved(if) operator((()ident(i) operator(+) integer(1)operator(\)) reserved(mod) ident(delta)operator(\)) operator(=) integer(0) reserved(then) reserved(begin)
+      reserved(if) operator(()operator(()ident(i) operator(+) integer(1)operator(\)) reserved(mod) ident(delta)operator(\)) operator(=) integer(0) reserved(then) reserved(begin)
         reserved(with) ident(TreeView)operator(.)ident(Canvas) reserved(do) reserved(begin)
           ident(GaugeRect)operator(.)ident(Right) operator(:=) ident(GaugeRect)operator(.)ident(Left) operator(+) operator(()ident(GaugeWidth) operator(*) ident(i)operator(\)) reserved(div) ident(SL)operator(.)ident(Count)operator(;)
-          ident(Brush)operator(.)ident(Color) operator(:=) ident(GadientAqua)operator(()integer(90) operator(+) ident(Round)operator(()integer(100) operator(*) operator((()ident(i)operator(+)integer(1)operator(\)) operator(/) ident(SL)operator(.)ident(Count)operator(\)\)\);)
-          ident(FillRect)operator(()ident(GaugeRect)operator(\);)
+          ident(Brush)operator(.)ident(Color) operator(:=) ident(GadientAqua)operator(()integer(90) operator(+) ident(Round)operator(()integer(100) operator(*) operator(()operator(()ident(i)operator(+)integer(1)operator(\)) operator(/) ident(SL)operator(.)ident(Count)operator(\))operator(\))operator(\))operator(;)
+          ident(FillRect)operator(()ident(GaugeRect)operator(\))operator(;)
         reserved(end)operator(;)
       reserved(end)operator(;)
     reserved(end)operator(;)
@@ -6058,8 +6058,8 @@ preprocessor({$ENDIF})
     reserved(with) ident(TreeView)operator(.)ident(Canvas) reserved(do) reserved(begin)
       ident(Pen)operator(.)ident(Color) operator(:=) ident(clVeryBrightBlue)operator(;)
       ident(Pen)operator(.)ident(Style) operator(:=) ident(psSolid)operator(;)
-      ident(Brush)operator(.)ident(Color) operator(:=) ident(GadientAqua)operator(()integer(200)operator(\);)
-      ident(Rectangle)operator(()ident(FullRect)operator(\);)
+      ident(Brush)operator(.)ident(Color) operator(:=) ident(GadientAqua)operator(()integer(200)operator(\))operator(;)
+      ident(Rectangle)operator(()ident(FullRect)operator(\))operator(;)
       ident(Brush)operator(.)ident(Style) operator(:=) ident(bsClear)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
@@ -6075,11 +6075,11 @@ reserved(begin)
   reserved(try)
 
 preprocessor({$IFDEF UNIKEY})
-    reserved(if) ident(RootOfNode)operator(()ident(Node)operator(\).)ident(ImageIndex) operator(=) ident(iconHostUni) reserved(then) reserved(begin)
-      ident(Uni) operator(:=) ident(UniOfNode)operator(()ident(Node)operator(\);)
+    reserved(if) ident(RootOfNode)operator(()ident(Node)operator(\))operator(.)ident(ImageIndex) operator(=) ident(iconHostUni) reserved(then) reserved(begin)
+      ident(Uni) operator(:=) ident(UniOfNode)operator(()ident(Node)operator(\))operator(;)
       reserved(if) ident(Assigned)operator(()ident(Uni)operator(\)) reserved(then)
         reserved(try)
-          ident(Uni)operator(.)ident(GetKeyNames)operator(()ident(SL)operator(\);)
+          ident(Uni)operator(.)ident(GetKeyNames)operator(()ident(SL)operator(\))operator(;)
         reserved(finally)
           ident(Uni)operator(.)ident(Free)operator(;)
         reserved(end)operator(;)
@@ -6090,7 +6090,7 @@ preprocessor({$ENDIF})
     ident(Reg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(;)
     reserved(try)
       reserved(if) ident(OpenNodeOK)operator(()ident(Reg)operator(,) ident(Node)operator(\)) reserved(then)
-        ident(Reg)operator(.)ident(GetKeyNames)operator(()ident(SL)operator(\);)
+        ident(Reg)operator(.)ident(GetKeyNames)operator(()ident(SL)operator(\))operator(;)
     reserved(finally)
       ident(Reg)operator(.)ident(Free)operator(;)
     reserved(end)operator(;)
@@ -6103,14 +6103,14 @@ preprocessor({$ENDIF})
     reserved(if) ident(PrefWin)operator(.)ident(ShowProgressCB)operator(.)ident(Checked) reserved(and) operator(()ident(SL)operator(.)ident(Count) operator(>) integer(100)operator(\)) reserved(then)
       ident(AddKeysProgressive)operator(()ident(RegTV)operator(,) ident(Node)operator(,) ident(SL)operator(\))
     reserved(else)
-      ident(AddKeys)operator(()ident(RegTV)operator(,) ident(Node)operator(,) ident(SL)operator(\);)
+      ident(AddKeys)operator(()ident(RegTV)operator(,) ident(Node)operator(,) ident(SL)operator(\))operator(;)
 
     reserved(if) ident(PrefWin)operator(.)ident(SortKeysCB)operator(.)ident(Checked) reserved(then)
       ident(Node)operator(.)ident(AlphaSort)operator(;)
 
     reserved(if) ident(MurphyMode) reserved(then) reserved(begin)
       ident(Clock)operator(.)ident(Stop)operator(;)
-      ident(AddHint)operator(()ident(Format)operator(()string<delimiter(')content([MM] Key opened after %0.2f s.)delimiter(')>operator(,) operator([)ident(Clock)operator(.)ident(SecondsPassed)operator(]\)\);)
+      ident(AddHint)operator(()ident(Format)operator(()string<delimiter(')content([MM] Key opened after %0.2f s.)delimiter(')>operator(,) operator([)ident(Clock)operator(.)ident(SecondsPassed)operator(])operator(\))operator(\))operator(;)
     reserved(end)operator(;)
   reserved(finally)
     ident(Clock)operator(.)ident(Free)operator(;)
@@ -6119,13 +6119,13 @@ preprocessor({$ENDIF})
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVGetSelectedIndex)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVGetSelectedIndex)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
 reserved(begin)
   ident(Node)operator(.)ident(SelectedIndex) operator(:=) ident(Node)operator(.)ident(ImageIndex)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(var)
   ident(Node)operator(:) ident(TTreeNode)operator(;)
 reserved(begin)
@@ -6173,17 +6173,17 @@ reserved(begin)
 
   reserved(case) ident(Key) reserved(of)
     integer(0)operator(:) ident(Exit)operator(;)
-    ident(VK_RETURN)operator(:) ident(ValuesWin)operator(.)ident(FocusControl)operator(()ident(ValueList)operator(\);)
-    ident(VK_DELETE)operator(:) ident(DeleteMIClick)operator(()ident(Sender)operator(\);)
+    ident(VK_RETURN)operator(:) ident(ValuesWin)operator(.)ident(FocusControl)operator(()ident(ValueList)operator(\))operator(;)
+    ident(VK_DELETE)operator(:) ident(DeleteMIClick)operator(()ident(Sender)operator(\))operator(;)
     ident(VK_SPACE)operator(:) reserved(begin)
-      ident(JumpToSel)operator(()ident(RegTV)operator(\);)
-      ident(Inc)operator(()ident(SpaceCount)operator(\);)
+      ident(JumpToSel)operator(()ident(RegTV)operator(\))operator(;)
+      ident(Inc)operator(()ident(SpaceCount)operator(\))operator(;)
       reserved(if) ident(SpaceCount) operator(>) integer(10) reserved(then) reserved(begin)
-        ident(ShowMessage)operator(()string<delimiter(')content(YES!)delimiter(')>operator(\);)
+        ident(ShowMessage)operator(()string<delimiter(')content(YES!)delimiter(')>operator(\))operator(;)
         ident(SpaceCount) operator(:=) integer(0)operator(;)
       reserved(end)operator(;)
     reserved(end)operator(;)
-    ident(VK_F9)operator(:) ident(SwapFonts)operator(()ident(RegTV)operator(\);)
+    ident(VK_F9)operator(:) ident(SwapFonts)operator(()ident(RegTV)operator(\))operator(;)
 
     ident(VK_F12)operator(:)
       reserved(if) ident(ssShift) reserved(in) ident(Shift) reserved(then) reserved(begin)
@@ -6202,39 +6202,39 @@ reserved(begin)
     ident(VK_RIGHT)operator(,) ident(VK_ADD)operator(:)
       reserved(begin)
         reserved(if) reserved(not) ident(Node)operator(.)ident(HasChildren) reserved(then)
-          ident(TreeWin)operator(.)ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()ident(Node)operator(,) string<delimiter(')delimiter(')>operator(\);)
+          ident(TreeWin)operator(.)ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()ident(Node)operator(,) string<delimiter(')delimiter(')>operator(\))operator(;)
         reserved(if) ident(Node)operator(.)ident(Expanded) reserved(then)
           ident(RegTV)operator(.)ident(Selected) operator(:=) ident(Node)operator(.)ident(GetFirstChild)
         reserved(else)
-          ident(Node)operator(.)ident(Expand)operator(()ident(False)operator(\);)
+          ident(Node)operator(.)ident(Expand)operator(()ident(False)operator(\))operator(;)
       ident(Key) operator(:=) integer(0)operator(;) reserved(end)operator(;)
 
     ident(VK_MULTIPLY)operator(:)
       reserved(begin)
         ident(NoAsterisk) operator(:=) ident(True)operator(;)
-        ident(OpenNextLevel)operator(()ident(Node)operator(\);)
-        ident(JumpToSel)operator(()ident(RegTV)operator(\);)
-        ident(AddHint)operator(()string<delimiter(')content(Press the Multiply Key again to open the next level.)delimiter(')>operator(\);)
+        ident(OpenNextLevel)operator(()ident(Node)operator(\))operator(;)
+        ident(JumpToSel)operator(()ident(RegTV)operator(\))operator(;)
+        ident(AddHint)operator(()string<delimiter(')content(Press the Multiply Key again to open the next level.)delimiter(')>operator(\))operator(;)
       ident(Key) operator(:=) integer(0)operator(;) reserved(end)operator(;)
 
     ident(VK_DIVIDE)operator(:)
       reserved(begin)
         ident(DoSmartExpand) operator(:=) ident(False)operator(;)
-        ident(Node)operator(.)ident(Collapse)operator(()ident(true)operator(\);)
+        ident(Node)operator(.)ident(Collapse)operator(()ident(true)operator(\))operator(;)
         ident(DoSmartExpand) operator(:=) ident(True)operator(;)
       ident(Key) operator(:=) integer(0)operator(;) reserved(end)operator(;)
   reserved(end)operator(;)
 
   reserved(if) ident(ssctrl) reserved(in) ident(Shift) reserved(then)
     reserved(case) ident(Key) reserved(of)
-      ident(Ord)operator(()char<delimiter(')content(C)delimiter(')>operator(\):) ident(CopyPathMIClick)operator(()ident(Sender)operator(\);)
-      ident(Ord)operator(()char<delimiter(')content(X)delimiter(')>operator(\):) ident(CutPathMIClick)operator(()ident(Sender)operator(\);)
-      ident(Ord)operator(()char<delimiter(')content(V)delimiter(')>operator(\):) ident(PasteKeyMIClick)operator(()ident(Sender)operator(\);)
+      ident(Ord)operator(()char<delimiter(')content(C)delimiter(')>operator(\))operator(:) ident(CopyPathMIClick)operator(()ident(Sender)operator(\))operator(;)
+      ident(Ord)operator(()char<delimiter(')content(X)delimiter(')>operator(\))operator(:) ident(CutPathMIClick)operator(()ident(Sender)operator(\))operator(;)
+      ident(Ord)operator(()char<delimiter(')content(V)delimiter(')>operator(\))operator(:) ident(PasteKeyMIClick)operator(()ident(Sender)operator(\))operator(;)
     reserved(end)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVMouseDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Button)operator(:) ident(TMouseButton)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\))operator(;)
 reserved(var)
   ident(Node)operator(:) ident(TTreeNode)operator(;)
   ident(RelX)operator(,) ident(RelY)operator(:) ident(Integer)operator(;)
@@ -6245,9 +6245,9 @@ reserved(begin)
   reserved(if) reserved(not) ident(Active) reserved(then)
     ident(Exit)operator(;)
 
-  ident(RelX) operator(:=) ident(RegTV)operator(.)ident(ScreenToClient)operator(()ident(Mouse)operator(.)ident(CursorPos)operator(\).)ident(X)operator(;)
-  ident(RelY) operator(:=) ident(RegTV)operator(.)ident(ScreenToClient)operator(()ident(Mouse)operator(.)ident(CursorPos)operator(\).)ident(Y)operator(;)
-  ident(Node) operator(:=) ident(RegTV)operator(.)ident(GetNodeAt)operator(()ident(RelX)operator(,) ident(RelY)operator(\);)
+  ident(RelX) operator(:=) ident(RegTV)operator(.)ident(ScreenToClient)operator(()ident(Mouse)operator(.)ident(CursorPos)operator(\))operator(.)ident(X)operator(;)
+  ident(RelY) operator(:=) ident(RegTV)operator(.)ident(ScreenToClient)operator(()ident(Mouse)operator(.)ident(CursorPos)operator(\))operator(.)ident(Y)operator(;)
+  ident(Node) operator(:=) ident(RegTV)operator(.)ident(GetNodeAt)operator(()ident(RelX)operator(,) ident(RelY)operator(\))operator(;)
   reserved(if) reserved(not) ident(Assigned)operator(()ident(Node)operator(\)) reserved(then)
     ident(Exit)operator(;)
 
@@ -6255,32 +6255,32 @@ reserved(begin)
     ident(Node)operator(.)ident(Selected) operator(:=) ident(True)operator(;)
 
   reserved(if) ident(Button) operator(=) ident(mbLeft) reserved(then) reserved(begin)
-    ident(NodeRect) operator(:=) ident(RegTV)operator(.)ident(Selected)operator(.)ident(DisplayRect)operator(()ident(True)operator(\);)
+    ident(NodeRect) operator(:=) ident(RegTV)operator(.)ident(Selected)operator(.)ident(DisplayRect)operator(()ident(True)operator(\))operator(;)
     reserved(if) ident(RegTV)operator(.)ident(HotTrack)
      reserved(or) operator(()ident(RelX) operator(<) ident(NodeRect)operator(.)ident(Left)operator(\)) reserved(and) operator(()ident(RelX) operator(>) ident(NodeRect)operator(.)ident(Left) operator(-) integer(20)operator(\)) reserved(then) reserved(begin)
       comment(//4px more to the left (friendlier for the user\))
       reserved(if) reserved(not) ident(Node)operator(.)ident(HasChildren) reserved(then)
-        ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()ident(Node)operator(,) string<delimiter(')delimiter(')>operator(\);)
+        ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()ident(Node)operator(,) string<delimiter(')delimiter(')>operator(\))operator(;)
       ident(DoSmartExpand) operator(:=) ident(False)operator(;)
       reserved(with) ident(Node) reserved(do)
         reserved(if) reserved(not) ident(Expanded) reserved(then)
           ident(Expand)operator(()ident(False)operator(\))
         reserved(else)
-          ident(Collapse)operator(()ident(False)operator(\);)
+          ident(Collapse)operator(()ident(False)operator(\))operator(;)
       ident(DoSmartExpand) operator(:=) ident(True)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVStartDrag)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(DragObject)operator(:) ident(TDragObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVStartDrag)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(DragObject)operator(:) ident(TDragObject)operator(\))operator(;)
 reserved(begin)
   ident(DragNode) operator(:=) ident(RegTV)operator(.)ident(Selected)operator(;)
-  reserved(if) ident(NodeInfo)operator(()ident(DragNode)operator(\).)ident(IsHost) reserved(then)
+  reserved(if) ident(NodeInfo)operator(()ident(DragNode)operator(\))operator(.)ident(IsHost) reserved(then)
     ident(DragNode) operator(:=) reserved(nil)operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(OpenNodeError)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(;)
-  reserved(out) ident(Mode)operator(:) ident(TOpenNodeMode)operator(\):) ident(Integer)operator(;)
+  reserved(out) ident(Mode)operator(:) ident(TOpenNodeMode)operator(\))operator(:) ident(Integer)operator(;)
 reserved(var)
   ident(Key)operator(:) reserved(string)operator(;)
 reserved(begin)
@@ -6290,42 +6290,42 @@ reserved(begin)
     ident(Exit)operator(;)
 
   ident(Reg)operator(.)ident(CloseKey)operator(;)
-  ident(Key) operator(:=) ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(Node)operator(\)\);)
-  ident(Reg)operator(.)ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(ExRegRoot)operator(()ident(Key)operator(\)\);)
-  ident(Result) operator(:=) ident(Reg)operator(.)ident(OpenKeyError)operator(()ident(ExRegKey)operator(()ident(Key)operator(\),) ident(False)operator(,) ident(True)operator(\);)
+  ident(Key) operator(:=) ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(Node)operator(\))operator(\))operator(;)
+  ident(Reg)operator(.)ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(ExRegRoot)operator(()ident(Key)operator(\))operator(\))operator(;)
+  ident(Result) operator(:=) ident(Reg)operator(.)ident(OpenKeyError)operator(()ident(ExRegKey)operator(()ident(Key)operator(\))operator(,) ident(False)operator(,) ident(True)operator(\))operator(;)
   reserved(if) ident(Success)operator(()ident(Result)operator(\)) reserved(then)
     reserved(if) ident(Reg)operator(.)ident(RootKey) operator(=) ident(HKDD) reserved(then)
       ident(Mode) operator(:=) ident(onReadOnly)
     reserved(else)
       ident(Mode) operator(:=) ident(onFull)
-  reserved(else) reserved(if) ident(Reg)operator(.)ident(OpenKeyReadOnly)operator(()ident(ExRegKey)operator(()ident(Key)operator(\)\)) reserved(then)
+  reserved(else) reserved(if) ident(Reg)operator(.)ident(OpenKeyReadOnly)operator(()ident(ExRegKey)operator(()ident(Key)operator(\))operator(\)) reserved(then)
     ident(Mode) operator(:=) ident(onReadOnly)
   reserved(else)
     ident(Mode) operator(:=) ident(onError)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(OpenNode)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\):) ident(TOpenNodeMode)operator(;)
+reserved(function) ident(OpenNode)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(:) ident(TOpenNodeMode)operator(;)
 reserved(begin)
-  ident(OpenNodeError)operator(()ident(Reg)operator(,) ident(Node)operator(,) ident(Result)operator(\);)
+  ident(OpenNodeError)operator(()ident(Reg)operator(,) ident(Node)operator(,) ident(Result)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(OpenNodeOK)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(OpenNodeOK)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(OpenNode)operator(()ident(Reg)operator(,) ident(Node)operator(\)) reserved(in) ident(onOK)operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(OpenCurKey)operator(:) ident(Boolean)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(OpenNodeOK)operator(()ident(MainReg)operator(,) ident(RegTV)operator(.)ident(Selected)operator(\);)
+  ident(Result) operator(:=) ident(OpenNodeOK)operator(()ident(MainReg)operator(,) ident(RegTV)operator(.)ident(Selected)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(OpenCurParent)operator(:) ident(Boolean)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(Assigned)operator(()ident(RegTV)operator(.)ident(Selected)operator(\))
-    reserved(and) ident(OpenNodeOK)operator(()ident(MainReg)operator(,) ident(RegTV)operator(.)ident(Selected)operator(.)ident(Parent)operator(\);)
+    reserved(and) ident(OpenNodeOK)operator(()ident(MainReg)operator(,) ident(RegTV)operator(.)ident(Selected)operator(.)ident(Parent)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(TTreeWin)operator(.)ident(CreateKey)operator(()ident(Subkey)operator(:) ident(Boolean)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(TTreeWin)operator(.)ident(CreateKey)operator(()ident(Subkey)operator(:) ident(Boolean)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(var)
   ident(Node)operator(,) ident(NewNode)operator(:) ident(TTreeNode)operator(;)
   ident(KeyName)operator(:) reserved(string)operator(;)
@@ -6344,18 +6344,18 @@ reserved(begin)
   comment(//key shall be created on same level...)
     reserved(if) ident(Node)operator(.)ident(Level) operator(=) integer(0) reserved(then) reserved(begin)
       ident(Node) operator(:=) ident(RegTV)operator(.)ident(Selected)operator(;)
-      reserved(if) ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(Node)operator(\)\)) operator(<>) ident(PathOfNode)operator(()ident(Node)operator(\)) reserved(then)
+      reserved(if) ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(Node)operator(\))operator(\)) operator(<>) ident(PathOfNode)operator(()ident(Node)operator(\)) reserved(then)
       comment(//check for shortcut: shortcuts are unequal to their trace)
         reserved(if) ident(mrOK) operator(=) ident(MessageDlg)operator(()
                   string<delimiter(')content(You are trying to create a Key in the shortcut)char('')content(s level.)delimiter(')> operator(+) ident(EOL) operator(+)
                   string<delimiter(')content(Pluto needs to jump to the target of the shortcut to do this.)delimiter(')>operator(,)
-                  ident(mtConfirmation)operator(,) operator([)ident(mbOK)operator(,) ident(mbCancel)operator(],) integer(0)operator(\)) reserved(then) reserved(begin)
-          ident(MainWin)operator(.)ident(GotoKey)operator(()ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(Node)operator(\)\)\);)
+                  ident(mtConfirmation)operator(,) operator([)ident(mbOK)operator(,) ident(mbCancel)operator(])operator(,) integer(0)operator(\)) reserved(then) reserved(begin)
+          ident(MainWin)operator(.)ident(GotoKey)operator(()ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(Node)operator(\))operator(\))operator(\))operator(;)
           ident(Node) operator(:=) ident(RegTV)operator(.)ident(Selected)operator(.)ident(Parent)operator(;)
         reserved(end) reserved(else) ident(Exit)
       reserved(else) reserved(begin)
         ident(ShowMessage)operator(()string<delimiter(')content(Key is a HKEY.)delimiter(')> operator(+) ident(EOL) operator(+)
-                    string<delimiter(')content(It is not possible to create Keys on HKEY level.)delimiter(')>operator(\);)
+                    string<delimiter(')content(It is not possible to create Keys on HKEY level.)delimiter(')>operator(\))operator(;)
       ident(Exit)operator(;) reserved(end)operator(;)
     reserved(end) reserved(else)
       ident(Node) operator(:=) ident(Node)operator(.)ident(Parent)operator(;) comment(//set reference key to parent)
@@ -6369,21 +6369,21 @@ reserved(begin)
       ident(KeyName) operator(:=) string<delimiter(')content(New)delimiter(')>operator(;)  comment(//find best free name)
       ident(i) operator(:=) integer(0)operator(;)
       reserved(while) ident(MainReg)operator(.)ident(KeyExists)operator(()ident(KeyName)operator(\)) reserved(do) reserved(begin)
-        ident(Inc)operator(()ident(i)operator(\);)
-        ident(KeyName) operator(:=) string<delimiter(')content(New )delimiter(')> operator(+) ident(IntToStr)operator(()ident(i)operator(\);)
+        ident(Inc)operator(()ident(i)operator(\))operator(;)
+        ident(KeyName) operator(:=) string<delimiter(')content(New )delimiter(')> operator(+) ident(IntToStr)operator(()ident(i)operator(\))operator(;)
       reserved(end)operator(;)
 
-      ident(Result) operator(:=) ident(MainReg)operator(.)ident(CreateKey)operator(()ident(KeyName)operator(\)) reserved(and) ident(MainReg)operator(.)ident(KeyExists)operator(()ident(KeyName)operator(\);)
+      ident(Result) operator(:=) ident(MainReg)operator(.)ident(CreateKey)operator(()ident(KeyName)operator(\)) reserved(and) ident(MainReg)operator(.)ident(KeyExists)operator(()ident(KeyName)operator(\))operator(;)
       comment(// ^-- CREATE KEY)
 
       reserved(if) reserved(not) ident(Result) reserved(then) comment(// <-- FAILED)
-        ident(ShowMessage)operator(()string<delimiter(')content(Could not create key!)delimiter(')>operator(\);)
+        ident(ShowMessage)operator(()string<delimiter(')content(Could not create key!)delimiter(')>operator(\))operator(;)
     reserved(end)operator(;)
 
-    ident(onReadOnly)operator(:) ident(ShowMessage)operator(()string<delimiter(')content(Key is read-only.)delimiter(')>operator(\);)
+    ident(onReadOnly)operator(:) ident(ShowMessage)operator(()string<delimiter(')content(Key is read-only.)delimiter(')>operator(\))operator(;)
 
     reserved(else)
-      ident(ShowMessage)operator(()string<delimiter(')content(Error: Couldn)char('')content(t open key.)delimiter(')>operator(\);)
+      ident(ShowMessage)operator(()string<delimiter(')content(Error: Couldn)char('')content(t open key.)delimiter(')>operator(\))operator(;)
 
     reserved(end)operator(;) comment(//case)
 
@@ -6395,17 +6395,17 @@ reserved(begin)
     ident(Exit)operator(;)
 
   reserved(if) reserved(not) ident(Node)operator(.)ident(Expanded) reserved(then) reserved(begin)   comment(//find the node, if Parent not Expanded)
-    ident(CheckNode)operator(()ident(Node)operator(,) ident(False)operator(\);)
+    ident(CheckNode)operator(()ident(Node)operator(,) ident(False)operator(\))operator(;)
     ident(DoSmartExpand) operator(:=) ident(False)operator(;)
-    ident(Node)operator(.)ident(Expand)operator(()ident(False)operator(\);)
+    ident(Node)operator(.)ident(Expand)operator(()ident(False)operator(\))operator(;)
     ident(DoSmartExpand) operator(:=) ident(True)operator(;)
-    ident(NewNode) operator(:=) ident(FindNode)operator(()ident(Node)operator(,) ident(KeyName)operator(\);)
+    ident(NewNode) operator(:=) ident(FindNode)operator(()ident(Node)operator(,) ident(KeyName)operator(\))operator(;)
   reserved(end) reserved(else)
-    ident(NewNode) operator(:=) ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()ident(Node)operator(,) ident(KeyName)operator(\);) comment(//else create a new node)
+    ident(NewNode) operator(:=) ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()ident(Node)operator(,) ident(KeyName)operator(\))operator(;) comment(//else create a new node)
 
-  ident(Result) operator(:=) ident(Assigned)operator(()ident(NewNode)operator(\);)
+  ident(Result) operator(:=) ident(Assigned)operator(()ident(NewNode)operator(\))operator(;)
   reserved(if) reserved(not) ident(Result) reserved(then)
-    ident(ShowMessage)operator(()string<delimiter(')content(Error: Could not find created key.)delimiter(')>operator(\);)
+    ident(ShowMessage)operator(()string<delimiter(')content(Error: Could not find created key.)delimiter(')>operator(\))operator(;)
 
   reserved(if) ident(Result) reserved(then) reserved(begin)
     ident(RegTV)operator(.)ident(Selected) operator(:=) ident(NewNode)operator(;)
@@ -6425,47 +6425,47 @@ reserved(begin)
   reserved(if) ident(CantWrite) reserved(then)
     ident(Exit)operator(;)
 
-  reserved(if) ident(NodeInfo)operator(()ident(Node)operator(\).)ident(IsHost) reserved(then)
+  reserved(if) ident(NodeInfo)operator(()ident(Node)operator(\))operator(.)ident(IsHost) reserved(then)
     ident(Exit)operator(;)
 
-  ident(Full) operator(:=) ident(CurKey)operator(()ident(uhNonSystemShortcuts)operator(\);)
-  ident(MainKey) operator(:=) ident(LWPSolve)operator(()ident(Full)operator(.)ident(Key)operator(\);)
-  ident(SubKey) operator(:=) ident(FromLastChar)operator(()ident(MainKey)operator(,) char<delimiter(')content(\\)delimiter(')>operator(\);)
-  ident(MainKey) operator(:=) ident(UntilLastChar)operator(()ident(MainKey)operator(,) char<delimiter(')content(\\)delimiter(')>operator(\);)
+  ident(Full) operator(:=) ident(CurKey)operator(()ident(uhNonSystemShortcuts)operator(\))operator(;)
+  ident(MainKey) operator(:=) ident(LWPSolve)operator(()ident(Full)operator(.)ident(Key)operator(\))operator(;)
+  ident(SubKey) operator(:=) ident(FromLastChar)operator(()ident(MainKey)operator(,) char<delimiter(')content(\\)delimiter(')>operator(\))operator(;)
+  ident(MainKey) operator(:=) ident(UntilLastChar)operator(()ident(MainKey)operator(,) char<delimiter(')content(\\)delimiter(')>operator(\))operator(;)
   reserved(if) ident(SubKey) operator(=) string<delimiter(')delimiter(')> reserved(then) reserved(begin) comment(//Directly beyound HKEY)
     ident(SubKey) operator(:=) ident(MainKey)operator(;)
     ident(MainKey) operator(:=) string<delimiter(')delimiter(')>operator(;)
   reserved(end)operator(;)
 
   reserved(try)
-    ident(MainReg)operator(.)ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(Full)operator(.)ident(Root)operator(\);)
+    ident(MainReg)operator(.)ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(Full)operator(.)ident(Root)operator(\))operator(;)
     reserved(if) reserved(not) ident(MainReg)operator(.)ident(OpenKey)operator(()ident(MainKey)operator(,) ident(False)operator(\)) reserved(then) reserved(begin)
-      ident(ShowMessage)operator(()string<delimiter(')content(Error: Couldn)char('')content(t not open Key: )delimiter(')> operator(+) ident(MainKey)operator(\);)
+      ident(ShowMessage)operator(()string<delimiter(')content(Error: Couldn)char('')content(t not open Key: )delimiter(')> operator(+) ident(MainKey)operator(\))operator(;)
     ident(Exit) reserved(end)operator(;)
     reserved(if) ident(Copy)operator(()ident(SubKey)operator(,) integer(1)operator(,) integer(3)operator(\)) operator(<>) string<delimiter(')content(New)delimiter(')> reserved(then)
       ident(NewKey) operator(:=) string<delimiter(')content(New )delimiter(')> operator(+) ident(SubKey)
     reserved(else)
       ident(NewKey) operator(:=) ident(SubKey)operator(;)
 
-    ident(zKey) operator(:=) ident(Trim)operator(()ident(FromLastChar)operator(()ident(NewKey)operator(,) char<delimiter(')content( )delimiter(')>operator(\)\);)
+    ident(zKey) operator(:=) ident(Trim)operator(()ident(FromLastChar)operator(()ident(NewKey)operator(,) char<delimiter(')content( )delimiter(')>operator(\))operator(\))operator(;)
 
-    ident(i) operator(:=) ident(StrToIntDef)operator(()ident(zKey)operator(,) integer(0)operator(\);)
+    ident(i) operator(:=) ident(StrToIntDef)operator(()ident(zKey)operator(,) integer(0)operator(\))operator(;)
     reserved(if) ident(IsValidInteger)operator(()ident(zKey)operator(\)) reserved(then)
-      ident(zKey) operator(:=) ident(Trim)operator(()ident(UntilLastChar)operator(()ident(NewKey)operator(,) char<delimiter(')content( )delimiter(')>operator(\)\))
+      ident(zKey) operator(:=) ident(Trim)operator(()ident(UntilLastChar)operator(()ident(NewKey)operator(,) char<delimiter(')content( )delimiter(')>operator(\))operator(\))
     reserved(else)
       ident(zKey) operator(:=) ident(NewKey)operator(;)
         
     reserved(while) ident(MainReg)operator(.)ident(KeyExists)operator(()ident(NewKey)operator(\)) reserved(do) reserved(begin)
-      ident(Inc)operator(()ident(i)operator(\);)
-      ident(NewKey) operator(:=) ident(zKey) operator(+) char<delimiter(')content( )delimiter(')> operator(+) ident(IntToStr)operator(()ident(i)operator(\);)
+      ident(Inc)operator(()ident(i)operator(\))operator(;)
+      ident(NewKey) operator(:=) ident(zKey) operator(+) char<delimiter(')content( )delimiter(')> operator(+) ident(IntToStr)operator(()ident(i)operator(\))operator(;)
     reserved(end)operator(;)
 
-    ident(MainReg)operator(.)ident(MoveKey)operator(()ident(SubKey)operator(,) ident(NewKey)operator(,) ident(False)operator(\);)
+    ident(MainReg)operator(.)ident(MoveKey)operator(()ident(SubKey)operator(,) ident(NewKey)operator(,) ident(False)operator(\))operator(;)
   reserved(finally)
     ident(MainReg)operator(.)ident(CloseKey)operator(;)
   reserved(end)operator(;)
 
-  ident(Node) operator(:=) ident(RegTV)operator(.)ident(Items)operator(.)ident(Add)operator(()ident(Node)operator(,) ident(NewKey)operator(\);)
+  ident(Node) operator(:=) ident(RegTV)operator(.)ident(Items)operator(.)ident(Add)operator(()ident(Node)operator(,) ident(NewKey)operator(\))operator(;)
   ident(RegTV)operator(.)ident(Selected) operator(:=) ident(Node)operator(;)
   ident(Node)operator(.)ident(EditText)operator(;)
 reserved(end)operator(;)
@@ -6485,51 +6485,51 @@ reserved(begin)
   reserved(else)
     ident(ScName) operator(:=) string<delimiter(')delimiter(')> operator(+) ident(Node)operator(.)ident(Text)operator(;)
 
-  ident(ScRealPath) operator(:=) ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(Node)operator(\)\);)
+  ident(ScRealPath) operator(:=) ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(Node)operator(\))operator(\))operator(;)
   reserved(if) reserved(not) ident(InputQuery)operator(()string<delimiter(')content(New shortcut to )delimiter(')>operator(,) ident(ScRealPath)operator(,) ident(ScName)operator(\)) reserved(then)
     ident(Exit)operator(;)
 
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(ShortCuts)operator(\)) reserved(do)
-    reserved(if) ident(SameText)operator(()ident(ScName)operator(,) ident(ShortCuts)operator([)ident(i)operator(].)ident(Alias)operator(\)) reserved(then) reserved(begin)
-      ident(ShowMessage)operator(()string<delimiter(')content(Name already in use.)delimiter(')>operator(\);)
+    reserved(if) ident(SameText)operator(()ident(ScName)operator(,) ident(ShortCuts)operator([)ident(i)operator(])operator(.)ident(Alias)operator(\)) reserved(then) reserved(begin)
+      ident(ShowMessage)operator(()string<delimiter(')content(Name already in use.)delimiter(')>operator(\))operator(;)
       ident(NewShortcut)operator(;)
     ident(Exit)operator(;) reserved(end)operator(;)
 
   ident(ShortCutNode) operator(:=) ident(AddShortcut)operator(()ident(ScName)operator(,) ident(ScRealPath)operator(,) ident(iconShortcut)operator(,) ident(uhUserShortcut)operator(,)
-    ident(True)operator(\);)
-  ident(CheckNode)operator(()ident(Node)operator(,) ident(False)operator(\);)
+    ident(True)operator(\))operator(;)
+  ident(CheckNode)operator(()ident(Node)operator(,) ident(False)operator(\))operator(;)
   ident(RegTV)operator(.)ident(Selected) operator(:=) ident(ShortCutNode)operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(AddShortcut)operator(()ident(Alias)operator(,) ident(RealPath)operator(:) reserved(string)operator(;) ident(Icon)operator(:) ident(Integer)operator(;)
   ident(AHostType)operator(:) ident(TUniHostType) operator(=) ident(uhUserShortcut)operator(;)
-  ident(WriteIni)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) ident(TTreeNode)operator(;)
+  ident(WriteIni)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) ident(TTreeNode)operator(;)
 reserved(var)
   ident(Last)operator(:) ident(Integer)operator(;)
 reserved(begin)
-  ident(RealPath) operator(:=) ident(TraceKey)operator(()ident(RealPath)operator(\);) comment(//Important: do this BEFORE adding a new,)
+  ident(RealPath) operator(:=) ident(TraceKey)operator(()ident(RealPath)operator(\))operator(;) comment(//Important: do this BEFORE adding a new,)
                                   comment(//empty shortcut to ShortCuts)
 
-  ident(SetLength)operator(()ident(ShortCuts)operator(,) ident(Length)operator(()ident(ShortCuts)operator(\)) operator(+) integer(1)operator(\);)
-  ident(Last) operator(:=) ident(High)operator(()ident(Shortcuts)operator(\);)
-  ident(ShortCuts)operator([)ident(Last)operator(].)ident(Alias) operator(:=) ident(Alias)operator(;)
-  ident(ShortCuts)operator([)ident(Last)operator(].)ident(RealPath) operator(:=) ident(RealPath)operator(;)
+  ident(SetLength)operator(()ident(ShortCuts)operator(,) ident(Length)operator(()ident(ShortCuts)operator(\)) operator(+) integer(1)operator(\))operator(;)
+  ident(Last) operator(:=) ident(High)operator(()ident(Shortcuts)operator(\))operator(;)
+  ident(ShortCuts)operator([)ident(Last)operator(])operator(.)ident(Alias) operator(:=) ident(Alias)operator(;)
+  ident(ShortCuts)operator([)ident(Last)operator(])operator(.)ident(RealPath) operator(:=) ident(RealPath)operator(;)
 
-  ident(Result) operator(:=) ident(RegTV)operator(.)ident(Items)operator(.)ident(Add)operator(()reserved(nil)operator(,) ident(Alias)operator(\);)
-  ident(ShortCuts)operator([)ident(Last)operator(].)ident(Node) operator(:=) ident(Result)operator(;)
+  ident(Result) operator(:=) ident(RegTV)operator(.)ident(Items)operator(.)ident(Add)operator(()reserved(nil)operator(,) ident(Alias)operator(\))operator(;)
+  ident(ShortCuts)operator([)ident(Last)operator(])operator(.)ident(Node) operator(:=) ident(Result)operator(;)
 
   reserved(if) ident(Alias) operator(=) string<delimiter(')content(HKEY_WindowsMachine)delimiter(')> reserved(then)
     ident(Icon) operator(:=) ident(iconHKWM)
   reserved(else) reserved(if) ident(Alias) operator(=) string<delimiter(')content(HKEY_WindowsUser)delimiter(')> reserved(then)
     ident(Icon) operator(:=) ident(iconHKWU)operator(;)
-  ident(SetTNImage)operator(()ident(Result)operator(,) ident(Icon)operator(\);)
+  ident(SetTNImage)operator(()ident(Result)operator(,) ident(Icon)operator(\))operator(;)
 
-  ident(NodeInfo)operator(()ident(Result)operator(\).)ident(HostType) operator(:=) ident(AHostType)operator(;)
+  ident(NodeInfo)operator(()ident(Result)operator(\))operator(.)ident(HostType) operator(:=) ident(AHostType)operator(;)
 
   reserved(if) ident(WriteIni) reserved(then)
     reserved(with) ident(TIniFile)operator(.)ident(Create)operator(()ident(PlutoDir) operator(+) string<delimiter(')content(Shortcuts.ini)delimiter(')>operator(\)) reserved(do)
       reserved(try)
-        ident(WriteString)operator(()string<delimiter(')content(Shortcuts)delimiter(')>operator(,) ident(Alias)operator(,) ident(RealPath)operator(\);)
+        ident(WriteString)operator(()string<delimiter(')content(Shortcuts)delimiter(')>operator(,) ident(Alias)operator(,) ident(RealPath)operator(\))operator(;)
       reserved(finally)
         ident(Free)operator(;)
       reserved(end)operator(;)
@@ -6543,24 +6543,24 @@ reserved(begin)
   ident(Node) operator(:=) ident(RegTV)operator(.)ident(Selected)operator(;)
 
 
-  ident(i) operator(:=) ident(ShortcutIndex)operator(()ident(Node)operator(\);)
+  ident(i) operator(:=) ident(ShortcutIndex)operator(()ident(Node)operator(\))operator(;)
   reserved(if) operator(()ident(i) operator(>) operator(-)integer(1)operator(\)) reserved(then) reserved(begin)
     reserved(if) operator(()ident(mrYes) operator(=) ident(MessageDlg)operator(()string<delimiter(')content(This is a Pluto shortcut to a real key.)delimiter(')>char(#13)char(#10) operator(+)
      string<delimiter(')content(Do you really want to delete the shortcut?)delimiter(')>operator(,)
-     ident(mtConfirmation)operator(,) operator([)ident(mbYes)operator(,) ident(mbCancel)operator(],) integer(0)operator(\)\)) reserved(then) reserved(begin)
+     ident(mtConfirmation)operator(,) operator([)ident(mbYes)operator(,) ident(mbCancel)operator(])operator(,) integer(0)operator(\))operator(\)) reserved(then) reserved(begin)
       ident(SpyThread)operator(.)ident(Suspend)operator(;)
       ident(SpyThread)operator(.)ident(Restart) operator(:=) ident(True)operator(;)
       reserved(with) ident(TIniFile)operator(.)ident(Create)operator(()ident(PlutoDir) operator(+) string<delimiter(')content(Shortcuts.ini)delimiter(')>operator(\)) reserved(do)
         reserved(try)
-          ident(DeleteKey)operator(()string<delimiter(')content(Shortcuts)delimiter(')>operator(,) ident(Shortcuts)operator([)ident(i)operator(].)ident(Alias)operator(\);)
+          ident(DeleteKey)operator(()string<delimiter(')content(Shortcuts)delimiter(')>operator(,) ident(Shortcuts)operator([)ident(i)operator(])operator(.)ident(Alias)operator(\))operator(;)
         reserved(finally)
           ident(Free)operator(;)
         reserved(end)operator(;)
-      ident(Shortcuts)operator([)ident(i)operator(]) operator(:=) ident(Shortcuts)operator([)ident(High)operator(()ident(Shortcuts)operator(\)];)
-      ident(SetLength)operator(()ident(Shortcuts)operator(,) ident(Length)operator(()ident(Shortcuts)operator(\)-)integer(1)operator(\);)
-      ident(RegTV)operator(.)ident(Selected) operator(:=) ident(GetNextBest)operator(()ident(Node)operator(\);)
+      ident(Shortcuts)operator([)ident(i)operator(]) operator(:=) ident(Shortcuts)operator([)ident(High)operator(()ident(Shortcuts)operator(\))operator(])operator(;)
+      ident(SetLength)operator(()ident(Shortcuts)operator(,) ident(Length)operator(()ident(Shortcuts)operator(\))operator(-)integer(1)operator(\))operator(;)
+      ident(RegTV)operator(.)ident(Selected) operator(:=) ident(GetNextBest)operator(()ident(Node)operator(\))operator(;)
       ident(Node)operator(.)ident(Delete)operator(;)
-      ident(RegTVChange)operator(()ident(Self)operator(,) ident(RegTV)operator(.)ident(Selected)operator(\);)
+      ident(RegTVChange)operator(()ident(Self)operator(,) ident(RegTV)operator(.)ident(Selected)operator(\))operator(;)
       ident(SpyThread)operator(.)ident(Resume)operator(;)
     reserved(end)operator(;)
   ident(Exit)operator(;) reserved(end)operator(;)
@@ -6568,16 +6568,16 @@ reserved(begin)
   reserved(if) ident(CantWrite) reserved(then)
     ident(Exit)operator(;)
 
-  reserved(if) ident(NodeInfo)operator(()ident(Node)operator(\).)ident(IsHost) reserved(then)
+  reserved(if) ident(NodeInfo)operator(()ident(Node)operator(\))operator(.)ident(IsHost) reserved(then)
     ident(Exit)operator(;)
 
   ident(SpyThread)operator(.)ident(Suspend)operator(;)
   ident(SpyThread)operator(.)ident(Restart) operator(:=) ident(True)operator(;)
 
-  ident(Node2) operator(:=) ident(GetNextBest)operator(()ident(Node)operator(\);)
+  ident(Node2) operator(:=) ident(GetNextBest)operator(()ident(Node)operator(\))operator(;)
 
   reserved(if) ident(MessageDlg)operator(()string<delimiter(')content(Do you really want to delete this key?)delimiter(')>operator(,) ident(mtConfirmation)operator(,)
-   operator([)ident(mbYes)operator(,) ident(mbCancel)operator(],) integer(0)operator(\)) operator(=) ident(mrYes) reserved(then)
+   operator([)ident(mbYes)operator(,) ident(mbCancel)operator(])operator(,) integer(0)operator(\)) operator(=) ident(mrYes) reserved(then)
     reserved(try)
       reserved(if) ident(OpenCurParent) reserved(then) reserved(begin)
         reserved(if) reserved(not) ident(MainReg)operator(.)ident(DeleteKey)operator(()ident(Node)operator(.)ident(Text)operator(\)) reserved(then) comment(//<-- DELETE KEY)
@@ -6585,7 +6585,7 @@ reserved(begin)
         reserved(else) reserved(begin)
           ident(RegTV)operator(.)ident(Selected) operator(:=) ident(Node2)operator(;)
           reserved(if) ident(Assigned)operator(()ident(Node)operator(.)ident(Parent)operator(\)) reserved(and) operator(()ident(Node2) operator(=) ident(Node)operator(.)ident(Parent)operator(\)) reserved(then)
-            ident(Node)operator(.)ident(Parent)operator(.)ident(Collapse)operator(()ident(False)operator(\);)
+            ident(Node)operator(.)ident(Parent)operator(.)ident(Collapse)operator(()ident(False)operator(\))operator(;)
           ident(Node)operator(.)ident(Delete)operator(;)
         reserved(end)operator(;)
       reserved(end)operator(;)
@@ -6593,30 +6593,30 @@ reserved(begin)
       ident(MainReg)operator(.)ident(CloseKey)operator(;)
     reserved(end)operator(;)
 
-  ident(RegTVChange)operator(()ident(Self)operator(,) ident(Node2)operator(\);)
+  ident(RegTVChange)operator(()ident(Self)operator(,) ident(Node2)operator(\))operator(;)
 
   ident(SpyThread)operator(.)ident(Resume)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(MoveKey)operator(()reserved(const) ident(Src)operator(,) ident(Trg)operator(:) ident(TRegPath)operator(;) ident(CopyWanted)operator(:) ident(Boolean)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(MoveKey)operator(()reserved(const) ident(Src)operator(,) ident(Trg)operator(:) ident(TRegPath)operator(;) ident(CopyWanted)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(var)
   ident(TrgReg)operator(:) ident(TXRegistry)operator(;)
 reserved(begin)
   reserved(with) ident(MainReg) reserved(do) reserved(begin)
-    ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(Src)operator(.)ident(Root)operator(\);)
-    ident(OpenKey)operator(()string<delimiter(')delimiter(')>operator(\);)
+    ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(Src)operator(.)ident(Root)operator(\))operator(;)
+    ident(OpenKey)operator(()string<delimiter(')delimiter(')>operator(\))operator(;)
 
     reserved(if) reserved(not) ident(KeyExists)operator(()ident(Src)operator(.)ident(Key)operator(\)) reserved(then) reserved(begin)
-      ident(ShowMessage)operator(()string<delimiter(')content(Source not found.)delimiter(')>operator(\);)
+      ident(ShowMessage)operator(()string<delimiter(')content(Source not found.)delimiter(')>operator(\))operator(;)
     ident(Exit)operator(;) reserved(end)operator(;)
   reserved(end)operator(;)
 
   ident(TrgReg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(;)
   reserved(with) ident(TrgReg) reserved(do) reserved(begin)
-    ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(Trg)operator(.)ident(Root)operator(\);)
-    ident(OpenKey)operator(()string<delimiter(')delimiter(')>operator(\);)
+    ident(RootKey) operator(:=) ident(HKEYOfStr)operator(()ident(Trg)operator(.)ident(Root)operator(\))operator(;)
+    ident(OpenKey)operator(()string<delimiter(')delimiter(')>operator(\))operator(;)
     reserved(if) ident(KeyExists)operator(()ident(Trg)operator(.)ident(Key)operator(\)) reserved(then) reserved(begin)
-      ident(ShowMessage)operator(()string<delimiter(')content(Target already existing.)delimiter(')>operator(\);)
+      ident(ShowMessage)operator(()string<delimiter(')content(Target already existing.)delimiter(')>operator(\))operator(;)
       ident(TrgReg)operator(.)ident(Free)operator(;)
     ident(Exit)operator(;) reserved(end)operator(;)
   reserved(end)operator(;)
@@ -6625,12 +6625,12 @@ reserved(begin)
     reserved(if) ident(mrYes) operator(<>) ident(MessageDlg)operator(()string<delimiter(')content(From source: )delimiter(')> operator(+) ident(StrOfRegPath)operator(()ident(Src)operator(\)) operator(+) ident(EOL) operator(+)
                            string<delimiter(')content(To target: )delimiter(')> operator(+) ident(StrOfRegPath)operator(()ident(Trg)operator(\)) operator(+) ident(EOL) operator(+)
                            string<delimiter(')content(Do you really want to move this key?)delimiter(')>operator(,)
-                           ident(mtConfirmation)operator(,) operator([)ident(mbYes)operator(,) ident(mbCancel)operator(],) integer(0)operator(\))
+                           ident(mtConfirmation)operator(,) operator([)ident(mbYes)operator(,) ident(mbCancel)operator(])operator(,) integer(0)operator(\))
     reserved(then)
       ident(Exit)operator(;)
 
   reserved(try)
-    ident(MainReg)operator(.)ident(MoveKey)operator(()ident(Src)operator(.)ident(Key)operator(,) ident(TrgReg)operator(,) ident(Trg)operator(.)ident(Key)operator(,) reserved(not) ident(CopyWanted)operator(\);) comment(//<-- MOVE KEY)
+    ident(MainReg)operator(.)ident(MoveKey)operator(()ident(Src)operator(.)ident(Key)operator(,) ident(TrgReg)operator(,) ident(Trg)operator(.)ident(Key)operator(,) reserved(not) ident(CopyWanted)operator(\))operator(;) comment(//<-- MOVE KEY)
   reserved(except)
   reserved(end)operator(;)
 
@@ -6647,20 +6647,20 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TTreeWin)operator(.)ident(MoveValues)operator(()ident(SrcNode)operator(,) ident(TrgNode)operator(:) ident(TTreeNode)operator(;)
-  ident(CopyWanted)operator(:) ident(Boolean)operator(\);)
+  ident(CopyWanted)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(var)
   ident(SrcReg)operator(,) ident(TrgReg)operator(:) ident(TXRegistry)operator(;)
   ident(i)operator(:) ident(Integer)operator(;)
   ident(ValueName)operator(:) reserved(string)operator(;)
   ident(AnswerToAll)operator(:) ident(Integer)operator(;)
 
-  reserved(function) ident(AskForReplacing)operator(()reserved(const) ident(ValueName)operator(:) reserved(string)operator(\):) ident(Integer)operator(;)
+  reserved(function) ident(AskForReplacing)operator(()reserved(const) ident(ValueName)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;)
   reserved(begin)
     reserved(if) ident(AnswerToAll) operator(=) operator(-)integer(1) reserved(then) reserved(begin)
       ident(Result) operator(:=) ident(MessageDlg)operator(()
         string<delimiter(')content(Value )delimiter(')> operator(+) ident(Quote)operator(()ident(ValueName)operator(\)) operator(+) string<delimiter(')content(already exists in target key.)delimiter(')> operator(+) ident(EOL) operator(+)
         string<delimiter(')content(Do you want to replace it?)delimiter(')>operator(,)
-        ident(mtWarning)operator(,) operator([)ident(mbNo)operator(,) ident(mbYes)operator(,) ident(mbNoToAll)operator(,) ident(mbYesToAll)operator(,) ident(mbAbort)operator(],) integer(0)operator(\);)
+        ident(mtWarning)operator(,) operator([)ident(mbNo)operator(,) ident(mbYes)operator(,) ident(mbNoToAll)operator(,) ident(mbYesToAll)operator(,) ident(mbAbort)operator(])operator(,) integer(0)operator(\))operator(;)
       reserved(if) ident(Result) reserved(in) operator([)ident(mrNoToAll)operator(,) ident(mrYesToAll)operator(]) reserved(then) reserved(begin)
         reserved(if) ident(Result) operator(=) ident(mrYesToAll) reserved(then)
           ident(Result) operator(:=) ident(mrYes)
@@ -6680,28 +6680,28 @@ reserved(begin)
       string<delimiter(')content(Do you really want to move %s)delimiter(')> operator(+) ident(EOL) operator(+)
       string<delimiter(')content(from: %s)delimiter(')> operator(+) ident(EOL) operator(+)
       string<delimiter(')content(to: %s)delimiter(')>operator(,)
-      operator([)ident(StrNumerus)operator(()ident(ValueList)operator(.)ident(SelCount)operator(,) string<delimiter(')content(value)delimiter(')>operator(,) string<delimiter(')content(values)delimiter(')>operator(\),)
-       ident(PathOfNode)operator(()ident(SrcNode)operator(\),) ident(PathOfNode)operator(()ident(TrgNode)operator(\)])
-     operator(\),) ident(mtConfirmation)operator(,) operator([)ident(mbYes)operator(,) ident(mbAbort)operator(],) integer(0)operator(\)) reserved(then)
+      operator([)ident(StrNumerus)operator(()ident(ValueList)operator(.)ident(SelCount)operator(,) string<delimiter(')content(value)delimiter(')>operator(,) string<delimiter(')content(values)delimiter(')>operator(\))operator(,)
+       ident(PathOfNode)operator(()ident(SrcNode)operator(\))operator(,) ident(PathOfNode)operator(()ident(TrgNode)operator(\))operator(])
+     operator(\))operator(,) ident(mtConfirmation)operator(,) operator([)ident(mbYes)operator(,) ident(mbAbort)operator(])operator(,) integer(0)operator(\)) reserved(then)
       ident(Exit)operator(;)
 
   ident(SrcReg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(;)
   reserved(try)
     reserved(if) reserved(not) operator(()ident(OpenNode)operator(()ident(SrcReg)operator(,) ident(SrcNode)operator(\)) reserved(in) ident(onOK)operator(\)) reserved(then)
-      ident(MessageDlg)operator(()string<delimiter(')content(Couldn)char('')content(t open source key: )delimiter(')> operator(+) ident(PathOfNode)operator(()ident(SrcNode)operator(\),)
-        ident(mtError)operator(,) operator([)ident(mbOK)operator(],) integer(0)operator(\);)
+      ident(MessageDlg)operator(()string<delimiter(')content(Couldn)char('')content(t open source key: )delimiter(')> operator(+) ident(PathOfNode)operator(()ident(SrcNode)operator(\))operator(,)
+        ident(mtError)operator(,) operator([)ident(mbOK)operator(])operator(,) integer(0)operator(\))operator(;)
 
     ident(TrgReg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(;)
     reserved(try)
       reserved(if) reserved(not) operator(()ident(OpenNode)operator(()ident(TrgReg)operator(,) ident(TrgNode)operator(\)) reserved(in) ident(onOK)operator(\)) reserved(then)
-        ident(MessageDlg)operator(()string<delimiter(')content(Couldn)char('')content(t open target key: )delimiter(')> operator(+) ident(PathOfNode)operator(()ident(TrgNode)operator(\),)
-          ident(mtError)operator(,) operator([)ident(mbOK)operator(],) integer(0)operator(\);)
+        ident(MessageDlg)operator(()string<delimiter(')content(Couldn)char('')content(t open target key: )delimiter(')> operator(+) ident(PathOfNode)operator(()ident(TrgNode)operator(\))operator(,)
+          ident(mtError)operator(,) operator([)ident(mbOK)operator(])operator(,) integer(0)operator(\))operator(;)
 
       reserved(with) ident(ValueList)operator(.)ident(Items) reserved(do) reserved(begin)
         reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Count)operator(-)integer(1) reserved(do) reserved(begin)
-          reserved(if) reserved(not) ident(Item)operator([)ident(i)operator(].)ident(Selected) reserved(then)
+          reserved(if) reserved(not) ident(Item)operator([)ident(i)operator(])operator(.)ident(Selected) reserved(then)
             ident(Continue)operator(;)
-          ident(ValueName) operator(:=) ident(RealValueName)operator(()ident(Item)operator([)ident(i)operator(]\);)
+          ident(ValueName) operator(:=) ident(RealValueName)operator(()ident(Item)operator([)ident(i)operator(])operator(\))operator(;)
 
           reserved(if) ident(TrgReg)operator(.)ident(ValueExists)operator(()ident(ValueName)operator(\)) reserved(then) reserved(begin)
             reserved(case) ident(AskForReplacing)operator(()ident(ValueName)operator(\)) reserved(of)
@@ -6711,9 +6711,9 @@ reserved(begin)
             reserved(end)operator(;)
           reserved(end)operator(;)
 
-          ident(TrgReg)operator(.)ident(WriteContext)operator(()ident(ValueName)operator(,) ident(SrcReg)operator(.)ident(ReadContext)operator(()ident(ValueName)operator(\)\);)
+          ident(TrgReg)operator(.)ident(WriteContext)operator(()ident(ValueName)operator(,) ident(SrcReg)operator(.)ident(ReadContext)operator(()ident(ValueName)operator(\))operator(\))operator(;)
           reserved(if) reserved(not) ident(CopyWanted) reserved(then)
-            ident(SrcReg)operator(.)ident(DeleteValue)operator(()ident(ValueName)operator(\);)
+            ident(SrcReg)operator(.)ident(DeleteValue)operator(()ident(ValueName)operator(\))operator(;)
         reserved(end)operator(;)
       reserved(end)operator(;)
 
@@ -6729,50 +6729,50 @@ reserved(begin)
     ident(ValuesWin)operator(.)ident(Reload)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(NewSubKeyMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(NewSubKeyMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(CreateKey)operator(()ident(True)operator(\);)
+  ident(CreateKey)operator(()ident(True)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(NewKeyMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(NewKeyMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(CreateKey)operator(()ident(False)operator(\);)
+  ident(CreateKey)operator(()ident(False)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(CreateShortcutMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(CreateShortcutMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(NewShortcut)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(TraceMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(TraceMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  reserved(if) ident(NodeInfo)operator(()ident(RegTV)operator(.)ident(Selected)operator(\).)ident(IsShortcut) reserved(then)
-    ident(MainWin)operator(.)ident(GotoKey)operator(()ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(RegTV)operator(.)ident(Selected)operator(\)\)\);)
+  reserved(if) ident(NodeInfo)operator(()ident(RegTV)operator(.)ident(Selected)operator(\))operator(.)ident(IsShortcut) reserved(then)
+    ident(MainWin)operator(.)ident(GotoKey)operator(()ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(RegTV)operator(.)ident(Selected)operator(\))operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(DeleteMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(DeleteMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) reserved(not) ident(RegTV)operator(.)ident(IsEditing) reserved(then)
     ident(DeleteKey)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(DublicateMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(DublicateMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(CloneKey)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(FindMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(FindMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(FindWin)operator(.)ident(SfCurKeyRB)operator(.)ident(Checked) operator(:=) ident(True)operator(;)
   ident(FindWin)operator(.)ident(Show)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVPUPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVPUPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(RegTVChange)operator(()ident(Sender)operator(,) ident(RegTV)operator(.)ident(Selected)operator(\);)
+  ident(RegTVChange)operator(()ident(Sender)operator(,) ident(RegTV)operator(.)ident(Selected)operator(\))operator(;)
   reserved(with) ident(NodeInfo)operator(()ident(RegTV)operator(.)ident(Selected)operator(\)) reserved(do) reserved(begin)
     ident(NewSubKeyMI)operator(.)ident(Enabled) operator(:=) reserved(not) ident(CantWrite)operator(;)
-    ident(NewKeyMI)operator(.)ident(Enabled) operator(:=) reserved(not) ident(CantWrite) reserved(and) operator(()reserved(not) ident(IsHost) reserved(or) ident(IsShortcut)operator(\);)
+    ident(NewKeyMI)operator(.)ident(Enabled) operator(:=) reserved(not) ident(CantWrite) reserved(and) operator(()reserved(not) ident(IsHost) reserved(or) ident(IsShortcut)operator(\))operator(;)
     ident(DublicateMI)operator(.)ident(Enabled) operator(:=) reserved(not) ident(CantWrite) reserved(and) reserved(not) ident(IsHost)operator(;)
 
     reserved(with) ident(DeleteMI) reserved(do)
@@ -6784,14 +6784,14 @@ reserved(begin)
         ident(Enabled) operator(:=) reserved(not) ident(CantWrite) reserved(and) reserved(not) ident(IsHost)operator(;)
       reserved(end)operator(;)
 
-    ident(RenameMI)operator(.)ident(Enabled) operator(:=) reserved(not) ident(CantWrite) reserved(and) operator(()ident(HostType) reserved(in) operator([)ident(uhNone)operator(,) ident(uhUserShortcut)operator(]\);)
+    ident(RenameMI)operator(.)ident(Enabled) operator(:=) reserved(not) ident(CantWrite) reserved(and) operator(()ident(HostType) reserved(in) operator([)ident(uhNone)operator(,) ident(uhUserShortcut)operator(])operator(\))operator(;)
     ident(TraceMI)operator(.)ident(Visible) operator(:=) ident(IsShortcut)operator(;)
     ident(EditShortcutMI)operator(.)ident(Visible) operator(:=) ident(HostType) operator(=) ident(uhUserShortcut)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(CheckNode)operator(()ident(Node)operator(:) ident(TTreeNode)operator(;) ident(OnlyOnce)operator(:) ident(Boolean) operator(=) ident(True)operator(;)
-  ident(TakeNodeSelected)operator(:) ident(Boolean) operator(=) ident(False)operator(\);)
+  ident(TakeNodeSelected)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(;)
 reserved(var)
   ident(CurIcon)operator(,) ident(NewIcon)operator(:) ident(Integer)operator(;)
   ident(Reg)operator(:) ident(TXRegistry)operator(;)
@@ -6802,52 +6802,52 @@ preprocessor({$IFDEF UNIKEY})
 preprocessor({$ENDIF})
   ident(KeyHasChildren)operator(:) ident(Boolean)operator(;)
 
-  reserved(procedure) ident(SetShortcutIcon)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\);)
+  reserved(procedure) ident(SetShortcutIcon)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
   reserved(var)
     ident(Full)operator(:) reserved(string)operator(;)
     ident(i)operator(:) ident(Integer)operator(;)
   reserved(begin)
-    ident(Full) operator(:=) ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(Node)operator(\)\);)
+    ident(Full) operator(:=) ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(Node)operator(\))operator(\))operator(;)
     reserved(for) ident(i) operator(:=) ident(Low)operator(()ident(Shortcuts)operator(\)) reserved(to) ident(High)operator(()ident(Shortcuts)operator(\)) reserved(do)
-      reserved(if) ident(Full) operator(=) ident(Shortcuts)operator([)ident(i)operator(].)ident(RealPath) reserved(then) reserved(begin)
-        ident(CurIcon) operator(:=) ident(Shortcuts)operator([)ident(i)operator(].)ident(Node)operator(.)ident(ImageIndex)operator(;)
+      reserved(if) ident(Full) operator(=) ident(Shortcuts)operator([)ident(i)operator(])operator(.)ident(RealPath) reserved(then) reserved(begin)
+        ident(CurIcon) operator(:=) ident(Shortcuts)operator([)ident(i)operator(])operator(.)ident(Node)operator(.)ident(ImageIndex)operator(;)
       ident(Exit)operator(;) reserved(end)operator(;)
     reserved(if) ident(Node)operator(.)ident(ImageIndex) reserved(in) operator([)ident(iconShortcut)operator(,) ident(iconShortcut) operator(+) integer(1)operator(]) reserved(then)
-      ident(CurIcon) operator(:=) ident(iconKey) operator(+) operator(()ident(CurIcon) operator(-) ident(iconShortcut)operator(\);)
+      ident(CurIcon) operator(:=) ident(iconKey) operator(+) operator(()ident(CurIcon) operator(-) ident(iconShortcut)operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
   reserved(if) reserved(not) ident(Assigned)operator(()ident(Node)operator(\)) reserved(then)
     ident(Exit)operator(;)
 
-  ident(Info) operator(:=) ident(NodeInfo)operator(()ident(Node)operator(\);)
+  ident(Info) operator(:=) ident(NodeInfo)operator(()ident(Node)operator(\))operator(;)
   reserved(if) ident(OnlyOnce) reserved(and) ident(Info)operator(.)ident(Checked) reserved(then)
     ident(Exit)operator(;)
 
   ident(CurIcon) operator(:=) ident(Node)operator(.)ident(ImageIndex)operator(;)
   reserved(if) operator(()ident(CurIcon) operator(>) ident(iconFirstType)operator(\)) reserved(then) reserved(begin)
 preprocessor({$IFDEF UNIKEY})
-    reserved(if) ident(RootOfNode)operator(()ident(Node)operator(\).)ident(ImageIndex) operator(<>) ident(iconHostUni) reserved(then) reserved(begin)
-      ident(SetShortcutIcon)operator(()ident(Node)operator(\);)
+    reserved(if) ident(RootOfNode)operator(()ident(Node)operator(\))operator(.)ident(ImageIndex) operator(<>) ident(iconHostUni) reserved(then) reserved(begin)
+      ident(SetShortcutIcon)operator(()ident(Node)operator(\))operator(;)
       ident(CurIcon) operator(:=) operator(()ident(CurIcon) reserved(div) integer(2)operator(\)) operator(*) integer(2)operator(;)
     reserved(end)operator(;)
 preprocessor({$ELSE})
     ident(Exit)operator(;)
 preprocessor({$ENDIF})
   reserved(end) reserved(else) reserved(begin)
-    ident(SetShortcutIcon)operator(()ident(Node)operator(\);)
+    ident(SetShortcutIcon)operator(()ident(Node)operator(\))operator(;)
     ident(CurIcon) operator(:=) operator(()ident(CurIcon) reserved(div) integer(2)operator(\)) operator(*) integer(2)operator(;)
   reserved(end)operator(;)
   ident(NewIcon) operator(:=) ident(CurIcon)operator(;)
 
-  ident(Info)operator(.)ident(ExcludeFlag)operator(()ident(nfDefect)operator(\);)
-  ident(Info)operator(.)ident(ExcludeFlag)operator(()ident(nfReadOnly)operator(\);)
+  ident(Info)operator(.)ident(ExcludeFlag)operator(()ident(nfDefect)operator(\))operator(;)
+  ident(Info)operator(.)ident(ExcludeFlag)operator(()ident(nfReadOnly)operator(\))operator(;)
 
 preprocessor({$IFDEF UNIKEY})
   ident(KeyHasChildren) operator(:=) ident(False)operator(;)
 
-  reserved(if) ident(RootOfNode)operator(()ident(Node)operator(\).)ident(ImageIndex) operator(=) ident(iconHostUni) reserved(then) reserved(begin)
-    ident(Uni) operator(:=) ident(UniOfNode)operator(()ident(Node)operator(\);)
+  reserved(if) ident(RootOfNode)operator(()ident(Node)operator(\))operator(.)ident(ImageIndex) operator(=) ident(iconHostUni) reserved(then) reserved(begin)
+    ident(Uni) operator(:=) ident(UniOfNode)operator(()ident(Node)operator(\))operator(;)
     reserved(if) ident(Assigned)operator(()ident(Uni)operator(\)) reserved(then)
       reserved(try)
         ident(KeyHasChildren) operator(:=) ident(Uni)operator(.)ident(HasKeys)operator(;)
@@ -6864,7 +6864,7 @@ preprocessor({$IFDEF UNIKEY})
 preprocessor({$ENDIF})
   ident(Reg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(;)
   reserved(try)
-    ident(OpenMode) operator(:=) ident(OpenNode)operator(()ident(Reg)operator(,) ident(Node)operator(\);)
+    ident(OpenMode) operator(:=) ident(OpenNode)operator(()ident(Reg)operator(,) ident(Node)operator(\))operator(;)
     ident(KeyHasChildren) operator(:=) ident(Reg)operator(.)ident(HasSubKeys)operator(;)
   reserved(finally)
     ident(Reg)operator(.)ident(Free)operator(;)
@@ -6874,7 +6874,7 @@ preprocessor({$IFDEF UNIKEY})
 preprocessor({$ENDIF})
 
   reserved(if) ident(OpenMode) operator(=) ident(onReadOnly) reserved(then)
-    ident(Info)operator(.)ident(IncludeFlag)operator(()ident(nfReadOnly)operator(\);)
+    ident(Info)operator(.)ident(IncludeFlag)operator(()ident(nfReadOnly)operator(\))operator(;)
 
   reserved(if) ident(OpenMode) reserved(in) ident(onOK) reserved(then) reserved(begin)
     comment(//OK, could open)
@@ -6883,7 +6883,7 @@ preprocessor({$ENDIF})
         reserved(if) reserved(not) ident(Node)operator(.)ident(HasChildren) reserved(then) reserved(begin)
           comment(//Update: Ensure HasChildren)
           reserved(if) ident(TakeNodeSelected) reserved(or) ident(Node)operator(.)ident(Selected) reserved(then)
-            ident(TreeWin)operator(.)ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()ident(Node)operator(,) string<delimiter(')delimiter(')>operator(\);)
+            ident(TreeWin)operator(.)ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()ident(Node)operator(,) string<delimiter(')delimiter(')>operator(\))operator(;)
         reserved(end)operator(;)
         comment(//Ensure Plus-Icon)
         ident(NewIcon) operator(:=) ident(CurIcon) operator(+) integer(1)operator(;)
@@ -6900,7 +6900,7 @@ preprocessor({$ENDIF})
         ident(NewIcon) operator(:=) ident(CurIcon) operator(+) integer(1)operator(;)
       reserved(end) reserved(else) reserved(begin)
         comment(//not OK --> update)
-        ident(Node)operator(.)ident(Collapse)operator(()ident(True)operator(\);)
+        ident(Node)operator(.)ident(Collapse)operator(()ident(True)operator(\))operator(;)
         ident(Node)operator(.)ident(DeleteChildren)operator(;)
       reserved(end)operator(;)
     reserved(end)operator(;)
@@ -6909,22 +6909,22 @@ preprocessor({$ENDIF})
   reserved(end) reserved(else) reserved(begin) comment(//defect)
     reserved(if) ident(Node)operator(.)ident(HasChildren) reserved(then)
       ident(Node)operator(.)ident(DeleteChildren)operator(;)
-    ident(Info)operator(.)ident(IncludeFlag)operator(()ident(nfDefect)operator(\);)
+    ident(Info)operator(.)ident(IncludeFlag)operator(()ident(nfDefect)operator(\))operator(;)
   reserved(end)operator(;)
 
   reserved(if) ident(Node)operator(.)ident(ImageIndex) operator(<>) ident(iconHostUni) reserved(then) comment(//don't change icon of UniHosts)
     ident(Node)operator(.)ident(ImageIndex) operator(:=) ident(NewIcon)operator(;)
 
-  ident(Info)operator(.)ident(IncludeFlag)operator(()ident(nfChecked)operator(\);)
+  ident(Info)operator(.)ident(IncludeFlag)operator(()ident(nfChecked)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TTreeWin)operator(.)ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(begin)
-  ident(MainWin)operator(.)ident(FormKeyDown)operator(()ident(Sender)operator(,) ident(Key)operator(,) ident(Shift)operator(\);)
+  ident(MainWin)operator(.)ident(FormKeyDown)operator(()ident(Sender)operator(,) ident(Key)operator(,) ident(Shift)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ShortcutIndex)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(ShortcutIndex)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(:) ident(Integer)operator(;)
 comment(//If Node is a Shortcut,)
 comment(//S. returns its index in the Shortcuts array)
 comment(//else -1)
@@ -6934,7 +6934,7 @@ reserved(begin)
   ident(Exit)operator(;) reserved(end)operator(;)
 
   reserved(for) ident(Result) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(Shortcuts)operator(\)) reserved(do)
-    reserved(if) ident(Shortcuts)operator([)ident(Result)operator(].)ident(Node) operator(=) ident(Node) reserved(then) reserved(begin)
+    reserved(if) ident(Shortcuts)operator([)ident(Result)operator(])operator(.)ident(Node) operator(=) ident(Node) reserved(then) reserved(begin)
       ident(Exit)operator(;)
     reserved(end)operator(;)
 
@@ -6942,28 +6942,28 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(function) ident(TraceKey)operator(()reserved(const) ident(Path)operator(:) reserved(string)operator(;) ident(AllowedShortcutTypes)operator(:) ident(TUniHostTypes) operator(=)
-  ident(uhNonSystemShortcuts)operator(\):) reserved(string)operator(;)
+  ident(uhNonSystemShortcuts)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
   ident(isAim)operator(:) ident(Boolean)operator(;)
 
-  reserved(function) ident(NodeOkForTracing)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\):) ident(Boolean)operator(;)
+  reserved(function) ident(NodeOkForTracing)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(:) ident(Boolean)operator(;)
   reserved(begin)
     ident(Result) operator(:=) ident(Assigned)operator(()ident(Node)operator(\)) reserved(and)
-      operator(()ident(NodeInfo)operator(()ident(Node)operator(\).)ident(HostType) reserved(in) ident(AllowedShortcutTypes)operator(\);)
+      operator(()ident(NodeInfo)operator(()ident(Node)operator(\))operator(.)ident(HostType) reserved(in) ident(AllowedShortcutTypes)operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
-  ident(Result) operator(:=) ident(MakeLongHKEY)operator(()ident(Path)operator(\);)
+  ident(Result) operator(:=) ident(MakeLongHKEY)operator(()ident(Path)operator(\))operator(;)
   reserved(repeat)
     ident(isAim) operator(:=) ident(True)operator(;)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(ShortCuts)operator(\)) reserved(do) reserved(begin)
       reserved(with) ident(Shortcuts)operator([)ident(i)operator(]) reserved(do)
         reserved(if) ident(NodeOkForTracing)operator(()ident(Node)operator(\)) reserved(and)
-         ident(SameText)operator(()ident(UntilChar)operator(()ident(Result)operator(,) char<delimiter(')content(\\)delimiter(')>operator(\),) ident(Alias)operator(\)) reserved(then) reserved(begin)
+         ident(SameText)operator(()ident(UntilChar)operator(()ident(Result)operator(,) char<delimiter(')content(\\)delimiter(')>operator(\))operator(,) ident(Alias)operator(\)) reserved(then) reserved(begin)
           reserved(if) ident(Alias) operator(=) ident(RealPath) reserved(then)
             ident(Break)operator(;)
-          ident(Delete)operator(()ident(Result)operator(,) integer(1)operator(,) ident(Length)operator(()ident(Alias)operator(\)\);)
+          ident(Delete)operator(()ident(Result)operator(,) integer(1)operator(,) ident(Length)operator(()ident(Alias)operator(\))operator(\))operator(;)
           ident(Result) operator(:=) ident(RealPath) operator(+) ident(Result)operator(;)
           ident(isAim) operator(:=) ident(False)operator(;)
         ident(Break)operator(;) reserved(end)operator(;)
@@ -6971,7 +6971,7 @@ reserved(begin)
   reserved(until) ident(isAim)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVKeyPress)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Char)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVKeyPress)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Char)operator(\))operator(;)
 reserved(begin)
   reserved(if) operator(()ident(Key) operator(=) char<delimiter(')content(*)delimiter(')>operator(\)) reserved(and) ident(NoAsterisk) reserved(then) reserved(begin)
     ident(Key) operator(:=) char(#0)operator(;)
@@ -6981,7 +6981,7 @@ reserved(end)operator(;)
 
 reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVAdvancedCustomDrawItem)operator(()ident(Sender)operator(:) ident(TCustomTreeView)operator(;)
   ident(Node)operator(:) ident(TTreeNode)operator(;) ident(State)operator(:) ident(TCustomDrawState)operator(;) ident(Stage)operator(:) ident(TCustomDrawStage)operator(;)
-  reserved(var) ident(PaintImages)operator(,) ident(DefaultDraw)operator(:) ident(Boolean)operator(\);)
+  reserved(var) ident(PaintImages)operator(,) ident(DefaultDraw)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(var)
   ident(Rect)operator(:) ident(TRect)operator(;)
   ident(MainValueName)operator(:) reserved(string)operator(;)
@@ -6989,7 +6989,7 @@ reserved(var)
   ident(Info)operator(:) ident(TRegKeyInfo)operator(;)
   ident(PreviewPosX)operator(:) ident(Integer)operator(;)
 
-  reserved(procedure) ident(DefaultIconPreview)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(\);)
+  reserved(procedure) ident(DefaultIconPreview)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(\))operator(;)
   reserved(var)
     ident(Icon)operator(:) ident(HICON)operator(;)
     ident(IconFile)operator(:) reserved(string)operator(;)
@@ -7001,26 +7001,26 @@ reserved(var)
     reserved(if) ident(IconFile) operator(=) string<delimiter(')delimiter(')> reserved(then)
       ident(Exit)operator(;)
 
-    ident(Icon) operator(:=) ident(GetIconFromFile)operator(()ident(ExpandString)operator(()ident(IconFile)operator(\)\);)
+    ident(Icon) operator(:=) ident(GetIconFromFile)operator(()ident(ExpandString)operator(()ident(IconFile)operator(\))operator(\))operator(;)
     reserved(if) ident(Icon) operator(=) integer(0) reserved(then)
       ident(Exit)operator(;)
 
     reserved(with) ident(Rect) reserved(do) reserved(begin)
-      ident(Dec)operator(()ident(Left)operator(,) ident(TTreeView)operator(()ident(Sender)operator(\).)ident(Indent) operator(+) integer(16)operator(\);)
+      ident(Dec)operator(()ident(Left)operator(,) ident(TTreeView)operator(()ident(Sender)operator(\))operator(.)ident(Indent) operator(+) integer(16)operator(\))operator(;)
       ident(DrawIconEx)operator(()ident(Sender)operator(.)ident(Canvas)operator(.)ident(Handle)operator(,) ident(Left)operator(,) ident(Top)operator(,)
                  ident(Icon)operator(,) integer(16)operator(,) integer(16)operator(,)
-                 integer(0)operator(,) integer(0)operator(,) ident(DI_NORMAL)operator(\);)
-      ident(DestroyIcon)operator(()ident(Icon)operator(\);)
+                 integer(0)operator(,) integer(0)operator(,) ident(DI_NORMAL)operator(\))operator(;)
+      ident(DestroyIcon)operator(()ident(Icon)operator(\))operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 
-  reserved(procedure) ident(AddPreview)operator(()reserved(const) ident(PreviewText)operator(:) reserved(string)operator(;) ident(Color)operator(:) ident(TColor)operator(\);)
+  reserved(procedure) ident(AddPreview)operator(()reserved(const) ident(PreviewText)operator(:) reserved(string)operator(;) ident(Color)operator(:) ident(TColor)operator(\))operator(;)
   reserved(begin)
     reserved(with) ident(Sender)operator(.)ident(Canvas) reserved(do) reserved(begin)
-      ident(SetTextColor)operator(()ident(Handle)operator(,) ident(Color)operator(\);)
+      ident(SetTextColor)operator(()ident(Handle)operator(,) ident(Color)operator(\))operator(;)
       ident(ExtTextOut)operator(()ident(Handle)operator(,) ident(PreviewPosX)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(1)operator(,) ident(TextFlags)operator(,) reserved(nil)operator(,)
-        ident(PChar)operator(()ident(PreviewText)operator(\),) ident(Length)operator(()ident(PreviewText)operator(\),) reserved(nil)operator(\);)
-      ident(Inc)operator(()ident(PreviewPosX)operator(,) ident(TextWidth)operator(()ident(PreviewText)operator(\)\);)
+        ident(PChar)operator(()ident(PreviewText)operator(\))operator(,) ident(Length)operator(()ident(PreviewText)operator(\))operator(,) reserved(nil)operator(\))operator(;)
+      ident(Inc)operator(()ident(PreviewPosX)operator(,) ident(TextWidth)operator(()ident(PreviewText)operator(\))operator(\))operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 
@@ -7030,27 +7030,27 @@ reserved(begin)
 
   ident(MainValueName) operator(:=) ident(PrefWin)operator(.)ident(MainPreviewE)operator(.)ident(Text)operator(;)
 
-  ident(Rect) operator(:=) ident(Node)operator(.)ident(DisplayRect)operator(()ident(True)operator(\);)
+  ident(Rect) operator(:=) ident(Node)operator(.)ident(DisplayRect)operator(()ident(True)operator(\))operator(;)
   ident(PreviewPosX) operator(:=) ident(Rect)operator(.)ident(Right) operator(+) integer(5)operator(;)
 
-  ident(Reg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(()ident(KEY_READ)operator(\);)
+  ident(Reg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(()ident(KEY_READ)operator(\))operator(;)
   reserved(try)
     reserved(if) ident(OpenNodeOK)operator(()ident(Reg)operator(,) ident(Node)operator(\)) reserved(then) reserved(begin)
 comment(//      Sender.Canvas.Font.Style := [];)
       reserved(if) ident(PrefWin)operator(.)ident(KeyInfoPreviewCB)operator(.)ident(Checked) reserved(and) ident(Reg)operator(.)ident(GetKeyInfo)operator(()ident(Info)operator(\)) reserved(then)
         reserved(with) ident(Info) reserved(do) reserved(begin)
           reserved(if) ident(NumSubKeys) operator(>) integer(0) reserved(then)
-            ident(AddPreview)operator(()ident(IntToStr)operator(()ident(NumSubKeys)operator(\)) operator(+) string<delimiter(')content(k  )delimiter(')>operator(,) ident(clCyan)operator(\);)
+            ident(AddPreview)operator(()ident(IntToStr)operator(()ident(NumSubKeys)operator(\)) operator(+) string<delimiter(')content(k  )delimiter(')>operator(,) ident(clCyan)operator(\))operator(;)
           reserved(if) ident(NumValues) operator(>) integer(0) reserved(then)
-            ident(AddPreview)operator(()ident(IntToStr)operator(()ident(NumValues)operator(\)) operator(+) string<delimiter(')content(v  )delimiter(')>operator(,) ident(clBrightPurple)operator(\);)
+            ident(AddPreview)operator(()ident(IntToStr)operator(()ident(NumValues)operator(\)) operator(+) string<delimiter(')content(v  )delimiter(')>operator(,) ident(clBrightPurple)operator(\))operator(;)
         reserved(end)operator(;)
 
       reserved(if) ident(PrefWin)operator(.)ident(MainPreviewCB)operator(.)ident(Checked) reserved(then)
         reserved(if) ident(Reg)operator(.)ident(ValueReallyExists)operator(()ident(MainValueName)operator(\)) reserved(then)
-          ident(AddPreview)operator(()ident(DataPreviewOfContext)operator(()ident(Reg)operator(.)ident(ReadContext)operator(()ident(MainValueName)operator(\)\),) hex($00AAFFFF)operator(\);)
+          ident(AddPreview)operator(()ident(DataPreviewOfContext)operator(()ident(Reg)operator(.)ident(ReadContext)operator(()ident(MainValueName)operator(\))operator(\))operator(,) hex($00AAFFFF)operator(\))operator(;)
                                                          comment({clBrightYellow})
       reserved(if) ident(PrefWin)operator(.)ident(DefaultIconPreviewCB)operator(.)ident(Checked) reserved(then)
-        ident(DefaultIconPreview)operator(()ident(Reg)operator(\);)
+        ident(DefaultIconPreview)operator(()ident(Reg)operator(\))operator(;)
     reserved(end)operator(;)
   reserved(finally)
     ident(Reg)operator(.)ident(Free)operator(;)
@@ -7067,31 +7067,31 @@ comment(//      Sender.Canvas.Font.Style := [];)
   end;})
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(RenameMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(RenameMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(RegTV)operator(.)ident(Selected)operator(.)ident(EditText)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(CopyPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(CopyPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(UserCopyKeyFlag) operator(:=) ident(True)operator(;)
-  ident(MainWin)operator(.)ident(CopyPathClick)operator(()ident(Sender)operator(\);)
+  ident(MainWin)operator(.)ident(CopyPathClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(InsertPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(InsertPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(MainWin)operator(.)ident(InsertPathClick)operator(()ident(Sender)operator(\);)
+  ident(MainWin)operator(.)ident(InsertPathClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVGetImageIndex)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(RegTVGetImageIndex)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
 reserved(begin)
-  reserved(if) reserved(not) ident(NodeInfo)operator(()ident(Node)operator(\).)ident(Checked) reserved(then)
-    ident(CheckNode)operator(()ident(Node)operator(\);)
+  reserved(if) reserved(not) ident(NodeInfo)operator(()ident(Node)operator(\))operator(.)ident(Checked) reserved(then)
+    ident(CheckNode)operator(()ident(Node)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TTreeWin)operator(.)ident(CheckRegTVHotTrack)operator(;)
 reserved(const)
-  ident(FindCursorOfSwitch)operator(:) reserved(array)operator([)ident(Boolean)operator(]) reserved(of) ident(TCursor) operator(=) operator(()ident(crArrow)operator(,) ident(crHandPoint)operator(\);)
+  ident(FindCursorOfSwitch)operator(:) reserved(array)operator([)ident(Boolean)operator(]) reserved(of) ident(TCursor) operator(=) operator(()ident(crArrow)operator(,) ident(crHandPoint)operator(\))operator(;)
 reserved(var)
   ident(NewHotTrack)operator(:) ident(Boolean)operator(;)
 reserved(begin)
@@ -7100,28 +7100,28 @@ reserved(begin)
 
   reserved(with) ident(RegTV) reserved(do) reserved(begin)
     ident(HotTrack) operator(:=) ident(NewHotTrack)operator(;)
-    ident(Cursor) operator(:=) ident(FindCursorOfSwitch)operator([)ident(HotTrack)operator(];)
+    ident(Cursor) operator(:=) ident(FindCursorOfSwitch)operator([)ident(HotTrack)operator(])operator(;)
     ident(Mouse)operator(.)ident(CursorPos) operator(:=) ident(Mouse)operator(.)ident(CursorPos)operator(;) comment(//update cursor)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(PasteKeyMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(PasteKeyMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(Src)operator(,) ident(Trg)operator(:) ident(TRegPath)operator(;)
   ident(Node)operator(:) ident(TTreeNode)operator(;)
 reserved(begin)
-  ident(Src) operator(:=) ident(RegPathOfStr)operator(()ident(Clipboard)operator(.)ident(AsText)operator(\);)
-  ident(Trg) operator(:=) ident(CurKey)operator(()ident(uhNonSystemShortcuts)operator(\);)
-  ident(Trg)operator(.)ident(Key) operator(:=) ident(Trg)operator(.)ident(Key) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(FromLastChar)operator(()ident(Src)operator(.)ident(Key)operator(,) char<delimiter(')content(\\)delimiter(')>operator(,) ident(True)operator(\);)
+  ident(Src) operator(:=) ident(RegPathOfStr)operator(()ident(Clipboard)operator(.)ident(AsText)operator(\))operator(;)
+  ident(Trg) operator(:=) ident(CurKey)operator(()ident(uhNonSystemShortcuts)operator(\))operator(;)
+  ident(Trg)operator(.)ident(Key) operator(:=) ident(Trg)operator(.)ident(Key) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(FromLastChar)operator(()ident(Src)operator(.)ident(Key)operator(,) char<delimiter(')content(\\)delimiter(')>operator(,) ident(True)operator(\))operator(;)
 
-  ident(MoveKey)operator(()ident(Src)operator(,) ident(Trg)operator(,) ident(UserCopyKeyFlag)operator(\);)
+  ident(MoveKey)operator(()ident(Src)operator(,) ident(Trg)operator(,) ident(UserCopyKeyFlag)operator(\))operator(;)
 
   ident(Node) operator(:=) ident(RegTV)operator(.)ident(Selected)operator(;)
   reserved(if) ident(Node)operator(.)ident(Expanded) reserved(then)
-    ident(Node)operator(.)ident(Collapse)operator(()ident(False)operator(\);)
+    ident(Node)operator(.)ident(Collapse)operator(()ident(False)operator(\))operator(;)
   ident(Node)operator(.)ident(Expanded) operator(:=) ident(False)operator(;)
-  ident(CheckNode)operator(()ident(Node)operator(,) ident(False)operator(\);)
-  ident(Node)operator(.)ident(Expand)operator(()ident(False)operator(\);)
+  ident(CheckNode)operator(()ident(Node)operator(,) ident(False)operator(\))operator(;)
+  ident(Node)operator(.)ident(Expand)operator(()ident(False)operator(\))operator(;)
 
   reserved(if) reserved(not) ident(UserCopyKeyFlag) reserved(then)
     ident(RegTV)operator(.)ident(Repaint)operator(;) comment(// CheckNode(Node, False\);)
@@ -7129,17 +7129,17 @@ reserved(begin)
   ident(UserCopyKeyFlag) operator(:=) ident(True)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(CutPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(CutPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(UserCopyKeyFlag) operator(:=) ident(False)operator(;)
-  ident(MainWin)operator(.)ident(CopyPathClick)operator(()ident(Sender)operator(\);)
+  ident(MainWin)operator(.)ident(CopyPathClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(OpenNextLevel)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(OpenNextLevel)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
 
-  reserved(procedure) ident(ExpandKeys)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\);)
+  reserved(procedure) ident(ExpandKeys)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
   reserved(begin)
-    ident(CheckNode)operator(()ident(Node)operator(,) ident(False)operator(,) ident(True)operator(\);)
+    ident(CheckNode)operator(()ident(Node)operator(,) ident(False)operator(,) ident(True)operator(\))operator(;)
     reserved(if) reserved(not) ident(Node)operator(.)ident(HasChildren) reserved(then)
       ident(Exit)operator(;)
     reserved(if) reserved(not) ident(Node)operator(.)ident(Expanded) reserved(then)
@@ -7147,18 +7147,18 @@ reserved(procedure) ident(TTreeWin)operator(.)ident(OpenNextLevel)operator(()ide
     reserved(else) reserved(begin)
       ident(Node) operator(:=) ident(Node)operator(.)ident(GetFirstChild)operator(;)
       reserved(while) ident(Assigned)operator(()ident(Node)operator(\)) reserved(do) reserved(begin)
-        ident(ExpandKeys)operator(()ident(Node)operator(\);)
+        ident(ExpandKeys)operator(()ident(Node)operator(\))operator(;)
       ident(Node) operator(:=) ident(Node)operator(.)ident(GetNextSibling)operator(;) reserved(end)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
   ident(DoSmartExpand) operator(:=) ident(False)operator(;)
-  ident(ExpandKeys)operator(()ident(Node)operator(\);)
+  ident(ExpandKeys)operator(()ident(Node)operator(\))operator(;)
   ident(DoSmartExpand) operator(:=) ident(True)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(EditShortcutMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(EditShortcutMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(NewPath)operator(:) reserved(string)operator(;)
   ident(i)operator(:) ident(Integer)operator(;)
@@ -7166,16 +7166,16 @@ reserved(var)
   ident(Shortcut)operator(:) ident(PKeyShortcut)operator(;)
 reserved(begin)
   ident(Node) operator(:=) ident(RegTV)operator(.)ident(Selected)operator(;)
-  reserved(if) ident(NodeInfo)operator(()ident(Node)operator(\).)ident(HostType) operator(<>) ident(uhUserShortcut) reserved(then)
+  reserved(if) ident(NodeInfo)operator(()ident(Node)operator(\))operator(.)ident(HostType) operator(<>) ident(uhUserShortcut) reserved(then)
     ident(Exit)operator(;)
 
-  ident(i) operator(:=) ident(ShortcutIndex)operator(()ident(Node)operator(\);)
+  ident(i) operator(:=) ident(ShortcutIndex)operator(()ident(Node)operator(\))operator(;)
   reserved(if) ident(i) operator(=) operator(-)integer(1) reserved(then)
     ident(Exit)operator(;)
 
   reserved(with) ident(TIniFile)operator(.)ident(Create)operator(()ident(PlutoDir) operator(+) string<delimiter(')content(Shortcuts.ini)delimiter(')>operator(\)) reserved(do)
     reserved(try)
-      ident(NewPath) operator(:=) ident(ReadString)operator(()string<delimiter(')content(Shortcuts)delimiter(')>operator(,) ident(Shortcuts)operator([)ident(i)operator(].)ident(Alias)operator(,) string<delimiter(')delimiter(')>operator(\);)
+      ident(NewPath) operator(:=) ident(ReadString)operator(()string<delimiter(')content(Shortcuts)delimiter(')>operator(,) ident(Shortcuts)operator([)ident(i)operator(])operator(.)ident(Alias)operator(,) string<delimiter(')delimiter(')>operator(\))operator(;)
     reserved(finally)
       ident(Free)operator(;)
     reserved(end)operator(;)
@@ -7183,27 +7183,27 @@ reserved(begin)
   reserved(if) reserved(not) ident(InputQuery)operator(()string<delimiter(')content(Edit Shortcut)delimiter(')>operator(,) string<delimiter(')content(Shortcut to...)delimiter(')>operator(,) ident(NewPath)operator(\)) reserved(then)
     ident(Exit)operator(;)
 
-  ident(Node)operator(.)ident(Collapse)operator(()ident(False)operator(\);)
-  ident(Shortcut) operator(:=) operator(@)ident(Shortcuts)operator([)ident(i)operator(];)
-  ident(Shortcut)operator(.)ident(RealPath) operator(:=) ident(TraceKey)operator(()ident(NewPath)operator(\);)
+  ident(Node)operator(.)ident(Collapse)operator(()ident(False)operator(\))operator(;)
+  ident(Shortcut) operator(:=) operator(@)ident(Shortcuts)operator([)ident(i)operator(])operator(;)
+  ident(Shortcut)operator(.)ident(RealPath) operator(:=) ident(TraceKey)operator(()ident(NewPath)operator(\))operator(;)
   reserved(with) ident(TIniFile)operator(.)ident(Create)operator(()ident(PlutoDir) operator(+) string<delimiter(')content(Shortcuts.ini)delimiter(')>operator(\)) reserved(do)
     reserved(try)
-      ident(WriteString)operator(()string<delimiter(')content(Shortcuts)delimiter(')>operator(,) ident(Shortcut)operator(.)ident(Alias)operator(,) ident(Shortcut)operator(.)ident(RealPath)operator(\);)
+      ident(WriteString)operator(()string<delimiter(')content(Shortcuts)delimiter(')>operator(,) ident(Shortcut)operator(.)ident(Alias)operator(,) ident(Shortcut)operator(.)ident(RealPath)operator(\))operator(;)
     reserved(finally)
       ident(Free)operator(;)
     reserved(end)operator(;)
 
-  ident(RegTVChange)operator(()ident(Self)operator(,) ident(Node)operator(\);)
+  ident(RegTVChange)operator(()ident(Self)operator(,) ident(Node)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(SubKeylist1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(SubKeylist1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(SL)operator(:) ident(TStringList)operator(;)
 reserved(begin)
   ident(SL) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
   reserved(if) ident(OpenCurKey) reserved(then)
   reserved(try)
-    ident(MainReg)operator(.)ident(GetKeyNames)operator(()ident(SL)operator(\);)
+    ident(MainReg)operator(.)ident(GetKeyNames)operator(()ident(SL)operator(\))operator(;)
     reserved(if) ident(PrefWin)operator(.)ident(SortKeysCB)operator(.)ident(Checked) reserved(then)
       ident(SL)operator(.)ident(Sort)operator(;)
     ident(Clipboard)operator(.)ident(AsText) operator(:=) ident(SL)operator(.)ident(Text)operator(;)
@@ -7213,14 +7213,14 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(ValueNameslist1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(ValueNameslist1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(SL)operator(:) ident(TStringList)operator(;)
 reserved(begin)
   ident(SL) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
   reserved(if) ident(OpenCurKey) reserved(then)
   reserved(try)
-    ident(MainReg)operator(.)ident(GetValueNames)operator(()ident(SL)operator(\);)
+    ident(MainReg)operator(.)ident(GetValueNames)operator(()ident(SL)operator(\))operator(;)
       reserved(if) ident(PrefWin)operator(.)ident(SortKeysCB)operator(.)ident(Checked) reserved(then)
         ident(SL)operator(.)ident(Sort)operator(;)
       ident(Clipboard)operator(.)ident(AsText) operator(:=) ident(SL)operator(.)ident(Text)operator(;)
@@ -7230,9 +7230,9 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(KeyInfosMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(KeyInfosMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(MessageDlg)operator(()ident(GetKeyInfos)operator(,) ident(mtInformation)operator(,) operator([)ident(mbOK)operator(],) integer(0)operator(\);)
+  ident(MessageDlg)operator(()ident(GetKeyInfos)operator(,) ident(mtInformation)operator(,) operator([)ident(mbOK)operator(])operator(,) integer(0)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(TTreeWin)operator(.)ident(GetKeyInfos)operator(:) reserved(string)operator(;)
@@ -7247,27 +7247,27 @@ reserved(var)
   ident(Info)operator(:) ident(TNodeInfo)operator(;)
   ident(Flag)operator(:) ident(TNodeFlag)operator(;)
 
-  reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\);)
+  reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(;)
   reserved(begin)
     ident(Result) operator(:=) ident(Result) operator(+) ident(S)operator(;)
   reserved(end)operator(;)
 
-  reserved(procedure) ident(AddLn)operator(()reserved(const) ident(S)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\);)
+  reserved(procedure) ident(AddLn)operator(()reserved(const) ident(S)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(;)
   reserved(begin)
-    ident(Add)operator(()ident(S) operator(+) ident(EOL)operator(\);)
+    ident(Add)operator(()ident(S) operator(+) ident(EOL)operator(\))operator(;)
   reserved(end)operator(;)
 
-  reserved(procedure) ident(AddNodeInfo)operator(()ident(Key)operator(:) ident(HKEY)operator(\);)
+  reserved(procedure) ident(AddNodeInfo)operator(()ident(Key)operator(:) ident(HKEY)operator(\))operator(;)
   reserved(var)
     ident(KeyInfo)operator(:) ident(TRegKeyInfo)operator(;)
     ident(Res)operator(:) ident(Integer)operator(;)
     ident(KeyAge)operator(:) ident(TDateTime)operator(;)
   reserved(begin)
-    ident(FillChar)operator(()ident(KeyInfo)operator(,) ident(SizeOf)operator(()ident(TRegKeyInfo)operator(\),) integer(0)operator(\);)
+    ident(FillChar)operator(()ident(KeyInfo)operator(,) ident(SizeOf)operator(()ident(TRegKeyInfo)operator(\))operator(,) integer(0)operator(\))operator(;)
     reserved(with) ident(KeyInfo) reserved(do) reserved(begin)
       ident(Res) operator(:=) ident(RegQueryInfoKey)operator(()ident(Reg)operator(.)ident(CurrentKey)operator(,) reserved(nil)operator(,) reserved(nil)operator(,) reserved(nil)operator(,) operator(@)ident(NumSubKeys)operator(,)
         operator(@)ident(MaxSubKeyLen)operator(,) reserved(nil)operator(,) operator(@)ident(NumValues)operator(,) operator(@)ident(MaxValueLen)operator(,)
-        operator(@)ident(MaxDataLen)operator(,) reserved(nil)operator(,) operator(@)ident(LastWriteTime)operator(\);)
+        operator(@)ident(MaxDataLen)operator(,) reserved(nil)operator(,) operator(@)ident(LastWriteTime)operator(\))operator(;)
 
       reserved(if) ident(Res) operator(=) ident(ERROR_SUCCESS) reserved(then) reserved(begin)
         ident(Add)operator(()ident(Format)operator(()
@@ -7277,14 +7277,14 @@ reserved(var)
           string<delimiter(')content(Max value name length: %3:d)delimiter(')> operator(+) ident(EOL) operator(+)
           string<delimiter(')content(Max data length: %4:d)delimiter(')> operator(+) ident(EOL) operator(+)
           string<delimiter(')delimiter(')>operator(,)
-          operator([)ident(NumSubKeys)operator(,) ident(MaxSubKeyLen)operator(,) ident(NumValues)operator(,) ident(MaxValueLen)operator(,) ident(MaxDataLen)operator(]\)\);)
-        ident(KeyAge) operator(:=) ident(DateTimeOfFileTime)operator(()ident(LastWriteTime)operator(\);)
+          operator([)ident(NumSubKeys)operator(,) ident(MaxSubKeyLen)operator(,) ident(NumValues)operator(,) ident(MaxValueLen)operator(,) ident(MaxDataLen)operator(])operator(\))operator(\))operator(;)
+        ident(KeyAge) operator(:=) ident(DateTimeOfFileTime)operator(()ident(LastWriteTime)operator(\))operator(;)
         reserved(if) ident(KeyAge) operator(>) integer(0) reserved(then)
-          ident(AddLn)operator(()string<delimiter(')content(Last write time: )delimiter(')> operator(+) ident(DateTimeToStr)operator(()ident(KeyAge)operator(\)\);)
+          ident(AddLn)operator(()string<delimiter(')content(Last write time: )delimiter(')> operator(+) ident(DateTimeToStr)operator(()ident(KeyAge)operator(\))operator(\))operator(;)
       reserved(end) reserved(else)
         ident(AddLn)operator(()string<delimiter(')content(Couldn)char('')content(t get key info.)delimiter(')> operator(+) ident(EOL) operator(+)
           string<delimiter(')content(Error Code: )delimiter(')> operator(+) ident(IntToStr)operator(()ident(Res)operator(\)) operator(+) ident(EOL) operator(+)
-          string<delimiter(')content(Message: )delimiter(')> operator(+) ident(SysErrorMessage)operator(()ident(Res)operator(\)\);)
+          string<delimiter(')content(Message: )delimiter(')> operator(+) ident(SysErrorMessage)operator(()ident(Res)operator(\))operator(\))operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 
@@ -7292,32 +7292,32 @@ reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
   ident(Node) operator(:=) ident(RegTV)operator(.)ident(Selected)operator(;)
 
-  ident(Reg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(()ident(KEY_READ)operator(\);)
+  ident(Reg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(()ident(KEY_READ)operator(\))operator(;)
   reserved(try)
     reserved(try)
-      ident(Error) operator(:=) ident(OpenNodeError)operator(()ident(Reg)operator(,) ident(RegTV)operator(.)ident(Selected)operator(,) ident(Mode)operator(\);)
+      ident(Error) operator(:=) ident(OpenNodeError)operator(()ident(Reg)operator(,) ident(RegTV)operator(.)ident(Selected)operator(,) ident(Mode)operator(\))operator(;)
 
       reserved(case) ident(Mode) reserved(of)
-      ident(onFull)operator(:) ident(AddLn)operator(()string<delimiter(')content(Full Access)delimiter(')>operator(\);)
-      ident(onReadOnly)operator(:) ident(AddLn)operator(()string<delimiter(')content(Read only)delimiter(')>operator(\);)
+      ident(onFull)operator(:) ident(AddLn)operator(()string<delimiter(')content(Full Access)delimiter(')>operator(\))operator(;)
+      ident(onReadOnly)operator(:) ident(AddLn)operator(()string<delimiter(')content(Read only)delimiter(')>operator(\))operator(;)
       ident(onError)operator(:)
-        ident(AddLn)operator(()ident(Format)operator(()ident(sErrorMsg)operator(,) operator([)ident(Error)operator(,) ident(SysErrorMessage)operator(()ident(Error)operator(\)]\)\);)
-      ident(onNodeNil)operator(:) ident(AddLn)operator(()string<delimiter(')content(Node is nil!)delimiter(')>operator(\);)
+        ident(AddLn)operator(()ident(Format)operator(()ident(sErrorMsg)operator(,) operator([)ident(Error)operator(,) ident(SysErrorMessage)operator(()ident(Error)operator(\))operator(])operator(\))operator(\))operator(;)
+      ident(onNodeNil)operator(:) ident(AddLn)operator(()string<delimiter(')content(Node is nil!)delimiter(')>operator(\))operator(;)
 
       reserved(else)
-        ident(AddLn)operator(()string<delimiter(')content(Unknown Mode: )delimiter(')> operator(+) ident(IntToStr)operator(()ident(Integer)operator(()ident(Mode)operator(\)\)\);)
+        ident(AddLn)operator(()string<delimiter(')content(Unknown Mode: )delimiter(')> operator(+) ident(IntToStr)operator(()ident(Integer)operator(()ident(Mode)operator(\))operator(\))operator(\))operator(;)
       reserved(end)operator(;)
 
       reserved(if) ident(Mode) reserved(in) ident(onOK) reserved(then)
-        ident(AddNodeInfo)operator(()ident(Reg)operator(.)ident(CurrentKey)operator(\);)
+        ident(AddNodeInfo)operator(()ident(Reg)operator(.)ident(CurrentKey)operator(\))operator(;)
 
     reserved(except)
       directive(on) ident(E)operator(:) ident(Exception) reserved(do) reserved(begin)
         ident(Error) operator(:=) ident(GetLastError)operator(;)
         reserved(if) ident(Error) operator(<>) ident(ERROR_SUCCESS) reserved(then)
-          ident(AddLn)operator(()ident(Format)operator(()string<delimiter(')content(Error! No: %d Msg: %s)delimiter(')>operator(,) operator([)ident(Error)operator(,) ident(SysErrorMessage)operator(()ident(Error)operator(\)]\)\))
+          ident(AddLn)operator(()ident(Format)operator(()string<delimiter(')content(Error! No: %d Msg: %s)delimiter(')>operator(,) operator([)ident(Error)operator(,) ident(SysErrorMessage)operator(()ident(Error)operator(\))operator(])operator(\))operator(\))
         reserved(else)
-          ident(AddLn)operator(()ident(E)operator(.)ident(Message)operator(\);)
+          ident(AddLn)operator(()ident(E)operator(.)ident(Message)operator(\))operator(;)
       reserved(end)operator(;)
     reserved(end)operator(;)
   reserved(finally)
@@ -7325,59 +7325,59 @@ reserved(begin)
   reserved(end)operator(;)
 
   reserved(if) ident(MurphyMode) reserved(then) reserved(begin)
-    ident(AddLn)operator(()string<delimiter(')content([MM] ImageIndex: )delimiter(')> operator(+) ident(IntToStr)operator(()ident(Node)operator(.)ident(ImageIndex)operator(\)\);)
-    ident(Info) operator(:=) ident(NodeInfo)operator(()ident(Node)operator(\);)
+    ident(AddLn)operator(()string<delimiter(')content([MM] ImageIndex: )delimiter(')> operator(+) ident(IntToStr)operator(()ident(Node)operator(.)ident(ImageIndex)operator(\))operator(\))operator(;)
+    ident(Info) operator(:=) ident(NodeInfo)operator(()ident(Node)operator(\))operator(;)
 
-    reserved(if) ident(Info)operator(.)ident(HostType) reserved(in) operator([)ident(uhNone)operator(..)ident(High)operator(()ident(HostTypeStrings)operator(\)]) reserved(then)
-      ident(AddLn)operator(()string<delimiter(')content([MM] HostType: )delimiter(')> operator(+) ident(HostTypeStrings)operator([)ident(Info)operator(.)ident(HostType)operator(]\))
+    reserved(if) ident(Info)operator(.)ident(HostType) reserved(in) operator([)ident(uhNone)operator(..)ident(High)operator(()ident(HostTypeStrings)operator(\))operator(]) reserved(then)
+      ident(AddLn)operator(()string<delimiter(')content([MM] HostType: )delimiter(')> operator(+) ident(HostTypeStrings)operator([)ident(Info)operator(.)ident(HostType)operator(])operator(\))
     reserved(else)
-      ident(AddLn)operator(()string<delimiter(')content([MM] Unknown HostType: )delimiter(')> operator(+) ident(IntToStr)operator(()ident(Integer)operator(()ident(Info)operator(.)ident(HostType)operator(\)\)\);)
-    ident(Add)operator(()string<delimiter(')content([MM] Flags: )delimiter(')>operator(\);)
+      ident(AddLn)operator(()string<delimiter(')content([MM] Unknown HostType: )delimiter(')> operator(+) ident(IntToStr)operator(()ident(Integer)operator(()ident(Info)operator(.)ident(HostType)operator(\))operator(\))operator(\))operator(;)
+    ident(Add)operator(()string<delimiter(')content([MM] Flags: )delimiter(')>operator(\))operator(;)
     reserved(for) ident(Flag) operator(:=) ident(Low)operator(()ident(TNodeFlag)operator(\)) reserved(to) ident(High)operator(()ident(TNodeFlag)operator(\)) reserved(do)
       reserved(if) ident(Flag) reserved(in) ident(Info)operator(.)ident(Flags) reserved(then)
-        ident(Add)operator(()ident(NodeFlagStrings)operator([)ident(Flag)operator(]) operator(+) char<delimiter(')content( )delimiter(')>operator(\);)
+        ident(Add)operator(()ident(NodeFlagStrings)operator([)ident(Flag)operator(]) operator(+) char<delimiter(')content( )delimiter(')>operator(\))operator(;)
     ident(AddLn)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(ExportAsRegClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(ExportAsRegClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(Node)operator(:) ident(TTreeNode)operator(;)
   ident(Reg)operator(:) ident(TXRegistry)operator(;)
 
-  reserved(procedure) ident(ExportAsReg4)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) reserved(const) ident(FileName)operator(:) reserved(string)operator(\);)
+  reserved(procedure) ident(ExportAsReg4)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(;)
   reserved(var)
     ident(Reg4Writer)operator(:) ident(TReg4Writer)operator(;)
   reserved(begin)
     ident(Reg4Writer) operator(:=) ident(TReg4Writer)operator(.)ident(Create)operator(()ident(tpNormal)operator(,) ident(FileName)operator(,)
-     ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(Node)operator(\)\),) ident(Reg)operator(.)ident(DeliverKey)operator(\);)
+     ident(TraceKey)operator(()ident(PathOfNode)operator(()ident(Node)operator(\))operator(\))operator(,) ident(Reg)operator(.)ident(DeliverKey)operator(\))operator(;)
     reserved(with) ident(Reg4Writer) reserved(do) reserved(begin)
       ident(OnTerminate) operator(:=) ident(Reg4WriterTerminate)operator(;)
       reserved(try)
         ident(AddHint)operator(()ident(Format)operator(()string<delimiter(')content(starting .reg-export: %s...)delimiter(')>operator(,)
-          operator([)ident(Root) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(Path)operator(]\)\);)
+          operator([)ident(Root) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(Path)operator(])operator(\))operator(\))operator(;)
         ident(Resume)operator(;)
       reserved(except)
         ident(Free)operator(;)
       reserved(end)operator(;)
     reserved(end)operator(;)
-    ident(AddToLastHint)operator(()string<delimiter(')content(started.)delimiter(')>operator(\);)
+    ident(AddToLastHint)operator(()string<delimiter(')content(started.)delimiter(')>operator(\))operator(;)
   reserved(end)operator(;)
 
 
-  reserved(procedure) ident(ExportAsHive)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) reserved(const) ident(FileName)operator(:) reserved(string)operator(\);)
+  reserved(procedure) ident(ExportAsHive)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(;)
   reserved(begin)
     reserved(if) ident(Reg)operator(.)ident(SaveKey)operator(()string<delimiter(')delimiter(')>operator(,) ident(FileName)operator(\)) reserved(then)
       ident(AddHint)operator(()string<delimiter(')content(hive export successfull.)delimiter(')>operator(\))
     reserved(else)
       ident(AddHint)operator(()ident(Format)operator(()string<delimiter(')content(hive export failed: %s)delimiter(')>operator(,)
-        operator([)ident(SysErrorMessage)operator(()ident(LastSuccessRes)operator(\)]\)\);)
+        operator([)ident(SysErrorMessage)operator(()ident(LastSuccessRes)operator(\))operator(])operator(\))operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
   ident(Node) operator(:=) ident(RegTV)operator(.)ident(Selected)operator(;)
   reserved(with) ident(ExportD) reserved(do) reserved(begin)
-    ident(FileName) operator(:=) ident(MakeValidFileName)operator(()ident(Node)operator(.)ident(Text)operator(,) string<delimiter(')content(key)delimiter(')>operator(\);)
+    ident(FileName) operator(:=) ident(MakeValidFileName)operator(()ident(Node)operator(.)ident(Text)operator(,) string<delimiter(')content(key)delimiter(')>operator(\))operator(;)
 
     reserved(if) ident(Execute) reserved(then) reserved(begin)
       ident(Reg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(;)
@@ -7386,15 +7386,15 @@ reserved(begin)
           reserved(if) ident(FileExists)operator(()ident(FileName)operator(\)) reserved(and) operator(()ident(mrYes)operator(=)ident(MessageDlg)operator(()
            string<delimiter(')content(File already exists.)delimiter(')> operator(+) ident(EOL) operator(+)
            string<delimiter(')content(Delete existing file?)delimiter(')>operator(,)
-           ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(],) integer(0)operator(\)\)) reserved(then) reserved(begin)
-            ident(FileSetAttr)operator(()ident(FileName)operator(,) integer(0)operator(\);)
-            ident(DeleteFile)operator(()ident(FileName)operator(\);)
+           ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(])operator(,) integer(0)operator(\))operator(\)) reserved(then) reserved(begin)
+            ident(FileSetAttr)operator(()ident(FileName)operator(,) integer(0)operator(\))operator(;)
+            ident(DeleteFile)operator(()ident(FileName)operator(\))operator(;)
           reserved(end)operator(;)
           reserved(case) ident(FilterIndex) reserved(of)
-          integer(1)operator(:) ident(ExportAsReg4)operator(()ident(Reg)operator(,) ident(FileName)operator(\);)
-          integer(2)operator(:) ident(ExportAsHive)operator(()ident(Reg)operator(,) ident(FileName)operator(\);)
+          integer(1)operator(:) ident(ExportAsReg4)operator(()ident(Reg)operator(,) ident(FileName)operator(\))operator(;)
+          integer(2)operator(:) ident(ExportAsHive)operator(()ident(Reg)operator(,) ident(FileName)operator(\))operator(;)
           reserved(else)
-            ident(ShowMessage)operator(()ident(Format)operator(()string<delimiter(')content(Wrong Filter: %d)delimiter(')>operator(,) operator([)ident(FilterIndex)operator(]\)\);)
+            ident(ShowMessage)operator(()ident(Format)operator(()string<delimiter(')content(Wrong Filter: %d)delimiter(')>operator(,) operator([)ident(FilterIndex)operator(])operator(\))operator(\))operator(;)
           reserved(end)operator(;)
         reserved(end)operator(;)
       reserved(finally)
@@ -7404,7 +7404,7 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(FormClose)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Action)operator(:) ident(TCloseAction)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(FormClose)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Action)operator(:) ident(TCloseAction)operator(\))operator(;)
 reserved(begin)
 comment(//  Action := caNone;)
 reserved(end)operator(;)
@@ -7414,26 +7414,26 @@ reserved(var)
   ident(NodeHKLM)operator(,) ident(NodeHKU)operator(,) ident(NodeHKDD)operator(,) ident(NodeHKPD)operator(:) ident(TTreeNode)operator(;)
   ident(NodeHostReg)operator(:) ident(TTreeNode)operator(;)
 
-  reserved(procedure) ident(LoadShortcuts)operator(()ident(FileName)operator(:) reserved(string)operator(;) ident(HostType)operator(:) ident(TUniHostType)operator(\);)
+  reserved(procedure) ident(LoadShortcuts)operator(()ident(FileName)operator(:) reserved(string)operator(;) ident(HostType)operator(:) ident(TUniHostType)operator(\))operator(;)
   reserved(var)
     ident(i)operator(:) ident(Integer)operator(;)
     ident(SL)operator(:) ident(TStringList)operator(;)
     ident(ShortcutIni)operator(:) ident(TIniFile)operator(;)
   reserved(begin)
     reserved(if) reserved(not) ident(FileEx)operator(()ident(FileName)operator(\)) reserved(then) reserved(begin)
-      ident(AddToLastHint)operator(()string<delimiter(')content(not found:)delimiter(')>operator(\);)
-      ident(AddHint)operator(()ident(FileName)operator(\);)
+      ident(AddToLastHint)operator(()string<delimiter(')content(not found:)delimiter(')>operator(\))operator(;)
+      ident(AddHint)operator(()ident(FileName)operator(\))operator(;)
     ident(Exit) reserved(end)operator(;)
 
-    ident(ShortcutIni) operator(:=) ident(TIniFile)operator(.)ident(Create)operator(()ident(FileName)operator(\);)
+    ident(ShortcutIni) operator(:=) ident(TIniFile)operator(.)ident(Create)operator(()ident(FileName)operator(\))operator(;)
     ident(SL) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
 
     reserved(try)
-      ident(ShortcutIni)operator(.)ident(ReadSectionValues)operator(()string<delimiter(')content(Shortcuts)delimiter(')>operator(,) ident(SL)operator(\);)
+      ident(ShortcutIni)operator(.)ident(ReadSectionValues)operator(()string<delimiter(')content(Shortcuts)delimiter(')>operator(,) ident(SL)operator(\))operator(;)
       reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do)
-        ident(AddShortcut)operator(()ident(SL)operator(.)ident(Names)operator([)ident(i)operator(],) ident(SL)operator(.)ident(Values)operator([)ident(SL)operator(.)ident(Names)operator([)ident(i)operator(]],) ident(iconShortcut)operator(,)
-          ident(HostType)operator(\);)
-      ident(AddToLastHint)operator(()string<delimiter(')content(OK)delimiter(')>operator(\);)
+        ident(AddShortcut)operator(()ident(SL)operator(.)ident(Names)operator([)ident(i)operator(])operator(,) ident(SL)operator(.)ident(Values)operator([)ident(SL)operator(.)ident(Names)operator([)ident(i)operator(])operator(])operator(,) ident(iconShortcut)operator(,)
+          ident(HostType)operator(\))operator(;)
+      ident(AddToLastHint)operator(()string<delimiter(')content(OK)delimiter(')>operator(\))operator(;)
     reserved(finally)
       ident(SL)operator(.)ident(Free)operator(;)
       ident(ShortcutIni)operator(.)ident(Free)operator(;)
@@ -7443,76 +7443,76 @@ reserved(var)
 reserved(begin)
   ident(NodeHostReg) operator(:=) reserved(nil)operator(;)
 
-  ident(AddHint)operator(()string<delimiter(')content(Creating Hosts...)delimiter(')>operator(\);)
+  ident(AddHint)operator(()string<delimiter(')content(Creating Hosts...)delimiter(')>operator(\))operator(;)
   ident(RootNodes) operator(:=) ident(TList)operator(.)ident(Create)operator(;)
-  ident(ChangeLastHint)operator(()string<delimiter(')content(Creating Hosts...HKEY_LOCAL_MACHINE)delimiter(')>operator(\);)
-  ident(NodeHKLM) operator(:=) ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()ident(NodeHostReg)operator(,) string<delimiter(')content(HKEY_LOCAL_MACHINE)delimiter(')>operator(\);)
-  ident(SetTNImage)operator(()ident(NodeHKLM)operator(,) ident(iconHKLM)operator(\);)
-  ident(NodeInfo)operator(()ident(NodeHKLM)operator(\).)ident(HostType) operator(:=) ident(uhReg)operator(;)
-  ident(RootNodes)operator(.)ident(Add)operator(()ident(NodeHKLM)operator(\);)
-
-  ident(ChangeLastHint)operator(()string<delimiter(')content(Creating Hosts...HKEY_USERS)delimiter(')>operator(\);)
-  ident(NodeHKU) operator(:=) ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()ident(NodeHostReg)operator(,) string<delimiter(')content(HKEY_USERS)delimiter(')>operator(\);)
-  ident(SetTNImage)operator(()ident(NodeHKU)operator(,) ident(iconHKU)operator(\);)
-  ident(NodeInfo)operator(()ident(NodeHKU)operator(\).)ident(HostType) operator(:=) ident(uhReg)operator(;)
-  ident(RootNodes)operator(.)ident(Add)operator(()ident(NodeHKU)operator(\);)
-
-  ident(ChangeLastHint)operator(()string<delimiter(')content(Creating Hosts...HKEY_CURRENT_USER)delimiter(')>operator(\);)
+  ident(ChangeLastHint)operator(()string<delimiter(')content(Creating Hosts...HKEY_LOCAL_MACHINE)delimiter(')>operator(\))operator(;)
+  ident(NodeHKLM) operator(:=) ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()ident(NodeHostReg)operator(,) string<delimiter(')content(HKEY_LOCAL_MACHINE)delimiter(')>operator(\))operator(;)
+  ident(SetTNImage)operator(()ident(NodeHKLM)operator(,) ident(iconHKLM)operator(\))operator(;)
+  ident(NodeInfo)operator(()ident(NodeHKLM)operator(\))operator(.)ident(HostType) operator(:=) ident(uhReg)operator(;)
+  ident(RootNodes)operator(.)ident(Add)operator(()ident(NodeHKLM)operator(\))operator(;)
+
+  ident(ChangeLastHint)operator(()string<delimiter(')content(Creating Hosts...HKEY_USERS)delimiter(')>operator(\))operator(;)
+  ident(NodeHKU) operator(:=) ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()ident(NodeHostReg)operator(,) string<delimiter(')content(HKEY_USERS)delimiter(')>operator(\))operator(;)
+  ident(SetTNImage)operator(()ident(NodeHKU)operator(,) ident(iconHKU)operator(\))operator(;)
+  ident(NodeInfo)operator(()ident(NodeHKU)operator(\))operator(.)ident(HostType) operator(:=) ident(uhReg)operator(;)
+  ident(RootNodes)operator(.)ident(Add)operator(()ident(NodeHKU)operator(\))operator(;)
+
+  ident(ChangeLastHint)operator(()string<delimiter(')content(Creating Hosts...HKEY_CURRENT_USER)delimiter(')>operator(\))operator(;)
   reserved(if) ident(RegRealPath)operator(()string<delimiter(')content(HKEY_CURRENT_USER)delimiter(')>operator(\)) operator(=) string<delimiter(')content(HKEY_CURRENT_USER)delimiter(')> reserved(then)
   comment(//could not dereference hkcu)
     ident(AddShortcut)operator(()string<delimiter(')content(HKEY_CURRENT_USER)delimiter(')>operator(,) string<delimiter(')content(HKEY_CURRENT_USER)delimiter(')>operator(,)
       ident(iconHKCU)operator(,) ident(uhReg)operator(\))
   reserved(else)
-    ident(AddShortcut)operator(()string<delimiter(')content(HKEY_CURRENT_USER)delimiter(')>operator(,) ident(RegRealPath)operator(()string<delimiter(')content(HKEY_CURRENT_USER)delimiter(')>operator(\),)
-      ident(iconHKCU)operator(,) ident(uhSystemShortcut)operator(\);)
+    ident(AddShortcut)operator(()string<delimiter(')content(HKEY_CURRENT_USER)delimiter(')>operator(,) ident(RegRealPath)operator(()string<delimiter(')content(HKEY_CURRENT_USER)delimiter(')>operator(\))operator(,)
+      ident(iconHKCU)operator(,) ident(uhSystemShortcut)operator(\))operator(;)
 
-  ident(ChangeLastHint)operator(()string<delimiter(')content(Creating Hosts...HKEY_CURRENT_CONFIG)delimiter(')>operator(\);)
-  ident(AddShortcut)operator(()string<delimiter(')content(HKEY_CURRENT_CONFIG)delimiter(')>operator(,) ident(RegRealPath)operator(()string<delimiter(')content(HKEY_CURRENT_CONFIG)delimiter(')>operator(\),)
-    ident(iconHKCC)operator(,) ident(uhSystemShortcut)operator(\);)
+  ident(ChangeLastHint)operator(()string<delimiter(')content(Creating Hosts...HKEY_CURRENT_CONFIG)delimiter(')>operator(\))operator(;)
+  ident(AddShortcut)operator(()string<delimiter(')content(HKEY_CURRENT_CONFIG)delimiter(')>operator(,) ident(RegRealPath)operator(()string<delimiter(')content(HKEY_CURRENT_CONFIG)delimiter(')>operator(\))operator(,)
+    ident(iconHKCC)operator(,) ident(uhSystemShortcut)operator(\))operator(;)
 
-  ident(ChangeLastHint)operator(()string<delimiter(')content(Creating Hosts...HKEY_CLASSES_ROOT)delimiter(')>operator(\);)
-  ident(AddShortcut)operator(()string<delimiter(')content(HKEY_CLASSES_ROOT)delimiter(')>operator(,) ident(RegRealPath)operator(()string<delimiter(')content(HKEY_CLASSES_ROOT)delimiter(')>operator(\),)
-    ident(iconHKCR)operator(,) ident(uhSystemShortcut)operator(\);)
+  ident(ChangeLastHint)operator(()string<delimiter(')content(Creating Hosts...HKEY_CLASSES_ROOT)delimiter(')>operator(\))operator(;)
+  ident(AddShortcut)operator(()string<delimiter(')content(HKEY_CLASSES_ROOT)delimiter(')>operator(,) ident(RegRealPath)operator(()string<delimiter(')content(HKEY_CLASSES_ROOT)delimiter(')>operator(\))operator(,)
+    ident(iconHKCR)operator(,) ident(uhSystemShortcut)operator(\))operator(;)
 
   ident(MainReg)operator(.)ident(RootKey) operator(:=) ident(HKEY_DYN_DATA)operator(;)
   reserved(if) ident(MainReg)operator(.)ident(OpenKeyReadOnly)operator(()string<delimiter(')delimiter(')>operator(\)) reserved(then) reserved(begin)
     ident(MainReg)operator(.)ident(CloseKey)operator(;)
-    ident(ChangeLastHint)operator(()string<delimiter(')content(Creating Hosts...HKEY_DYN_DATA)delimiter(')>operator(\);)
-    ident(NodeHKDD) operator(:=) ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()reserved(nil)operator(,) string<delimiter(')content(HKEY_DYN_DATA)delimiter(')>operator(\);)
-    ident(NodeInfo)operator(()ident(NodeHKDD)operator(\).)ident(HostType) operator(:=) ident(uhReg)operator(;)
-    ident(NodeInfo)operator(()ident(NodeHKDD)operator(\).)ident(IncludeFlag)operator(()ident(nfReadOnly)operator(\);)
-    ident(SetTNImage)operator(()ident(NodeHKDD)operator(,) ident(iconHKDD)operator(\);)
-    ident(RootNodes)operator(.)ident(Add)operator(()ident(NodeHKDD)operator(\);)
+    ident(ChangeLastHint)operator(()string<delimiter(')content(Creating Hosts...HKEY_DYN_DATA)delimiter(')>operator(\))operator(;)
+    ident(NodeHKDD) operator(:=) ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()reserved(nil)operator(,) string<delimiter(')content(HKEY_DYN_DATA)delimiter(')>operator(\))operator(;)
+    ident(NodeInfo)operator(()ident(NodeHKDD)operator(\))operator(.)ident(HostType) operator(:=) ident(uhReg)operator(;)
+    ident(NodeInfo)operator(()ident(NodeHKDD)operator(\))operator(.)ident(IncludeFlag)operator(()ident(nfReadOnly)operator(\))operator(;)
+    ident(SetTNImage)operator(()ident(NodeHKDD)operator(,) ident(iconHKDD)operator(\))operator(;)
+    ident(RootNodes)operator(.)ident(Add)operator(()ident(NodeHKDD)operator(\))operator(;)
   reserved(end)operator(;)
 
   ident(MainReg)operator(.)ident(RootKey) operator(:=) ident(HKEY_PERFORMANCE_DATA)operator(;)
   reserved(if) ident(MainReg)operator(.)ident(OpenKeyReadOnly)operator(()string<delimiter(')delimiter(')>operator(\)) reserved(then) reserved(begin)
     ident(MainReg)operator(.)ident(CloseKey)operator(;)
-    ident(ChangeLastHint)operator(()string<delimiter(')content(Creating Hosts...HKEY_PERFORMANCE_DATA)delimiter(')>operator(\);)
-    ident(NodeHKPD) operator(:=) ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()reserved(nil)operator(,) string<delimiter(')content(HKEY_PERFORMANCE_DATA)delimiter(')>operator(\);)
-    ident(NodeInfo)operator(()ident(NodeHKPD)operator(\).)ident(HostType) operator(:=) ident(uhReg)operator(;)
-    ident(SetTNImage)operator(()ident(NodeHKPD)operator(,) ident(iconHKPD)operator(\);)
-    ident(RootNodes)operator(.)ident(Add)operator(()ident(NodeHKPD)operator(\);)
+    ident(ChangeLastHint)operator(()string<delimiter(')content(Creating Hosts...HKEY_PERFORMANCE_DATA)delimiter(')>operator(\))operator(;)
+    ident(NodeHKPD) operator(:=) ident(RegTV)operator(.)ident(Items)operator(.)ident(AddChild)operator(()reserved(nil)operator(,) string<delimiter(')content(HKEY_PERFORMANCE_DATA)delimiter(')>operator(\))operator(;)
+    ident(NodeInfo)operator(()ident(NodeHKPD)operator(\))operator(.)ident(HostType) operator(:=) ident(uhReg)operator(;)
+    ident(SetTNImage)operator(()ident(NodeHKPD)operator(,) ident(iconHKPD)operator(\))operator(;)
+    ident(RootNodes)operator(.)ident(Add)operator(()ident(NodeHKPD)operator(\))operator(;)
   reserved(end)operator(;)
 
-  ident(ChangeLastHint)operator(()string<delimiter(')content(Creating Host...OK)delimiter(')>operator(\);)
+  ident(ChangeLastHint)operator(()string<delimiter(')content(Creating Host...OK)delimiter(')>operator(\))operator(;)
 
-  ident(AddHint)operator(()string<delimiter(')content(Loading Standard Shortcuts...)delimiter(')>operator(\);)
-  ident(LoadShortcuts)operator(()ident(PlutoDir) operator(+) ident(StandardShortcutsFileName)operator(,) ident(uhStandardShortcut)operator(\);)
+  ident(AddHint)operator(()string<delimiter(')content(Loading Standard Shortcuts...)delimiter(')>operator(\))operator(;)
+  ident(LoadShortcuts)operator(()ident(PlutoDir) operator(+) ident(StandardShortcutsFileName)operator(,) ident(uhStandardShortcut)operator(\))operator(;)
 
-  ident(AddHint)operator(()string<delimiter(')content(Loading User Shortcuts...)delimiter(')>operator(\);)
-  ident(LoadShortcuts)operator(()ident(PlutoDir) operator(+) ident(ShortcutsFileName)operator(,) ident(uhUserShortcut)operator(\);)
+  ident(AddHint)operator(()string<delimiter(')content(Loading User Shortcuts...)delimiter(')>operator(\))operator(;)
+  ident(LoadShortcuts)operator(()ident(PlutoDir) operator(+) ident(ShortcutsFileName)operator(,) ident(uhUserShortcut)operator(\))operator(;)
 
 preprocessor({$IFDEF UNIKEY})
-  ident(AddShortcut)operator(()string<delimiter(')content(Uni)delimiter(')>operator(,) string<delimiter(')delimiter(')>operator(,) ident(iconHostUni)operator(\);)
+  ident(AddShortcut)operator(()string<delimiter(')content(Uni)delimiter(')>operator(,) string<delimiter(')delimiter(')>operator(,) ident(iconHostUni)operator(\))operator(;)
 preprocessor({$ENDIF})
 reserved(end)operator(;)
 
-reserved(procedure) ident(TTreeWin)operator(.)ident(Reg4WriterTerminate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TTreeWin)operator(.)ident(Reg4WriterTerminate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(Sender) reserved(as) ident(TRegFileWriter) reserved(do)
     ident(AddHint)operator(()ident(Format)operator(()string<delimiter(')content(.reg-export finished (%0.2f s\): %s)delimiter(')>operator(,)
-      operator([)ident(Clk)operator(.)ident(SecsPassed)operator(,) ident(Root) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(Path)operator(]\)\);)
+      operator([)ident(Clk)operator(.)ident(SecsPassed)operator(,) ident(Root) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(Path)operator(])operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(end)operator(.)
@@ -7566,69 +7566,69 @@ reserved(type)
     ident(TakeAsMainValueMI)operator(:) ident(TMenuItem)operator(;)
     ident(SelectAllMI)operator(:) ident(TMenuItem)operator(;)
     ident(InvertSelectionMI)operator(:) ident(TMenuItem)operator(;)
-    reserved(procedure) ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
     reserved(procedure) ident(InitListColumnTags)operator(;)
 
-    reserved(procedure) ident(NewStringMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(NewDWORDMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(NewBinaryMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ConvertValue)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(NewStringMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(NewDWORDMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(NewBinaryMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ConvertValue)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 
-    reserved(procedure) ident(CreateValue)operator(()ident(Typ)operator(:) ident(TRegDataType)operator(\);)
+    reserved(procedure) ident(CreateValue)operator(()ident(Typ)operator(:) ident(TRegDataType)operator(\))operator(;)
     reserved(procedure) ident(ZeromizeValue)operator(;)
     reserved(procedure) ident(DeleteValue)operator(;)
     reserved(procedure) ident(CloneValue)operator(;)
-    reserved(function) ident(TryRenameValue)operator(()ident(OldName)operator(:) reserved(string)operator(;) reserved(var) ident(NewName)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
-
-    reserved(procedure) ident(ValueListChange)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item)operator(:) ident(TListItem)operator(;) ident(Change)operator(:) ident(TItemChange)operator(\);)
-    reserved(procedure) ident(ValueListCustomDrawItem)operator(()ident(Sender)operator(:) ident(TCustomListView)operator(;) ident(Item)operator(:) ident(TListItem)operator(;) ident(State)operator(:) ident(TCustomDrawState)operator(;) reserved(var) ident(DefaultDraw)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(ValueListDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ValueListEditing)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item)operator(:) ident(TListItem)operator(;) reserved(var) ident(AllowEdit)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(ValueListEdited)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item)operator(:) ident(TListItem)operator(;) reserved(var) ident(S)operator(:) ident(String)operator(\);)
-    reserved(procedure) ident(ValueListKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(ValueListResize)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-
-    reserved(function) ident(UpdateValue)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) ident(Item)operator(:) ident(TListItem)operator(\):) ident(Boolean)operator(;)
-    reserved(procedure) ident(UpdateValues)operator(()ident(SelectedOnly)operator(:) ident(Boolean) operator(=) ident(False)operator(\);)
-    reserved(procedure) ident(Reload)operator(()ident(JumpToNewValue)operator(:) ident(Boolean) operator(=) ident(False)operator(;) ident(ValueName)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\);)
-    reserved(procedure) ident(LoadValues)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(\);)
-
-    reserved(function) ident(AddValue)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) reserved(const) ident(ValueName)operator(:) reserved(string)operator(;) ident(AppendInfos)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) ident(TListItem)operator(;)
-    reserved(procedure) ident(ValueListPUPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(ValueListDeletion)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item)operator(:) ident(TListItem)operator(\);)
-    reserved(procedure) ident(DeleteMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(RenameMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(NewBigEndianMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(NewExpandStringMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(NewMultiStringMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(NewStrangeTypeMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(NewDefaultValueMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ValueListChanging)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item)operator(:) ident(TListItem)operator(;) ident(Change)operator(:) ident(TItemChange)operator(;) reserved(var) ident(AllowChange)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(ValueListMouseDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Button)operator(:) ident(TMouseButton)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\);)
-    reserved(procedure) ident(EditBinaryMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(EditMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ValueListCustomDrawSubItem)operator(()ident(Sender)operator(:) ident(TCustomListView)operator(;) ident(Item)operator(:) ident(TListItem)operator(;) ident(SubItem)operator(:) ident(Integer)operator(;) ident(State)operator(:) ident(TCustomDrawState)operator(;) reserved(var) ident(DefaultDraw)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(ValueListCompare)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item1)operator(,) ident(Item2)operator(:) ident(TListItem)operator(;) ident(Data)operator(:) ident(Integer)operator(;) reserved(var) ident(Compare)operator(:) ident(Integer)operator(\);)
-    reserved(procedure) ident(ValueListColumnClick)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Column)operator(:) ident(TListColumn)operator(\);)
-    reserved(procedure) ident(DublicateMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(CopyDataPreviewMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(function) ident(TryRenameValue)operator(()ident(OldName)operator(:) reserved(string)operator(;) reserved(var) ident(NewName)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
+
+    reserved(procedure) ident(ValueListChange)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item)operator(:) ident(TListItem)operator(;) ident(Change)operator(:) ident(TItemChange)operator(\))operator(;)
+    reserved(procedure) ident(ValueListCustomDrawItem)operator(()ident(Sender)operator(:) ident(TCustomListView)operator(;) ident(Item)operator(:) ident(TListItem)operator(;) ident(State)operator(:) ident(TCustomDrawState)operator(;) reserved(var) ident(DefaultDraw)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(ValueListDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ValueListEditing)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item)operator(:) ident(TListItem)operator(;) reserved(var) ident(AllowEdit)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(ValueListEdited)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item)operator(:) ident(TListItem)operator(;) reserved(var) ident(S)operator(:) reserved(String)operator(\))operator(;)
+    reserved(procedure) ident(ValueListKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(ValueListResize)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+
+    reserved(function) ident(UpdateValue)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) ident(Item)operator(:) ident(TListItem)operator(\))operator(:) ident(Boolean)operator(;)
+    reserved(procedure) ident(UpdateValues)operator(()ident(SelectedOnly)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(;)
+    reserved(procedure) ident(Reload)operator(()ident(JumpToNewValue)operator(:) ident(Boolean) operator(=) ident(False)operator(;) ident(ValueName)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(;)
+    reserved(procedure) ident(LoadValues)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(\))operator(;)
+
+    reserved(function) ident(AddValue)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) reserved(const) ident(ValueName)operator(:) reserved(string)operator(;) ident(AppendInfos)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) ident(TListItem)operator(;)
+    reserved(procedure) ident(ValueListPUPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(ValueListDeletion)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item)operator(:) ident(TListItem)operator(\))operator(;)
+    reserved(procedure) ident(DeleteMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(RenameMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(NewBigEndianMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(NewExpandStringMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(NewMultiStringMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(NewStrangeTypeMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(NewDefaultValueMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ValueListChanging)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item)operator(:) ident(TListItem)operator(;) ident(Change)operator(:) ident(TItemChange)operator(;) reserved(var) ident(AllowChange)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(ValueListMouseDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Button)operator(:) ident(TMouseButton)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\))operator(;)
+    reserved(procedure) ident(EditBinaryMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(EditMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ValueListCustomDrawSubItem)operator(()ident(Sender)operator(:) ident(TCustomListView)operator(;) ident(Item)operator(:) ident(TListItem)operator(;) ident(SubItem)operator(:) ident(Integer)operator(;) ident(State)operator(:) ident(TCustomDrawState)operator(;) reserved(var) ident(DefaultDraw)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(ValueListCompare)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item1)operator(,) ident(Item2)operator(:) ident(TListItem)operator(;) ident(Data)operator(:) ident(Integer)operator(;) reserved(var) ident(Compare)operator(:) ident(Integer)operator(\))operator(;)
+    reserved(procedure) ident(ValueListColumnClick)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Column)operator(:) ident(TListColumn)operator(\))operator(;)
+    reserved(procedure) ident(DublicateMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(CopyDataPreviewMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
     reserved(procedure) ident(CopyDataPreview)operator(;)
-    reserved(procedure) ident(ZeromizeMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(CopyPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(ZeromizeMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(CopyPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 
-    reserved(function) ident(FindItemByRealName)operator(()reserved(const) ident(ValueName)operator(:) reserved(string)operator(\):) ident(Integer)operator(;)
+    reserved(function) ident(FindItemByRealName)operator(()reserved(const) ident(ValueName)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;)
 
     reserved(function) ident(FocusItem)operator(()ident(ARealValueName)operator(:) reserved(string)operator(;)
-      ident(FocusValueList)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) ident(Boolean)operator(;)
-    reserved(procedure) ident(TakeAsMainValueMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormClose)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Action)operator(:) ident(TCloseAction)operator(\);)
-    reserved(procedure) ident(ValueListClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+      ident(FocusValueList)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) ident(Boolean)operator(;)
+    reserved(procedure) ident(TakeAsMainValueMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormClose)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Action)operator(:) ident(TCloseAction)operator(\))operator(;)
+    reserved(procedure) ident(ValueListClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
     reserved(procedure) ident(CheckValueListHotTrack)operator(;)
-    reserved(procedure) ident(SelectAllMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(InvertSelectionMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormDestroy)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(SelectAllMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(InvertSelectionMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormDestroy)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
   directive(private)
     ident(ValueLabelClicked)operator(:) ident(Boolean)operator(;)
     ident(SortBy)operator(:) ident(TValueListColumn)operator(;)
@@ -7646,22 +7646,22 @@ reserved(var)
 
   ident(DefaultValueCaption)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(;)
 
-reserved(function) ident(ItemIsDefaultValue)operator(()ident(Item)operator(:) ident(TListItem)operator(\):) ident(Boolean)operator(;)
-reserved(function) ident(RealValueName)operator(()ident(Item)operator(:) ident(TListItem)operator(\):) reserved(string)operator(;)
-reserved(procedure) ident(SetRealValueName)operator(()ident(Item)operator(:) ident(TListItem)operator(;) ident(Caption)operator(:) reserved(string)operator(\);)
-reserved(function) ident(IconOfDataType)operator(()ident(Typ)operator(:) ident(TRegDataType)operator(\):) ident(Integer)operator(;)
-reserved(function) ident(IsMainValue)operator(()ident(Item)operator(:) ident(TListItem)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(ItemIsDefaultValue)operator(()ident(Item)operator(:) ident(TListItem)operator(\))operator(:) ident(Boolean)operator(;)
+reserved(function) ident(RealValueName)operator(()ident(Item)operator(:) ident(TListItem)operator(\))operator(:) reserved(string)operator(;)
+reserved(procedure) ident(SetRealValueName)operator(()ident(Item)operator(:) ident(TListItem)operator(;) ident(Caption)operator(:) reserved(string)operator(\))operator(;)
+reserved(function) ident(IconOfDataType)operator(()ident(Typ)operator(:) ident(TRegDataType)operator(\))operator(:) ident(Integer)operator(;)
+reserved(function) ident(IsMainValue)operator(()ident(Item)operator(:) ident(TListItem)operator(\))operator(:) ident(Boolean)operator(;)
 
 reserved(function) ident(ColorOfDataType)operator(()ident(DataType)operator(:) ident(TRegDataType)operator(;)
-  ident(DefaultColor)operator(:) ident(TColor) operator(=) ident(clWhite)operator(\):) ident(TColor)operator(;)
-reserved(function) ident(DataPreviewOfContext)operator(()ident(Context)operator(:) ident(TRegContext)operator(\):) reserved(string)operator(;)
+  ident(DefaultColor)operator(:) ident(TColor) operator(=) ident(clWhite)operator(\))operator(:) ident(TColor)operator(;)
+reserved(function) ident(DataPreviewOfContext)operator(()ident(Context)operator(:) ident(TRegContext)operator(\))operator(:) reserved(string)operator(;)
 
-reserved(function) ident(ValueDataSize)operator(()ident(Context)operator(:) ident(TRegContext)operator(\):) reserved(string)operator(;)
-reserved(function) ident(ValueDataType)operator(()ident(Context)operator(:) ident(TRegContext)operator(\):) reserved(string)operator(;)
-reserved(function) ident(ValueDataPreview)operator(()ident(Context)operator(:) ident(TRegContext)operator(\):) reserved(string)operator(;)
-reserved(function) ident(ValueTypeIcon)operator(()ident(Context)operator(:) ident(TRegContext)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(ValueDataSize)operator(()ident(Context)operator(:) ident(TRegContext)operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(ValueDataType)operator(()ident(Context)operator(:) ident(TRegContext)operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(ValueDataPreview)operator(()ident(Context)operator(:) ident(TRegContext)operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(ValueTypeIcon)operator(()ident(Context)operator(:) ident(TRegContext)operator(\))operator(:) ident(Integer)operator(;)
 
-reserved(function) ident(StrOfRegDataType)operator(()ident(Typ)operator(:) ident(TRegDataType)operator(\):) reserved(string)operator(;)
+reserved(function) ident(StrOfRegDataType)operator(()ident(Typ)operator(:) ident(TRegDataType)operator(\))operator(:) reserved(string)operator(;)
 
 reserved(implementation)
 
@@ -7669,12 +7669,12 @@ reserved(uses) ident(PlutoMain)operator(,) ident(TreeU)operator(,) ident(WorkU)o
 
 preprocessor({$R *.dfm})
 
-reserved(function) ident(ItemIsDefaultValue)operator(()ident(Item)operator(:) ident(TListItem)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(ItemIsDefaultValue)operator(()ident(Item)operator(:) ident(TListItem)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(Item)operator(.)ident(Data) operator(=) ident(Pointer)operator(()ident(DefaultValueFlag)operator(\);)
+  ident(Result) operator(:=) ident(Item)operator(.)ident(Data) operator(=) ident(Pointer)operator(()ident(DefaultValueFlag)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(RealValueName)operator(()ident(Item)operator(:) ident(TListItem)operator(\):) reserved(string)operator(;)
+reserved(function) ident(RealValueName)operator(()ident(Item)operator(:) ident(TListItem)operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
   reserved(if) ident(ItemIsDefaultValue)operator(()ident(Item)operator(\)) reserved(then)
     ident(Result) operator(:=) string<delimiter(')delimiter(')>
@@ -7682,18 +7682,18 @@ reserved(begin)
     ident(Result) operator(:=) ident(Item)operator(.)ident(Caption)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(SetRealValueName)operator(()ident(Item)operator(:) ident(TListItem)operator(;) ident(Caption)operator(:) reserved(string)operator(\);)
+reserved(procedure) ident(SetRealValueName)operator(()ident(Item)operator(:) ident(TListItem)operator(;) ident(Caption)operator(:) reserved(string)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Caption) operator(=) string<delimiter(')delimiter(')> reserved(then) reserved(begin)
     ident(Item)operator(.)ident(Caption) operator(:=) ident(DefaultValueCaption)operator(;)
-    ident(Item)operator(.)ident(Data) operator(:=) ident(Pointer)operator(()ident(DefaultValueFlag)operator(\);)
+    ident(Item)operator(.)ident(Data) operator(:=) ident(Pointer)operator(()ident(DefaultValueFlag)operator(\))operator(;)
   reserved(end) reserved(else) reserved(begin)
     ident(Item)operator(.)ident(Caption) operator(:=) ident(Caption)operator(;)
     ident(Item)operator(.)ident(Data) operator(:=) reserved(nil)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(IsMainValue)operator(()ident(Item)operator(:) ident(TListItem)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(IsMainValue)operator(()ident(Item)operator(:) ident(TListItem)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(False)operator(;)
   reserved(if) ident(csDestroying) reserved(in) ident(PrefWin)operator(.)ident(ComponentState) reserved(then)
@@ -7703,7 +7703,7 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(function) ident(ColorOfDataType)operator(()ident(DataType)operator(:) ident(TRegDataType)operator(;)
-  ident(DefaultColor)operator(:) ident(TColor) operator(=) ident(clWhite)operator(\):) ident(TColor)operator(;)
+  ident(DefaultColor)operator(:) ident(TColor) operator(=) ident(clWhite)operator(\))operator(:) ident(TColor)operator(;)
 reserved(begin)
        reserved(if) ident(DataType) reserved(in) ident(rdStringTypes) reserved(then) ident(Result) operator(:=) ident(clBrightRed)
   reserved(else) reserved(if) ident(DataType) operator(=)  ident(rdMultiString) reserved(then) ident(Result) operator(:=) ident(clBrightPurple)
@@ -7712,7 +7712,7 @@ reserved(begin)
   reserved(else) ident(Result) operator(:=) ident(DefaultColor)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(StrOfRegDataType)operator(()ident(Typ)operator(:) ident(TRegDataType)operator(\):) reserved(string)operator(;)
+reserved(function) ident(StrOfRegDataType)operator(()ident(Typ)operator(:) ident(TRegDataType)operator(\))operator(:) reserved(string)operator(;)
 reserved(const)
   ident(RegDataTypeStrings)operator(:) reserved(array)operator([)ident(rdNone)operator(..)ident(rdLastType)operator(]) reserved(of) reserved(string) operator(=) operator(()
     string<delimiter(')content(NONE)delimiter(')>operator(,)
@@ -7727,30 +7727,30 @@ reserved(const)
     string<delimiter(')content(FULL_RESOURCE_DESCRIPTOR)delimiter(')>operator(,)
     string<delimiter(')content(RESOURCE_REQUIREMENTS_LIST)delimiter(')>operator(,)
     string<delimiter(')content(QUAD_WORD)delimiter(')>
-  operator(\);)
+  operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Typ) reserved(in) operator([)ident(rdNone)operator(..)ident(rdLastType)operator(]) reserved(then)
     ident(Result) operator(:=) ident(RegDataTypeStrings)operator([)ident(Typ)operator(])
   reserved(else)
-    ident(Result) operator(:=) ident(IntToStr)operator(()ident(Typ)operator(\);)
+    ident(Result) operator(:=) ident(IntToStr)operator(()ident(Typ)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(NewStringMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(NewStringMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(CreateValue)operator(()ident(rdString)operator(\);)
+  ident(CreateValue)operator(()ident(rdString)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(NewDWORDMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(NewDWORDMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(CreateValue)operator(()ident(rdCardinal)operator(\);)
+  ident(CreateValue)operator(()ident(rdCardinal)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(NewBinaryMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(NewBinaryMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(CreateValue)operator(()ident(rdBinary)operator(\);)
+  ident(CreateValue)operator(()ident(rdBinary)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(CreateValue)operator(()ident(Typ)operator(:) ident(TRegDataType)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(CreateValue)operator(()ident(Typ)operator(:) ident(TRegDataType)operator(\))operator(;)
 reserved(var)
   ident(Item)operator(:) ident(TListItem)operator(;)
   ident(ValueName)operator(:) reserved(string)operator(;)
@@ -7770,59 +7770,59 @@ reserved(begin)
       ident(ValueName) operator(:=) string<delimiter(')content(New)delimiter(')>operator(;) comment(// find free name)
       ident(i) operator(:=) integer(0)operator(;)
       reserved(while) ident(ValueExists)operator(()ident(ValueName)operator(\)) reserved(do) reserved(begin)
-        ident(Inc)operator(()ident(i)operator(\);)
-        ident(ValueName) operator(:=) string<delimiter(')content(New )delimiter(')> operator(+) ident(IntToStr)operator(()ident(i)operator(\);)
+        ident(Inc)operator(()ident(i)operator(\))operator(;)
+        ident(ValueName) operator(:=) string<delimiter(')content(New )delimiter(')> operator(+) ident(IntToStr)operator(()ident(i)operator(\))operator(;)
       reserved(end)operator(;)
 
       reserved(case) ident(Typ) reserved(of)
         ident(rdString)operator(:) reserved(begin)
-            ident(WriteString)operator(()ident(ValueName)operator(,) string<delimiter(')delimiter(')>operator(\);)
+            ident(WriteString)operator(()ident(ValueName)operator(,) string<delimiter(')delimiter(')>operator(\))operator(;)
           reserved(end)operator(;)
         ident(rdExpandString)operator(:) reserved(begin)
-            ident(WriteExpandString)operator(()ident(ValueName)operator(,) string<delimiter(')delimiter(')>operator(\);)
+            ident(WriteExpandString)operator(()ident(ValueName)operator(,) string<delimiter(')delimiter(')>operator(\))operator(;)
           reserved(end)operator(;)
         ident(rdCardinal)operator(:) reserved(begin)
-            ident(WriteCardinal)operator(()ident(ValueName)operator(,) integer(0)operator(\);)
+            ident(WriteCardinal)operator(()ident(ValueName)operator(,) integer(0)operator(\))operator(;)
           reserved(end)operator(;)
         ident(rdCardBigEndian)operator(:) reserved(begin)
-            ident(WriteCardinal)operator(()ident(ValueName)operator(,) integer(0)operator(,) ident(True)operator(\);)
+            ident(WriteCardinal)operator(()ident(ValueName)operator(,) integer(0)operator(,) ident(True)operator(\))operator(;)
           reserved(end)operator(;)
         ident(rdMultiString)operator(:) reserved(begin)
             ident(SL) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
-            ident(WriteMultiString)operator(()ident(ValueName)operator(,) ident(SL)operator(\);)
+            ident(WriteMultiString)operator(()ident(ValueName)operator(,) ident(SL)operator(\))operator(;)
             ident(SL)operator(.)ident(Free)operator(;)
           reserved(end)operator(;)
         ident(rdBinary)operator(:) reserved(begin)
-            ident(WriteBin)operator(()ident(ValueName)operator(,) reserved(nil)operator(\);)
+            ident(WriteBin)operator(()ident(ValueName)operator(,) reserved(nil)operator(\))operator(;)
           reserved(end)operator(;)
         reserved(else)
-          ident(WriteBinType)operator(()ident(ValueName)operator(,) reserved(nil)operator(,) ident(Typ)operator(\);)
+          ident(WriteBinType)operator(()ident(ValueName)operator(,) reserved(nil)operator(,) ident(Typ)operator(\))operator(;)
       reserved(end)operator(;)
 
       reserved(if) reserved(not) ident(ValueExists)operator(()ident(ValueName)operator(\)) reserved(then) reserved(begin)
-        ident(ShowMessage)operator(()string<delimiter(')content(Could not create Value.)delimiter(')>operator(\);)
+        ident(ShowMessage)operator(()string<delimiter(')content(Could not create Value.)delimiter(')>operator(\))operator(;)
         ident(CloseKey)operator(;)
       ident(Exit)operator(;) reserved(end)operator(;)
 
-      ident(ValuesWin)operator(.)ident(AddValue)operator(()ident(MainReg)operator(,) ident(ValueName)operator(\);)
+      ident(ValuesWin)operator(.)ident(AddValue)operator(()ident(MainReg)operator(,) ident(ValueName)operator(\))operator(;)
     reserved(finally)
       ident(CloseKey)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 
-  ident(Item) operator(:=) ident(FindItem)operator(()ident(ValueList)operator(,) ident(ValueName)operator(\);)
+  ident(Item) operator(:=) ident(FindItem)operator(()ident(ValueList)operator(,) ident(ValueName)operator(\))operator(;)
 
   reserved(if) reserved(not) ident(Assigned)operator(()ident(Item)operator(\)) reserved(then) reserved(begin)
-    ident(ShowMessage)operator(()string<delimiter(')content(Error, Value not found: )delimiter(')> operator(+) ident(ValueName)operator(\);)
+    ident(ShowMessage)operator(()string<delimiter(')content(Error, Value not found: )delimiter(')> operator(+) ident(ValueName)operator(\))operator(;)
   ident(Exit)operator(;) reserved(end)operator(;)
 
-  ident(SelectItemOnly)operator(()ident(ValueList)operator(,) ident(Item)operator(\);)
+  ident(SelectItemOnly)operator(()ident(ValueList)operator(,) ident(Item)operator(\))operator(;)
   ident(MainWin)operator(.)ident(StatusBarUpdate)operator(;)
   ident(ValueLabelClicked) operator(:=) ident(True)operator(;)
   ident(Item)operator(.)ident(EditCaption)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(ValuesU)operator(.)ident(ValueList) operator(:=) ident(ValueList)operator(;)
 
@@ -7831,7 +7831,7 @@ reserved(begin)
   ident(SortBy) operator(:=) ident(vlcName)operator(;)
   ident(SortByColumn) operator(:=) reserved(nil)operator(;)
 
-  ident(ValueListResize)operator(()ident(Sender)operator(\);)
+  ident(ValueListResize)operator(()ident(Sender)operator(\))operator(;)
   ident(ValueList)operator(.)ident(Items)operator(.)ident(Clear)operator(;)
   ident(CheckValueListHotTrack)operator(;)
 
@@ -7857,7 +7857,7 @@ reserved(begin)
   ident(TakeAsMainValueMI)operator(.)ident(ImageIndex) operator(:=) ident(iconTakeAsMainValue)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(ConvertValue)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(ConvertValue)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 comment({var
   Allow: Boolean;
   OldActive: Integer;  })
@@ -7871,7 +7871,7 @@ comment({  TargetPage := ShowPC.Pages[TMenuItem(Sender\).Tag];
     ShowPC.ActivePageIndex := OldActive; })
 reserved(end)operator(;)
 
-reserved(function) ident(ValueDataSize)operator(()ident(Context)operator(:) ident(TRegContext)operator(\):) reserved(string)operator(;)
+reserved(function) ident(ValueDataSize)operator(()ident(Context)operator(:) ident(TRegContext)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(Typ)operator(:) ident(TRegDataType)operator(;)
   ident(Size)operator(:) ident(Integer)operator(;)
@@ -7885,15 +7885,15 @@ reserved(begin)
 
 comment(//  ValueName := RealValueName(Item\);)
   ident(Typ) operator(:=) ident(Context)operator(.)ident(Typ)operator(;)
-  ident(Size) operator(:=) ident(Length)operator(()ident(Context)operator(.)ident(Data)operator(\);)
+  ident(Size) operator(:=) ident(Length)operator(()ident(Context)operator(.)ident(Data)operator(\))operator(;)
 
   reserved(if) ident(Typ) reserved(in) ident(rdStringTypes) reserved(then)
     reserved(if) reserved(not) ident(PrefWin)operator(.)ident(CountZeroByteCB)operator(.)ident(Checked) reserved(then)
-      ident(Dec)operator(()ident(Size)operator(\);)
+      ident(Dec)operator(()ident(Size)operator(\))operator(;)
       
   reserved(if) ident(Typ) operator(=) ident(rdMultiString) reserved(then)
     reserved(if) ident(PrefWin)operator(.)ident(ShowLineCountCB)operator(.)ident(Checked) reserved(then) reserved(begin)
-      ident(Size) operator(:=) ident(CharCount)operator(()ident(StrOfByteA)operator(()ident(Context)operator(.)ident(Data)operator(\),) char(#0)operator(\)) operator(-) integer(2)operator(;)
+      ident(Size) operator(:=) ident(CharCount)operator(()ident(StrOfByteA)operator(()ident(Context)operator(.)ident(Data)operator(\))operator(,) char(#0)operator(\)) operator(-) integer(2)operator(;)
 comment({      SL := TStringList.Create;
       try
         Reg.ReadMultiString(ValueName, SL, PrefWin.UseExtendedModelCB.Checked\);
@@ -7904,17 +7904,17 @@ comment({      SL := TStringList.Create;
       ident(Result) operator(:=) char<delimiter(')content(#)delimiter(')>operator(;)
     reserved(end)operator(;)
 
-  ident(Result) operator(:=) ident(Result) operator(+) ident(IntToStr)operator(()ident(Size)operator(\);)
+  ident(Result) operator(:=) ident(Result) operator(+) ident(IntToStr)operator(()ident(Size)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ValueDataType)operator(()ident(Context)operator(:) ident(TRegContext)operator(\):) reserved(string)operator(;)
+reserved(function) ident(ValueDataType)operator(()ident(Context)operator(:) ident(TRegContext)operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(StrOfRegDataType)operator(()ident(Context)operator(.)ident(Typ)operator(\);)
+  ident(Result) operator(:=) ident(StrOfRegDataType)operator(()ident(Context)operator(.)ident(Typ)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(DataPreviewOfContext)operator(()ident(Context)operator(:) ident(TRegContext)operator(\):) reserved(string)operator(;)
+reserved(function) ident(DataPreviewOfContext)operator(()ident(Context)operator(:) ident(TRegContext)operator(\))operator(:) reserved(string)operator(;)
 
-  reserved(function) ident(DWORDPreview)operator(()ident(Value)operator(:) ident(Integer)operator(\):) reserved(string)operator(;)
+  reserved(function) ident(DWORDPreview)operator(()ident(Value)operator(:) ident(Integer)operator(\))operator(:) reserved(string)operator(;)
   reserved(begin)
     reserved(if) ident(PrefWin)operator(.)ident(ShowDwordAsHex)operator(.)ident(Checked) reserved(then)
       ident(Result) operator(:=) ident(IntToStr)operator(()ident(Value)operator(\)) operator(+) string<delimiter(')content( = $)delimiter(')> operator(+) ident(IntToHex)operator(()ident(Value)operator(,) integer(8)operator(\))
@@ -7922,11 +7922,11 @@ reserved(function) ident(DataPreviewOfContext)operator(()ident(Context)operator(
       ident(Result) operator(:=) ident(IntToStr)operator(()ident(Value)operator(\))
   reserved(end)operator(;)
 
-  reserved(function) ident(BinaryPreview)operator(()ident(Context)operator(:) ident(TRegContext)operator(\):) reserved(string)operator(;)
+  reserved(function) ident(BinaryPreview)operator(()ident(Context)operator(:) ident(TRegContext)operator(\))operator(:) reserved(string)operator(;)
   reserved(var)
     ident(z)operator(:) reserved(string)operator(;)
 
-    reserved(function) ident(DWORDStringOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(AddBinary)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) reserved(string)operator(;)
+    reserved(function) ident(DWORDStringOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(AddBinary)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) reserved(string)operator(;)
     reserved(var)
       ident(piece)operator(:) ident(TByteA)operator(;)
       ident(i)operator(:) ident(Integer)operator(;)
@@ -7934,41 +7934,41 @@ reserved(function) ident(DataPreviewOfContext)operator(()ident(Context)operator(
       ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
 
       ident(i) operator(:=) integer(0)operator(;)
-      reserved(while) operator(()ident(i) operator(<=) ident(High)operator(()ident(a)operator(\)\)) reserved(and) operator(()ident(Length)operator(()ident(Result)operator(\)) operator(<) ident(MaxPreviewLen)operator(\)) reserved(do) reserved(begin)
-        ident(piece) operator(:=) ident(Copy)operator(()ident(a)operator(,) ident(i)operator(,) integer(4)operator(\);)
+      reserved(while) operator(()ident(i) operator(<=) ident(High)operator(()ident(a)operator(\))operator(\)) reserved(and) operator(()ident(Length)operator(()ident(Result)operator(\)) operator(<) ident(MaxPreviewLen)operator(\)) reserved(do) reserved(begin)
+        ident(piece) operator(:=) ident(Copy)operator(()ident(a)operator(,) ident(i)operator(,) integer(4)operator(\))operator(;)
         reserved(if) ident(AddBinary) reserved(then)
           ident(Result) operator(:=) ident(Result) operator(+) ident(FriendlyStr)operator(()ident(piece)operator(\)) operator(+) char<delimiter(')content(=)delimiter(')>operator(;)
-        ident(SetLength)operator(()ident(piece)operator(,) integer(4)operator(\);)
-        ident(Result) operator(:=) ident(Result) operator(+) ident(IntToStr)operator(()ident(PInteger)operator(()ident(piece)operator(\)^\)) operator(+) string<delimiter(')content(  )delimiter(')>operator(;)
-        ident(Inc)operator(()ident(i)operator(,) ident(SizeOf)operator(()ident(Integer)operator(\)\);)
+        ident(SetLength)operator(()ident(piece)operator(,) integer(4)operator(\))operator(;)
+        ident(Result) operator(:=) ident(Result) operator(+) ident(IntToStr)operator(()ident(PInteger)operator(()ident(piece)operator(\))operator(^)operator(\)) operator(+) string<delimiter(')content(  )delimiter(')>operator(;)
+        ident(Inc)operator(()ident(i)operator(,) ident(SizeOf)operator(()ident(Integer)operator(\))operator(\))operator(;)
       reserved(end)operator(;)
     reserved(end)operator(;)
 
   reserved(begin)
     reserved(with) ident(Context) reserved(do) reserved(begin)
-      ident(Data) operator(:=) ident(Copy)operator(()ident(Data)operator(,) integer(0)operator(,) ident(MaxPreviewLen)operator(\);)
+      ident(Data) operator(:=) ident(Copy)operator(()ident(Data)operator(,) integer(0)operator(,) ident(MaxPreviewLen)operator(\))operator(;)
       reserved(case) ident(PrefWin)operator(.)ident(ShowBinaryAsRG)operator(.)ident(ItemIndex) reserved(of)
-        integer(0)operator(:) ident(z) operator(:=) ident(FriendlyStr)operator(()ident(Data)operator(\);)
-        integer(1)operator(:) ident(z) operator(:=) ident(DWORDStringOfByteA)operator(()ident(Data)operator(\);)
-        integer(2)operator(:) ident(z) operator(:=) ident(DWORDStringOfByteA)operator(()ident(Data)operator(,) ident(True)operator(\);)
-        integer(3)operator(:) ident(z) operator(:=) ident(BinOfByteA)operator(()ident(Data)operator(,) integer(8)operator(,) string<delimiter(')content(  )delimiter(')>operator(\);)
-        integer(4)operator(:) ident(z) operator(:=) ident(HexOfByteA)operator(()ident(Data)operator(,) integer(0)operator(\);)
-        integer(5)operator(:) ident(z) operator(:=) ident(HexOfByteA)operator(()ident(Data)operator(,) integer(1)operator(\);)
-        integer(6)operator(:) ident(z) operator(:=) ident(HexOfByteA)operator(()ident(Data)operator(,) integer(2)operator(\);)
-        integer(7)operator(:) ident(z) operator(:=) ident(HexOfByteA)operator(()ident(Data)operator(,) integer(4)operator(\);)
+        integer(0)operator(:) ident(z) operator(:=) ident(FriendlyStr)operator(()ident(Data)operator(\))operator(;)
+        integer(1)operator(:) ident(z) operator(:=) ident(DWORDStringOfByteA)operator(()ident(Data)operator(\))operator(;)
+        integer(2)operator(:) ident(z) operator(:=) ident(DWORDStringOfByteA)operator(()ident(Data)operator(,) ident(True)operator(\))operator(;)
+        integer(3)operator(:) ident(z) operator(:=) ident(BinOfByteA)operator(()ident(Data)operator(,) integer(8)operator(,) string<delimiter(')content(  )delimiter(')>operator(\))operator(;)
+        integer(4)operator(:) ident(z) operator(:=) ident(HexOfByteA)operator(()ident(Data)operator(,) integer(0)operator(\))operator(;)
+        integer(5)operator(:) ident(z) operator(:=) ident(HexOfByteA)operator(()ident(Data)operator(,) integer(1)operator(\))operator(;)
+        integer(6)operator(:) ident(z) operator(:=) ident(HexOfByteA)operator(()ident(Data)operator(,) integer(2)operator(\))operator(;)
+        integer(7)operator(:) ident(z) operator(:=) ident(HexOfByteA)operator(()ident(Data)operator(,) integer(4)operator(\))operator(;)
       reserved(end)operator(;)
     reserved(end)operator(;)
 
-    ident(Result) operator(:=) ident(Copy)operator(()ident(z)operator(,) integer(1)operator(,) ident(MaxPreviewLen)operator(\);)
+    ident(Result) operator(:=) ident(Copy)operator(()ident(z)operator(,) integer(1)operator(,) ident(MaxPreviewLen)operator(\))operator(;)
   reserved(end)operator(;)
 
-  reserved(function) ident(StringPreview)operator(()ident(Context)operator(:) ident(TRegContext)operator(\):) reserved(string)operator(;)
+  reserved(function) ident(StringPreview)operator(()ident(Context)operator(:) ident(TRegContext)operator(\))operator(:) reserved(string)operator(;)
   reserved(var)
     ident(s)operator(:) reserved(string)operator(;)
     ident(Expanded)operator(:) reserved(string)operator(;)
     ident(DoExpand)operator(:) ident(Boolean)operator(;)
   reserved(begin)
-    ident(s) operator(:=) ident(PChar)operator(()ident(Context)operator(.)ident(Data)operator(\);)
+    ident(s) operator(:=) ident(PChar)operator(()ident(Context)operator(.)ident(Data)operator(\))operator(;)
     reserved(with) ident(PrefWin) reserved(do)
       ident(Result) operator(:=) ident(StringQuoterBegin) operator(+) ident(FriendlyStr)operator(()ident(s)operator(\)) operator(+) ident(StringQuoterEnd)operator(;)
     reserved(if) ident(s) operator(=) string<delimiter(')delimiter(')> reserved(then)
@@ -7976,30 +7976,30 @@ reserved(function) ident(DataPreviewOfContext)operator(()ident(Context)operator(
 
     reserved(case) ident(PrefWin)operator(.)ident(ExpandStringsRG)operator(.)ident(ItemIndex) reserved(of)
       integer(0)operator(:) ident(DoExpand) operator(:=) ident(False)operator(;)
-      integer(1)operator(:) ident(DoExpand) operator(:=) operator(()ident(Context)operator(.)ident(Typ) operator(=) ident(rdExpandString)operator(\)) reserved(and) operator(()ident(CharCount)operator(()ident(s)operator(,) char<delimiter(')content(%)delimiter(')>operator(\)) operator(>=) integer(2)operator(\);)
+      integer(1)operator(:) ident(DoExpand) operator(:=) operator(()ident(Context)operator(.)ident(Typ) operator(=) ident(rdExpandString)operator(\)) reserved(and) operator(()ident(CharCount)operator(()ident(s)operator(,) char<delimiter(')content(%)delimiter(')>operator(\)) operator(>=) integer(2)operator(\))operator(;)
       integer(2)operator(:) ident(DoExpand) operator(:=) ident(True)operator(;)
     reserved(else)
-      ident(ShowMessage)operator(()string<delimiter(')content(Error: Unknown PrefWin.ExpandStringsRG.ItemIndex!)delimiter(')>operator(\);)
+      ident(ShowMessage)operator(()string<delimiter(')content(Error: Unknown PrefWin.ExpandStringsRG.ItemIndex!)delimiter(')>operator(\))operator(;)
       ident(PrefWin)operator(.)ident(ExpandStringsRG)operator(.)ident(ItemIndex) operator(:=) integer(0)operator(;)
       ident(Exit)operator(;)
     reserved(end)operator(;)
 
     reserved(if) ident(DoExpand) reserved(then) reserved(begin)
-      ident(Expanded) operator(:=) ident(ExpandString)operator(()ident(s)operator(\);)
+      ident(Expanded) operator(:=) ident(ExpandString)operator(()ident(s)operator(\))operator(;)
       reserved(if) ident(s) operator(<>) ident(Expanded) reserved(then)
         ident(Result) operator(:=) ident(Result) operator(+) string<delimiter(')content(   <)delimiter(')> operator(+) ident(Expanded) operator(+) char<delimiter(')content(>)delimiter(')>operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 
-  reserved(function) ident(IntegerPreview)operator(()ident(Context)operator(:) ident(TRegContext)operator(\):) reserved(string)operator(;)
+  reserved(function) ident(IntegerPreview)operator(()ident(Context)operator(:) ident(TRegContext)operator(\))operator(:) reserved(string)operator(;)
   reserved(begin)
     reserved(if) ident(Length)operator(()ident(Context)operator(.)ident(Data)operator(\)) operator(>=) ident(SizeOf)operator(()ident(Cardinal)operator(\)) reserved(then) reserved(begin)
-      ident(Result) operator(:=) ident(DWORDPreview)operator(()ident(PInteger)operator(()ident(Context)operator(.)ident(Data)operator(\)^\);)
+      ident(Result) operator(:=) ident(DWORDPreview)operator(()ident(PInteger)operator(()ident(Context)operator(.)ident(Data)operator(\))operator(^)operator(\))operator(;)
     reserved(end) reserved(else)
-      ident(Result) operator(:=) ident(BinaryPreview)operator(()ident(Context)operator(\);)
+      ident(Result) operator(:=) ident(BinaryPreview)operator(()ident(Context)operator(\))operator(;)
   reserved(end)operator(;)
 
-  reserved(function) ident(MultiStringPreview)operator(()ident(Context)operator(:) ident(TRegContext)operator(\):) reserved(string)operator(;)
+  reserved(function) ident(MultiStringPreview)operator(()ident(Context)operator(:) ident(TRegContext)operator(\))operator(:) reserved(string)operator(;)
   reserved(var)
     ident(z)operator(:) reserved(string)operator(;)
     ident(SL)operator(:) ident(TStringList)operator(;)
@@ -8009,7 +8009,7 @@ reserved(function) ident(DataPreviewOfContext)operator(()ident(Context)operator(
 
     ident(SL) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
     reserved(try)
-      ident(RegMultiStringOfByteA)operator(()ident(Context)operator(.)ident(Data)operator(,) ident(SL)operator(,) ident(PrefWin)operator(.)ident(UseExtendedModelCB)operator(.)ident(Checked)operator(\);)
+      ident(RegMultiStringOfByteA)operator(()ident(Context)operator(.)ident(Data)operator(,) ident(SL)operator(,) ident(PrefWin)operator(.)ident(UseExtendedModelCB)operator(.)ident(Checked)operator(\))operator(;)
 
       reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do)
         ident(z) operator(:=) ident(z) operator(+) ident(SL)operator([)ident(i)operator(]) operator(+) string<delimiter(')content(   )delimiter(')>operator(;)
@@ -8017,7 +8017,7 @@ reserved(function) ident(DataPreviewOfContext)operator(()ident(Context)operator(
       ident(SL)operator(.)ident(Free)operator(;)
     reserved(end)operator(;)
 
-    ident(Result) operator(:=) ident(Copy)operator(()ident(FriendlyStr)operator(()ident(z)operator(\),) integer(1)operator(,) ident(MaxPreviewLen)operator(\);)
+    ident(Result) operator(:=) ident(Copy)operator(()ident(FriendlyStr)operator(()ident(z)operator(\))operator(,) integer(1)operator(,) ident(MaxPreviewLen)operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
@@ -8030,30 +8030,30 @@ reserved(begin)
     ident(Exit)operator(;)
 
   reserved(if) ident(Length)operator(()ident(Context)operator(.)ident(Data)operator(\)) operator(>) ident(MaxPreviewLen) reserved(then)
-    ident(SetLength)operator(()ident(Context)operator(.)ident(Data)operator(,) ident(MaxPreviewLen)operator(\);)
+    ident(SetLength)operator(()ident(Context)operator(.)ident(Data)operator(,) ident(MaxPreviewLen)operator(\))operator(;)
 
   reserved(if) ident(PrefWin)operator(.)ident(ShowAsBinaryCB)operator(.)ident(Checked) reserved(then) reserved(begin)
-    ident(Result) operator(:=) ident(BinaryPreview)operator(()ident(Context)operator(\);)
+    ident(Result) operator(:=) ident(BinaryPreview)operator(()ident(Context)operator(\))operator(;)
   ident(Exit)operator(;) reserved(end)operator(;)
 
   reserved(case) ident(Context)operator(.)ident(Typ) reserved(of)
-    ident(rdExpandString)operator(,) ident(rdString)operator(:) ident(Result) operator(:=) ident(StringPreview)operator(()ident(Context)operator(\);)
-    ident(rdCardinal)operator(,) ident(rdCardBigEndian)operator(:) ident(Result) operator(:=) ident(IntegerPreview)operator(()ident(Context)operator(\);)
-    ident(rdMultiString)operator(:) ident(Result) operator(:=) ident(MultiStringPreview)operator(()ident(Context)operator(\);)
+    ident(rdExpandString)operator(,) ident(rdString)operator(:) ident(Result) operator(:=) ident(StringPreview)operator(()ident(Context)operator(\))operator(;)
+    ident(rdCardinal)operator(,) ident(rdCardBigEndian)operator(:) ident(Result) operator(:=) ident(IntegerPreview)operator(()ident(Context)operator(\))operator(;)
+    ident(rdMultiString)operator(:) ident(Result) operator(:=) ident(MultiStringPreview)operator(()ident(Context)operator(\))operator(;)
   reserved(else)
     reserved(if) ident(PrefWin)operator(.)ident(Smart4BBCB)operator(.)ident(Checked) reserved(and) operator(()ident(Length)operator(()ident(Context)operator(.)ident(Data)operator(\)) operator(=) integer(4)operator(\)) reserved(then)
       ident(Result) operator(:=) ident(IntegerPreview)operator(()ident(Context)operator(\))
     reserved(else)
-      ident(Result) operator(:=) ident(BinaryPreview)operator(()ident(Context)operator(\);)
+      ident(Result) operator(:=) ident(BinaryPreview)operator(()ident(Context)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ValueDataPreview)operator(()ident(Context)operator(:) ident(TRegContext)operator(\):) reserved(string)operator(;)
+reserved(function) ident(ValueDataPreview)operator(()ident(Context)operator(:) ident(TRegContext)operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(DataPreviewOfContext)operator(()ident(Context)operator(\);)
+  ident(Result) operator(:=) ident(DataPreviewOfContext)operator(()ident(Context)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(IconOfDataType)operator(()ident(Typ)operator(:) ident(TRegDataType)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(IconOfDataType)operator(()ident(Typ)operator(:) ident(TRegDataType)operator(\))operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(if) ident(Typ) reserved(in) operator([)ident(rdNone)operator(..)ident(rdLastType)operator(]) reserved(then)
     ident(Result) operator(:=) ident(iconFirstType) operator(+) ident(Ord)operator(()ident(Typ)operator(\))
@@ -8061,12 +8061,12 @@ reserved(begin)
     ident(Result) operator(:=) ident(iconUnknownType)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ValueTypeIcon)operator(()ident(Context)operator(:) ident(TRegContext)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(ValueTypeIcon)operator(()ident(Context)operator(:) ident(TRegContext)operator(\))operator(:) ident(Integer)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(IconOfDataType)operator(()ident(Context)operator(.)ident(Typ)operator(\);)
+  ident(Result) operator(:=) ident(IconOfDataType)operator(()ident(Context)operator(.)ident(Typ)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(TValuesWin)operator(.)ident(UpdateValue)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) ident(Item)operator(:) ident(TListItem)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(TValuesWin)operator(.)ident(UpdateValue)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) ident(Item)operator(:) ident(TListItem)operator(\))operator(:) ident(Boolean)operator(;)
 comment(//Return Value: True if something has changed)
 reserved(var)
   ident(Size)operator(,) ident(Typ)operator(,) ident(Data)operator(:) reserved(string)operator(;)
@@ -8077,65 +8077,65 @@ reserved(begin)
   reserved(if) reserved(not) ident(Assigned)operator(()ident(Item)operator(\)) reserved(then)
     ident(Exit)operator(;)
 
-  ident(Context) operator(:=) ident(Reg)operator(.)ident(ReadContext)operator(()ident(RealValueName)operator(()ident(Item)operator(\)\);)
-  ident(Data) operator(:=) ident(ValueDataPreview)operator(()ident(Context)operator(\);)
-  ident(Size) operator(:=) ident(ValueDataSize)operator(()ident(Context)operator(\);)
-  ident(Typ) operator(:=) ident(ValueDataType)operator(()ident(Context)operator(\);)
-  ident(Icon) operator(:=) ident(ValueTypeIcon)operator(()ident(Context)operator(\);)
+  ident(Context) operator(:=) ident(Reg)operator(.)ident(ReadContext)operator(()ident(RealValueName)operator(()ident(Item)operator(\))operator(\))operator(;)
+  ident(Data) operator(:=) ident(ValueDataPreview)operator(()ident(Context)operator(\))operator(;)
+  ident(Size) operator(:=) ident(ValueDataSize)operator(()ident(Context)operator(\))operator(;)
+  ident(Typ) operator(:=) ident(ValueDataType)operator(()ident(Context)operator(\))operator(;)
+  ident(Icon) operator(:=) ident(ValueTypeIcon)operator(()ident(Context)operator(\))operator(;)
 
   reserved(if) ident(Icon) operator(<>) ident(Item)operator(.)ident(ImageIndex) reserved(then) reserved(begin)
     ident(Item)operator(.)ident(ImageIndex) operator(:=) ident(Icon)operator(;)
     ident(Result) operator(:=) ident(True)operator(;)
   reserved(end)operator(;)
 
-  reserved(while) ident(Item)operator(.)ident(SubItems)operator(.)ident(Count) operator(<) ident(Integer)operator(()ident(High)operator(()ident(TValueListColumn)operator(\)\)) reserved(do)
-    ident(Item)operator(.)ident(SubItems)operator(.)ident(Add)operator(()string<delimiter(')delimiter(')>operator(\);)
+  reserved(while) ident(Item)operator(.)ident(SubItems)operator(.)ident(Count) operator(<) ident(Integer)operator(()ident(High)operator(()ident(TValueListColumn)operator(\))operator(\)) reserved(do)
+    ident(Item)operator(.)ident(SubItems)operator(.)ident(Add)operator(()string<delimiter(')delimiter(')>operator(\))operator(;)
 
-  reserved(if) ident(Size) operator(<>) ident(Item)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcSize)operator(]]) reserved(then) reserved(begin)
+  reserved(if) ident(Size) operator(<>) ident(Item)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcSize)operator(])operator(]) reserved(then) reserved(begin)
     ident(Result) operator(:=) ident(True)operator(;)
-    ident(Item)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcSize)operator(]]) operator(:=) ident(Size)operator(;)
+    ident(Item)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcSize)operator(])operator(]) operator(:=) ident(Size)operator(;)
   reserved(end)operator(;)
 
-  reserved(if) ident(Typ) operator(<>) ident(Item)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcType)operator(]]) reserved(then) reserved(begin)
+  reserved(if) ident(Typ) operator(<>) ident(Item)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcType)operator(])operator(]) reserved(then) reserved(begin)
     ident(Result) operator(:=) ident(True)operator(;)
-    ident(Item)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcType)operator(]]) operator(:=) ident(Typ)operator(;)
+    ident(Item)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcType)operator(])operator(]) operator(:=) ident(Typ)operator(;)
   reserved(end)operator(;)
 
-  reserved(if) operator(()ident(Data) operator(<>) ident(Item)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcData)operator(]]\)) reserved(then) reserved(begin)
+  reserved(if) operator(()ident(Data) operator(<>) ident(Item)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcData)operator(])operator(])operator(\)) reserved(then) reserved(begin)
     ident(Result) operator(:=) ident(True)operator(;)
-    ident(Item)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcData)operator(]]) operator(:=) ident(Data)operator(;)
+    ident(Item)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcData)operator(])operator(]) operator(:=) ident(Data)operator(;)
     reserved(if) ident(IsMainValue)operator(()ident(Item)operator(\)) reserved(then)
       ident(RegTV)operator(.)ident(Repaint)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(AppendNewValueInfos)operator(()ident(Item)operator(:) ident(TListItem)operator(;) ident(Context)operator(:) ident(TRegContext)operator(\);)
+reserved(procedure) ident(AppendNewValueInfos)operator(()ident(Item)operator(:) ident(TListItem)operator(;) ident(Context)operator(:) ident(TRegContext)operator(\))operator(;)
 reserved(begin)
-  ident(Item)operator(.)ident(ImageIndex) operator(:=) ident(ValueTypeIcon)operator(()ident(Context)operator(\);)
+  ident(Item)operator(.)ident(ImageIndex) operator(:=) ident(ValueTypeIcon)operator(()ident(Context)operator(\))operator(;)
   reserved(with) ident(Item)operator(.)ident(SubItems) reserved(do) reserved(begin)
-    ident(Append)operator(()ident(ValueDataSize)operator(()ident(Context)operator(\)\);)
-    ident(Append)operator(()ident(ValueDataType)operator(()ident(Context)operator(\)\);)
-    ident(Append)operator(()ident(ValueDataPreview)operator(()ident(Context)operator(\)\);)
+    ident(Append)operator(()ident(ValueDataSize)operator(()ident(Context)operator(\))operator(\))operator(;)
+    ident(Append)operator(()ident(ValueDataType)operator(()ident(Context)operator(\))operator(\))operator(;)
+    ident(Append)operator(()ident(ValueDataPreview)operator(()ident(Context)operator(\))operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(TValuesWin)operator(.)ident(AddValue)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) reserved(const) ident(ValueName)operator(:) reserved(string)operator(;)
-  ident(AppendInfos)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) ident(TListItem)operator(;)
+  ident(AppendInfos)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) ident(TListItem)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(ValueList)operator(.)ident(Items)operator(.)ident(AddItem)operator(()reserved(nil)operator(,) operator(-)integer(1)operator(\);)
+  ident(Result) operator(:=) ident(ValueList)operator(.)ident(Items)operator(.)ident(AddItem)operator(()reserved(nil)operator(,) operator(-)integer(1)operator(\))operator(;)
   ident(Result)operator(.)ident(Indent) operator(:=) operator(-)integer(1)operator(;)
-  ident(SetRealValueName)operator(()ident(Result)operator(,) ident(ValueName)operator(\);)
+  ident(SetRealValueName)operator(()ident(Result)operator(,) ident(ValueName)operator(\))operator(;)
   reserved(if) ident(AppendInfos) reserved(then)
-    ident(AppendNewValueInfos)operator(()ident(Result)operator(,) ident(Reg)operator(.)ident(ReadContext)operator(()ident(ValueName)operator(\)\);)
+    ident(AppendNewValueInfos)operator(()ident(Result)operator(,) ident(Reg)operator(.)ident(ReadContext)operator(()ident(ValueName)operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListChange)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item)operator(:) ident(TListItem)operator(;)
-  ident(Change)operator(:) ident(TItemChange)operator(\);)
+  ident(Change)operator(:) ident(TItemChange)operator(\))operator(;)
 reserved(var)
   ident(ValueName)operator(:) reserved(string)operator(;)
   ident(Reg)operator(:) ident(TXRegistry)operator(;)
 
-  reserved(function) ident(ComputeValuesCommon)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) reserved(var) ident(DataType)operator(:) ident(TRegDataType)operator(\):) ident(Boolean)operator(;)
+  reserved(function) ident(ComputeValuesCommon)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) reserved(var) ident(DataType)operator(:) ident(TRegDataType)operator(\))operator(:) ident(Boolean)operator(;)
   reserved(var)
     ident(i)operator(:) ident(Integer)operator(;)
     ident(ItemType)operator(:) ident(TRegDataType)operator(;)
@@ -8145,15 +8145,15 @@ reserved(var)
     ident(i) operator(:=) integer(0)operator(;)
     ident(DataType) operator(:=) integer(0)operator(;)
     reserved(while) ident(i) operator(<) ident(ValueList)operator(.)ident(Items)operator(.)ident(Count) reserved(do) reserved(begin)
-      ident(Item) operator(:=) ident(ValueList)operator(.)ident(Items)operator([)ident(i)operator(];)
+      ident(Item) operator(:=) ident(ValueList)operator(.)ident(Items)operator([)ident(i)operator(])operator(;)
       reserved(if) reserved(not) ident(Item)operator(.)ident(Selected) reserved(then) reserved(begin)
-        ident(Inc)operator(()ident(i)operator(\);)
+        ident(Inc)operator(()ident(i)operator(\))operator(;)
       ident(Continue)operator(;) reserved(end)operator(;)
 
-      ident(ValueName) operator(:=) ident(RealValueName)operator(()ident(Item)operator(\);)
+      ident(ValueName) operator(:=) ident(RealValueName)operator(()ident(Item)operator(\))operator(;)
       reserved(if) ident(Reg)operator(.)ident(ValueReallyExists)operator(()ident(ValueName)operator(\)) reserved(then) reserved(begin)
 
-        ident(ItemType) operator(:=) ident(Reg)operator(.)ident(GetDataType)operator(()ident(ValueName)operator(\);)
+        ident(ItemType) operator(:=) ident(Reg)operator(.)ident(GetDataType)operator(()ident(ValueName)operator(\))operator(;)
         reserved(if) reserved(not) ident(Result) reserved(then) reserved(begin)
           ident(DataType) operator(:=) ident(ItemType)operator(;)
           ident(Result) operator(:=) ident(True)operator(;)
@@ -8166,16 +8166,16 @@ reserved(var)
           reserved(if) ident(Item)operator(.)ident(Focused) reserved(then)
             ident(Insert)operator(()integer(0)operator(,) ident(ValueName)operator(\))
           reserved(else)
-            ident(Add)operator(()ident(ValueName)operator(\);)
+            ident(Add)operator(()ident(ValueName)operator(\))operator(;)
 
       reserved(end) reserved(else) reserved(begin)
-        ident(ShowMessage)operator(()string<delimiter(')content(Value has been deleted!)delimiter(')>operator(\);)
+        ident(ShowMessage)operator(()string<delimiter(')content(Value has been deleted!)delimiter(')>operator(\))operator(;)
         ident(DataType) operator(:=) integer(0)operator(;)
         ident(Result) operator(:=) ident(False)operator(;)
         ident(Reload)operator(;)
       ident(Break)operator(;) reserved(end)operator(;)
 
-      ident(Inc)operator(()ident(i)operator(\);)
+      ident(Inc)operator(()ident(i)operator(\))operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 
@@ -8203,9 +8203,9 @@ reserved(begin)
   ident(Reg) operator(:=) ident(TXRegistry)operator(.)ident(Create)operator(;)
   reserved(try)
     reserved(if) ident(OpenNodeOK)operator(()ident(Reg)operator(,) ident(RegTV)operator(.)ident(Selected)operator(\)) reserved(then) reserved(begin)
-      ident(ValuesCommon) operator(:=) ident(ComputeValuesCommon)operator(()ident(Reg)operator(,) ident(ValueCommonType)operator(\);)
+      ident(ValuesCommon) operator(:=) ident(ComputeValuesCommon)operator(()ident(Reg)operator(,) ident(ValueCommonType)operator(\))operator(;)
       reserved(if) ident(ValuesCommon) reserved(then)
-        ident(WorkWin)operator(.)ident(ShowValues)operator(()ident(Reg)operator(\);)
+        ident(WorkWin)operator(.)ident(ShowValues)operator(()ident(Reg)operator(\))operator(;)
     reserved(end)operator(;)
   reserved(finally)
     ident(Reg)operator(.)ident(Free)operator(;)
@@ -8219,21 +8219,21 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListCustomDrawItem)operator(()ident(Sender)operator(:) ident(TCustomListView)operator(;)
-  ident(Item)operator(:) ident(TListItem)operator(;) ident(State)operator(:) ident(TCustomDrawState)operator(;) reserved(var) ident(DefaultDraw)operator(:) ident(Boolean)operator(\);)
+  ident(Item)operator(:) ident(TListItem)operator(;) ident(State)operator(:) ident(TCustomDrawState)operator(;) reserved(var) ident(DefaultDraw)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(ValueList)operator(.)ident(Canvas)operator(.)ident(Font) reserved(do) reserved(begin)
     reserved(if) ident(Item)operator(.)ident(Focused) reserved(then)
-      ident(Style) operator(:=) ident(Style) operator(+) operator([)ident(fsBold)operator(];)
+      ident(Style) operator(:=) ident(Style) operator(+) operator([)ident(fsBold)operator(])operator(;)
     reserved(if) ident(ItemIsDefaultValue)operator(()ident(Item)operator(\)) reserved(then)
       ident(Color) operator(:=) ident(clBrightYellow)
     reserved(else)
-      ident(Color) operator(:=) ident(ColorOfDataType)operator(()ident(TRegDataType)operator(()ident(Item)operator(.)ident(ImageIndex) operator(-) ident(iconFirstType)operator(\)\);)
+      ident(Color) operator(:=) ident(ColorOfDataType)operator(()ident(TRegDataType)operator(()ident(Item)operator(.)ident(ImageIndex) operator(-) ident(iconFirstType)operator(\))operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(ValueListChange)operator(()ident(Sender)operator(,) ident(ValueList)operator(.)ident(ItemFocused)operator(,) ident(ctState)operator(\);)
+  ident(ValueListChange)operator(()ident(Sender)operator(,) ident(ValueList)operator(.)ident(ItemFocused)operator(,) ident(ctState)operator(\))operator(;)
   ident(MainPC)operator(.)ident(ActivePage) operator(:=) ident(WorkWin)operator(.)ident(WorkPage)operator(;)
 
   reserved(if) reserved(not) ident(Assigned)operator(()ident(ValueList)operator(.)ident(ItemFocused)operator(\)) reserved(then)
@@ -8246,24 +8246,24 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListEditing)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item)operator(:) ident(TListItem)operator(;)
-  reserved(var) ident(AllowEdit)operator(:) ident(Boolean)operator(\);)
+  reserved(var) ident(AllowEdit)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(begin)
   reserved(if) reserved(not) ident(ValueLabelClicked) reserved(then) reserved(begin)
     ident(AllowEdit) operator(:=) ident(False)operator(;)
   ident(Exit)operator(;) reserved(end)operator(;)
 
   reserved(if) ident(ItemIsDefaultValue)operator(()ident(Item)operator(\)) reserved(then) comment(//unschön, aber beste Lösung bisher)
-    ident(Keyboard)operator(.)ident(SimKey)operator(()ident(VK_DELETE)operator(\);)
+    ident(Keyboard)operator(.)ident(SimKey)operator(()ident(VK_DELETE)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListEdited)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item)operator(:) ident(TListItem)operator(;)
-  reserved(var) ident(S)operator(:) reserved(string)operator(\);)
+  reserved(var) ident(S)operator(:) reserved(string)operator(\))operator(;)
 reserved(var)
   ident(Old)operator(:) reserved(string)operator(;)
   ident(OldCaption)operator(:) reserved(string)operator(;)
 reserved(begin)
   ident(OldCaption) operator(:=) ident(Item)operator(.)ident(Caption)operator(;)
-  ident(Old) operator(:=) ident(RealValueName)operator(()ident(Item)operator(\);)
+  ident(Old) operator(:=) ident(RealValueName)operator(()ident(Item)operator(\))operator(;)
 
   reserved(if) ident(s) operator(=) ident(Old) reserved(then) reserved(begin)
     reserved(if) ident(ItemIsDefaultValue)operator(()ident(Item)operator(\)) reserved(then)
@@ -8275,7 +8275,7 @@ reserved(begin)
     ident(Item)operator(.)ident(Caption) operator(:=) ident(s)operator(;)
 
     reserved(if) ident(TryRenameValue)operator(()ident(Old)operator(,) ident(s)operator(\)) reserved(then) reserved(begin)
-      ident(SetRealValueName)operator(()ident(Item)operator(,) ident(s)operator(\);) comment(//Sichere Zuweisung des Standard-Flags)
+      ident(SetRealValueName)operator(()ident(Item)operator(,) ident(s)operator(\))operator(;) comment(//Sichere Zuweisung des Standard-Flags)
       ident(s) operator(:=) ident(Item)operator(.)ident(Caption)operator(;) comment(//Anschließend externer Aufruf "Item.Caption := s"!)
     reserved(end) reserved(else) reserved(begin)
       ident(s) operator(:=) ident(OldCaption)operator(;)
@@ -8288,7 +8288,7 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(var)
   ident(T)operator(:) reserved(string)operator(;)
   ident(Item)operator(:) ident(TListItem)operator(;)
@@ -8302,40 +8302,40 @@ reserved(begin)
   ident(Item) operator(:=) ident(ValueList)operator(.)ident(ItemFocused)operator(;)
 
   reserved(case) ident(Key) reserved(of)
-    ident(VK_SPACE)operator(:) ident(JumpToSel)operator(()ident(ValueList)operator(\);)
+    ident(VK_SPACE)operator(:) ident(JumpToSel)operator(()ident(ValueList)operator(\))operator(;)
 
-    ident(VK_F9)operator(:) ident(SwapFonts)operator(()ident(ValueList)operator(\);)
+    ident(VK_F9)operator(:) ident(SwapFonts)operator(()ident(ValueList)operator(\))operator(;)
 
     ident(VK_F5)operator(:) ident(Reload)operator(;)
 
     ident(VK_F12)operator(:) reserved(begin) comment(//Sort)
         reserved(if) ident(Assigned)operator(()ident(Item)operator(\)) reserved(then)
           ident(T) operator(:=) ident(Item)operator(.)ident(Caption)operator(;)
-        ident(ValueList)operator(.)ident(SortType) operator(:=) ident(TSortType)operator(()integer(2) operator(-) operator(()ident(Integer)operator(()ident(ValueList)operator(.)ident(SortType)operator(\)\)\);)
+        ident(ValueList)operator(.)ident(SortType) operator(:=) ident(TSortType)operator(()integer(2) operator(-) operator(()ident(Integer)operator(()ident(ValueList)operator(.)ident(SortType)operator(\))operator(\))operator(\))operator(;)
         reserved(if) ident(ValueList)operator(.)ident(SortType) operator(=) ident(stNone) reserved(then)
-          ident(TreeWin)operator(.)ident(RegTVChange)operator(()ident(Sender)operator(,) ident(RegTV)operator(.)ident(Selected)operator(\);)
-        ident(ValueList)operator(.)ident(ItemFocused) operator(:=) ident(FindItem)operator(()ident(ValueList)operator(,) ident(T)operator(\);)
+          ident(TreeWin)operator(.)ident(RegTVChange)operator(()ident(Sender)operator(,) ident(RegTV)operator(.)ident(Selected)operator(\))operator(;)
+        ident(ValueList)operator(.)ident(ItemFocused) operator(:=) ident(FindItem)operator(()ident(ValueList)operator(,) ident(T)operator(\))operator(;)
         reserved(if) ident(Assigned)operator(()ident(ValueList)operator(.)ident(ItemFocused)operator(\)) reserved(then)
-          ident(ValueList)operator(.)ident(ItemFocused)operator(.)ident(MakeVisible)operator(()ident(True)operator(\);)
+          ident(ValueList)operator(.)ident(ItemFocused)operator(.)ident(MakeVisible)operator(()ident(True)operator(\))operator(;)
       reserved(end)operator(;)
 
-    ident(VK_DELETE)operator(:) ident(DeleteMIClick)operator(()ident(Sender)operator(\);)
+    ident(VK_DELETE)operator(:) ident(DeleteMIClick)operator(()ident(Sender)operator(\))operator(;)
 
-    ident(VK_RETURN)operator(:) ident(ValueListDblCLick)operator(()ident(Sender)operator(\);)
+    ident(VK_RETURN)operator(:) ident(ValueListDblCLick)operator(()ident(Sender)operator(\))operator(;)
 
-    ident(Ord)operator(()char<delimiter(')content(C)delimiter(')>operator(\):)
+    ident(Ord)operator(()char<delimiter(')content(C)delimiter(')>operator(\))operator(:)
       reserved(if) reserved(not) ident(ValueList)operator(.)ident(IsEditing) reserved(then)
-        ident(CopyPathMIClick)operator(()ident(Sender)operator(\);)
+        ident(CopyPathMIClick)operator(()ident(Sender)operator(\))operator(;)
 
     ident(VK_SCROLL)operator(:) ident(CheckValueListHotTrack)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListResize)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListResize)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(ValueList) reserved(do)
-    ident(Columns)operator([)integer(3)operator(].)ident(Width) operator(:=) ident(ClientWidth) operator(-) operator(()integer(0) operator(+)
-      ident(Columns)operator([)integer(0)operator(].)ident(Width) operator(+) ident(Columns)operator([)integer(1)operator(].)ident(Width) operator(+) ident(Columns)operator([)integer(2)operator(].)ident(Width)operator(\);)
+    ident(Columns)operator([)integer(3)operator(])operator(.)ident(Width) operator(:=) ident(ClientWidth) operator(-) operator(()integer(0) operator(+)
+      ident(Columns)operator([)integer(0)operator(])operator(.)ident(Width) operator(+) ident(Columns)operator([)integer(1)operator(])operator(.)ident(Width) operator(+) ident(Columns)operator([)integer(2)operator(])operator(.)ident(Width)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TValuesWin)operator(.)ident(DeleteValue)operator(;)
@@ -8344,15 +8344,15 @@ reserved(var)
   ident(YesToAll)operator(:) ident(Boolean)operator(;)
   ident(i)operator(:) ident(Integer)operator(;)
 
-  reserved(procedure) ident(DeleteIt)operator(()ident(Item)operator(:) ident(TListItem)operator(\);)
+  reserved(procedure) ident(DeleteIt)operator(()ident(Item)operator(:) ident(TListItem)operator(\))operator(;)
   reserved(begin)
     ident(OpenCurKey)operator(;)
-    reserved(if) ident(MainReg)operator(.)ident(DeleteValue)operator(()ident(RealValueName)operator(()ident(Item)operator(\)\))
-     reserved(and) reserved(not) ident(MainReg)operator(.)ident(ValueReallyExists)operator(()ident(RealValueName)operator(()ident(Item)operator(\)\)) reserved(then) reserved(begin)
+    reserved(if) ident(MainReg)operator(.)ident(DeleteValue)operator(()ident(RealValueName)operator(()ident(Item)operator(\))operator(\))
+     reserved(and) reserved(not) ident(MainReg)operator(.)ident(ValueReallyExists)operator(()ident(RealValueName)operator(()ident(Item)operator(\))operator(\)) reserved(then) reserved(begin)
       ident(Item)operator(.)ident(Delete)operator(;)
     reserved(end) reserved(else) reserved(begin)
-      ident(ShowMessage)operator(()string<delimiter(')content(Could not delete Value )delimiter(')> operator(+) ident(Quote)operator(()ident(RealValueName)operator(()ident(Item)operator(\)\)\);)
-      ident(Inc)operator(()ident(i)operator(\);)
+      ident(ShowMessage)operator(()string<delimiter(')content(Could not delete Value )delimiter(')> operator(+) ident(Quote)operator(()ident(RealValueName)operator(()ident(Item)operator(\))operator(\))operator(\))operator(;)
+      ident(Inc)operator(()ident(i)operator(\))operator(;)
     reserved(end)operator(;)
     ident(MainReg)operator(.)ident(CloseKey)operator(;)
 
@@ -8363,23 +8363,23 @@ reserved(var)
 reserved(begin)
   ident(SpyThread)operator(.)ident(Suspend)operator(;)
 
-  ident(NewSel) operator(:=) ident(GetNextBestNotSelected)operator(()ident(ValueList)operator(.)ident(ItemFocused)operator(\);)
+  ident(NewSel) operator(:=) ident(GetNextBestNotSelected)operator(()ident(ValueList)operator(.)ident(ItemFocused)operator(\))operator(;)
 
   ident(YesToAll) operator(:=) ident(False)operator(;)
   ident(i) operator(:=) integer(0)operator(;)
   reserved(while) ident(i) operator(<) ident(ValueList)operator(.)ident(Items)operator(.)ident(Count) reserved(do) reserved(begin)
-    ident(Item) operator(:=) ident(ValueList)operator(.)ident(Items)operator([)ident(i)operator(];)
+    ident(Item) operator(:=) ident(ValueList)operator(.)ident(Items)operator([)ident(i)operator(])operator(;)
     reserved(if) reserved(not) ident(Item)operator(.)ident(Selected) reserved(then) reserved(begin)
-      ident(Inc)operator(()ident(i)operator(\);)
+      ident(Inc)operator(()ident(i)operator(\))operator(;)
     ident(Continue)operator(;) reserved(end)operator(;)
 
     reserved(if) ident(YesToAll) reserved(then)
       ident(DeleteIt)operator(()ident(Item)operator(\))
     reserved(else) reserved(begin)
       reserved(case) ident(MessageDlg)operator(()string<delimiter(')content(Do you really want to delete the Value )delimiter(')> operator(+)
-        ident(Quote)operator(()ident(RealValueName)operator(()ident(Item)operator(\)\)) operator(+) char<delimiter(')content(?)delimiter(')>operator(,)
-           ident(mtConfirmation)operator(,) operator([)ident(mbYes)operator(,) ident(mbYesToAll)operator(,) ident(mbNo)operator(,) ident(mbCancel)operator(],) integer(0)operator(\)) reserved(of)
-        ident(mrYes)operator(:) ident(DeleteIt)operator(()ident(Item)operator(\);)
+        ident(Quote)operator(()ident(RealValueName)operator(()ident(Item)operator(\))operator(\)) operator(+) char<delimiter(')content(?)delimiter(')>operator(,)
+           ident(mtConfirmation)operator(,) operator([)ident(mbYes)operator(,) ident(mbYesToAll)operator(,) ident(mbNo)operator(,) ident(mbCancel)operator(])operator(,) integer(0)operator(\)) reserved(of)
+        ident(mrYes)operator(:) ident(DeleteIt)operator(()ident(Item)operator(\))operator(;)
         ident(mrYesToAll)operator(:) ident(YesToAll) operator(:=) ident(True)operator(;)
         ident(mrCancel)operator(:) ident(Exit)operator(;)
         ident(mrNo)operator(:) reserved(begin)
@@ -8406,12 +8406,12 @@ reserved(var)
   ident(YesToAll)operator(:) ident(Boolean)operator(;)
   ident(i)operator(:) ident(Integer)operator(;)
 
-  reserved(procedure) ident(ZeromizeIt)operator(()ident(Item)operator(:) ident(TListItem)operator(\);)
+  reserved(procedure) ident(ZeromizeIt)operator(()ident(Item)operator(:) ident(TListItem)operator(\))operator(;)
   reserved(begin)
     reserved(with) ident(MainReg) reserved(do) reserved(begin)
       ident(OpenCurKey)operator(;)
-      ident(ZeromizeValue)operator(()ident(RealValueName)operator(()ident(Item)operator(\)\);)
-      ident(UpdateValue)operator(()ident(MainReg)operator(,) ident(Item)operator(\);)
+      ident(ZeromizeValue)operator(()ident(RealValueName)operator(()ident(Item)operator(\))operator(\))operator(;)
+      ident(UpdateValue)operator(()ident(MainReg)operator(,) ident(Item)operator(\))operator(;)
       ident(CloseKey)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
@@ -8422,26 +8422,26 @@ reserved(begin)
   ident(YesToAll) operator(:=) ident(False)operator(;)
   ident(i) operator(:=) integer(0)operator(;)
   reserved(while) ident(i) operator(<) ident(ValueList)operator(.)ident(Items)operator(.)ident(Count) reserved(do) reserved(begin)
-    ident(Item) operator(:=) ident(ValueList)operator(.)ident(Items)operator([)ident(i)operator(];)
+    ident(Item) operator(:=) ident(ValueList)operator(.)ident(Items)operator([)ident(i)operator(])operator(;)
     reserved(if) reserved(not) ident(Item)operator(.)ident(Selected) reserved(then) reserved(begin)
-      ident(Inc)operator(()ident(i)operator(\);)
+      ident(Inc)operator(()ident(i)operator(\))operator(;)
     ident(Continue)operator(;) reserved(end)operator(;)
 
     reserved(if) ident(YesToAll) reserved(then)
       ident(ZeromizeIt)operator(()ident(Item)operator(\))
     reserved(else)
       reserved(case) ident(MessageDlg)operator(()string<delimiter(')content(Do you really want to zeromize ValueData of )delimiter(')> operator(+)
-        ident(Quote)operator(()ident(RealValueName)operator(()ident(Item)operator(\)\)) operator(+) string<delimiter(')content( ?)delimiter(')>operator(,)
-        ident(mtConfirmation)operator(,) operator([)ident(mbYes)operator(,) ident(mbYesToAll)operator(,) ident(mbNo)operator(,) ident(mbCancel)operator(],) integer(0)operator(\)) reserved(of)
+        ident(Quote)operator(()ident(RealValueName)operator(()ident(Item)operator(\))operator(\)) operator(+) string<delimiter(')content( ?)delimiter(')>operator(,)
+        ident(mtConfirmation)operator(,) operator([)ident(mbYes)operator(,) ident(mbYesToAll)operator(,) ident(mbNo)operator(,) ident(mbCancel)operator(])operator(,) integer(0)operator(\)) reserved(of)
 
       ident(mrYes)operator(:) reserved(begin)
-        ident(ZeromizeIt)operator(()ident(Item)operator(\);)
-        ident(Inc)operator(()ident(i)operator(\);)
+        ident(ZeromizeIt)operator(()ident(Item)operator(\))operator(;)
+        ident(Inc)operator(()ident(i)operator(\))operator(;)
       reserved(end)operator(;)
 
       ident(mrYesToAll)operator(:) reserved(begin)
                     ident(YesToAll) operator(:=) ident(True)operator(;)
-                    ident(ZeromizeIt)operator(()ident(Item)operator(\);)
+                    ident(ZeromizeIt)operator(()ident(Item)operator(\))operator(;)
                   reserved(end)operator(;)
       ident(mrCancel)operator(:) ident(Exit)operator(;)
       reserved(end)operator(;)
@@ -8454,7 +8454,7 @@ reserved(begin)
   ident(SpyThread)operator(.)ident(Resume)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListPUPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListPUPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(Writable)operator(,) ident(ValueOK)operator(,) ident(OnlyOneValue)operator(,) ident(OneValueOK)operator(:) ident(Boolean)operator(;)
   ident(Item)operator(:) ident(TListItem)operator(;)
@@ -8473,7 +8473,7 @@ reserved(begin)
   ident(NewMultiStringMI)operator(.)ident(Visible) operator(:=) ident(Writable)operator(;)
   ident(NewElseMI)operator(.)ident(Visible) operator(:=) ident(Writable)operator(;)
 
-  ident(ValueOK) operator(:=) ident(Writable) reserved(and) operator(()ident(ValueList)operator(.)ident(ItemFocused) operator(<>) reserved(nil)operator(\);)
+  ident(ValueOK) operator(:=) ident(Writable) reserved(and) operator(()ident(ValueList)operator(.)ident(ItemFocused) operator(<>) reserved(nil)operator(\))operator(;)
   ident(OnlyOneValue) operator(:=) ident(ValueList)operator(.)ident(SelCount) operator(=) integer(1)operator(;)
   ident(OneValueOK) operator(:=) ident(OnlyOneValue) reserved(and) ident(ValueOK)operator(;)
 
@@ -8495,17 +8495,17 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TValuesWin)operator(.)ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(ValueList)operator(.)ident(IsEditing) reserved(then)
     ident(Exit)operator(;)
 
   reserved(if) ident(csDestroying) reserved(in) ident(MainWin)operator(.)ident(ComponentState) reserved(then)
     ident(Exit)operator(;)
-  ident(MainWin)operator(.)ident(FormKeyDown)operator(()ident(Sender)operator(,) ident(Key)operator(,) ident(Shift)operator(\);)
+  ident(MainWin)operator(.)ident(FormKeyDown)operator(()ident(Sender)operator(,) ident(Key)operator(,) ident(Shift)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListDeletion)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item)operator(:) ident(TListItem)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListDeletion)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item)operator(:) ident(TListItem)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Assigned)operator(()ident(SpyThread)operator(\)) reserved(then)
     ident(SpyThread)operator(.)ident(Restart) operator(:=) ident(True)operator(;)
@@ -8515,12 +8515,12 @@ reserved(begin)
 
   reserved(if) ident(Assigned)operator(()ident(ShowPC)operator(.)ident(ActivePage)operator(\))
    reserved(and) ident(Item)operator(.)ident(Selected) reserved(and) ident(Item)operator(.)ident(Focused) reserved(then) reserved(begin)
-    ident(ValueList)operator(.)ident(ItemFocused) operator(:=) ident(GetNextBest)operator(()ident(Item)operator(\);)
+    ident(ValueList)operator(.)ident(ItemFocused) operator(:=) ident(GetNextBest)operator(()ident(Item)operator(\))operator(;)
     ident(WorkWin)operator(.)ident(ReInitShowPC)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(DeleteMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(DeleteMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(ValueList)operator(.)ident(IsEditing) reserved(then)
     ident(Exit)operator(;)
@@ -8528,7 +8528,7 @@ reserved(begin)
   ident(DeleteValue)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(RenameMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(RenameMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Assigned)operator(()ident(ValueList)operator(.)ident(ItemFocused)operator(\)) reserved(then) reserved(begin)
     ident(ValueLabelClicked) operator(:=) ident(True)operator(;)
@@ -8537,27 +8537,27 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(NewBigEndianMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(NewBigEndianMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(CreateValue)operator(()ident(rdCardBigEndian)operator(\);)
+  ident(CreateValue)operator(()ident(rdCardBigEndian)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(NewExpandStringMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(NewExpandStringMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(CreateValue)operator(()ident(rdExpandString)operator(\);)
+  ident(CreateValue)operator(()ident(rdExpandString)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(NewMultiStringMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(NewMultiStringMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(CreateValue)operator(()ident(rdMultiString)operator(\);)
+  ident(CreateValue)operator(()ident(rdMultiString)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(NewStrangeTypeMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(NewStrangeTypeMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(CreateValue)operator(()ident(TRegDataType)operator(()ident(TMenuItem)operator(()ident(Sender)operator(\).)ident(Tag)operator(\)\);)
+  ident(CreateValue)operator(()ident(TRegDataType)operator(()ident(TMenuItem)operator(()ident(Sender)operator(\))operator(.)ident(Tag)operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(NewDefaultValueMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(NewDefaultValueMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(DefaultItem)operator(:) ident(TListItem)operator(;)
   ident(i)operator(:) ident(Integer)operator(;)
@@ -8572,18 +8572,18 @@ reserved(begin)
       ident(OpenCurKey)operator(;)
 
       reserved(if) ident(StandardValueExists) reserved(then) reserved(begin)
-        ident(ShowMessage)operator(()string<delimiter(')content(Default Value already exists.)delimiter(')>operator(\);)
+        ident(ShowMessage)operator(()string<delimiter(')content(Default Value already exists.)delimiter(')>operator(\))operator(;)
         ident(CloseKey)operator(;)
       ident(Exit)operator(;) reserved(end)operator(;)
 
-      ident(WriteString)operator(()string<delimiter(')delimiter(')>operator(,) string<delimiter(')delimiter(')>operator(\);)
+      ident(WriteString)operator(()string<delimiter(')delimiter(')>operator(,) string<delimiter(')delimiter(')>operator(\))operator(;)
 
       reserved(if) reserved(not) ident(StandardValueExists) reserved(then) reserved(begin)
-        ident(ShowMessage)operator(()string<delimiter(')content(Could not create Default Value.)delimiter(')>operator(\);)
+        ident(ShowMessage)operator(()string<delimiter(')content(Could not create Default Value.)delimiter(')>operator(\))operator(;)
         ident(CloseKey)operator(;)
       ident(Exit)operator(;) reserved(end)operator(;)
 
-      ident(ValuesWin)operator(.)ident(AddValue)operator(()ident(MainReg)operator(,) string<delimiter(')delimiter(')>operator(\);)
+      ident(ValuesWin)operator(.)ident(AddValue)operator(()ident(MainReg)operator(,) string<delimiter(')delimiter(')>operator(\))operator(;)
     reserved(finally)
       ident(CloseKey)operator(;)
     reserved(end)operator(;)
@@ -8592,77 +8592,77 @@ reserved(begin)
   reserved(with) ident(ValueList)operator(.)ident(Items) reserved(do) reserved(begin)
     ident(DefaultItem) operator(:=) reserved(nil)operator(;)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Count)operator(-)integer(1) reserved(do)
-      reserved(if) ident(ItemIsDefaultValue)operator(()ident(Item)operator([)ident(i)operator(]\)) reserved(then)
+      reserved(if) ident(ItemIsDefaultValue)operator(()ident(Item)operator([)ident(i)operator(])operator(\)) reserved(then)
         ident(Break)operator(;)
 
     reserved(if) ident(i) operator(<) ident(Count) reserved(then)
-      ident(DefaultItem) operator(:=) ident(Item)operator([)ident(i)operator(];)
+      ident(DefaultItem) operator(:=) ident(Item)operator([)ident(i)operator(])operator(;)
   reserved(end)operator(;)
 
   reserved(if) reserved(not) ident(Assigned)operator(()ident(DefaultItem)operator(\)) reserved(then)
     ident(ShowMessage)operator(()string<delimiter(')content(Error: Lost Default Value!)delimiter(')>operator(\))
   reserved(else) reserved(begin)
-    ident(SelectItemOnly)operator(()ident(ValueList)operator(,) ident(DefaultItem)operator(\);)
+    ident(SelectItemOnly)operator(()ident(ValueList)operator(,) ident(DefaultItem)operator(\))operator(;)
     ident(MainWin)operator(.)ident(StatusBarUpdate)operator(;)
-    ident(ValueListDblClick)operator(()ident(Sender)operator(\);)
+    ident(ValueListDblClick)operator(()ident(Sender)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListChanging)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item)operator(:) ident(TListItem)operator(;)
-  ident(Change)operator(:) ident(TItemChange)operator(;) reserved(var) ident(AllowChange)operator(:) ident(Boolean)operator(\);)
+  ident(Change)operator(:) ident(TItemChange)operator(;) reserved(var) ident(AllowChange)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Item) operator(=) reserved(nil) reserved(then)
     ident(AllowChange) operator(:=) ident(False)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListMouseDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Button)operator(:) ident(TMouseButton)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\))operator(;)
 reserved(begin)
   ident(ValueLabelClicked) operator(:=) ident(False)operator(;)
   reserved(with) ident(ValueList) reserved(do)
-    reserved(if) operator(([)ident(htOnIcon)operator(,) ident(htOnLabel)operator(]) operator(*) ident(GetHitTestInfoAt)operator(()ident(X)operator(,) ident(Y)operator(\)\)) operator(<>) operator([]) reserved(then)
+    reserved(if) operator(()operator([)ident(htOnIcon)operator(,) ident(htOnLabel)operator(]) operator(*) ident(GetHitTestInfoAt)operator(()ident(X)operator(,) ident(Y)operator(\))operator(\)) operator(<>) operator([)operator(]) reserved(then)
       ident(ValueLabelClicked) operator(:=) ident(True)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(EditBinaryMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(EditBinaryMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(csDestroying) reserved(in) ident(WorkWin)operator(.)ident(ComponentState) reserved(then)
     ident(Exit)operator(;)
 
   ident(WorkWin)operator(.)ident(ShowAsBinary) operator(:=) ident(True)operator(;)
-  ident(ValueListChange)operator(()ident(Sender)operator(,) ident(ValueList)operator(.)ident(ItemFocused)operator(,) ident(ctState)operator(\);)
-  ident(ValueListDblClick)operator(()ident(Sender)operator(\);)
+  ident(ValueListChange)operator(()ident(Sender)operator(,) ident(ValueList)operator(.)ident(ItemFocused)operator(,) ident(ctState)operator(\))operator(;)
+  ident(ValueListDblClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(EditMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(EditMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(ValueListDblClick)operator(()ident(Sender)operator(\);)
+  ident(ValueListDblClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListCustomDrawSubItem)operator(()ident(Sender)operator(:) ident(TCustomListView)operator(;)
   ident(Item)operator(:) ident(TListItem)operator(;) ident(SubItem)operator(:) ident(Integer)operator(;) ident(State)operator(:) ident(TCustomDrawState)operator(;)
-  reserved(var) ident(DefaultDraw)operator(:) ident(Boolean)operator(\);)
+  reserved(var) ident(DefaultDraw)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(ValueList)operator(.)ident(Canvas)operator(.)ident(Font) reserved(do) reserved(begin)
-    ident(Style) operator(:=) operator([];)
+    ident(Style) operator(:=) operator([)operator(])operator(;)
     reserved(if) ident(SubItem) operator(=) integer(1) reserved(then)
       ident(Color) operator(:=) ident(clSilver)
     reserved(else)
-      ident(Color) operator(:=) ident(ColorOfDataType)operator(()ident(TRegDataType)operator(()ident(Item)operator(.)ident(ImageIndex) operator(-) ident(iconFirstType)operator(\)\);)
+      ident(Color) operator(:=) ident(ColorOfDataType)operator(()ident(TRegDataType)operator(()ident(Item)operator(.)ident(ImageIndex) operator(-) ident(iconFirstType)operator(\))operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListCompare)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Item1)operator(,) ident(Item2)operator(:) ident(TListItem)operator(;)
-  ident(Data)operator(:) ident(Integer)operator(;) reserved(var) ident(Compare)operator(:) ident(Integer)operator(\);)
+  ident(Data)operator(:) ident(Integer)operator(;) reserved(var) ident(Compare)operator(:) ident(Integer)operator(\))operator(;)
 reserved(begin)
   reserved(case) ident(SortBy) reserved(of)
-    ident(vlcName)operator(:) ident(Compare) operator(:=) ident(AnsiCompareText)operator(()ident(RealValueName)operator(()ident(Item1)operator(\),) ident(RealValueName)operator(()ident(Item2)operator(\)\);)
+    ident(vlcName)operator(:) ident(Compare) operator(:=) ident(AnsiCompareText)operator(()ident(RealValueName)operator(()ident(Item1)operator(\))operator(,) ident(RealValueName)operator(()ident(Item2)operator(\))operator(\))operator(;)
     ident(vlcSize)operator(:) ident(Compare) operator(:=) ident(Integer)operator(()
-      ident(StrToIntDef)operator(()ident(Item1)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcSize)operator(]],) operator(-)integer(1)operator(\)) operator(>)
-      ident(StrToIntDef)operator(()ident(Item2)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcSize)operator(]],) operator(-)integer(1)operator(\)\);)
-    ident(vlcData)operator(:) ident(Compare) operator(:=) ident(Integer)operator(()ident(Item1)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcData)operator(]]) operator(>)
-      ident(Item2)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcData)operator(]]\);)
-    ident(vlcType)operator(:) ident(Compare) operator(:=) ident(Integer)operator(()ident(Item1)operator(.)ident(ImageIndex) operator(>) ident(Item2)operator(.)ident(ImageIndex)operator(\);)
+      ident(StrToIntDef)operator(()ident(Item1)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcSize)operator(])operator(])operator(,) operator(-)integer(1)operator(\)) operator(>)
+      ident(StrToIntDef)operator(()ident(Item2)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcSize)operator(])operator(])operator(,) operator(-)integer(1)operator(\))operator(\))operator(;)
+    ident(vlcData)operator(:) ident(Compare) operator(:=) ident(Integer)operator(()ident(Item1)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcData)operator(])operator(]) operator(>)
+      ident(Item2)operator(.)ident(SubItems)operator([)ident(SubItemIndex)operator([)ident(vlcData)operator(])operator(])operator(\))operator(;)
+    ident(vlcType)operator(:) ident(Compare) operator(:=) ident(Integer)operator(()ident(Item1)operator(.)ident(ImageIndex) operator(>) ident(Item2)operator(.)ident(ImageIndex)operator(\))operator(;)
   reserved(end)operator(;)
 
   reserved(if) ident(Assigned)operator(()ident(SortByColumn)operator(\))
@@ -8670,7 +8670,7 @@ reserved(begin)
     ident(Compare) operator(:=) integer(1) operator(-) ident(Compare)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListColumnClick)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Column)operator(:) ident(TListColumn)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListColumnClick)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Column)operator(:) ident(TListColumn)operator(\))operator(;)
 reserved(begin)
   reserved(case) ident(Column)operator(.)ident(ImageIndex) reserved(of)
     ident(iconSortArrowAsc)operator(:) ident(Column)operator(.)ident(ImageIndex) operator(:=) ident(iconSortArrowDesc)operator(;)
@@ -8681,7 +8681,7 @@ reserved(begin)
     reserved(if) ident(TValueListColumn)operator(()ident(Column)operator(.)ident(Tag)operator(\)) reserved(in) ident(ValueListColumnRange) reserved(then)
       ident(SortBy) operator(:=) ident(TValueListColumn)operator(()ident(Column)operator(.)ident(Tag)operator(\))
     reserved(else)
-      ident(ShowMessage)operator(()string<delimiter(')content(Unknown Column Tag)delimiter(')>operator(\);)
+      ident(ShowMessage)operator(()string<delimiter(')content(Unknown Column Tag)delimiter(')>operator(\))operator(;)
     ident(Column)operator(.)ident(ImageIndex) operator(:=) ident(iconSortArrowAsc)operator(;)
   reserved(end)operator(;)
 
@@ -8700,7 +8700,7 @@ reserved(procedure) ident(TValuesWin)operator(.)ident(CloneValue)operator(;)
 reserved(var)
   ident(OldName)operator(,) ident(NewName)operator(:) reserved(string)operator(;)
 
-  reserved(function) ident(GetNewName)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) reserved(const) ident(OldName)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+  reserved(function) ident(GetNewName)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(;) reserved(const) ident(OldName)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
   reserved(var)
     ident(i)operator(:) ident(Integer)operator(;)
     ident(Prefix)operator(:) reserved(string)operator(;)
@@ -8715,8 +8715,8 @@ reserved(var)
     ident(Prefix) operator(:=) ident(Result)operator(;)
     ident(i) operator(:=) integer(1)operator(;)
     reserved(while) ident(Reg)operator(.)ident(ValueExists)operator(()ident(Result)operator(\)) reserved(do) reserved(begin)
-      ident(Result) operator(:=) ident(Prefix) operator(+) char<delimiter(')content( )delimiter(')> operator(+) ident(IntToStr)operator(()ident(i)operator(\);)
-      ident(Inc)operator(()ident(i)operator(\);)
+      ident(Result) operator(:=) ident(Prefix) operator(+) char<delimiter(')content( )delimiter(')> operator(+) ident(IntToStr)operator(()ident(i)operator(\))operator(;)
+      ident(Inc)operator(()ident(i)operator(\))operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 
@@ -8727,25 +8727,25 @@ reserved(begin)
   reserved(if) ident(TreeWin)operator(.)ident(CantWrite) reserved(then)
     ident(Exit)operator(;)
 
-  ident(OldName) operator(:=) ident(RealValueName)operator(()ident(ValueList)operator(.)ident(ItemFocused)operator(\);)
+  ident(OldName) operator(:=) ident(RealValueName)operator(()ident(ValueList)operator(.)ident(ItemFocused)operator(\))operator(;)
 
   reserved(try)
     ident(OpenCurKey)operator(;)
 
-    ident(NewName) operator(:=) ident(GetNewName)operator(()ident(MainReg)operator(,) ident(OldName)operator(\);)
-    ident(MainReg)operator(.)ident(CopyValue)operator(()ident(OldName)operator(,) ident(NewName)operator(\);)
-    ident(AddValue)operator(()ident(MainReg)operator(,) ident(NewName)operator(\);)
+    ident(NewName) operator(:=) ident(GetNewName)operator(()ident(MainReg)operator(,) ident(OldName)operator(\))operator(;)
+    ident(MainReg)operator(.)ident(CopyValue)operator(()ident(OldName)operator(,) ident(NewName)operator(\))operator(;)
+    ident(AddValue)operator(()ident(MainReg)operator(,) ident(NewName)operator(\))operator(;)
   reserved(finally)
     ident(MainReg)operator(.)ident(CloseKey)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(DublicateMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(DublicateMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(CloneValue)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(CopyDataPreviewMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(CopyDataPreviewMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(ValueList)operator(.)ident(IsEditing) reserved(then)
     ident(Exit)operator(;)
@@ -8757,11 +8757,11 @@ reserved(procedure) ident(TValuesWin)operator(.)ident(CopyDataPreview)operator(;
 reserved(begin)
   ident(OpenCurKey)operator(;)
   ident(Clipboard)operator(.)ident(AsText) operator(:=) ident(DataPreviewOfContext)operator(()ident(MainReg)operator(.)ident(ReadContext)operator(()
-    ident(RealValueName)operator(()ident(ValueList)operator(.)ident(ItemFocused)operator(\)\)\);)
+    ident(RealValueName)operator(()ident(ValueList)operator(.)ident(ItemFocused)operator(\))operator(\))operator(\))operator(;)
   ident(MainReg)operator(.)ident(CloseKey)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(UpdateValues)operator(()ident(SelectedOnly)operator(:) ident(Boolean) operator(=) ident(False)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(UpdateValues)operator(()ident(SelectedOnly)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
   ident(Reg)operator(:) ident(TXRegistry)operator(;)
@@ -8776,9 +8776,9 @@ reserved(begin)
     reserved(if) ident(OpenNodeOK)operator(()ident(Reg)operator(,) ident(RegTV)operator(.)ident(Selected)operator(\)) reserved(then)
       reserved(with) ident(ValueList)operator(.)ident(Items) reserved(do) reserved(begin)
         reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Count)operator(-)integer(1) reserved(do) reserved(begin)
-          reserved(if) ident(SelectedOnly) reserved(and) reserved(not) ident(Item)operator([)ident(i)operator(].)ident(Selected) reserved(then)
+          reserved(if) ident(SelectedOnly) reserved(and) reserved(not) ident(Item)operator([)ident(i)operator(])operator(.)ident(Selected) reserved(then)
             ident(Continue)operator(;)
-          ident(UpdateValue)operator(()ident(Reg)operator(,) ident(Item)operator([)ident(i)operator(]\);)
+          ident(UpdateValue)operator(()ident(Reg)operator(,) ident(Item)operator([)ident(i)operator(])operator(\))operator(;)
         reserved(end)operator(;)
       reserved(end)operator(;)
   reserved(finally)
@@ -8789,7 +8789,7 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(function) ident(TValuesWin)operator(.)ident(TryRenameValue)operator(()ident(OldName)operator(:) reserved(string)operator(;)
-  reserved(var) ident(NewName)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+  reserved(var) ident(NewName)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(var)
   ident(x)operator(:) reserved(string)operator(;)
 reserved(begin)
@@ -8798,23 +8798,23 @@ reserved(begin)
     ident(Exit)operator(;)
 
   reserved(if) operator(()ident(Length)operator(()ident(NewName)operator(\)) operator(>) ident(RegMaxValueNameLen)operator(\)) reserved(then) reserved(begin)
-    ident(NewName) operator(:=) ident(Copy)operator(()ident(NewName)operator(,) integer(1)operator(,) ident(RegMaxValueNameLen)operator(\);)
+    ident(NewName) operator(:=) ident(Copy)operator(()ident(NewName)operator(,) integer(1)operator(,) ident(RegMaxValueNameLen)operator(\))operator(;)
     reserved(if) ident(MessageDlg)operator(()
      string<delimiter(')content(The maximum size of a value name is )delimiter(')> operator(+) ident(IntToStr)operator(()ident(RegMaxValueNameLen)operator(\)) operator(+) string<delimiter(')content( characters.)delimiter(')> operator(+) ident(EOL) operator(+)
      string<delimiter(')content(Shorten the value name to:)delimiter(')> operator(+) ident(EOL) operator(+)
-     ident(Quote)operator(()ident(StringWrap)operator(()ident(NewName)operator(,) integer(80)operator(\)\),)
-     ident(mtConfirmation)operator(,) operator([)ident(mbOK)operator(,) ident(mbCancel)operator(],) integer(0)operator(\)) operator(<>) ident(mrOK) reserved(then)
+     ident(Quote)operator(()ident(StringWrap)operator(()ident(NewName)operator(,) integer(80)operator(\))operator(\))operator(,)
+     ident(mtConfirmation)operator(,) operator([)ident(mbOK)operator(,) ident(mbCancel)operator(])operator(,) integer(0)operator(\)) operator(<>) ident(mrOK) reserved(then)
       ident(Exit)operator(;)
   reserved(end)operator(;)
 
-  reserved(if) ident(CharIn)operator(()ident(NewName)operator(,) operator([)char(#0)operator(..)char(#31)operator(]\)) reserved(then) reserved(begin)
-    ident(NewName) operator(:=) ident(ReplaceChars)operator(()ident(NewName)operator(,) operator([)char(#0)operator(..)char(#31)operator(],) char<delimiter(')content(#)delimiter(')>operator(\);)
+  reserved(if) ident(CharIn)operator(()ident(NewName)operator(,) operator([)char(#0)operator(..)char(#31)operator(])operator(\)) reserved(then) reserved(begin)
+    ident(NewName) operator(:=) ident(ReplaceChars)operator(()ident(NewName)operator(,) operator([)char(#0)operator(..)char(#31)operator(])operator(,) char<delimiter(')content(#)delimiter(')>operator(\))operator(;)
     reserved(if) ident(MessageDlg)operator(()string<delimiter(')content(The following chars are not allowed in ValueNames:)delimiter(')> operator(+) ident(EOL) operator(+)
      string<delimiter(')content(- Control chars (#0..#31\))delimiter(')> operator(+) ident(EOL) operator(+)
      string<delimiter(')content(The following name is allowed:)delimiter(')> operator(+) ident(EOL) operator(+)
      ident(NewName) operator(+) ident(EOL) operator(+)
      string<delimiter(')content(Use this name instead?)delimiter(')>operator(,)
-     ident(mtConfirmation)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(],) integer(0)operator(\)) operator(<>) ident(mrYes) reserved(then)
+     ident(mtConfirmation)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(])operator(,) integer(0)operator(\)) operator(<>) ident(mrYes) reserved(then)
       ident(Exit)operator(;)
   reserved(end)operator(;)
 
@@ -8823,32 +8823,32 @@ reserved(begin)
 
   reserved(if) ident(SameText)operator(()ident(OldName)operator(,) ident(NewName)operator(\)) reserved(then) reserved(begin) comment(//CharCase ändern)
     ident(x) operator(:=) ident(MainReg)operator(.)ident(GetFreeValueName)operator(;)
-    ident(MainReg)operator(.)ident(RenameValue)operator(()ident(OldName)operator(,) ident(x)operator(\);)
-    ident(MainReg)operator(.)ident(RenameValue)operator(()ident(x)operator(,) ident(NewName)operator(\);)
+    ident(MainReg)operator(.)ident(RenameValue)operator(()ident(OldName)operator(,) ident(x)operator(\))operator(;)
+    ident(MainReg)operator(.)ident(RenameValue)operator(()ident(x)operator(,) ident(NewName)operator(\))operator(;)
   reserved(end) reserved(else) reserved(begin)
     reserved(if) reserved(not) ident(MainReg)operator(.)ident(ValueReallyExists)operator(()ident(NewName)operator(\)) reserved(then) reserved(begin)
-      ident(MainReg)operator(.)ident(RenameValue)operator(()ident(OldName)operator(,) ident(NewName)operator(\);)
+      ident(MainReg)operator(.)ident(RenameValue)operator(()ident(OldName)operator(,) ident(NewName)operator(\))operator(;)
     reserved(end) reserved(else) reserved(begin)
       reserved(if) ident(NewName) operator(=) string<delimiter(')delimiter(')> reserved(then)
         ident(ShowMessage)operator(()string<delimiter(')content(Default value already exists.)delimiter(')>operator(\))
       reserved(else)
-        ident(ShowMessage)operator(()string<delimiter(')content(Value )delimiter(')> operator(+) ident(Quote)operator(()ident(NewName)operator(\)) operator(+) string<delimiter(')content( already exists.)delimiter(')>operator(\);)
+        ident(ShowMessage)operator(()string<delimiter(')content(Value )delimiter(')> operator(+) ident(Quote)operator(()ident(NewName)operator(\)) operator(+) string<delimiter(')content( already exists.)delimiter(')>operator(\))operator(;)
     ident(Exit)operator(;) reserved(end)operator(;)
   reserved(end)operator(;)
   ident(MainReg)operator(.)ident(CloseKey)operator(;)
 
   reserved(if) ident(TextIn)operator(()ident(NewName)operator(,) string<delimiter(')content(default)delimiter(')>operator(\)) reserved(then)
-    ident(AddHint)operator(()string<delimiter(')content(You can create default values by empty string ValueNames.)delimiter(')>operator(\);)
+    ident(AddHint)operator(()string<delimiter(')content(You can create default values by empty string ValueNames.)delimiter(')>operator(\))operator(;)
     
   ident(Result) operator(:=) ident(True)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(ZeromizeMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(ZeromizeMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(ZeromizeValue)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(CopyPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(CopyPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(ValueList)operator(.)ident(IsEditing) reserved(then)
     ident(Exit)operator(;)
@@ -8856,26 +8856,26 @@ reserved(begin)
   reserved(if) ident(csDestroying) reserved(in) ident(MainWin)operator(.)ident(ComponentState) reserved(then)
     ident(Exit)operator(;)
 
-  ident(MainWin)operator(.)ident(CopyPathClick)operator(()ident(Sender)operator(\);)
+  ident(MainWin)operator(.)ident(CopyPathClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(TValuesWin)operator(.)ident(FindItemByRealName)operator(()reserved(const) ident(ValueName)operator(:) reserved(string)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(TValuesWin)operator(.)ident(FindItemByRealName)operator(()reserved(const) ident(ValueName)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(with) ident(ValueList)operator(.)ident(Items) reserved(do) reserved(begin)
     reserved(for) ident(Result) operator(:=) integer(0) reserved(to) ident(Count)operator(-)integer(1) reserved(do)
-      reserved(if) ident(SameText)operator(()ident(RealValueName)operator(()ident(Item)operator([)ident(Result)operator(]\),) ident(ValueName)operator(\)) reserved(then)
+      reserved(if) ident(SameText)operator(()ident(RealValueName)operator(()ident(Item)operator([)ident(Result)operator(])operator(\))operator(,) ident(ValueName)operator(\)) reserved(then)
         ident(Exit)operator(;)
   reserved(end)operator(;)
   ident(Result) operator(:=) operator(-)integer(1)operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(TValuesWin)operator(.)ident(FocusItem)operator(()ident(ARealValueName)operator(:) reserved(string)operator(;)
-  ident(FocusValueList)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) ident(Boolean)operator(;)
+  ident(FocusValueList)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(with) ident(ValueList) reserved(do) reserved(begin)
-    ident(i) operator(:=) ident(FindItemByRealName)operator(()ident(ARealValueName)operator(\);)
+    ident(i) operator(:=) ident(FindItemByRealName)operator(()ident(ARealValueName)operator(\))operator(;)
 
     reserved(if) operator(()ident(i) operator(>) operator(-)integer(1)operator(\)) reserved(and) operator(()ident(i) operator(<) ident(Items)operator(.)ident(Count)operator(\)) reserved(then)
       ident(Selected) operator(:=) ident(Items)operator([)ident(i)operator(])
@@ -8884,16 +8884,16 @@ reserved(begin)
 
     ident(ItemFocused) operator(:=) ident(Selected)operator(;)
 
-    ident(Result) operator(:=) ident(Assigned)operator(()ident(Selected)operator(\);)
+    ident(Result) operator(:=) ident(Assigned)operator(()ident(Selected)operator(\))operator(;)
     reserved(if) ident(Result) reserved(then)
-      ident(JumpToSel)operator(()ident(ValueList)operator(\);)
+      ident(JumpToSel)operator(()ident(ValueList)operator(\))operator(;)
 
     reserved(if) ident(FocusValueList) reserved(then)
-      ident(FocusControl)operator(()ident(ValueList)operator(\);)
+      ident(FocusControl)operator(()ident(ValueList)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(TakeAsMainValueMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(TakeAsMainValueMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(Item)operator(:) ident(TListItem)operator(;)
   ident(ValueName)operator(:) reserved(string)operator(;)
@@ -8905,7 +8905,7 @@ reserved(begin)
   reserved(if) reserved(not) ident(Assigned)operator(()ident(Item)operator(\)) reserved(then)
     ident(Exit)operator(;)
 
-  ident(ValueName) operator(:=) ident(RealValueName)operator(()ident(Item)operator(\);)
+  ident(ValueName) operator(:=) ident(RealValueName)operator(()ident(Item)operator(\))operator(;)
   reserved(with) ident(PrefWin)operator(.)ident(MainPreviewE) reserved(do)
     reserved(if) ident(ValueName) operator(=) ident(Text) reserved(then)
       ident(Text) operator(:=) string<delimiter(')delimiter(')>
@@ -8930,19 +8930,19 @@ reserved(begin)
         ident(Tag) operator(:=) ident(Integer)operator(()ident(vlcData)operator(\))
       reserved(else)
         ident(ShowMessage)operator(()ident(Format)operator(()string<delimiter(')content(Error: Unknown ValueList.Columns[%d].Caption = "%s")delimiter(')>operator(,)
-          operator([)ident(Index)operator(,) ident(Caption)operator(]\)\);)
+          operator([)ident(Index)operator(,) ident(Caption)operator(])operator(\))operator(\))operator(;)
       reserved(if) ident(Tag) operator(>) operator(-)integer(1) reserved(then)
-        ident(SubItemIndex)operator([)ident(TValueListColumn)operator(()ident(Tag)operator(\)]) operator(:=) ident(Index) operator(-) integer(1)operator(;)
+        ident(SubItemIndex)operator([)ident(TValueListColumn)operator(()ident(Tag)operator(\))operator(]) operator(:=) ident(Index) operator(-) integer(1)operator(;)
     reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(FormShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(FormShow)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(InitListColumnTags)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TValuesWin)operator(.)ident(Reload)operator(()ident(JumpToNewValue)operator(:) ident(Boolean) operator(=) ident(False)operator(;)
-  ident(ValueName)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\);)
+  ident(ValueName)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(;)
 reserved(var)
   ident(Sel)operator(:) ident(TListItem)operator(;)
   ident(SelIndex)operator(:) ident(Integer)operator(;)
@@ -8960,23 +8960,23 @@ reserved(begin)
       ident(SelIndex) operator(:=) ident(Sel)operator(.)ident(Index)operator(;)
 
     reserved(if) ident(SelIndex) operator(>) operator(-)integer(1) reserved(then)
-      ident(SelRealValueName) operator(:=) ident(RealValueName)operator(()ident(ValueList)operator(.)ident(Items)operator([)ident(SelIndex)operator(]\);)
+      ident(SelRealValueName) operator(:=) ident(RealValueName)operator(()ident(ValueList)operator(.)ident(Items)operator([)ident(SelIndex)operator(])operator(\))operator(;)
   reserved(end)operator(;)
 
-  ident(TreeWin)operator(.)ident(RegTVChange)operator(()ident(Self)operator(,) ident(RegTV)operator(.)ident(Selected)operator(\);)
+  ident(TreeWin)operator(.)ident(RegTVChange)operator(()ident(Self)operator(,) ident(RegTV)operator(.)ident(Selected)operator(\))operator(;)
 
   reserved(if) ident(SelIndex) operator(>) operator(-)integer(1) reserved(then)
     reserved(if) reserved(not) ident(FocusItem)operator(()ident(SelRealValueName)operator(,) ident(True)operator(\)) reserved(then) reserved(begin)
-      ident(SelIndex) operator(:=) ident(GetBestIndex)operator(()ident(ValueList)operator(,) ident(SelIndex)operator(\);)
+      ident(SelIndex) operator(:=) ident(GetBestIndex)operator(()ident(ValueList)operator(,) ident(SelIndex)operator(\))operator(;)
       reserved(if) ident(SelIndex) operator(>) operator(-)integer(1) reserved(then)
         reserved(with) ident(ValueList) reserved(do) reserved(begin)
-          ident(Selected) operator(:=) ident(Items)operator([)ident(SelIndex)operator(];)
+          ident(Selected) operator(:=) ident(Items)operator([)ident(SelIndex)operator(])operator(;)
           ident(ItemFocused) operator(:=) ident(Selected)operator(;)
         reserved(end)operator(;)
     reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(LoadValues)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(LoadValues)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(\))operator(;)
 reserved(var)
   ident(SL)operator(:) ident(TStringList)operator(;)
   ident(i)operator(:) ident(Integer)operator(;)
@@ -8986,7 +8986,7 @@ reserved(begin)
     ident(Exit)operator(;)
 
   reserved(with) ident(ValueList)operator(.)ident(Items) reserved(do) reserved(begin)
-    ident(Clock) operator(:=) ident(TClock)operator(.)ident(Create)operator(()integer(1)operator(,) ident(tfSecs)operator(\);)
+    ident(Clock) operator(:=) ident(TClock)operator(.)ident(Create)operator(()integer(1)operator(,) ident(tfSecs)operator(\))operator(;)
     ident(ValueList)operator(.)ident(Enabled) operator(:=) ident(False)operator(;)
     ident(BeginUpdate)operator(;)
     reserved(try)
@@ -8995,9 +8995,9 @@ reserved(begin)
 
       ident(SL) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
       reserved(try)
-        ident(Reg)operator(.)ident(GetValueNames)operator(()ident(SL)operator(\);)
+        ident(Reg)operator(.)ident(GetValueNames)operator(()ident(SL)operator(\))operator(;)
         reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do)
-          ident(ValuesWin)operator(.)ident(AddValue)operator(()ident(Reg)operator(,) ident(SL)operator([)ident(i)operator(]\);)
+          ident(ValuesWin)operator(.)ident(AddValue)operator(()ident(Reg)operator(,) ident(SL)operator([)ident(i)operator(])operator(\))operator(;)
       reserved(finally)
         ident(SL)operator(.)ident(Free)operator(;)
       reserved(end)operator(;)
@@ -9007,28 +9007,28 @@ reserved(begin)
       ident(ValueList)operator(.)ident(Enabled) operator(:=) ident(True)operator(;)
       ident(Clock)operator(.)ident(Stop)operator(;)
       reserved(if) ident(MurphyMode) reserved(then)
-        ident(AddHint)operator(()ident(Format)operator(()string<delimiter(')content(Values loaded after %0.2f secs.)delimiter(')>operator(,) operator([)ident(Clock)operator(.)ident(SecsPassed)operator(]\)\);)
+        ident(AddHint)operator(()ident(Format)operator(()string<delimiter(')content(Values loaded after %0.2f secs.)delimiter(')>operator(,) operator([)ident(Clock)operator(.)ident(SecsPassed)operator(])operator(\))operator(\))operator(;)
       ident(Clock)operator(.)ident(Free)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(FormClose)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Action)operator(:) ident(TCloseAction)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(FormClose)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Action)operator(:) ident(TCloseAction)operator(\))operator(;)
 reserved(begin)
 comment(//  Action := caNone;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(ValueListClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(CheckValueListHotTrack)operator(;)
   reserved(if) ident(ValueList)operator(.)ident(HotTrack) reserved(then)
-    ident(ValueListDblClick)operator(()ident(Sender)operator(\);)
+    ident(ValueListDblClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TValuesWin)operator(.)ident(CheckValueListHotTrack)operator(;)
 reserved(const)
   ident(StyleOfSwitch)operator(:) reserved(array)operator([)ident(Boolean)operator(]) reserved(of) ident(TListHotTrackStyles) operator(=) operator(()
-    operator([],) operator([)ident(htHandPoint)operator(,) ident(htUnderlineHot)operator(]) operator(\);)
+    operator([)operator(])operator(,) operator([)ident(htHandPoint)operator(,) ident(htUnderlineHot)operator(]) operator(\))operator(;)
 reserved(var)
   ident(NewHotTrack)operator(:) ident(Boolean)operator(;)
 reserved(begin)
@@ -9040,30 +9040,30 @@ reserved(begin)
   
   reserved(with) ident(ValueList) reserved(do) reserved(begin)
     ident(HotTrack) operator(:=) ident(NewHotTrack)operator(;)
-    ident(HotTrackStyles) operator(:=) ident(StyleOfSwitch)operator([)ident(HotTrack)operator(];)
+    ident(HotTrackStyles) operator(:=) ident(StyleOfSwitch)operator([)ident(HotTrack)operator(])operator(;)
     ident(Mouse)operator(.)ident(CursorPos) operator(:=) ident(Mouse)operator(.)ident(CursorPos)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(SelectAllMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(SelectAllMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(with) ident(ValueList)operator(.)ident(Items) reserved(do)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Count)operator(-)integer(1) reserved(do)
-      ident(Item)operator([)ident(i)operator(].)ident(Selected) operator(:=) ident(True)operator(;)
+      ident(Item)operator([)ident(i)operator(])operator(.)ident(Selected) operator(:=) ident(True)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(InvertSelectionMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(InvertSelectionMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(with) ident(ValueList)operator(.)ident(Items) reserved(do)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Count)operator(-)integer(1) reserved(do)
-      ident(Item)operator([)ident(i)operator(].)ident(Selected) operator(:=) reserved(not) ident(Item)operator([)ident(i)operator(].)ident(Selected)operator(;)
+      ident(Item)operator([)ident(i)operator(])operator(.)ident(Selected) operator(:=) reserved(not) ident(Item)operator([)ident(i)operator(])operator(.)ident(Selected)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TValuesWin)operator(.)ident(FormDestroy)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TValuesWin)operator(.)ident(FormDestroy)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(ValueNames)operator(.)ident(Free)operator(;)
 reserved(end)operator(;)
@@ -9083,7 +9083,7 @@ reserved(uses)
   ident(CrackTools)operator(;)
 
 reserved(type)
-  ident(TColorStringFmt) operator(=) operator(()ident(csfThreeSpacedDecimals)operator(\);)
+  ident(TColorStringFmt) operator(=) operator(()ident(csfThreeSpacedDecimals)operator(\))operator(;)
 
   ident(TWorkWin) operator(=) reserved(class)operator(()ident(TForm)operator(\))
     ident(StringPU)operator(:) ident(TPopupMenu)operator(;)
@@ -9217,113 +9217,113 @@ reserved(type)
     ident(CryptoTypeRG)operator(:) ident(TRadioGroup)operator(;)
     ident(Label2)operator(:) ident(TLabel)operator(;)
     ident(LinkLabel2)operator(:) ident(TLinkLabel)operator(;)
-    reserved(procedure) ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(SpyResumeBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SpySuspendBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ArrPlutoBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ArrRegEdBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ArrFreeBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ArrBigValBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-
-    reserved(procedure) ident(SpaceMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FileMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(HintLBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(MainPCDrawTab)operator(()ident(Control)operator(:) ident(TCustomTabControl)operator(;) ident(TabIndex)operator(:) ident(Integer)operator(;) reserved(const) ident(Rect)operator(:) ident(TRect)operator(;) ident(Active)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(ValueMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(StringEKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(StringEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(OKStringBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(BoolStrCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(CardinalEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(CardBoolCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(CardinalEKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(OKIntBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ShowPCChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ShowPCChanging)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(AllowChange)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(ShowPCDrawTab)operator(()ident(Control)operator(:) ident(TCustomTabControl)operator(;) ident(TabIndex)operator(:) ident(Integer)operator(;) reserved(const) ident(Rect)operator(:) ident(TRect)operator(;) ident(Active)operator(:) ident(Boolean)operator(\);)
-    reserved(procedure) ident(ShowPCMouseDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Button)operator(:) ident(TMouseButton)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\);)
-    reserved(procedure) ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(OKBinaryBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(HexGrid1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(HexGrid1KeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(BoolStrPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(StringPageEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(IntPageEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(BinaryPageEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(SpyResumeBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SpySuspendBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ArrPlutoBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ArrRegEdBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ArrFreeBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ArrBigValBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+
+    reserved(procedure) ident(SpaceMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FileMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(HintLBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(MainPCDrawTab)operator(()ident(Control)operator(:) ident(TCustomTabControl)operator(;) ident(TabIndex)operator(:) ident(Integer)operator(;) reserved(const) ident(Rect)operator(:) ident(TRect)operator(;) ident(Active)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(ValueMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(StringEKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(StringEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(OKStringBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(BoolStrCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(CardinalEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(CardBoolCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(CardinalEKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(OKIntBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ShowPCChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ShowPCChanging)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(AllowChange)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(ShowPCDrawTab)operator(()ident(Control)operator(:) ident(TCustomTabControl)operator(;) ident(TabIndex)operator(:) ident(Integer)operator(;) reserved(const) ident(Rect)operator(:) ident(TRect)operator(;) ident(Active)operator(:) ident(Boolean)operator(\))operator(;)
+    reserved(procedure) ident(ShowPCMouseDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Button)operator(:) ident(TMouseButton)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\))operator(;)
+    reserved(procedure) ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(OKBinaryBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(HexGrid1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(HexGrid1KeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(BoolStrPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(StringPageEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(IntPageEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(BinaryPageEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
     reserved(procedure) ident(ReInitShowPC)operator(;)
-    reserved(procedure) ident(ActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(DeActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormDeactivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FormActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(MultiStringMChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(OKMultiStringBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(StringAsColorPDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(MultiStringMEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(LadenMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SpeichernMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(Hinzufgen1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(CancelBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(HexGrid1Enter)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SpyClearTracesBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SpyLBKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
+    reserved(procedure) ident(ActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(DeActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormDeactivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FormActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(MultiStringMChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(OKMultiStringBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(StringAsColorPDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(MultiStringMEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(LadenMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SpeichernMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(Hinzufgen1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(CancelBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(HexGrid1Enter)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SpyClearTracesBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SpyLBKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
     comment(//procedure BinLMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer\);)
-    reserved(procedure) ident(BinLClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(HexGrid1KeyUp)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(ValueViewChanged)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(HexEdit1Change)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SortMultiStringMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SpyTestLClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(BinLClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(HexGrid1KeyUp)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(ValueViewChanged)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(HexEdit1Change)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SortMultiStringMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SpyTestLClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
     reserved(procedure) ident(FocusForEditing)operator(;)
-    reserved(procedure) ident(CurValueEKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(CurValueEEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-
-    reserved(procedure) ident(AddAHint)operator(()reserved(const) ident(Hint)operator(:) reserved(string)operator(\);)
-    reserved(procedure) ident(SisyTVGetSelectedIndex)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\);)
-    reserved(procedure) ident(SisyTVDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SisyTVKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(SisyCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(BinaryHMLineChange)operator(()ident(NewLine)operator(:) ident(Cardinal)operator(\);)
-    reserved(procedure) ident(OffsetHEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SpyDelayIEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SisyTVExpanded)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\);)
-    reserved(procedure) ident(ClearChangesBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(FilterChangesBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SisyTVPUPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SisyActivateChangeMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SisyDeleteChangeMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SisyCopyPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ExternalEditBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(LoadExternalBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(ReloadBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(PipelineCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(BinaryHMEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(xUseExtendedModelCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SeparatorEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(HintLBKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\);)
-    reserved(procedure) ident(DWORDSpecialBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(Button1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SisyPUPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SisyPriorityMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(SisyShowCurrentPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+    reserved(procedure) ident(CurValueEKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(CurValueEEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+
+    reserved(procedure) ident(AddAHint)operator(()reserved(const) ident(Hint)operator(:) reserved(string)operator(\))operator(;)
+    reserved(procedure) ident(SisyTVGetSelectedIndex)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
+    reserved(procedure) ident(SisyTVDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SisyTVKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(SisyCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(BinaryHMLineChange)operator(()ident(NewLine)operator(:) ident(Cardinal)operator(\))operator(;)
+    reserved(procedure) ident(OffsetHEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SpyDelayIEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SisyTVExpanded)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
+    reserved(procedure) ident(ClearChangesBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(FilterChangesBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SisyTVPUPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SisyActivateChangeMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SisyDeleteChangeMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SisyCopyPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ExternalEditBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(LoadExternalBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(ReloadBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(PipelineCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(BinaryHMEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(xUseExtendedModelCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SeparatorEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(HintLBKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;) ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
+    reserved(procedure) ident(DWORDSpecialBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(Button1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SisyPUPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SisyPriorityMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(SisyShowCurrentPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
     reserved(procedure) ident(DropFileTargetDrop)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(ShiftState)operator(:) ident(TShiftState)operator(;)
-      ident(Point)operator(:) ident(TPoint)operator(;) reserved(var) ident(Effect)operator(:) ident(Integer)operator(\);)
-    reserved(procedure) ident(FormClose)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Action)operator(:) ident(TCloseAction)operator(\);)
-    reserved(procedure) ident(FormResize)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
-    reserved(procedure) ident(IconImageDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+      ident(Point)operator(:) ident(TPoint)operator(;) reserved(var) ident(Effect)operator(:) ident(Integer)operator(\))operator(;)
+    reserved(procedure) ident(FormClose)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Action)operator(:) ident(TCloseAction)operator(\))operator(;)
+    reserved(procedure) ident(FormResize)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
+    reserved(procedure) ident(IconImageDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
     reserved(procedure) ident(SisyTVCustomDrawItem)operator(()ident(Sender)operator(:) ident(TCustomTreeView)operator(;)
-      ident(Node)operator(:) ident(TTreeNode)operator(;) ident(State)operator(:) ident(TCustomDrawState)operator(;) reserved(var) ident(DefaultDraw)operator(:) ident(Boolean)operator(\);)
+      ident(Node)operator(:) ident(TTreeNode)operator(;) ident(State)operator(:) ident(TCustomDrawState)operator(;) reserved(var) ident(DefaultDraw)operator(:) ident(Boolean)operator(\))operator(;)
     reserved(procedure) ident(SisyTVMouseDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Button)operator(:) ident(TMouseButton)operator(;)
-      ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\);)
-    reserved(procedure) ident(OKCryptoBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+      ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\))operator(;)
+    reserved(procedure) ident(OKCryptoBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
     reserved(procedure) ident(CryptoEKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-      ident(Shift)operator(:) ident(TShiftState)operator(\);)
+      ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
   directive(private)
     ident(PipelineThread)operator(:) ident(TPipelineThread)operator(;)
     ident(BoolStr)operator(:) reserved(array) reserved(of) reserved(array)operator([)ident(Boolean)operator(]) reserved(of) reserved(string)operator(;)
     ident(HexEditAutoChange)operator(:) ident(Boolean)operator(;)
     ident(TargetPage)operator(:) ident(TTabSheet)operator(;)
-    reserved(procedure) ident(DeleteChange)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\);)
-    reserved(procedure) ident(DeactivateChange)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\);)
+    reserved(procedure) ident(DeleteChange)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
+    reserved(procedure) ident(DeactivateChange)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
     reserved(procedure) ident(CopySelectedChangeName)operator(;)
     reserved(procedure) ident(ClearChanges)operator(;)
   directive(public)
@@ -9331,7 +9331,7 @@ reserved(type)
     reserved(function) ident(LastHint)operator(:) reserved(string)operator(;)
     reserved(function) ident(LoadBoolStr)operator(:) ident(Boolean)operator(;)
     reserved(function) ident(LoadSisyFilter)operator(:) ident(Boolean)operator(;)
-    reserved(procedure) ident(ShowValues)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(\);)
+    reserved(procedure) ident(ShowValues)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(\))operator(;)
     reserved(procedure) ident(UpdateWriteButtons)operator(;)
     reserved(procedure) ident(EditData)operator(;)
   reserved(end)operator(;)
@@ -9348,7 +9348,7 @@ reserved(uses) ident(TreeU)operator(,) ident(ValuesU)operator(,) ident(plutomain
 preprocessor({$R *.dfm})
 
 reserved(function) ident(ColorOfString)operator(()ident(s)operator(:) reserved(string)operator(;) ident(Format)operator(:) ident(TColorStringFmt)operator(;)
-  ident(Default)operator(:) ident(TColor) operator(=) ident(clBlack)operator(\):) ident(TColor)operator(;)
+  ident(Default)operator(:) ident(TColor) operator(=) ident(clBlack)operator(\))operator(:) ident(TColor)operator(;)
 reserved(var)
   ident(SA)operator(:) ident(TStrA)operator(;)
   ident(i)operator(:) ident(Integer)operator(;)
@@ -9358,30 +9358,30 @@ reserved(begin)
 
   reserved(case) ident(Format) reserved(of)
     ident(csfThreeSpacedDecimals)operator(:) reserved(begin)
-      ident(SA) operator(:=) ident(Split)operator(()ident(s)operator(,) char<delimiter(')content( )delimiter(')>operator(\);)
+      ident(SA) operator(:=) ident(Split)operator(()ident(s)operator(,) char<delimiter(')content( )delimiter(')>operator(\))operator(;)
       reserved(if) ident(Length)operator(()ident(SA)operator(\)) operator(<>) integer(3) reserved(then)
         ident(Exit)operator(;)
       reserved(for) ident(i) operator(:=) integer(0) reserved(to) integer(2) reserved(do)
-        reserved(if) reserved(not) operator(()ident(IsValidInteger)operator(()ident(SA)operator([)ident(i)operator(]\)) reserved(and) operator(()ident(StrToIntDef)operator(()ident(SA)operator([)ident(i)operator(],) operator(-)integer(1)operator(\)) reserved(in) operator([)integer(0)operator(..)integer(255)operator(]\)\)) reserved(then)
+        reserved(if) reserved(not) operator(()ident(IsValidInteger)operator(()ident(SA)operator([)ident(i)operator(])operator(\)) reserved(and) operator(()ident(StrToIntDef)operator(()ident(SA)operator([)ident(i)operator(])operator(,) operator(-)integer(1)operator(\)) reserved(in) operator([)integer(0)operator(..)integer(255)operator(])operator(\))operator(\)) reserved(then)
           ident(Exit)operator(;)
-      ident(Result) operator(:=) ident(ColorOfRGB)operator(()ident(StrToIntDef)operator(()ident(SA)operator([)integer(0)operator(],) integer(0)operator(\),)
-                           ident(StrToIntDef)operator(()ident(SA)operator([)integer(1)operator(],) integer(0)operator(\),)
-                           ident(StrToIntDef)operator(()ident(SA)operator([)integer(2)operator(],) integer(0)operator(\)\);)
+      ident(Result) operator(:=) ident(ColorOfRGB)operator(()ident(StrToIntDef)operator(()ident(SA)operator([)integer(0)operator(])operator(,) integer(0)operator(\))operator(,)
+                           ident(StrToIntDef)operator(()ident(SA)operator([)integer(1)operator(])operator(,) integer(0)operator(\))operator(,)
+                           ident(StrToIntDef)operator(()ident(SA)operator([)integer(2)operator(])operator(,) integer(0)operator(\))operator(\))operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(StringOfColor)operator(()ident(Color)operator(:) ident(TColor)operator(;) ident(Format)operator(:) ident(TColorStringFmt)operator(\):) reserved(string)operator(;)
+reserved(function) ident(StringOfColor)operator(()ident(Color)operator(:) ident(TColor)operator(;) ident(Format)operator(:) ident(TColorStringFmt)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(RGB)operator(:) ident(TRGB)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
 
-  ident(RGB) operator(:=) ident(RGBOfColor)operator(()ident(Color)operator(\);)
+  ident(RGB) operator(:=) ident(RGBOfColor)operator(()ident(Color)operator(\))operator(;)
   reserved(case) ident(Format) reserved(of)
     ident(csfThreeSpacedDecimals)operator(:) reserved(begin)
       reserved(with) ident(RGB) reserved(do)
-        ident(Result) operator(:=) ident(IntToStr)operator(()ident(R)operator(\)) operator(+) char<delimiter(')content( )delimiter(')> operator(+) ident(IntToStr)operator(()ident(G)operator(\)) operator(+) char<delimiter(')content( )delimiter(')> operator(+) ident(IntToStr)operator(()ident(B)operator(\);)
+        ident(Result) operator(:=) ident(IntToStr)operator(()ident(R)operator(\)) operator(+) char<delimiter(')content( )delimiter(')> operator(+) ident(IntToStr)operator(()ident(G)operator(\)) operator(+) char<delimiter(')content( )delimiter(')> operator(+) ident(IntToStr)operator(()ident(B)operator(\))operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
@@ -9395,7 +9395,7 @@ reserved(begin)
       ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(AddAHint)operator(()reserved(const) ident(Hint)operator(:) reserved(string)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(AddAHint)operator(()reserved(const) ident(Hint)operator(:) reserved(string)operator(\))operator(;)
 reserved(begin)
   reserved(if) reserved(not) ident(Assigned)operator(()ident(HintLB)operator(\)) reserved(then)
     ident(Exit)operator(;)
@@ -9405,11 +9405,11 @@ reserved(begin)
       reserved(if) ident(StrAtBegin)operator(()ident(LastHint)operator(,) ident(Hint)operator(\)) reserved(then) reserved(begin) comment(//same hint again)
         reserved(with) ident(HintLB) reserved(do)
           ident(Tag) operator(:=) ident(Tag) operator(+) integer(1)operator(;)
-        ident(Strings)operator([)ident(Count)operator(-)integer(1)operator(]) operator(:=) ident(Format)operator(()string<delimiter(')content(%s (%d\))delimiter(')>operator(,) operator([)ident(Hint)operator(,) ident(HintLB)operator(.)ident(Tag)operator(]\);)
+        ident(Strings)operator([)ident(Count)operator(-)integer(1)operator(]) operator(:=) ident(Format)operator(()string<delimiter(')content(%s (%d\))delimiter(')>operator(,) operator([)ident(Hint)operator(,) ident(HintLB)operator(.)ident(Tag)operator(])operator(\))operator(;)
       ident(Exit) reserved(end) reserved(else)
         ident(HintLB)operator(.)ident(Tag) operator(:=) integer(1)operator(;)
     reserved(end)operator(;)
-    ident(Add)operator(()ident(Hint)operator(\);)
+    ident(Add)operator(()ident(Hint)operator(\))operator(;)
   reserved(end)operator(;)
   ident(Application)operator(.)ident(ProcessMessages)operator(;) comment(//draw)
 comment(//  Sleep(1000\); //wait to read hints)
@@ -9428,7 +9428,7 @@ reserved(begin)
   ident(StringE)operator(.)ident(Text) operator(:=) string<delimiter(')delimiter(')>operator(;)
   ident(StringTypeRG)operator(.)ident(ItemIndex) operator(:=) integer(0)operator(;)
 
-  ident(MultiStringTypeRG)operator(.)ident(Buttons)operator([)integer(1)operator(].)ident(Enabled) operator(:=) ident(False)operator(;)
+  ident(MultiStringTypeRG)operator(.)ident(Buttons)operator([)integer(1)operator(])operator(.)ident(Enabled) operator(:=) ident(False)operator(;)
 
   ident(CardinalE)operator(.)ident(Value) operator(:=) integer(0)operator(;)
   ident(CardTypeRG)operator(.)ident(ItemIndex) operator(:=) integer(0)operator(;)
@@ -9436,68 +9436,68 @@ reserved(begin)
   ident(BinaryHM)operator(.)ident(Data) operator(:=) reserved(nil)operator(;)
   ident(PipelineCB)operator(.)ident(Checked) operator(:=) ident(False)operator(;)
 
-  ident(DataTypeComB)operator(.)ident(ItemIndex) operator(:=) ident(Integer)operator(()ident(rdBinary)operator(\);)
+  ident(DataTypeComB)operator(.)ident(ItemIndex) operator(:=) ident(Integer)operator(()ident(rdBinary)operator(\))operator(;)
 
   ident(MultiStringM)operator(.)ident(Clear)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(FormKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(begin)
-  ident(MainWin)operator(.)ident(FormKeyDown)operator(()ident(Sender)operator(,) ident(Key)operator(,) ident(Shift)operator(\);)
+  ident(MainWin)operator(.)ident(FormKeyDown)operator(()ident(Sender)operator(,) ident(Key)operator(,) ident(Shift)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SpyResumeBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SpyResumeBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(SpyThread)operator(.)ident(Resume)operator(;)
-  ident(SpyTestLClick)operator(()ident(Sender)operator(\);)
+  ident(SpyTestLClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SpySuspendBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SpySuspendBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(SpyThread)operator(.)ident(Suspend)operator(;)
-  ident(SpyTestLClick)operator(()ident(Sender)operator(\);)
+  ident(SpyTestLClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(ArrPlutoBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(ArrPlutoBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(ArrangePlutoStyle)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(ArrRegEdBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(ArrRegEdBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(ArrangeRegEdStyle)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(ArrFreeBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(ArrFreeBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(ArrangeFreeStyle)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(ArrBigValBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(ArrBigValBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(ArrangeBigValStyle)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SpaceMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SpaceMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(StringE)operator(.)ident(Text) operator(:=) string<delimiter(')delimiter(')>operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(HintLBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(HintLBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(StatusBar)operator(.)ident(Panels)operator([)integer(0)operator(].)ident(Text) operator(:=) ident(GetSel)operator(()ident(HintLB)operator(\);)
-  ident(WorkWin)operator(.)ident(InfoMemo)operator(.)ident(Text) operator(:=) ident(StatusBar)operator(.)ident(Panels)operator([)integer(0)operator(].)ident(Text)operator(;)
+  ident(StatusBar)operator(.)ident(Panels)operator([)integer(0)operator(])operator(.)ident(Text) operator(:=) ident(GetSel)operator(()ident(HintLB)operator(\))operator(;)
+  ident(WorkWin)operator(.)ident(InfoMemo)operator(.)ident(Text) operator(:=) ident(StatusBar)operator(.)ident(Panels)operator([)integer(0)operator(])operator(.)ident(Text)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(MainPCDrawTab)operator(()ident(Control)operator(:) ident(TCustomTabControl)operator(;) ident(TabIndex)operator(:) ident(Integer)operator(;)
-  reserved(const) ident(Rect)operator(:) ident(TRect)operator(;) ident(Active)operator(:) ident(Boolean)operator(\);)
+  reserved(const) ident(Rect)operator(:) ident(TRect)operator(;) ident(Active)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(var)
   ident(PC)operator(:) ident(TPageControl)operator(;)
   ident(Page)operator(:) ident(TTabSheet)operator(;)
 reserved(begin)
-  ident(PC) operator(:=) ident(TPageControl)operator(()ident(Control)operator(\);)
-  ident(Page) operator(:=) ident(PC)operator(.)ident(Pages)operator([)ident(TabIndex)operator(];)
+  ident(PC) operator(:=) ident(TPageControl)operator(()ident(Control)operator(\))operator(;)
+  ident(Page) operator(:=) ident(PC)operator(.)ident(Pages)operator([)ident(TabIndex)operator(])operator(;)
   reserved(with) ident(PC)operator(.)ident(Canvas)operator(.)ident(Font) reserved(do) reserved(begin)
     reserved(if) ident(Page)operator(.)ident(Caption) operator(=) string<delimiter(')content(Hint)delimiter(')> reserved(then)
       ident(Color) operator(:=) ident(clBrightRed)
@@ -9513,38 +9513,38 @@ reserved(begin)
 
   reserved(with) ident(PC)operator(.)ident(Canvas) reserved(do)
     reserved(if) ident(Active) reserved(then) reserved(begin)
-      ident(Font)operator(.)ident(Style) operator(:=) operator([)ident(fsBold)operator(];)
+      ident(Font)operator(.)ident(Style) operator(:=) operator([)ident(fsBold)operator(])operator(;)
       ident(Brush)operator(.)ident(Color) operator(:=) ident(clDarkGray)operator(;)
-      ident(FillRect)operator(()ident(Rect)operator(\);)
-      ident(TextOut)operator(()ident(Rect)operator(.)ident(Left) operator(+) integer(18) operator(+) integer(5)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(3)operator(,) ident(Page)operator(.)ident(Caption)operator(\);)
-      ident(PC)operator(.)ident(Images)operator(.)ident(Draw)operator(()ident(PC)operator(.)ident(Canvas)operator(,) ident(Rect)operator(.)ident(Left) operator(+) integer(4)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(2)operator(,) ident(Page)operator(.)ident(ImageIndex)operator(\);)
+      ident(FillRect)operator(()ident(Rect)operator(\))operator(;)
+      ident(TextOut)operator(()ident(Rect)operator(.)ident(Left) operator(+) integer(18) operator(+) integer(5)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(3)operator(,) ident(Page)operator(.)ident(Caption)operator(\))operator(;)
+      ident(PC)operator(.)ident(Images)operator(.)ident(Draw)operator(()ident(PC)operator(.)ident(Canvas)operator(,) ident(Rect)operator(.)ident(Left) operator(+) integer(4)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(2)operator(,) ident(Page)operator(.)ident(ImageIndex)operator(\))operator(;)
     reserved(end) reserved(else) reserved(begin)
-      ident(Font)operator(.)ident(Style) operator(:=) operator([];)
+      ident(Font)operator(.)ident(Style) operator(:=) operator([)operator(])operator(;)
       ident(Brush)operator(.)ident(Color) operator(:=) ident(clDarkGray)operator(;)
-      ident(FillRect)operator(()ident(Rect)operator(\);)
-      ident(TextOut)operator(()ident(Rect)operator(.)ident(Left) operator(+) integer(18) operator(+) integer(3)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(2)operator(,) ident(Page)operator(.)ident(Caption)operator(\);)
-      ident(PC)operator(.)ident(Images)operator(.)ident(Draw)operator(()ident(PC)operator(.)ident(Canvas)operator(,) ident(Rect)operator(.)ident(Left) operator(+) integer(1)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(1)operator(,) ident(Page)operator(.)ident(ImageIndex)operator(\);)
+      ident(FillRect)operator(()ident(Rect)operator(\))operator(;)
+      ident(TextOut)operator(()ident(Rect)operator(.)ident(Left) operator(+) integer(18) operator(+) integer(3)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(2)operator(,) ident(Page)operator(.)ident(Caption)operator(\))operator(;)
+      ident(PC)operator(.)ident(Images)operator(.)ident(Draw)operator(()ident(PC)operator(.)ident(Canvas)operator(,) ident(Rect)operator(.)ident(Left) operator(+) integer(1)operator(,) ident(Rect)operator(.)ident(Top) operator(+) integer(1)operator(,) ident(Page)operator(.)ident(ImageIndex)operator(\))operator(;)
     reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(ValueMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(ValueMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(StringE)operator(.)ident(Text) operator(:=) ident(UntilStr)operator(()ident(TMenuItem)operator(()ident(Sender)operator(\).)ident(Caption)operator(,)string<delimiter(')content( = )delimiter(')>operator(\);)
-  ident(OKStringBClick)operator(()ident(Sender)operator(\);)
+  ident(StringE)operator(.)ident(Text) operator(:=) ident(UntilStr)operator(()ident(TMenuItem)operator(()ident(Sender)operator(\))operator(.)ident(Caption)operator(,)string<delimiter(')content( = )delimiter(')>operator(\))operator(;)
+  ident(OKStringBClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(StringEKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(key) operator(=) ident(VK_RETURN) reserved(then) reserved(begin)
-    ident(OKStringBClick)operator(()ident(Sender)operator(\);)
-    ident(ValuesWin)operator(.)ident(FocusControl)operator(()ident(ValueList)operator(\);)
+    ident(OKStringBClick)operator(()ident(Sender)operator(\))operator(;)
+    ident(ValuesWin)operator(.)ident(FocusControl)operator(()ident(ValueList)operator(\))operator(;)
   reserved(end)operator(;)
   reserved(if) ident(key) operator(=) ident(VK_ESCAPE) reserved(then)
-    ident(CancelBClick)operator(()ident(Sender)operator(\);)
+    ident(CancelBClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(StringEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(StringEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
   ident(State)operator(:) ident(TCheckBoxState)operator(;)
@@ -9553,14 +9553,14 @@ reserved(begin)
   ident(IconImage)operator(.)ident(Picture) operator(:=) reserved(nil)operator(;)
 
   reserved(with) ident(StringAsColorP) reserved(do) reserved(begin)
-    ident(Color) operator(:=) ident(ColorOfString)operator(()ident(StringE)operator(.)ident(Text)operator(,) ident(csfThreeSpacedDecimals)operator(,) operator(-)integer(1)operator(\);)
+    ident(Color) operator(:=) ident(ColorOfString)operator(()ident(StringE)operator(.)ident(Text)operator(,) ident(csfThreeSpacedDecimals)operator(,) operator(-)integer(1)operator(\))operator(;)
     ident(Visible) operator(:=) ident(Color) operator(<>) operator(-)integer(1)operator(;)
   reserved(end)operator(;)
 
   reserved(try)
     reserved(with) ident(IconImage)operator(.)ident(Picture)operator(.)ident(Icon) reserved(do) reserved(begin)
       ident(ReleaseHandle)operator(;)
-      ident(Handle) operator(:=) ident(GetIconFromFile)operator(()ident(StringE)operator(.)ident(Text)operator(\);)
+      ident(Handle) operator(:=) ident(GetIconFromFile)operator(()ident(StringE)operator(.)ident(Text)operator(\))operator(;)
       ident(StringAsFileP)operator(.)ident(Visible) operator(:=) ident(Handle) operator(<>) integer(0)operator(;)
     reserved(end)operator(;)
   reserved(except)
@@ -9568,28 +9568,28 @@ reserved(begin)
 
   ident(State) operator(:=) ident(cbGrayed)operator(;)
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(BoolStr)operator(\)) reserved(do) reserved(begin)
-    reserved(if) ident(StringE)operator(.)ident(Text) operator(=) ident(BoolStr)operator([)ident(i)operator(][)ident(False)operator(]) reserved(then)
+    reserved(if) ident(StringE)operator(.)ident(Text) operator(=) ident(BoolStr)operator([)ident(i)operator(])operator([)ident(False)operator(]) reserved(then)
       ident(State) operator(:=) ident(cbUnchecked)
-    reserved(else) reserved(if) ident(StringE)operator(.)ident(Text) operator(=) ident(BoolStr)operator([)ident(i)operator(][)ident(True)operator(]) reserved(then)
+    reserved(else) reserved(if) ident(StringE)operator(.)ident(Text) operator(=) ident(BoolStr)operator([)ident(i)operator(])operator([)ident(True)operator(]) reserved(then)
       ident(State) operator(:=) ident(cbChecked)
     reserved(else)
       ident(Continue)operator(;)
     ident(Break)operator(;)
   reserved(end)operator(;)
 
-  ident(BoolStrCB)operator(.)ident(Visible) operator(:=) ident(State) reserved(in) operator([)ident(cbChecked)operator(,) ident(cbUnchecked)operator(];)
+  ident(BoolStrCB)operator(.)ident(Visible) operator(:=) ident(State) reserved(in) operator([)ident(cbChecked)operator(,) ident(cbUnchecked)operator(])operator(;)
   ident(BoolStrCB)operator(.)ident(State) operator(:=) ident(State)operator(;)
 
   ident(Desc) operator(:=) ident(StringE)operator(.)ident(Text)operator(;)
-  ident(Desc) operator(:=) ident(RegNameOfCLSID)operator(()ident(Desc)operator(\);)
+  ident(Desc) operator(:=) ident(RegNameOfCLSID)operator(()ident(Desc)operator(\))operator(;)
   reserved(with) ident(DescL) reserved(do) reserved(begin)
-    ident(Visible) operator(:=) operator(()ident(Desc) operator(<>) string<delimiter(')delimiter(')>operator(\);)
+    ident(Visible) operator(:=) operator(()ident(Desc) operator(<>) string<delimiter(')delimiter(')>operator(\))operator(;)
     reserved(if) ident(Visible) reserved(then)
       ident(Caption) operator(:=) string<delimiter(')content(CLSID is: )delimiter(')> operator(+) ident(Desc)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(OKStringBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(OKStringBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -9598,18 +9598,18 @@ reserved(begin)
     reserved(with) ident(ValuesWin)operator(.)ident(ValueNames) reserved(do)
       reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Count)operator(-)integer(1) reserved(do) reserved(begin)
         reserved(case) ident(StringTypeRG)operator(.)ident(ItemIndex) reserved(of)
-          integer(0)operator(:) ident(MainReg)operator(.)ident(WriteString)operator(()ident(Strings)operator([)ident(i)operator(],) ident(StringE)operator(.)ident(Text)operator(\);)
-          integer(1)operator(:) ident(MainReg)operator(.)ident(WriteExpandString)operator(()ident(Strings)operator([)ident(i)operator(],) ident(StringE)operator(.)ident(Text)operator(\);)
+          integer(0)operator(:) ident(MainReg)operator(.)ident(WriteString)operator(()ident(Strings)operator([)ident(i)operator(])operator(,) ident(StringE)operator(.)ident(Text)operator(\))operator(;)
+          integer(1)operator(:) ident(MainReg)operator(.)ident(WriteExpandString)operator(()ident(Strings)operator([)ident(i)operator(])operator(,) ident(StringE)operator(.)ident(Text)operator(\))operator(;)
         reserved(end)operator(;)
       reserved(end)operator(;)
-    ident(ValuesWin)operator(.)ident(UpdateValues)operator(()ident(True)operator(\);)
+    ident(ValuesWin)operator(.)ident(UpdateValues)operator(()ident(True)operator(\))operator(;)
   reserved(finally)
     ident(MainReg)operator(.)ident(CloseKey)operator(;)
   reserved(end)operator(;)
-  ident(ValuesWin)operator(.)ident(ValueListDblClick)operator(()ident(Sender)operator(\);)
+  ident(ValuesWin)operator(.)ident(ValueListDblClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(BoolStrCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(BoolStrCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -9622,10 +9622,10 @@ reserved(begin)
   reserved(if) ident(i) operator(>) ident(High)operator(()ident(BoolStr)operator(\)) reserved(then)
     ident(Exit)operator(;)
 
-  ident(StringE)operator(.)ident(Text) operator(:=) ident(BoolStr)operator([)ident(i)operator(][)ident(BoolStrCB)operator(.)ident(Checked)operator(];)
+  ident(StringE)operator(.)ident(Text) operator(:=) ident(BoolStr)operator([)ident(i)operator(])operator([)ident(BoolStrCB)operator(.)ident(Checked)operator(])operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(CardinalEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(CardinalEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(HexEditAutoChange) operator(:=) ident(True)operator(;)
   reserved(with) ident(CardBoolCB) reserved(do) reserved(begin)
@@ -9641,30 +9641,30 @@ reserved(begin)
   ident(HexEditAutoChange) operator(:=) ident(False)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(CardBoolCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(CardBoolCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(HexEditAutoChange) reserved(then)
     ident(Exit)operator(;)
-  ident(CardinalE)operator(.)ident(Value) operator(:=) ident(Ord)operator(()ident(CardBoolCB)operator(.)ident(Checked)operator(\);)
+  ident(CardinalE)operator(.)ident(Value) operator(:=) ident(Ord)operator(()ident(CardBoolCB)operator(.)ident(Checked)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(CardinalEKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(key) operator(=) ident(VK_RETURN) reserved(then) reserved(begin)
-    ident(OKIntBClick)operator(()ident(Sender)operator(\);)
-    ident(ValuesWin)operator(.)ident(FocusControl)operator(()ident(ValueList)operator(\);)
+    ident(OKIntBClick)operator(()ident(Sender)operator(\))operator(;)
+    ident(ValuesWin)operator(.)ident(FocusControl)operator(()ident(ValueList)operator(\))operator(;)
   reserved(end)operator(;)
   
   reserved(if) ident(key) operator(=) ident(VK_ESCAPE) reserved(then)
-    ident(CancelBClick)operator(()ident(Sender)operator(\);)
+    ident(CancelBClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(OKIntBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(OKIntBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
   
-  reserved(procedure) ident(Write4BB)operator(()reserved(const) ident(ValueName)operator(:) reserved(string)operator(;) ident(Value)operator(:) ident(Cardinal)operator(\);)
+  reserved(procedure) ident(Write4BB)operator(()reserved(const) ident(ValueName)operator(:) reserved(string)operator(;) ident(Value)operator(:) ident(Cardinal)operator(\))operator(;)
   reserved(var)
     ident(Typ)operator(:) ident(TRegDataType)operator(;)
   reserved(begin)
@@ -9676,7 +9676,7 @@ reserved(var)
     reserved(if) ident(Typ) reserved(in) ident(rdCardTypes) reserved(then)
       ident(Typ) operator(:=) ident(rdBinary)operator(;)
 
-    ident(MainReg)operator(.)ident(WriteBinType)operator(()ident(ValueName)operator(,) ident(ByteAOfInt)operator(()ident(CardinalE)operator(.)ident(Value)operator(\),) ident(Typ)operator(\);)
+    ident(MainReg)operator(.)ident(WriteBinType)operator(()ident(ValueName)operator(,) ident(ByteAOfInt)operator(()ident(CardinalE)operator(.)ident(Value)operator(\))operator(,) ident(Typ)operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
@@ -9685,28 +9685,28 @@ reserved(begin)
     reserved(with) ident(ValuesWin)operator(.)ident(ValueNames) reserved(do)
       reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Count)operator(-)integer(1) reserved(do) reserved(begin)
         reserved(case) ident(CardTypeRG)operator(.)ident(ItemIndex) reserved(of)
-          integer(0)operator(:) ident(MainReg)operator(.)ident(WriteCardinal)operator(()ident(Strings)operator([)ident(i)operator(],) ident(CardinalE)operator(.)ident(Value)operator(\);)
-          integer(1)operator(:) ident(MainReg)operator(.)ident(WriteCardinal)operator(()ident(Strings)operator([)ident(i)operator(],) ident(CardinalE)operator(.)ident(Value)operator(,) ident(True)operator(\);)
-          integer(2)operator(:) ident(Write4BB)operator(()ident(Strings)operator([)ident(i)operator(],) ident(CardinalE)operator(.)ident(Value)operator(\);)
+          integer(0)operator(:) ident(MainReg)operator(.)ident(WriteCardinal)operator(()ident(Strings)operator([)ident(i)operator(])operator(,) ident(CardinalE)operator(.)ident(Value)operator(\))operator(;)
+          integer(1)operator(:) ident(MainReg)operator(.)ident(WriteCardinal)operator(()ident(Strings)operator([)ident(i)operator(])operator(,) ident(CardinalE)operator(.)ident(Value)operator(,) ident(True)operator(\))operator(;)
+          integer(2)operator(:) ident(Write4BB)operator(()ident(Strings)operator([)ident(i)operator(])operator(,) ident(CardinalE)operator(.)ident(Value)operator(\))operator(;)
         reserved(end)operator(;)
       reserved(end)operator(;)
-    ident(ValuesWin)operator(.)ident(UpdateValues)operator(()ident(True)operator(\);)
+    ident(ValuesWin)operator(.)ident(UpdateValues)operator(()ident(True)operator(\))operator(;)
   reserved(finally)
     ident(MainReg)operator(.)ident(CloseKey)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(ShowPCChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(ShowPCChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(FocusControl)operator(()ident(TObject)operator(()ident(ShowPC)operator(.)ident(ActivePage)operator(.)ident(Tag)operator(\)) reserved(as) ident(TWinControl)operator(\);)
+  ident(FocusControl)operator(()ident(TObject)operator(()ident(ShowPC)operator(.)ident(ActivePage)operator(.)ident(Tag)operator(\)) reserved(as) ident(TWinControl)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(ShowPCChanging)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(AllowChange)operator(:) ident(Boolean)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(ShowPCChanging)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(AllowChange)operator(:) ident(Boolean)operator(\))operator(;)
 
-  reserved(function) ident(ByteAOfDWORD)operator(()ident(a)operator(:) ident(DWORD)operator(\):) ident(TByteA)operator(;)
+  reserved(function) ident(ByteAOfDWORD)operator(()ident(a)operator(:) ident(DWORD)operator(\))operator(:) ident(TByteA)operator(;)
   reserved(begin)
-    ident(SetLength)operator(()ident(Result)operator(,) ident(SizeOf)operator(()ident(DWORD)operator(\)\);)
-    ident(Move)operator(()ident(a)operator(,) ident(Pointer)operator(()ident(Result)operator(\)^,) ident(SizeOf)operator(()ident(DWORD)operator(\)\);)
+    ident(SetLength)operator(()ident(Result)operator(,) ident(SizeOf)operator(()ident(DWORD)operator(\))operator(\))operator(;)
+    ident(Move)operator(()ident(a)operator(,) ident(Pointer)operator(()ident(Result)operator(\))operator(^)operator(,) ident(SizeOf)operator(()ident(DWORD)operator(\))operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(var)
@@ -9717,58 +9717,58 @@ reserved(begin)
   reserved(if) ident(SourcePage) operator(=) ident(IntPage) reserved(then) reserved(begin)
 
     reserved(if) ident(TargetPage) operator(=) ident(StringPage) reserved(then) reserved(begin)
-      ident(AddHint)operator(()string<delimiter(')content(Converting: DWORD --> String)delimiter(')>operator(\);)
+      ident(AddHint)operator(()string<delimiter(')content(Converting: DWORD --> String)delimiter(')>operator(\))operator(;)
       ident(StringE)operator(.)ident(Text) operator(:=) ident(CardinalE)operator(.)ident(Text)operator(;)
     reserved(end) reserved(else) reserved(if) ident(TargetPage) operator(=) ident(BinaryPage) reserved(then) reserved(begin)
-      ident(AddHint)operator(()string<delimiter(')content(Converting: DWORD --> Binary)delimiter(')>operator(\);)
-      ident(BinaryHM)operator(.)ident(Data) operator(:=) ident(ByteAOfDWORD)operator(()ident(CardinalE)operator(.)ident(Value)operator(\);)
+      ident(AddHint)operator(()string<delimiter(')content(Converting: DWORD --> Binary)delimiter(')>operator(\))operator(;)
+      ident(BinaryHM)operator(.)ident(Data) operator(:=) ident(ByteAOfDWORD)operator(()ident(CardinalE)operator(.)ident(Value)operator(\))operator(;)
     reserved(end) reserved(else)
       ident(AllowChange) operator(:=) ident(False)operator(;)
 
   reserved(end) reserved(else) reserved(if) ident(SourcePage) operator(=) ident(StringPage) reserved(then) reserved(begin)
     reserved(if) ident(TargetPage) operator(=) ident(IntPage) reserved(then) reserved(begin)
       reserved(if) ident(IsValidCardinal)operator(()ident(StringE)operator(.)ident(Text)operator(\)) reserved(then) reserved(begin)
-        ident(AddHint)operator(()string<delimiter(')content(Converting: String --> DWORD)delimiter(')>operator(\);)
+        ident(AddHint)operator(()string<delimiter(')content(Converting: String --> DWORD)delimiter(')>operator(\))operator(;)
         ident(CardinalE)operator(.)ident(Text) operator(:=) ident(StringE)operator(.)ident(Text)operator(;)
       reserved(end) reserved(else) reserved(begin)
-        ident(AddHint)operator(()string<delimiter(')content(This no valid DWORD; Converting aborted.)delimiter(')>operator(,) ident(True)operator(\);)
+        ident(AddHint)operator(()string<delimiter(')content(This no valid DWORD; Converting aborted.)delimiter(')>operator(,) ident(True)operator(\))operator(;)
         ident(AllowChange) operator(:=) ident(False)operator(;)
       reserved(end)operator(;)
     reserved(end) reserved(else) reserved(if) ident(TargetPage) operator(=) ident(BinaryPage) reserved(then) reserved(begin)
-      ident(AddHint)operator(()string<delimiter(')content(Converting: String --> Binary)delimiter(')>operator(\);)
-      ident(BinaryHM)operator(.)ident(Data) operator(:=) ident(TByteA)operator(()ident(StringE)operator(.)ident(Text)operator(\);)
+      ident(AddHint)operator(()string<delimiter(')content(Converting: String --> Binary)delimiter(')>operator(\))operator(;)
+      ident(BinaryHM)operator(.)ident(Data) operator(:=) ident(TByteA)operator(()ident(StringE)operator(.)ident(Text)operator(\))operator(;)
     reserved(end) reserved(else) reserved(if) ident(TargetPage) operator(=) ident(MultiStringPage) reserved(then) reserved(begin)
-      ident(AddHint)operator(()string<delimiter(')content(Converting: String --> MultiString)delimiter(')>operator(\);)
+      ident(AddHint)operator(()string<delimiter(')content(Converting: String --> MultiString)delimiter(')>operator(\))operator(;)
       reserved(if) ident(SeparatorE)operator(.)ident(Text) operator(=) string<delimiter(')delimiter(')> reserved(then)
         ident(MultiStringM)operator(.)ident(Text) operator(:=) ident(StringE)operator(.)ident(Text)operator(;)
-      ident(SeparatorEChange)operator(()ident(Sender)operator(\);)
+      ident(SeparatorEChange)operator(()ident(Sender)operator(\))operator(;)
     reserved(end) reserved(else)
       ident(AllowChange) operator(:=) ident(False)operator(;)
 
   reserved(end) reserved(else) reserved(if) ident(SourcePage) operator(=) ident(BinaryPage) reserved(then) reserved(begin)
     reserved(if) ident(TargetPage) operator(=) ident(StringPage) reserved(then) reserved(begin)
-      ident(AddHint)operator(()string<delimiter(')content(Converting: Binary --> String)delimiter(')>operator(\);)
-      ident(StringE)operator(.)ident(Text) operator(:=) ident(FriendlyStr)operator(()reserved(string)operator(()ident(BinaryHM)operator(.)ident(Data)operator(\)\);)
+      ident(AddHint)operator(()string<delimiter(')content(Converting: Binary --> String)delimiter(')>operator(\))operator(;)
+      ident(StringE)operator(.)ident(Text) operator(:=) ident(FriendlyStr)operator(()reserved(string)operator(()ident(BinaryHM)operator(.)ident(Data)operator(\))operator(\))operator(;)
     reserved(end) reserved(else) reserved(if) ident(TargetPage) operator(=) ident(IntPage) reserved(then) reserved(begin)
       reserved(if) ident(Length)operator(()ident(BinaryHM)operator(.)ident(Data)operator(\)) operator(>=) ident(SizeOf)operator(()ident(DWORD)operator(\)) reserved(then) reserved(begin)
-        ident(AddHint)operator(()string<delimiter(')content(Converting: Binary --> DWORD)delimiter(')>operator(\);)
-        ident(CardinalE)operator(.)ident(Value) operator(:=) ident(PDWORD)operator(()ident(BinaryHM)operator(.)ident(Data)operator(\)^;)
+        ident(AddHint)operator(()string<delimiter(')content(Converting: Binary --> DWORD)delimiter(')>operator(\))operator(;)
+        ident(CardinalE)operator(.)ident(Value) operator(:=) ident(PDWORD)operator(()ident(BinaryHM)operator(.)ident(Data)operator(\))operator(^)operator(;)
       reserved(end) reserved(else) reserved(begin)
-        ident(AddHint)operator(()string<delimiter(')content(Binary value not long enough (4 Byte\); Converting aborted.)delimiter(')>operator(,) ident(True)operator(\);)
+        ident(AddHint)operator(()string<delimiter(')content(Binary value not long enough (4 Byte\); Converting aborted.)delimiter(')>operator(,) ident(True)operator(\))operator(;)
         ident(AllowChange) operator(:=) ident(False)operator(;)
       reserved(end)operator(;)
     reserved(end) reserved(else) reserved(if) ident(TargetPage) operator(=) ident(CryptoPage) reserved(then) reserved(begin)
       reserved(if) ident(ValuesWin)operator(.)ident(ValueNames)operator(.)ident(Count) operator(=) integer(1) reserved(then) reserved(begin)
-        ident(ValueName) operator(:=) ident(ValuesWin)operator(.)ident(ValueNames)operator([)integer(0)operator(];)
+        ident(ValueName) operator(:=) ident(ValuesWin)operator(.)ident(ValueNames)operator([)integer(0)operator(])operator(;)
         reserved(with) ident(CryptoTypeRG) reserved(do) reserved(begin)
           ident(ItemIndex) operator(:=) operator(-)integer(1)operator(;)
           reserved(if) ident(SameText)operator(()ident(ValueName)operator(,) string<delimiter(')content(ScreenSave_Data)delimiter(')>operator(\)) reserved(then) reserved(begin)
             ident(ItemIndex) operator(:=) integer(0)operator(;)
-            ident(CryptoE)operator(.)ident(Text) operator(:=) ident(DecodeScreenSaver)operator(()ident(BinaryHM)operator(.)ident(Data)operator(\);)
+            ident(CryptoE)operator(.)ident(Text) operator(:=) ident(DecodeScreenSaver)operator(()ident(BinaryHM)operator(.)ident(Data)operator(\))operator(;)
           reserved(end) reserved(else) reserved(if) ident(SameText)operator(()ident(ValueName)operator(,) string<delimiter(')content(parm1enc)delimiter(')>operator(\))
            reserved(or) ident(SameText)operator(()ident(ValueName)operator(,) string<delimiter(')content(parm2enc)delimiter(')>operator(\)) reserved(then) reserved(begin)
             ident(ItemIndex) operator(:=) integer(1)operator(;)
-            ident(CryptoE)operator(.)ident(Text) operator(:=) ident(DecodeSharedFolder)operator(()ident(BinaryHM)operator(.)ident(Data)operator(\);)
+            ident(CryptoE)operator(.)ident(Text) operator(:=) ident(DecodeSharedFolder)operator(()ident(BinaryHM)operator(.)ident(Data)operator(\))operator(;)
           reserved(end)operator(;)
         reserved(end)operator(;)
         reserved(if) ident(CryptoTypeRG)operator(.)ident(ItemIndex) operator(=) operator(-)integer(1) reserved(then)
@@ -9779,11 +9779,11 @@ reserved(begin)
 
   reserved(end) reserved(else) reserved(if) ident(SourcePage) operator(=) ident(MultiStringPage) reserved(then) reserved(begin)
     reserved(if) ident(TargetPage) operator(=) ident(StringPage) reserved(then) reserved(begin)
-      ident(AddHint)operator(()string<delimiter(')content(Converting: MultiString --> String )delimiter(')>operator(\);)
+      ident(AddHint)operator(()string<delimiter(')content(Converting: MultiString --> String )delimiter(')>operator(\))operator(;)
       reserved(if) ident(SeparatorE)operator(.)ident(Text) operator(=) string<delimiter(')delimiter(')> reserved(then)
         ident(StringE)operator(.)ident(Text) operator(:=) ident(MultiStringM)operator(.)ident(Text)
       reserved(else)
-        ident(StringE)operator(.)ident(Text) operator(:=) ident(Join)operator(()ident(MultiStringM)operator(.)ident(Lines)operator(,) ident(SeparatorE)operator(.)ident(Text)operator(\);)
+        ident(StringE)operator(.)ident(Text) operator(:=) ident(Join)operator(()ident(MultiStringM)operator(.)ident(Lines)operator(,) ident(SeparatorE)operator(.)ident(Text)operator(\))operator(;)
     comment(//end else if TargetPage = BinaryPage then begin)
     reserved(end) reserved(else)
       ident(AllowChange) operator(:=) ident(False)operator(;)
@@ -9793,13 +9793,13 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(ShowPCDrawTab)operator(()ident(Control)operator(:) ident(TCustomTabControl)operator(;) ident(TabIndex)operator(:) ident(Integer)operator(;)
-  reserved(const) ident(Rect)operator(:) ident(TRect)operator(;) ident(Active)operator(:) ident(Boolean)operator(\);)
+  reserved(const) ident(Rect)operator(:) ident(TRect)operator(;) ident(Active)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(var)
   ident(PC)operator(:) ident(TPageControl)operator(;)
   ident(Page)operator(:) ident(TTabSheet)operator(;)
 reserved(begin)
-  ident(PC) operator(:=) ident(TPageControl)operator(()ident(Control)operator(\);)
-  ident(Page) operator(:=) ident(PC)operator(.)ident(Pages)operator([)ident(TabIndex)operator(];)
+  ident(PC) operator(:=) ident(TPageControl)operator(()ident(Control)operator(\))operator(;)
+  ident(Page) operator(:=) ident(PC)operator(.)ident(Pages)operator([)ident(TabIndex)operator(])operator(;)
   reserved(with) ident(PC)operator(.)ident(Canvas)operator(.)ident(Font) reserved(do) reserved(begin)
     reserved(if) ident(Page) operator(=) ident(StringPage) reserved(then)
       ident(Color) operator(:=) ident(clBrightRed)
@@ -9818,21 +9818,21 @@ reserved(begin)
       ident(Brush)operator(.)ident(Color) operator(:=) ident(clGray)
     reserved(else)
       ident(Brush)operator(.)ident(Color) operator(:=) ident(clDarkGray)operator(;)
-    ident(FillRect)operator(()ident(Rect)operator(\);)
-    ident(TextOut)operator(()ident(Rect)operator(.)ident(Left) operator(+) integer(18) operator(+) integer(3)operator(,) ident(Rect)operator(.)ident(Top)operator(,) ident(Page)operator(.)ident(Caption)operator(\);)
-    ident(MainWin)operator(.)ident(ImageList1)operator(.)ident(Draw)operator(()ident(Control)operator(.)ident(Canvas)operator(,) ident(Rect)operator(.)ident(Left) operator(-) integer(1)operator(,) ident(Rect)operator(.)ident(Top) operator(-) integer(1)operator(,) ident(Page)operator(.)ident(ImageIndex)operator(\);)
+    ident(FillRect)operator(()ident(Rect)operator(\))operator(;)
+    ident(TextOut)operator(()ident(Rect)operator(.)ident(Left) operator(+) integer(18) operator(+) integer(3)operator(,) ident(Rect)operator(.)ident(Top)operator(,) ident(Page)operator(.)ident(Caption)operator(\))operator(;)
+    ident(MainWin)operator(.)ident(ImageList1)operator(.)ident(Draw)operator(()ident(Control)operator(.)ident(Canvas)operator(,) ident(Rect)operator(.)ident(Left) operator(-) integer(1)operator(,) ident(Rect)operator(.)ident(Top) operator(-) integer(1)operator(,) ident(Page)operator(.)ident(ImageIndex)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(ShowPCMouseDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Button)operator(:) ident(TMouseButton)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(ShowPC) reserved(do)
     reserved(if) ident(htOnItem) reserved(in) ident(GetHitTestInfoAt)operator(()ident(X)operator(,) ident(Y)operator(\)) reserved(then)
-      ident(TargetPage) operator(:=) ident(Pages)operator([)ident(IndexOfTabAt)operator(()ident(X)operator(,) ident(Y)operator(\)];)
+      ident(TargetPage) operator(:=) ident(Pages)operator([)ident(IndexOfTabAt)operator(()ident(X)operator(,) ident(Y)operator(\))operator(])operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(FormCreate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -9849,10 +9849,10 @@ reserved(begin)
   ident(TargetPage) operator(:=) reserved(nil)operator(;)
 
   comment(//Tagging)
-  ident(StringPage)operator(.)ident(Tag) operator(:=) ident(Integer)operator(()ident(StringE)operator(\);)
-  ident(IntPage)operator(.)ident(Tag) operator(:=) ident(Integer)operator(()ident(CardinalE)operator(\);)
-  ident(BinaryPage)operator(.)ident(Tag) operator(:=) ident(Integer)operator(()ident(BinaryHM)operator(\);)
-  ident(MultiStringPage)operator(.)ident(Tag) operator(:=) ident(Integer)operator(()ident(MultiStringM)operator(\);)
+  ident(StringPage)operator(.)ident(Tag) operator(:=) ident(Integer)operator(()ident(StringE)operator(\))operator(;)
+  ident(IntPage)operator(.)ident(Tag) operator(:=) ident(Integer)operator(()ident(CardinalE)operator(\))operator(;)
+  ident(BinaryPage)operator(.)ident(Tag) operator(:=) ident(Integer)operator(()ident(BinaryHM)operator(\))operator(;)
+  ident(MultiStringPage)operator(.)ident(Tag) operator(:=) ident(Integer)operator(()ident(MultiStringM)operator(\))operator(;)
   ident(ShowAsBinary) operator(:=) ident(False)operator(;)
 
   reserved(if) reserved(not) ident(Win9x) reserved(then)
@@ -9861,36 +9861,36 @@ reserved(begin)
   ident(MainPC)operator(.)ident(ActivePage) operator(:=) ident(HintPage)operator(;)
   ident(ShowPC)operator(.)ident(ActivePage) operator(:=) reserved(nil)operator(;)
 
-  ident(DropFileTarget)operator(.)directive(register)operator(()ident(StringE)operator(\);)
+  ident(DropFileTarget)operator(.)ident(register)operator(()ident(StringE)operator(\))operator(;)
 
   reserved(with) ident(StringTypeRG) reserved(do)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(ControlCount)operator(-)integer(1) reserved(do)
-      operator(()ident(Controls)operator([)ident(i)operator(]) reserved(as) ident(TRadioButton)operator(\).)ident(OnKeyDown) operator(:=) ident(StringEKeyDown)operator(;)
+      operator(()ident(Controls)operator([)ident(i)operator(]) reserved(as) ident(TRadioButton)operator(\))operator(.)ident(OnKeyDown) operator(:=) ident(StringEKeyDown)operator(;)
 
-  ident(ExternalEditB)operator(.)ident(Enabled) operator(:=) ident(FileEx)operator(()ident(PrefWin)operator(.)ident(ExternalHexEditE)operator(.)ident(Text)operator(\);)
+  ident(ExternalEditB)operator(.)ident(Enabled) operator(:=) ident(FileEx)operator(()ident(PrefWin)operator(.)ident(ExternalHexEditE)operator(.)ident(Text)operator(\))operator(;)
 
-  ident(PipelineThread) operator(:=) ident(TPipelineThread)operator(.)ident(CreateIt)operator(()ident(tpIdle)operator(,) string<delimiter(')delimiter(')>operator(,) ident(BinaryHM)operator(\);)
+  ident(PipelineThread) operator(:=) ident(TPipelineThread)operator(.)ident(CreateIt)operator(()ident(tpIdle)operator(,) string<delimiter(')delimiter(')>operator(,) ident(BinaryHM)operator(\))operator(;)
   ident(PipelineThread)operator(.)ident(OnChange) operator(:=) ident(LoadExternalBClick)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(OKBinaryBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(OKBinaryBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(Typ)operator(:) ident(Cardinal)operator(;)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(try)
-    ident(Typ) operator(:=) ident(StrToIntDef)operator(()ident(UntilChar)operator(()ident(DataTypeComB)operator(.)ident(Text)operator(,) char<delimiter(')content( )delimiter(')>operator(\),) ident(Integer)operator(()ident(rdBinary)operator(\)\);)
+    ident(Typ) operator(:=) ident(StrToIntDef)operator(()ident(UntilChar)operator(()ident(DataTypeComB)operator(.)ident(Text)operator(,) char<delimiter(')content( )delimiter(')>operator(\))operator(,) ident(Integer)operator(()ident(rdBinary)operator(\))operator(\))operator(;)
     ident(OpenCurKey)operator(;)
     reserved(with) ident(ValuesWin)operator(.)ident(ValueNames) reserved(do)
       reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Count)operator(-)integer(1) reserved(do)
-        ident(MainReg)operator(.)ident(WriteBinType)operator(()ident(Strings)operator([)ident(i)operator(],) ident(BinaryHM)operator(.)ident(Data)operator(,) ident(Typ)operator(\);)
-    ident(ValuesWin)operator(.)ident(UpdateValues)operator(()ident(True)operator(\);)
+        ident(MainReg)operator(.)ident(WriteBinType)operator(()ident(Strings)operator([)ident(i)operator(])operator(,) ident(BinaryHM)operator(.)ident(Data)operator(,) ident(Typ)operator(\))operator(;)
+    ident(ValuesWin)operator(.)ident(UpdateValues)operator(()ident(True)operator(\))operator(;)
   reserved(finally)
     ident(MainReg)operator(.)ident(CloseKey)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(HexGrid1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(HexGrid1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   comment({with BinaryHM do begin
     with BinL, Font do
@@ -9905,65 +9905,65 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(HexGrid1KeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(key) operator(=) ident(VK_RETURN) reserved(then) reserved(begin)
-    ident(OKBinaryBClick)operator(()ident(Sender)operator(\);)
-    ident(ValuesWin)operator(.)ident(FocusControl)operator(()ident(ValueList)operator(\);)
+    ident(OKBinaryBClick)operator(()ident(Sender)operator(\))operator(;)
+    ident(ValuesWin)operator(.)ident(FocusControl)operator(()ident(ValueList)operator(\))operator(;)
   reserved(end)operator(;)
   reserved(if) ident(key) operator(=) ident(VK_ESCAPE) reserved(then)
-    ident(CancelBClick)operator(()ident(Sender)operator(\);)
+    ident(CancelBClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(BoolStrPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(BoolStrPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(StringE)operator(.)ident(Text) operator(:=) ident(TMenuItem)operator(()ident(Sender)operator(\).)ident(Caption)operator(;)
+  ident(StringE)operator(.)ident(Text) operator(:=) ident(TMenuItem)operator(()ident(Sender)operator(\))operator(.)ident(Caption)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(StringPageEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(StringPageEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(FocusControl)operator(()ident(StringE)operator(\);)
+  ident(FocusControl)operator(()ident(StringE)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(IntPageEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(IntPageEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(FocusControl)operator(()ident(CardinalE)operator(\);)
+  ident(FocusControl)operator(()ident(CardinalE)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(BinaryPageEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(BinaryPageEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(FocusControl)operator(()ident(BinaryHM)operator(\);)
+  ident(FocusControl)operator(()ident(BinaryHM)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(ActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(ActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(ActivateThis)operator(()ident(Sender)operator(\);)
+  ident(ActivateThis)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(DeActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(DeActivateIt)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(DeActivateThis)operator(()ident(Sender)operator(\);)
+  ident(DeActivateThis)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(FormDeactivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(FormDeactivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Assigned)operator(()ident(ActiveControl)operator(\)) reserved(and) operator(()ident(ActiveControl)operator(.)ident(Tag) operator(=) ident(EditControlFlag)operator(\)) reserved(then)
-    ident(TEdit)operator(()ident(ActiveControl)operator(\).)ident(OnExit)operator(()ident(Sender)operator(\);)
+    ident(TEdit)operator(()ident(ActiveControl)operator(\))operator(.)ident(OnExit)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(FormActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(FormActivate)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Assigned)operator(()ident(ActiveControl)operator(\)) reserved(and) operator(()ident(ActiveControl)operator(.)ident(Tag) operator(=) ident(EditControlFlag)operator(\)) reserved(then)
-    ident(TEdit)operator(()ident(ActiveControl)operator(\).)ident(OnEnter)operator(()ident(Sender)operator(\);)
+    ident(TEdit)operator(()ident(ActiveControl)operator(\))operator(.)ident(OnEnter)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(MultiStringMChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(MultiStringMChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(MultiStringCountL)operator(.)ident(Caption) operator(:=) ident(StrNumerus)operator(()ident(MultiStringM)operator(.)ident(Lines)operator(.)ident(Count)operator(,)
-                                          string<delimiter(')content(Line)delimiter(')>operator(,) string<delimiter(')content(Lines)delimiter(')>operator(,) string<delimiter(')content(No)delimiter(')>operator(\);)
+                                          string<delimiter(')content(Line)delimiter(')>operator(,) string<delimiter(')content(Lines)delimiter(')>operator(,) string<delimiter(')content(No)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(OKMultiStringBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(OKMultiStringBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(UseExtendedModel)operator(:) ident(Boolean)operator(;)
   ident(i)operator(:) ident(Integer)operator(;)
@@ -9972,16 +9972,16 @@ reserved(begin)
   reserved(if) operator(()ident(MultiStringTypeRG)operator(.)ident(ItemIndex) operator(=) integer(1)operator(\)) reserved(then) reserved(begin)
     reserved(if) ident(ValuesWin)operator(.)ident(ValueCommonType) operator(=) ident(rdMultiString) reserved(then)
       reserved(if) ident(mrYes)operator(<>)ident(MessageDlg)operator(()string<delimiter(')content(Do you want to change the type of this value?)delimiter(')> operator(+) ident(EOL) operator(+)
-       string<delimiter(')content(MultiString --> String)delimiter(')>operator(,) ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbCancel)operator(],) integer(0)operator(\)) reserved(then)
+       string<delimiter(')content(MultiString --> String)delimiter(')>operator(,) ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbCancel)operator(])operator(,) integer(0)operator(\)) reserved(then)
         ident(Exit)operator(;)
 
     reserved(try)
       ident(OpenCurKey)operator(;)
-      ident(JoinedText) operator(:=) ident(Join)operator(()ident(MultiStringM)operator(.)ident(Lines)operator(,) ident(SeparatorE)operator(.)ident(Text)operator(\);)
+      ident(JoinedText) operator(:=) ident(Join)operator(()ident(MultiStringM)operator(.)ident(Lines)operator(,) ident(SeparatorE)operator(.)ident(Text)operator(\))operator(;)
       reserved(with) ident(ValuesWin)operator(.)ident(ValueNames) reserved(do)
         reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Count)operator(-)integer(1) reserved(do)
-          ident(MainReg)operator(.)ident(WriteString)operator(()ident(Strings)operator([)ident(i)operator(],) ident(JoinedText)operator(\);)
-      ident(ValuesWin)operator(.)ident(UpdateValues)operator(()ident(True)operator(\);)
+          ident(MainReg)operator(.)ident(WriteString)operator(()ident(Strings)operator([)ident(i)operator(])operator(,) ident(JoinedText)operator(\))operator(;)
+      ident(ValuesWin)operator(.)ident(UpdateValues)operator(()ident(True)operator(\))operator(;)
     reserved(finally)
       ident(MainReg)operator(.)ident(CloseKey)operator(;)
     reserved(end)operator(;)
@@ -9995,14 +9995,14 @@ reserved(begin)
                     ident(EOL) operator(+)
                     string<delimiter(')content(Yes: Delete empty lines)delimiter(')> operator(+) ident(EOL) operator(+)
                     string<delimiter(')content(No: Use the Extended Model)delimiter(')>operator(,)
-                    ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(,) ident(mbCancel)operator(],) integer(0)operator(\)) reserved(of)
+                    ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbNo)operator(,) ident(mbCancel)operator(])operator(,) integer(0)operator(\)) reserved(of)
 
     ident(mrNo)operator(:) ident(UseExtendedModel) operator(:=) ident(True)operator(;)
 
     ident(mrYes)operator(:) reserved(begin)
       reserved(with) ident(MultiStringM) reserved(do) reserved(begin)
         ident(Lines)operator(.)ident(BeginUpdate)operator(;)
-        ident(DeleteEmptyLines)operator(()ident(Lines)operator(\);)
+        ident(DeleteEmptyLines)operator(()ident(Lines)operator(\))operator(;)
         ident(Lines)operator(.)ident(EndUpdate)operator(;)
       reserved(end)operator(;)
     reserved(end)operator(;)
@@ -10015,86 +10015,86 @@ reserved(begin)
     ident(OpenCurKey)operator(;)
     reserved(with) ident(ValuesWin)operator(.)ident(ValueNames) reserved(do)
       reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Count)operator(-)integer(1) reserved(do) reserved(begin)
-        reserved(if) ident(MainReg)operator(.)ident(GetDataType)operator(()ident(Strings)operator([)ident(i)operator(]\)) operator(<>) ident(rdMultiString) reserved(then)
+        reserved(if) ident(MainReg)operator(.)ident(GetDataType)operator(()ident(Strings)operator([)ident(i)operator(])operator(\)) operator(<>) ident(rdMultiString) reserved(then)
           reserved(if) ident(mrYes) operator(<>) ident(MessageDlg)operator(()string<delimiter(')content(Do you want to change the type of this value?)delimiter(')> operator(+) ident(EOL) operator(+)
-           string<delimiter(')content(--> MultiString)delimiter(')>operator(,) ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbCancel)operator(],) integer(0)operator(\)) reserved(then)
+           string<delimiter(')content(--> MultiString)delimiter(')>operator(,) ident(mtWarning)operator(,) operator([)ident(mbYes)operator(,) ident(mbCancel)operator(])operator(,) integer(0)operator(\)) reserved(then)
             ident(Exit)operator(;)
         reserved(if) ident(UseExtendedModel) reserved(then)
-          ident(MainReg)operator(.)ident(WriteStringList)operator(()ident(Strings)operator([)ident(i)operator(],) ident(MultiStringM)operator(.)ident(Lines)operator(\))
+          ident(MainReg)operator(.)ident(WriteStringList)operator(()ident(Strings)operator([)ident(i)operator(])operator(,) ident(MultiStringM)operator(.)ident(Lines)operator(\))
         reserved(else)
-          ident(MainReg)operator(.)ident(WriteMultiString)operator(()ident(Strings)operator([)ident(i)operator(],) ident(MultiStringM)operator(.)ident(Lines)operator(\);)
+          ident(MainReg)operator(.)ident(WriteMultiString)operator(()ident(Strings)operator([)ident(i)operator(])operator(,) ident(MultiStringM)operator(.)ident(Lines)operator(\))operator(;)
       reserved(end)operator(;)
-    ident(ValuesWin)operator(.)ident(UpdateValues)operator(()ident(True)operator(\);)
+    ident(ValuesWin)operator(.)ident(UpdateValues)operator(()ident(True)operator(\))operator(;)
   reserved(finally)
     ident(MainReg)operator(.)ident(CloseKey)operator(;)
   reserved(end)operator(;)
 
-  ident(ValuesWin)operator(.)ident(ValueListDblClick)operator(()ident(Sender)operator(\);)
+  ident(ValuesWin)operator(.)ident(ValueListDblClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(StringAsColorPDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(StringAsColorPDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(ColorDlg)operator(.)ident(Execute) reserved(then)
-    ident(StringE)operator(.)ident(Text) operator(:=) ident(StringOfColor)operator(()ident(ColorDlg)operator(.)ident(Color)operator(,) ident(csfThreeSpacedDecimals)operator(\);)
+    ident(StringE)operator(.)ident(Text) operator(:=) ident(StringOfColor)operator(()ident(ColorDlg)operator(.)ident(Color)operator(,) ident(csfThreeSpacedDecimals)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(MultiStringMEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(MultiStringMEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(MultiStringM)operator(.)ident(SelectAll)operator(;)
-  ident(ActivateIt)operator(()ident(MultiStringM)operator(\);)
+  ident(ActivateIt)operator(()ident(MultiStringM)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(LadenMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(LadenMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(MultiStringOpenD) reserved(do) reserved(begin)
-    ident(InitialDir) operator(:=) ident(ExtractFileDrive)operator(()ident(MyDir)operator(\);)
+    ident(InitialDir) operator(:=) ident(ExtractFileDrive)operator(()ident(MyDir)operator(\))operator(;)
     reserved(if) ident(Execute) reserved(then)
-      ident(MultiStringM)operator(.)ident(Lines)operator(.)ident(LoadFromFile)operator(()ident(FileName)operator(\);)
+      ident(MultiStringM)operator(.)ident(Lines)operator(.)ident(LoadFromFile)operator(()ident(FileName)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SpeichernMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SpeichernMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(MultiStringSaveD) reserved(do) reserved(begin)
-    ident(InitialDir) operator(:=) ident(ExtractFileDrive)operator(()ident(MyDir)operator(\);)
+    ident(InitialDir) operator(:=) ident(ExtractFileDrive)operator(()ident(MyDir)operator(\))operator(;)
     reserved(if) ident(Execute) reserved(then)
-      ident(MultiStringM)operator(.)ident(Lines)operator(.)ident(SaveToFile)operator(()ident(FileName)operator(\);)
+      ident(MultiStringM)operator(.)ident(Lines)operator(.)ident(SaveToFile)operator(()ident(FileName)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(Hinzufgen1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(Hinzufgen1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(SL)operator(:) ident(TStringList)operator(;)
 reserved(begin)
   reserved(with) ident(MultiStringOpenD) reserved(do) reserved(begin)
-    ident(InitialDir) operator(:=) ident(ExtractFileDrive)operator(()ident(MyDir)operator(\);)
+    ident(InitialDir) operator(:=) ident(ExtractFileDrive)operator(()ident(MyDir)operator(\))operator(;)
     reserved(if) ident(Execute) reserved(then) reserved(begin)
       ident(SL) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
-      ident(SL)operator(.)ident(LoadFromFile)operator(()ident(FileName)operator(\);)
-      ident(MultiStringM)operator(.)ident(Lines)operator(.)ident(AddStrings)operator(()ident(SL)operator(\);)
+      ident(SL)operator(.)ident(LoadFromFile)operator(()ident(FileName)operator(\))operator(;)
+      ident(MultiStringM)operator(.)ident(Lines)operator(.)ident(AddStrings)operator(()ident(SL)operator(\))operator(;)
       ident(SL)operator(.)ident(Free)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(CancelBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(CancelBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(ValuesWin)operator(.)ident(FocusControl)operator(()ident(ValueList)operator(\);)
-  ident(ValuesWin)operator(.)ident(ValueListChange)operator(()ident(Sender)operator(,) ident(ValueList)operator(.)ident(Selected)operator(,) ident(ctState)operator(\);)
+  ident(ValuesWin)operator(.)ident(FocusControl)operator(()ident(ValueList)operator(\))operator(;)
+  ident(ValuesWin)operator(.)ident(ValueListChange)operator(()ident(Sender)operator(,) ident(ValueList)operator(.)ident(Selected)operator(,) ident(ctState)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(HexGrid1Enter)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(HexGrid1Enter)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(HexGrid1Click)operator(()ident(Sender)operator(\);)
+  ident(HexGrid1Click)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SpyClearTracesBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SpyClearTracesBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(SpyLB)operator(.)ident(Clear)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(SpyLBKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(begin)
   reserved(if) operator(()ident(ssShift) reserved(in) ident(Shift)operator(\)) reserved(and) operator(()ident(key) operator(=) ident(VK_DELETE)operator(\)) reserved(then) reserved(begin)
     ident(key) operator(:=) integer(0)operator(;)
@@ -10103,23 +10103,23 @@ reserved(begin)
 
   reserved(if) ident(key) operator(=) ident(VK_F9) reserved(then) reserved(begin)
     ident(key) operator(:=) integer(0)operator(;)
-    ident(SwapFonts)operator(()ident(SpyLB)operator(\);)
+    ident(SwapFonts)operator(()ident(SpyLB)operator(\))operator(;)
   ident(Exit)operator(;) reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(BinLClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(BinLClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
  comment(// with HexGrid1 do)
  comment(//   Byt[ActiveByte] := IntOfBin(BinL.Caption\);)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(HexGrid1KeyUp)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(begin)
   comment(//HexGrid1Click(Sender\);)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(ValueViewChanged)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(ValueViewChanged)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -10129,39 +10129,39 @@ reserved(begin)
   ident(SpyThread)operator(.)ident(Suspend)operator(;)
   ident(OpenCurKey)operator(;)
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(ValueList)operator(.)ident(Items)operator(.)ident(Count)operator(-)integer(1) reserved(do)
-    ident(ValuesWin)operator(.)ident(UpdateValue)operator(()ident(MainReg)operator(,) ident(ValueList)operator(.)ident(Items)operator([)ident(i)operator(]\);)
+    ident(ValuesWin)operator(.)ident(UpdateValue)operator(()ident(MainReg)operator(,) ident(ValueList)operator(.)ident(Items)operator([)ident(i)operator(])operator(\))operator(;)
 
   ident(MainReg)operator(.)ident(CloseKey)operator(;)
   ident(SpyThread)operator(.)ident(Resume)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(HexEdit1Change)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(HexEdit1Change)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) reserved(not) ident(HexEditAutoChange) reserved(then)
     ident(CardinalE)operator(.)ident(Value) operator(:=) ident(HexEdit1)operator(.)ident(Value)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SortMultiStringMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SortMultiStringMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(SL)operator(:) ident(TStringList)operator(;)
 reserved(begin)
   ident(SL) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
   reserved(with) ident(SL) reserved(do) reserved(begin)
-    ident(Assign)operator(()ident(MultiStringM)operator(.)ident(Lines)operator(\);)
+    ident(Assign)operator(()ident(MultiStringM)operator(.)ident(Lines)operator(\))operator(;)
     ident(Sort)operator(;)
   reserved(end)operator(;)
-  ident(MultiStringM)operator(.)ident(Lines)operator(.)ident(Assign)operator(()ident(SL)operator(\);)
+  ident(MultiStringM)operator(.)ident(Lines)operator(.)ident(Assign)operator(()ident(SL)operator(\))operator(;)
   ident(SL)operator(.)ident(Free)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SpyTestLClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SpyTestLClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(SpyTestL)operator(.)ident(Caption) operator(:=) ident(StrOfBool)operator(()ident(SpyThread)operator(.)ident(Suspended)operator(,) string<delimiter(')content(No Spy.)delimiter(')>operator(,) string<delimiter(')content(Spy active.)delimiter(')>operator(\);)
+  ident(SpyTestL)operator(.)ident(Caption) operator(:=) ident(StrOfBool)operator(()ident(SpyThread)operator(.)ident(Suspended)operator(,) string<delimiter(')content(No Spy.)delimiter(')>operator(,) string<delimiter(')content(Spy active.)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(FocusForEditing)operator(;)
 reserved(begin)
-  ident(FocusControl)operator(()ident(MainPC)operator(\);)
+  ident(FocusControl)operator(()ident(MainPC)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(TWorkWin)operator(.)ident(LoadBoolStr)operator(:) ident(Boolean)operator(;)
@@ -10172,29 +10172,29 @@ reserved(var)
 reserved(begin)
   ident(Result) operator(:=) ident(True)operator(;)
 
-  ident(AddHint)operator(()string<delimiter(')content(Loading Boolean Strings...)delimiter(')>operator(\);)
+  ident(AddHint)operator(()string<delimiter(')content(Loading Boolean Strings...)delimiter(')>operator(\))operator(;)
 
   ident(FileName) operator(:=) ident(PlutoDir) operator(+) ident(BoolStrFileName)operator(;)
   reserved(if) reserved(not) ident(FileEx)operator(()ident(FileName)operator(\)) reserved(then) reserved(begin)
-    ident(AddToLastHint)operator(()string<delimiter(')content(not found:)delimiter(')>operator(\);)
-    ident(AddHint)operator(()ident(FileName)operator(\);)
+    ident(AddToLastHint)operator(()string<delimiter(')content(not found:)delimiter(')>operator(\))operator(;)
+    ident(AddHint)operator(()ident(FileName)operator(\))operator(;)
     ident(Result) operator(:=) ident(False)operator(;)
   reserved(end) reserved(else) reserved(begin)
     ident(SL) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
     reserved(try)
-      ident(SL)operator(.)ident(LoadFromFile)operator(()ident(FileName)operator(\);)
-      ident(DeleteCommentLines)operator(()ident(SL)operator(\);)
+      ident(SL)operator(.)ident(LoadFromFile)operator(()ident(FileName)operator(\))operator(;)
+      ident(DeleteCommentLines)operator(()ident(SL)operator(\))operator(;)
       ident(BoolStr) operator(:=) reserved(nil)operator(;)
-      ident(SetLength)operator(()ident(BoolStr)operator(,) ident(SL)operator(.)ident(Count)operator(\);)
+      ident(SetLength)operator(()ident(BoolStr)operator(,) ident(SL)operator(.)ident(Count)operator(\))operator(;)
       reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin)
         comment(//Split the string by the '|'-sign)
-        ident(p) operator(:=) ident(Pos)operator(()char<delimiter(')content(|)delimiter(')>operator(,) ident(SL)operator([)ident(i)operator(]\);)
-        ident(BoolStr)operator([)ident(i)operator(][)ident(False)operator(]) operator(:=) ident(Copy)operator(()ident(SL)operator([)ident(i)operator(],) integer(1)operator(,) ident(p)operator(-)integer(1)operator(\);)
-        ident(BoolStr)operator([)ident(i)operator(][)ident(True)operator(]) operator(:=) ident(Copy)operator(()ident(SL)operator([)ident(i)operator(],) ident(p)operator(+)integer(1)operator(,) ident(Length)operator(()ident(SL)operator([)ident(i)operator(]\)) operator(-) ident(p)operator(\);)
+        ident(p) operator(:=) ident(Pos)operator(()char<delimiter(')content(|)delimiter(')>operator(,) ident(SL)operator([)ident(i)operator(])operator(\))operator(;)
+        ident(BoolStr)operator([)ident(i)operator(])operator([)ident(False)operator(]) operator(:=) ident(Copy)operator(()ident(SL)operator([)ident(i)operator(])operator(,) integer(1)operator(,) ident(p)operator(-)integer(1)operator(\))operator(;)
+        ident(BoolStr)operator([)ident(i)operator(])operator([)ident(True)operator(]) operator(:=) ident(Copy)operator(()ident(SL)operator([)ident(i)operator(])operator(,) ident(p)operator(+)integer(1)operator(,) ident(Length)operator(()ident(SL)operator([)ident(i)operator(])operator(\)) operator(-) ident(p)operator(\))operator(;)
       reserved(end)operator(;)
     reserved(finally)
       ident(SL)operator(.)ident(Free)operator(;)
-      ident(AddToLastHint)operator(()string<delimiter(')content(OK)delimiter(')>operator(\);)
+      ident(AddToLastHint)operator(()string<delimiter(')content(OK)delimiter(')>operator(\))operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
@@ -10211,29 +10211,29 @@ reserved(begin)
   reserved(if) reserved(not) ident(FileEx)operator(()ident(FileName)operator(\)) reserved(then)
     ident(Result) operator(:=) ident(False)
   reserved(else) reserved(begin)
-    ident(AddHint)operator(()string<delimiter(')content(Loading Sisyphus Filter Settings...)delimiter(')>operator(\);)
+    ident(AddHint)operator(()string<delimiter(')content(Loading Sisyphus Filter Settings...)delimiter(')>operator(\))operator(;)
     ident(SL) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
     reserved(try)
-      ident(SL)operator(.)ident(LoadFromFile)operator(()ident(FileName)operator(\);)
-      ident(DeleteCommentLines)operator(()ident(SL)operator(,) char<delimiter(')content(#)delimiter(')>operator(\);)
+      ident(SL)operator(.)ident(LoadFromFile)operator(()ident(FileName)operator(\))operator(;)
+      ident(DeleteCommentLines)operator(()ident(SL)operator(,) char<delimiter(')content(#)delimiter(')>operator(\))operator(;)
       reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do)
-        ident(SL)operator([)ident(i)operator(]) operator(:=) ident(TrimLeft)operator(()ident(SL)operator([)ident(i)operator(]\);)
+        ident(SL)operator([)ident(i)operator(]) operator(:=) ident(TrimLeft)operator(()ident(SL)operator([)ident(i)operator(])operator(\))operator(;)
 
       ident(SisyFilter)operator(.)ident(Clear)operator(;)
-      ident(SisyFilter)operator(.)ident(AddStrings)operator(()ident(SL)operator(\);)
+      ident(SisyFilter)operator(.)ident(AddStrings)operator(()ident(SL)operator(\))operator(;)
     reserved(finally)
       ident(SL)operator(.)ident(Free)operator(;)
-      ident(AddToLastHint)operator(()string<delimiter(')content(OK)delimiter(')>operator(\);)
+      ident(AddToLastHint)operator(()string<delimiter(')content(OK)delimiter(')>operator(\))operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SisyTVGetSelectedIndex)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SisyTVGetSelectedIndex)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
 reserved(begin)
   ident(Node)operator(.)ident(SelectedIndex) operator(:=) ident(Node)operator(.)ident(ImageIndex)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SisyTVDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SisyTVDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(Node)operator(:) ident(TTreeNode)operator(;)
   ident(Path)operator(:) reserved(string)operator(;)
@@ -10242,7 +10242,7 @@ reserved(begin)
   reserved(if) reserved(not) ident(Assigned)operator(()ident(Node)operator(\)) reserved(then)
     ident(Exit)operator(;)
 
-  ident(Path) operator(:=) ident(RootOfNode)operator(()ident(Node)operator(\).)ident(Text)operator(;)
+  ident(Path) operator(:=) ident(RootOfNode)operator(()ident(Node)operator(\))operator(.)ident(Text)operator(;)
 
   reserved(if) ident(Node)operator(.)ident(Level) operator(>) integer(0) reserved(then) reserved(begin)
     reserved(if) ident(Node)operator(.)ident(Level) operator(=) integer(2) reserved(then)
@@ -10253,20 +10253,20 @@ reserved(begin)
       ident(Path) operator(:=) ident(Path) operator(+) char<delimiter(')content(\\)delimiter(')> operator(+) ident(Node)operator(.)ident(Text)  comment(//SubKey)
   reserved(end)operator(;)
 
-  ident(MainWin)operator(.)ident(GotoKey)operator(()ident(Path)operator(\);)
+  ident(MainWin)operator(.)ident(GotoKey)operator(()ident(Path)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(DeleteChange)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(DeleteChange)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
 reserved(var)
   ident(SubNode)operator(:) ident(TTreeNode)operator(;)
 
-  reserved(procedure) ident(FreeSisyChangeNode)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\);)
+  reserved(procedure) ident(FreeSisyChangeNode)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
   reserved(begin)
     reserved(try)
       reserved(with) operator(()ident(TObject)operator(()ident(Node)operator(.)ident(Data)operator(\)) reserved(as) ident(TSisyChange)operator(\)) reserved(do)
         ident(Free)operator(;)
     reserved(except)
-      ident(ReportFmt)operator(()string<delimiter(')content(errors)delimiter(')>operator(,) string<delimiter(')content(Context could not be freed: "%s")delimiter(')>operator(,) operator([)ident(Node)operator(.)ident(Text)operator(]\);)
+      ident(ReportFmt)operator(()string<delimiter(')content(errors)delimiter(')>operator(,) string<delimiter(')content(Context could not be freed: "%s")delimiter(')>operator(,) operator([)ident(Node)operator(.)ident(Text)operator(])operator(\))operator(;)
     reserved(end)operator(;)
 
     ident(Node)operator(.)ident(Delete)operator(;)
@@ -10280,30 +10280,30 @@ reserved(begin)
     ident(Node) operator(:=) ident(Node)operator(.)ident(Parent)operator(;)
 
   reserved(if) ident(Node)operator(.)ident(Level) operator(=) integer(0) reserved(then) reserved(begin)
-    ident(SisyTV)operator(.)ident(Selected) operator(:=) ident(GetNextBest)operator(()ident(RootOfNode)operator(()ident(Node)operator(\)\);)
+    ident(SisyTV)operator(.)ident(Selected) operator(:=) ident(GetNextBest)operator(()ident(RootOfNode)operator(()ident(Node)operator(\))operator(\))operator(;)
     ident(SubNode) operator(:=) ident(Node)operator(.)ident(GetFirstChild)operator(;)
     reserved(while) ident(Assigned)operator(()ident(SubNode)operator(\)) reserved(do) reserved(begin)
-      ident(FreeSisyChangeNode)operator(()ident(SubNode)operator(\);)
+      ident(FreeSisyChangeNode)operator(()ident(SubNode)operator(\))operator(;)
     ident(SubNode) operator(:=) ident(Node)operator(.)ident(GetFirstChild)operator(;) reserved(end)operator(;)
     ident(Node)operator(.)ident(Delete)operator(;)
   reserved(end) reserved(else) reserved(begin)
-    ident(SisyTV)operator(.)ident(Selected) operator(:=) ident(GetNextBest)operator(()ident(Node)operator(\);)
-    ident(FreeSisyChangeNode)operator(()ident(Node)operator(\);)
+    ident(SisyTV)operator(.)ident(Selected) operator(:=) ident(GetNextBest)operator(()ident(Node)operator(\))operator(;)
+    ident(FreeSisyChangeNode)operator(()ident(Node)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(DeactivateChange)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(DeactivateChange)operator(()ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
 reserved(begin)
-  ident(Node) operator(:=) ident(RootOfNode)operator(()ident(Node)operator(\);)
+  ident(Node) operator(:=) ident(RootOfNode)operator(()ident(Node)operator(\))operator(;)
 
   reserved(if) reserved(not) ident(Assigned)operator(()ident(Node)operator(\)) reserved(then)
     ident(Exit)operator(;)
 
   reserved(if) ident(SisyChangeActivated)operator(()ident(Node)operator(\)) reserved(then) reserved(begin)
-    ident(SetSisyChangeState)operator(()ident(Node)operator(,) ident(False)operator(\);)
+    ident(SetSisyChangeState)operator(()ident(Node)operator(,) ident(False)operator(\))operator(;)
     ident(Node)operator(.)ident(Cut) operator(:=) ident(True)operator(;)
   reserved(end) reserved(else) reserved(begin)
-    ident(SetSisyChangeState)operator(()ident(Node)operator(,) ident(True)operator(\);)
+    ident(SetSisyChangeState)operator(()ident(Node)operator(,) ident(True)operator(\))operator(;)
     ident(Node)operator(.)ident(Cut) operator(:=) ident(False)operator(;)
   reserved(end)operator(;)
   ident(SisyTV)operator(.)ident(Repaint)operator(;)
@@ -10321,11 +10321,11 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(SisyTVKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(var)
   ident(Node)operator(:) ident(TTreeNode)operator(;)
 reserved(begin)
-  ident(Node) operator(:=) ident(RootOfNode)operator(()ident(SisyTV)operator(.)ident(Selected)operator(\);)
+  ident(Node) operator(:=) ident(RootOfNode)operator(()ident(SisyTV)operator(.)ident(Selected)operator(\))operator(;)
   reserved(if) reserved(not) ident(Assigned)operator(()ident(Node)operator(\)) reserved(then)
     ident(Exit)operator(;)
 
@@ -10342,12 +10342,12 @@ reserved(begin)
     CopySelectedChangeName;})
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SisyCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SisyCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) reserved(not) ident(Started) reserved(then)
     ident(Exit)operator(;)
 
-  reserved(with) ident(TCheckBox)operator(()ident(Sender)operator(\),) ident(TSisyThread)operator(()ident(Sisys)operator([)ident(Tag)operator(]\)) reserved(do) reserved(begin)
+  reserved(with) ident(TCheckBox)operator(()ident(Sender)operator(\))operator(,) ident(TSisyThread)operator(()ident(Sisys)operator([)ident(Tag)operator(])operator(\)) reserved(do) reserved(begin)
     reserved(if) ident(Checked) reserved(then)
       ident(Resume)
     reserved(else)
@@ -10355,31 +10355,31 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(CurValueEEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(CurValueEEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(CurValueE)operator(.)ident(Text) operator(:=) ident(RealValueName)operator(()ident(ValueList)operator(.)ident(ItemFocused)operator(\);)
+  ident(CurValueE)operator(.)ident(Text) operator(:=) ident(RealValueName)operator(()ident(ValueList)operator(.)ident(ItemFocused)operator(\))operator(;)
   ident(CurValueE)operator(.)ident(SelectAll)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(CurValueEKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 
-  reserved(procedure) ident(RenameValue)operator(()ident(NewName)operator(:) reserved(string)operator(\);)
+  reserved(procedure) ident(RenameValue)operator(()ident(NewName)operator(:) reserved(string)operator(\))operator(;)
   reserved(var)
     ident(Item)operator(:) ident(TListItem)operator(;)
   reserved(begin)
     ident(Item) operator(:=) ident(ValueList)operator(.)ident(ItemFocused)operator(;)
     reserved(if) ident(ValuesWin)operator(.)ident(TryRenameValue)operator(()ident(CurKey)operator(.)ident(Value)operator(,) ident(NewName)operator(\)) reserved(then)
-      ident(SetRealValueName)operator(()ident(Item)operator(,) ident(NewName)operator(\);)
+      ident(SetRealValueName)operator(()ident(Item)operator(,) ident(NewName)operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
   reserved(if) ident(Key) operator(=) ident(VK_RETURN) reserved(then) reserved(begin)
     ident(SpyThread)operator(.)ident(Suspend)operator(;)
     reserved(try)
-      ident(RenameValue)operator(()ident(CurValueE)operator(.)ident(Text)operator(\);)
-      ident(ValuesWin)operator(.)ident(ValueListDblClick)operator(()ident(Self)operator(\);)
-      ident(FocusControl)operator(()ident(CurValueE)operator(\);)
+      ident(RenameValue)operator(()ident(CurValueE)operator(.)ident(Text)operator(\))operator(;)
+      ident(ValuesWin)operator(.)ident(ValueListDblClick)operator(()ident(Self)operator(\))operator(;)
+      ident(FocusControl)operator(()ident(CurValueE)operator(\))operator(;)
     reserved(finally)
       ident(SpyThread)operator(.)ident(Restart) operator(:=) ident(True)operator(;)
       ident(SpyThread)operator(.)ident(Resume)operator(;)
@@ -10387,28 +10387,28 @@ reserved(begin)
     ident(Key) operator(:=) integer(0)operator(;)
     comment(//CurValueE.SelectAll;)
   reserved(end) reserved(else) reserved(if) ident(Key) operator(=) ident(VK_ESCAPE) reserved(then) reserved(begin)
-    ident(ValuesWin)operator(.)ident(ValueListDblClick)operator(()ident(Self)operator(\);)
+    ident(ValuesWin)operator(.)ident(ValueListDblClick)operator(()ident(Self)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(BinaryHMLineChange)operator(()ident(NewLine)operator(:) ident(Cardinal)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(BinaryHMLineChange)operator(()ident(NewLine)operator(:) ident(Cardinal)operator(\))operator(;)
 reserved(begin)
   ident(OffsetHE)operator(.)ident(Value) operator(:=) ident(BinaryHM)operator(.)ident(Pos)operator(;)
  comment(// BinaryAsIntL.Value := Integer(BinaryHM.CurentCard\);)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(OffsetHEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(OffsetHEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(BinaryHM)operator(.)ident(Pos) operator(:=) ident(OffsetHE)operator(.)ident(Value)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SpyDelayIEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SpyDelayIEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Assigned)operator(()ident(SpyThread)operator(\)) reserved(then)
     ident(SpyThread)operator(.)ident(Delay) operator(:=) ident(SpyDelayIE)operator(.)ident(Value)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SisyTVExpanded)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SisyTVExpanded)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Node)operator(:) ident(TTreeNode)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Node)operator(.)ident(ImageIndex) operator(=) integer(8) reserved(then)
     ident(Node)operator(.)ident(ImageIndex) operator(:=) integer(7)operator(;)
@@ -10421,36 +10421,36 @@ reserved(begin)
   reserved(with) ident(SisyTV)operator(.)ident(Items) reserved(do) reserved(begin)
     ident(Node) operator(:=) ident(GetFirstNode)operator(;)
     reserved(while) ident(Assigned)operator(()ident(Node)operator(\)) reserved(do) reserved(begin)
-      ident(DeleteChange)operator(()ident(Node)operator(\);)
+      ident(DeleteChange)operator(()ident(Node)operator(\))operator(;)
       ident(Node) operator(:=) ident(GetFirstNode)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(ClearChangesBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(ClearChangesBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(mrOK) operator(<>) ident(MessageDlg)operator(()string<delimiter(')content(Do you really want to clear all changes?)delimiter(')>operator(,)
-   ident(mtWarning)operator(,) operator([)ident(mbOK)operator(,) ident(mbCancel)operator(],) integer(0)operator(\)) reserved(then)
+   ident(mtWarning)operator(,) operator([)ident(mbOK)operator(,) ident(mbCancel)operator(])operator(,) integer(0)operator(\)) reserved(then)
     ident(Exit)operator(;)
 
   ident(ClearChanges)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(FilterChangesBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(FilterChangesBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(NotePad)operator(()ident(PlutoDir) operator(+) ident(SisyFilterFileName)operator(\);)
+  ident(NotePad)operator(()ident(PlutoDir) operator(+) ident(SisyFilterFileName)operator(\))operator(;)
   ident(ShowMessage)operator(()string<delimiter(')content(Click OK when you finished editing.)delimiter(')> operator(+) ident(EOL) operator(+)
-              string<delimiter(')content((Pluto will reload the filter settings then.\))delimiter(')>operator(\);)
+              string<delimiter(')content((Pluto will reload the filter settings then.\))delimiter(')>operator(\))operator(;)
   ident(LoadSisyFilter)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SisyTVPUPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SisyTVPUPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(KeySelected)operator(:) ident(Boolean)operator(;)
   ident(Node)operator(:) ident(TTreeNode)operator(;)
 reserved(begin)
   ident(Node) operator(:=) ident(SisyTV)operator(.)ident(Selected)operator(;)
-  ident(KeySelected) operator(:=) ident(Assigned)operator(()ident(Node)operator(\);)
+  ident(KeySelected) operator(:=) ident(Assigned)operator(()ident(Node)operator(\))operator(;)
 
   ident(SisyGoToKeyMI)operator(.)ident(Enabled) operator(:=) ident(KeySelected)operator(;)
   ident(SisyDeleteChangeMI)operator(.)ident(Enabled) operator(:=) ident(KeySelected)operator(;)
@@ -10459,37 +10459,37 @@ reserved(begin)
   reserved(if) reserved(not) ident(KeySelected) reserved(then)
     ident(Exit)operator(;)
 
-  ident(SisyActivateChangeMI)operator(.)ident(Checked) operator(:=) ident(SisyChangeActivated)operator(()ident(RootOfNode)operator(()ident(Node)operator(\)\);)
+  ident(SisyActivateChangeMI)operator(.)ident(Checked) operator(:=) ident(SisyChangeActivated)operator(()ident(RootOfNode)operator(()ident(Node)operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SisyActivateChangeMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SisyActivateChangeMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(DeactivateChange)operator(()ident(SisyTV)operator(.)ident(Selected)operator(\))
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SisyDeleteChangeMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SisyDeleteChangeMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(DeleteChange)operator(()ident(SisyTV)operator(.)ident(Selected)operator(\))
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SisyCopyPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SisyCopyPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(CopySelectedChangeName)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(FileMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(FileMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(s)operator(:) reserved(string)operator(;)
 reserved(begin)
   reserved(with) ident(FileOpenD) reserved(do) reserved(begin)
-    ident(s) operator(:=) ident(ExtractPath)operator(()ident(StringE)operator(.)ident(Text)operator(\);)
+    ident(s) operator(:=) ident(ExtractPath)operator(()ident(StringE)operator(.)ident(Text)operator(\))operator(;)
     reserved(if) ident(s) operator(<>) string<delimiter(')delimiter(')> reserved(then)
       ident(InitialDir) operator(:=) ident(s)
     reserved(else)
       ident(InitialDir) operator(:=) ident(MyDir)operator(;)
 
-    ident(s) operator(:=) ident(ExtractFileName)operator(()ident(StringE)operator(.)ident(Text)operator(\);)
-    ident(s) operator(:=) ident(DeleteChars)operator(()ident(s)operator(,) char<delimiter(')content(/)delimiter(')>operator(\);)
+    ident(s) operator(:=) ident(ExtractFileName)operator(()ident(StringE)operator(.)ident(Text)operator(\))operator(;)
+    ident(s) operator(:=) ident(DeleteChars)operator(()ident(s)operator(,) char<delimiter(')content(/)delimiter(')>operator(\))operator(;)
     reserved(if) ident(s) operator(<>) string<delimiter(')delimiter(')> reserved(then)
       ident(FileName) operator(:=) ident(s)operator(;)
 
@@ -10498,7 +10498,7 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(ExternalEditBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(ExternalEditBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(FileName)operator(:) reserved(string)operator(;)
 reserved(begin)
@@ -10507,12 +10507,12 @@ reserved(begin)
   reserved(if) ident(SaveByteA)operator(()ident(BinaryHM)operator(.)ident(Data)operator(,) ident(FileName)operator(\)) reserved(then)
     ident(ExecFileWith)operator(()ident(PrefWin)operator(.)ident(ExternalHexEditE)operator(.)ident(Text)operator(,) ident(FileName)operator(\))
   reserved(else)
-    ident(ShowMessage)operator(()string<delimiter(')content(Could not write into file:)delimiter(')> operator(+) ident(EOL) operator(+) ident(FileName)operator(\);)
+    ident(ShowMessage)operator(()string<delimiter(')content(Could not write into file:)delimiter(')> operator(+) ident(EOL) operator(+) ident(FileName)operator(\))operator(;)
 
   ident(PipelineThread)operator(.)ident(FileName) operator(:=) ident(FileName)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(LoadExternalBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(LoadExternalBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(FileName)operator(:) reserved(string)operator(;)
   ident(Data)operator(:) ident(TByteA)operator(;)
@@ -10527,7 +10527,7 @@ reserved(begin)
     ident(Exit)operator(;)
   reserved(end)operator(;)
 
-  ident(Data) operator(:=) ident(LoadByteA)operator(()ident(FileName)operator(\);)
+  ident(Data) operator(:=) ident(LoadByteA)operator(()ident(FileName)operator(\))operator(;)
   reserved(if) ident(Length)operator(()ident(Data)operator(\)) operator(=) ident(Length)operator(()ident(BinaryHM)operator(.)ident(Data)operator(\)) reserved(then) reserved(begin)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(Data)operator(\)) reserved(do)
       reserved(if) ident(Data)operator([)ident(i)operator(]) operator(<>) ident(BinaryHM)operator(.)ident(Data)operator([)ident(i)operator(]) reserved(then) reserved(begin)
@@ -10538,7 +10538,7 @@ reserved(begin)
     ident(BinaryHM)operator(.)ident(Data) operator(:=) ident(Data)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(PipelineCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(PipelineCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(with) ident(PipelineThread)operator(,) ident(PipelineCB) reserved(do)
     reserved(if) ident(Checked) reserved(then) reserved(begin)
@@ -10549,22 +10549,22 @@ reserved(begin)
         ident(Suspend)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(ReloadBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(ReloadBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(ValuesWin)operator(.)ident(ValueListDblClick)operator(()ident(Self)operator(\);)
+  ident(ValuesWin)operator(.)ident(ValueListDblClick)operator(()ident(Self)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(BinaryHMEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(BinaryHMEnter)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(PipelineCB)operator(.)ident(Checked) operator(:=) ident(False)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(xUseExtendedModelCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(xUseExtendedModelCBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(PrefWin)operator(.)ident(UseExtendedModelCB)operator(.)ident(Load)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SeparatorEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SeparatorEChange)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   reserved(if) reserved(not) ident(SeparatorE)operator(.)ident(Enabled) reserved(then)
     ident(Exit)operator(;)
@@ -10574,110 +10574,110 @@ reserved(begin)
       ident(Exit)
     reserved(else)
       ident(MultiStringM)operator(.)ident(Text) operator(:=) ident(StringE)operator(.)ident(Text)operator(;)
-    ident(MultiStringTypeRG)operator(.)ident(Buttons)operator([)integer(1)operator(].)ident(Enabled) operator(:=) ident(False)operator(;)
+    ident(MultiStringTypeRG)operator(.)ident(Buttons)operator([)integer(1)operator(])operator(.)ident(Enabled) operator(:=) ident(False)operator(;)
     ident(MultiStringTypeRG)operator(.)ident(ItemIndex) operator(:=) integer(0)operator(;)
   reserved(end) reserved(else) reserved(begin)
     reserved(if) ident(StringE)operator(.)ident(Text) operator(=) string<delimiter(')delimiter(')> reserved(then)
-      ident(StringE)operator(.)ident(Text) operator(:=) ident(Join)operator(()ident(MultiStringM)operator(.)ident(Lines)operator(,) ident(SeparatorE)operator(.)ident(Text)operator(\);)
-    ident(MultiStringTypeRG)operator(.)ident(Buttons)operator([)integer(1)operator(].)ident(Enabled) operator(:=) ident(True)operator(;)
+      ident(StringE)operator(.)ident(Text) operator(:=) ident(Join)operator(()ident(MultiStringM)operator(.)ident(Lines)operator(,) ident(SeparatorE)operator(.)ident(Text)operator(\))operator(;)
+    ident(MultiStringTypeRG)operator(.)ident(Buttons)operator([)integer(1)operator(])operator(.)ident(Enabled) operator(:=) ident(True)operator(;)
     ident(MultiStringTypeRG)operator(.)ident(ItemIndex) operator(:=) integer(1)operator(;)
-    ident(Split)operator(()ident(StringE)operator(.)ident(Text)operator(,) ident(SeparatorE)operator(.)ident(Text)operator(,) ident(MultiStringM)operator(.)ident(Lines)operator(,) ident(False)operator(\);)
+    ident(Split)operator(()ident(StringE)operator(.)ident(Text)operator(,) ident(SeparatorE)operator(.)ident(Text)operator(,) ident(MultiStringM)operator(.)ident(Lines)operator(,) ident(False)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(HintLBKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(begin)
-  reserved(if) operator(()ident(Key) operator(=) ident(Byte)operator(()char<delimiter(')content(C)delimiter(')>operator(\)\)) reserved(and) operator(()ident(ssCtrl) reserved(in) ident(Shift)operator(\)) reserved(then)
+  reserved(if) operator(()ident(Key) operator(=) ident(Byte)operator(()char<delimiter(')content(C)delimiter(')>operator(\))operator(\)) reserved(and) operator(()ident(ssCtrl) reserved(in) ident(Shift)operator(\)) reserved(then)
     reserved(with) ident(HintLb) reserved(do)
       reserved(if) ident(ItemIndex) operator(>=) integer(0) reserved(then)
-        ident(Clipboard)operator(.)ident(AsText) operator(:=) ident(Items)operator([)ident(ItemIndex)operator(];)
+        ident(Clipboard)operator(.)ident(AsText) operator(:=) ident(Items)operator([)ident(ItemIndex)operator(])operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(DWORDSpecialBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(DWORDSpecialBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(CardinalE)operator(.)ident(Value) operator(:=) ident(StrToIntDef)operator((()ident(Sender) reserved(as) ident(TButton)operator(\).)ident(Caption)operator(,) integer(0)operator(\);)
+  ident(CardinalE)operator(.)ident(Value) operator(:=) ident(StrToIntDef)operator(()operator(()ident(Sender) reserved(as) ident(TButton)operator(\))operator(.)ident(Caption)operator(,) integer(0)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(Button1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(Button1Click)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  ident(ShowPC)operator(.)ident(SelectNextPage)operator(()ident(True)operator(\);)
+  ident(ShowPC)operator(.)ident(SelectNextPage)operator(()ident(True)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SisyPUPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SisyPUPopup)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  reserved(with) ident(SisyPU)operator(,) ident(TSisyThread)operator(()ident(Sisys)operator([)ident(PopupComponent)operator(.)ident(Tag)operator(]\)) reserved(do)
-    ident(Items)operator([)ident(Integer)operator(()ident(Priority)operator(\)].)ident(Checked) operator(:=) ident(True)operator(;)
+  reserved(with) ident(SisyPU)operator(,) ident(TSisyThread)operator(()ident(Sisys)operator([)ident(PopupComponent)operator(.)ident(Tag)operator(])operator(\)) reserved(do)
+    ident(Items)operator([)ident(Integer)operator(()ident(Priority)operator(\))operator(])operator(.)ident(Checked) operator(:=) ident(True)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SisyPriorityMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SisyPriorityMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  reserved(with) ident(TSisyThread)operator(()ident(Sisys)operator([)ident(SisyPU)operator(.)ident(PopupComponent)operator(.)ident(Tag)operator(]\)) reserved(do) reserved(begin)
-    ident(Priority) operator(:=) ident(TThreadPriority)operator(()ident(TMenuItem)operator(()ident(Sender)operator(\).)ident(MenuIndex)operator(\);)
+  reserved(with) ident(TSisyThread)operator(()ident(Sisys)operator([)ident(SisyPU)operator(.)ident(PopupComponent)operator(.)ident(Tag)operator(])operator(\)) reserved(do) reserved(begin)
+    ident(Priority) operator(:=) ident(TThreadPriority)operator(()ident(TMenuItem)operator(()ident(Sender)operator(\))operator(.)ident(MenuIndex)operator(\))operator(;)
     reserved(if) ident(Priority) operator(<=) ident(tpNormal) reserved(then)
-      ident(Uni)operator(.)ident(WriteInteger)operator(()string<delimiter(')content(Priority)delimiter(')>operator(,) ident(Integer)operator(()ident(Priority)operator(\)\);)
+      ident(Uni)operator(.)ident(WriteInteger)operator(()string<delimiter(')content(Priority)delimiter(')>operator(,) ident(Integer)operator(()ident(Priority)operator(\))operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(SisyShowCurrentPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(SisyShowCurrentPathMIClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
-  reserved(with) ident(SisyPU)operator(,) ident(TSisyThread)operator(()ident(Sisys)operator([)ident(PopupComponent)operator(.)ident(Tag)operator(]\)) reserved(do) reserved(begin)
+  reserved(with) ident(SisyPU)operator(,) ident(TSisyThread)operator(()ident(Sisys)operator([)ident(PopupComponent)operator(.)ident(Tag)operator(])operator(\)) reserved(do) reserved(begin)
     ident(Suspend)operator(;)
-    ident(ShowMessage)operator(()ident(CurrentSpyKey)operator(.)ident(Path)operator(\);)
+    ident(ShowMessage)operator(()ident(CurrentSpyKey)operator(.)ident(Path)operator(\))operator(;)
     ident(Resume)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(DropFileTargetDrop)operator(()ident(Sender)operator(:) ident(TObject)operator(;)
-  ident(ShiftState)operator(:) ident(TShiftState)operator(;) ident(Point)operator(:) ident(TPoint)operator(;) reserved(var) ident(Effect)operator(:) ident(Integer)operator(\);)
+  ident(ShiftState)operator(:) ident(TShiftState)operator(;) ident(Point)operator(:) ident(TPoint)operator(;) reserved(var) ident(Effect)operator(:) ident(Integer)operator(\))operator(;)
 reserved(begin)
-  ident(StringE)operator(.)ident(Text) operator(:=) ident(DropFileTarget)operator(.)ident(Files)operator([)integer(0)operator(];)
+  ident(StringE)operator(.)ident(Text) operator(:=) ident(DropFileTarget)operator(.)ident(Files)operator([)integer(0)operator(])operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(FormClose)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Action)operator(:) ident(TCloseAction)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(FormClose)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Action)operator(:) ident(TCloseAction)operator(\))operator(;)
 reserved(begin)
 comment(//  Action := caNone;)
   ident(DropFileTarget)operator(.)ident(Unregister)operator(;)
   ident(ClearChanges)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(FormResize)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(FormResize)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(begin)
   ident(Realign)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(IconImageDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(IconImageDblClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(Filename)operator(:) reserved(string)operator(;)
 reserved(begin)
-  ident(FileName) operator(:=) ident(GetFileNew)operator(()ident(StringE)operator(.)ident(Text)operator(\);)
+  ident(FileName) operator(:=) ident(GetFileNew)operator(()ident(StringE)operator(.)ident(Text)operator(\))operator(;)
   reserved(if) ident(FileName) operator(<>) string<delimiter(')delimiter(')> reserved(then)
-    ident(ExecFile)operator(()ident(FileName)operator(\);)
+    ident(ExecFile)operator(()ident(FileName)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(ShowValues)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(ShowValues)operator(()ident(Reg)operator(:) ident(TXRegistry)operator(\))operator(;)
 reserved(var)
   ident(MainValueName)operator(:) reserved(string)operator(;)
   ident(ValueCommonType)operator(:) ident(TRegDataType)operator(;)
 
   reserved(procedure) ident(ShowValueAsBinary)operator(()reserved(const) ident(ValueName)operator(:) reserved(string)operator(;)
-    ident(Smart4BB)operator(:) ident(Boolean) operator(=) ident(True)operator(\);)
+    ident(Smart4BB)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(;)
   reserved(begin)
     reserved(if) ident(Smart4BB)
      reserved(and) ident(PrefWin)operator(.)ident(Smart4BBCB)operator(.)ident(Checked)
      reserved(and) operator(()ident(Reg)operator(.)ident(GetDataSize)operator(()ident(ValueName)operator(\)) operator(=) integer(4)operator(\)) reserved(then) reserved(begin)
-      ident(CardinalE)operator(.)ident(Value) operator(:=) ident(Reg)operator(.)ident(ReadCardinal)operator(()ident(ValueName)operator(\);)
+      ident(CardinalE)operator(.)ident(Value) operator(:=) ident(Reg)operator(.)ident(ReadCardinal)operator(()ident(ValueName)operator(\))operator(;)
       ident(CardTypeRG)operator(.)ident(ItemIndex) operator(:=) integer(2)operator(;)
       ident(ShowPC)operator(.)ident(ActivePage) operator(:=) ident(IntPage)operator(;)
     ident(Exit)operator(;) reserved(end)operator(;)
-    ident(BinaryHM)operator(.)ident(Data) operator(:=) ident(Reg)operator(.)ident(ReadBin)operator(()ident(ValueName)operator(\);)
+    ident(BinaryHM)operator(.)ident(Data) operator(:=) ident(Reg)operator(.)ident(ReadBin)operator(()ident(ValueName)operator(\))operator(;)
     ident(DataTypeComB)operator(.)ident(ItemIndex) operator(:=) ident(ValueCommonType)operator(;)
     reserved(if) ident(IsValidDataType)operator(()ident(ValueCommonType)operator(\)) reserved(then)
       ident(DataTypeComB)operator(.)ident(ItemIndex) operator(:=) ident(ValueCommonType)
     reserved(else) reserved(begin)
-      ident(DataTypeComB)operator(.)ident(Text) operator(:=) ident(IntToStr)operator(()ident(ValueCommonType)operator(\);)
+      ident(DataTypeComB)operator(.)ident(Text) operator(:=) ident(IntToStr)operator(()ident(ValueCommonType)operator(\))operator(;)
       ident(AddHint)operator(()string<delimiter(')content(Value has unknown data type ()delimiter(')> operator(+) ident(DataTypeComB)operator(.)ident(Text) operator(+) string<delimiter(')content(\): )delimiter(')> operator(+)
-        ident(Quote)operator(()ident(ValueName)operator(\)\);)
+        ident(Quote)operator(()ident(ValueName)operator(\))operator(\))operator(;)
     reserved(end)operator(;)
     ident(ShowPC)operator(.)ident(ActivePage) operator(:=) ident(BinaryPage)operator(;)
   reserved(end)operator(;)
@@ -10685,8 +10685,8 @@ reserved(var)
 reserved(begin)
   reserved(with) ident(ValuesWin) reserved(do) reserved(begin)
     reserved(if) reserved(not) ident(Assigned)operator(()ident(ValueNames)operator(\)) reserved(or) operator(()ident(ValueNames)operator(.)ident(Count) operator(=) integer(0)operator(\)) reserved(then)
-      reserved(raise) ident(EReadError)operator(.)ident(Create)operator(()string<delimiter(')content(ValueNameList error)delimiter(')>operator(\);)
-    ident(MainValueName) operator(:=) ident(ValueNames)operator([)integer(0)operator(];)
+      reserved(raise) ident(EReadError)operator(.)ident(Create)operator(()string<delimiter(')content(ValueNameList error)delimiter(')>operator(\))operator(;)
+    ident(MainValueName) operator(:=) ident(ValueNames)operator([)integer(0)operator(])operator(;)
   reserved(end)operator(;)
   ident(ValueCommonType) operator(:=) ident(ValuesWin)operator(.)ident(ValueCommonType)operator(;)
 
@@ -10695,22 +10695,22 @@ reserved(begin)
     reserved(if) ident(ValuesWin)operator(.)ident(ValueNames)operator(.)ident(Count) operator(=) integer(1) reserved(then)
       ident(Text) operator(:=) ident(MainValueName)
     reserved(else)
-      ident(Text) operator(:=) ident(Copy)operator(()ident(ValuesWin)operator(.)ident(ValueNames)operator(.)ident(CommaText)operator(,) integer(1)operator(,) integer(255)operator(\);)
+      ident(Text) operator(:=) ident(Copy)operator(()ident(ValuesWin)operator(.)ident(ValueNames)operator(.)ident(CommaText)operator(,) integer(1)operator(,) integer(255)operator(\))operator(;)
 
-    ident(Font)operator(.)ident(Color) operator(:=) ident(ColorOfDataType)operator(()ident(ValueCommonType)operator(\);)
+    ident(Font)operator(.)ident(Color) operator(:=) ident(ColorOfDataType)operator(()ident(ValueCommonType)operator(\))operator(;)
   reserved(end)operator(;)
 
   reserved(if) ident(KeyIsDown)operator(()ident(VK_MENU)operator(\)) reserved(or) ident(ShowAsBinary) reserved(then) reserved(begin)
-    ident(ShowValueAsBinary)operator(()ident(MainValueName)operator(,) ident(False)operator(\);)
+    ident(ShowValueAsBinary)operator(()ident(MainValueName)operator(,) ident(False)operator(\))operator(;)
   reserved(end) reserved(else) reserved(if) ident(ValueCommonType) reserved(in) ident(rdStringTypes) reserved(then) reserved(begin)
-    ident(StringE)operator(.)ident(Text) operator(:=) ident(Reg)operator(.)ident(ReadString)operator(()ident(MainValueName)operator(\);)
+    ident(StringE)operator(.)ident(Text) operator(:=) ident(Reg)operator(.)ident(ReadString)operator(()ident(MainValueName)operator(\))operator(;)
     reserved(case) ident(ValueCommonType) reserved(of)
       ident(rdString)operator(:) ident(StringTypeRG)operator(.)ident(ItemIndex) operator(:=) integer(0)operator(;)
       ident(rdExpandString)operator(:) ident(StringTypeRG)operator(.)ident(ItemIndex) operator(:=) integer(1)operator(;)
     reserved(end)operator(;)
     ident(ShowPC)operator(.)ident(ActivePage) operator(:=) ident(StringPage)operator(;)
   reserved(end) reserved(else) reserved(if) ident(ValueCommonType) reserved(in) ident(rdCardTypes) reserved(then) reserved(begin)
-    ident(CardinalE)operator(.)ident(Value) operator(:=) ident(Reg)operator(.)ident(ReadCardinal)operator(()ident(MainValueName)operator(\);)
+    ident(CardinalE)operator(.)ident(Value) operator(:=) ident(Reg)operator(.)ident(ReadCardinal)operator(()ident(MainValueName)operator(\))operator(;)
     reserved(case) ident(ValueCommonType) reserved(of)
       ident(rdCardinal)operator(:) ident(StringTypeRG)operator(.)ident(ItemIndex) operator(:=) integer(0)operator(;)
       ident(rdCardBigEndian)operator(:) ident(StringTypeRG)operator(.)ident(ItemIndex) operator(:=) integer(1)operator(;)
@@ -10718,12 +10718,12 @@ reserved(begin)
     ident(ShowPC)operator(.)ident(ActivePage) operator(:=) ident(IntPage)operator(;)
   reserved(end) reserved(else) reserved(if) ident(ValueCommonType) operator(=) ident(rdMultiString) reserved(then) reserved(begin)
     ident(MultiStringM)operator(.)ident(Clear)operator(;)
-    ident(Reg)operator(.)ident(ReadMultiString)operator(()ident(MainValueName)operator(,) ident(MultiStringM)operator(.)ident(Lines)operator(,) ident(PrefWin)operator(.)ident(UseExtendedModelCB)operator(.)ident(Checked)operator(\);)
-    ident(SeparatorEChange)operator(()ident(Self)operator(\);)
+    ident(Reg)operator(.)ident(ReadMultiString)operator(()ident(MainValueName)operator(,) ident(MultiStringM)operator(.)ident(Lines)operator(,) ident(PrefWin)operator(.)ident(UseExtendedModelCB)operator(.)ident(Checked)operator(\))operator(;)
+    ident(SeparatorEChange)operator(()ident(Self)operator(\))operator(;)
     ident(MultiStringTypeRG)operator(.)ident(ItemIndex) operator(:=) integer(0)operator(;)
     ident(ShowPC)operator(.)ident(ActivePage) operator(:=) ident(MultiStringPage)operator(;)
   reserved(end) reserved(else) reserved(begin)
-    ident(ShowValueAsBinary)operator(()ident(MainValueName)operator(\);)
+    ident(ShowValueAsBinary)operator(()ident(MainValueName)operator(\))operator(;)
   reserved(end)operator(;)
 
   ident(ShowAsBinary) operator(:=) ident(False)operator(;)
@@ -10733,11 +10733,11 @@ reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(UpdateWriteButtons)operator(;)
 reserved(const)
-  ident(BtnTextOfMultiEdit)operator(:) reserved(array)operator([)ident(Boolean)operator(]) reserved(of) reserved(string) operator(=) operator(()string<delimiter(')content(Write)delimiter(')>operator(,) string<delimiter(')content(Write all)delimiter(')>operator(\);)
+  ident(BtnTextOfMultiEdit)operator(:) reserved(array)operator([)ident(Boolean)operator(]) reserved(of) reserved(string) operator(=) operator(()string<delimiter(')content(Write)delimiter(')>operator(,) string<delimiter(')content(Write all)delimiter(')>operator(\))operator(;)
 reserved(var)
   ident(BtnText)operator(:) reserved(string)operator(;)
 reserved(begin)
-  ident(BtnText) operator(:=) ident(BtnTextOfMultiEdit)operator([)ident(ValuesWin)operator(.)ident(ValueNames)operator(.)ident(Count) operator(>) integer(1)operator(];)
+  ident(BtnText) operator(:=) ident(BtnTextOfMultiEdit)operator([)ident(ValuesWin)operator(.)ident(ValueNames)operator(.)ident(Count) operator(>) integer(1)operator(])operator(;)
   ident(OKStringB)operator(.)ident(Caption) operator(:=) ident(BtnText)operator(;)
   ident(OKIntB)operator(.)ident(Caption) operator(:=) ident(BtnText)operator(;)
   ident(OKMultiStringB)operator(.)ident(Caption) operator(:=) ident(BtnText)operator(;)
@@ -10746,14 +10746,14 @@ reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(EditData)operator(;)
 reserved(begin)
-  ident(AddHint)operator(()string<delimiter(')content(Edit)delimiter(')>operator(\);)
+  ident(AddHint)operator(()string<delimiter(')content(Edit)delimiter(')>operator(\))operator(;)
   ident(MainPC)operator(.)ident(ActivePage) operator(:=) ident(WorkPage)operator(;)
 
   reserved(with) ident(ShowPC) reserved(do)
     reserved(if) ident(ActivePage) operator(=) reserved(nil) reserved(then)
       ident(Exit)
     reserved(else) reserved(if) ident(ActivePage) operator(=) ident(WorkWin)operator(.)ident(StringPage) reserved(then) reserved(begin)
-      ident(FocusControl)operator(()ident(StringE)operator(\);)
+      ident(FocusControl)operator(()ident(StringE)operator(\))operator(;)
       ident(StringE)operator(.)ident(SelectAll)operator(;)
     reserved(end)
     reserved(else) reserved(if) ident(ActivePage) operator(=) ident(WorkWin)operator(.)ident(IntPage) reserved(then)
@@ -10763,13 +10763,13 @@ reserved(begin)
     reserved(else) reserved(if) ident(ActivePage) operator(=) ident(WorkWin)operator(.)ident(BinaryPage) reserved(then)
       ident(FocusControl)operator(()ident(BinaryHM)operator(\))
     reserved(else)
-      ident(ShowMessage)operator(()string<delimiter(')content(Error: ShowPC.ActivePage!)delimiter(')>operator(\);)
+      ident(ShowMessage)operator(()string<delimiter(')content(Error: ShowPC.ActivePage!)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(SisyTVCustomDrawItem)operator(()ident(Sender)operator(:) ident(TCustomTreeView)operator(;)
-  ident(Node)operator(:) ident(TTreeNode)operator(;) ident(State)operator(:) ident(TCustomDrawState)operator(;) reserved(var) ident(DefaultDraw)operator(:) ident(Boolean)operator(\);)
+  ident(Node)operator(:) ident(TTreeNode)operator(;) ident(State)operator(:) ident(TCustomDrawState)operator(;) reserved(var) ident(DefaultDraw)operator(:) ident(Boolean)operator(\))operator(;)
 reserved(begin)
-  reserved(with) ident(TTreeView)operator(()ident(Sender)operator(\).)ident(Canvas)operator(.)ident(Font) reserved(do) reserved(begin)
+  reserved(with) ident(TTreeView)operator(()ident(Sender)operator(\))operator(.)ident(Canvas)operator(.)ident(Font) reserved(do) reserved(begin)
     reserved(if) ident(Node)operator(.)ident(Cut) reserved(then)
       ident(Color) operator(:=) hex($AAAAAA)
     reserved(else)
@@ -10778,15 +10778,15 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(SisyTVMouseDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) ident(Button)operator(:) ident(TMouseButton)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(;) ident(X)operator(,) ident(Y)operator(:) ident(Integer)operator(\))operator(;)
 reserved(var)
   ident(Node)operator(:) ident(TTreeNode)operator(;)
   ident(RelX)operator(,) ident(RelY)operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(with) ident(SisyTV) reserved(do) reserved(begin)
-    ident(RelX) operator(:=) ident(ScreenToClient)operator(()ident(Mouse)operator(.)ident(CursorPos)operator(\).)ident(X)operator(;)
-    ident(RelY) operator(:=) ident(ScreenToClient)operator(()ident(Mouse)operator(.)ident(CursorPos)operator(\).)ident(Y)operator(;)
-    ident(Node) operator(:=) ident(GetNodeAt)operator(()ident(RelX)operator(,) ident(RelY)operator(\);)
+    ident(RelX) operator(:=) ident(ScreenToClient)operator(()ident(Mouse)operator(.)ident(CursorPos)operator(\))operator(.)ident(X)operator(;)
+    ident(RelY) operator(:=) ident(ScreenToClient)operator(()ident(Mouse)operator(.)ident(CursorPos)operator(\))operator(.)ident(Y)operator(;)
+    ident(Node) operator(:=) ident(GetNodeAt)operator(()ident(RelX)operator(,) ident(RelY)operator(\))operator(;)
   reserved(end)operator(;)
   reserved(if) reserved(not) ident(Assigned)operator(()ident(Node)operator(\)) reserved(then)
     ident(Exit)operator(;)
@@ -10795,7 +10795,7 @@ reserved(begin)
     ident(Node)operator(.)ident(Selected) operator(:=) ident(True)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TWorkWin)operator(.)ident(OKCryptoBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\);)
+reserved(procedure) ident(TWorkWin)operator(.)ident(OKCryptoBClick)operator(()ident(Sender)operator(:) ident(TObject)operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -10804,26 +10804,26 @@ reserved(begin)
     reserved(with) ident(ValuesWin)operator(.)ident(ValueNames) reserved(do)
       reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Count)operator(-)integer(1) reserved(do) reserved(begin)
         reserved(case) ident(CryptoTypeRG)operator(.)ident(ItemIndex) reserved(of)
-          integer(0)operator(:) ident(MainReg)operator(.)ident(WriteBin)operator(()ident(Strings)operator([)ident(i)operator(],) ident(EncodeScreenSaver)operator(()ident(CryptoE)operator(.)ident(Text)operator(\)\);)
-          integer(1)operator(:) ident(MainReg)operator(.)ident(WriteBin)operator(()ident(Strings)operator([)ident(i)operator(],) ident(EncodeSharedFolder)operator(()ident(CryptoE)operator(.)ident(Text)operator(\)\);)
+          integer(0)operator(:) ident(MainReg)operator(.)ident(WriteBin)operator(()ident(Strings)operator([)ident(i)operator(])operator(,) ident(EncodeScreenSaver)operator(()ident(CryptoE)operator(.)ident(Text)operator(\))operator(\))operator(;)
+          integer(1)operator(:) ident(MainReg)operator(.)ident(WriteBin)operator(()ident(Strings)operator([)ident(i)operator(])operator(,) ident(EncodeSharedFolder)operator(()ident(CryptoE)operator(.)ident(Text)operator(\))operator(\))operator(;)
         reserved(end)operator(;)
       reserved(end)operator(;)
-    ident(ValuesWin)operator(.)ident(UpdateValues)operator(()ident(True)operator(\);)
+    ident(ValuesWin)operator(.)ident(UpdateValues)operator(()ident(True)operator(\))operator(;)
   reserved(finally)
     ident(MainReg)operator(.)ident(CloseKey)operator(;)
   reserved(end)operator(;)
-  ident(ValuesWin)operator(.)ident(ValueListDblClick)operator(()ident(Sender)operator(\);)
+  ident(ValuesWin)operator(.)ident(ValueListDblClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TWorkWin)operator(.)ident(CryptoEKeyDown)operator(()ident(Sender)operator(:) ident(TObject)operator(;) reserved(var) ident(Key)operator(:) ident(Word)operator(;)
-  ident(Shift)operator(:) ident(TShiftState)operator(\);)
+  ident(Shift)operator(:) ident(TShiftState)operator(\))operator(;)
 reserved(begin)
   reserved(if) ident(Key) operator(=) ident(VK_RETURN) reserved(then) reserved(begin)
-    ident(OKCryptoBClick)operator(()ident(Sender)operator(\);)
-    ident(ValuesWin)operator(.)ident(FocusControl)operator(()ident(ValueList)operator(\);)
+    ident(OKCryptoBClick)operator(()ident(Sender)operator(\))operator(;)
+    ident(ValuesWin)operator(.)ident(FocusControl)operator(()ident(ValueList)operator(\))operator(;)
   reserved(end)operator(;)
   reserved(if) ident(Key) operator(=) ident(VK_ESCAPE) reserved(then)
-    ident(CancelBClick)operator(()ident(Sender)operator(\);)
+    ident(CancelBClick)operator(()ident(Sender)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(end)operator(.)
diff --git a/test/scanners/delphi/ytools.expected.raydebug b/test/scanners/delphi/ytools.expected.raydebug
index f1621fd..8653ea7 100644
--- a/test/scanners/delphi/ytools.expected.raydebug
+++ b/test/scanners/delphi/ytools.expected.raydebug
@@ -28,281 +28,281 @@ reserved(const)
   ident(LF) operator(=) char(#10)operator(;) comment(//Line Feed)
   ident(CR) operator(=) char(#13)operator(;) comment(//Carriage Return)
   ident(Space) operator(=) char(#32)operator(;)
-  ident(EOLChars) operator(=) operator([)ident(CR)operator(,) ident(LF)operator(];)
+  ident(EOLChars) operator(=) operator([)ident(CR)operator(,) ident(LF)operator(])operator(;)
 preprocessor({$IFNDEF VER140})
   ident(sLineBreak) operator(=) char(#13)char(#10)operator(;)
-  ident(SwitchChars) operator(=) operator([)char<delimiter(')content(/)delimiter(')>operator(,) char<delimiter(')content(-)delimiter(')>operator(];)
+  ident(SwitchChars) operator(=) operator([)char<delimiter(')content(/)delimiter(')>operator(,) char<delimiter(')content(-)delimiter(')>operator(])operator(;)
 preprocessor({$ENDIF})
   ident(EOL) operator(=) ident(sLineBreak)operator(;)
-  ident(MaxCard) operator(=) ident(High)operator(()ident(Cardinal)operator(\);)
-  ident(AllChars) operator(=) operator([)char(#0)operator(..)char(#255)operator(];)
-  ident(Alphabetical) operator(=) operator([)char<delimiter(')content(A)delimiter(')>operator(..)char<delimiter(')content(Z)delimiter(')>operator(,) char<delimiter(')content(a)delimiter(')>operator(..)char<delimiter(')content(z)delimiter(')>operator(];)
-  ident(DecimalChars) operator(=) operator([)char<delimiter(')content(0)delimiter(')>operator(..)char<delimiter(')content(9)delimiter(')>operator(];)
+  ident(MaxCard) operator(=) ident(High)operator(()ident(Cardinal)operator(\))operator(;)
+  ident(AllChars) operator(=) operator([)char(#0)operator(..)char(#255)operator(])operator(;)
+  ident(Alphabetical) operator(=) operator([)char<delimiter(')content(A)delimiter(')>operator(..)char<delimiter(')content(Z)delimiter(')>operator(,) char<delimiter(')content(a)delimiter(')>operator(..)char<delimiter(')content(z)delimiter(')>operator(])operator(;)
+  ident(DecimalChars) operator(=) operator([)char<delimiter(')content(0)delimiter(')>operator(..)char<delimiter(')content(9)delimiter(')>operator(])operator(;)
   ident(AlphaNumerical) operator(=) ident(Alphabetical) operator(+) ident(DecimalChars)operator(;)
-  ident(StrangeChars) operator(=) operator([)char(#0)operator(..)char(#31)operator(,) char(#127)operator(,) char(#129)operator(,) char(#141)operator(..)char(#144)operator(,) char(#157)operator(,) char(#158)operator(];)
+  ident(StrangeChars) operator(=) operator([)char(#0)operator(..)char(#31)operator(,) char(#127)operator(,) char(#129)operator(,) char(#141)operator(..)char(#144)operator(,) char(#157)operator(,) char(#158)operator(])operator(;)
 
-  ident(HexadecimalChars) operator(=) ident(DecimalChars) operator(+) operator([)char<delimiter(')content(A)delimiter(')>operator(..)char<delimiter(')content(F)delimiter(')>operator(,) char<delimiter(')content(a)delimiter(')>operator(..)char<delimiter(')content(f)delimiter(')>operator(];)
-  ident(OctalChars) operator(=) operator([)char<delimiter(')content(0)delimiter(')>operator(..)char<delimiter(')content(7)delimiter(')>operator(];)
-  ident(BinaryChars) operator(=) operator([)char<delimiter(')content(0)delimiter(')>operator(,) char<delimiter(')content(1)delimiter(')>operator(];)
+  ident(HexadecimalChars) operator(=) ident(DecimalChars) operator(+) operator([)char<delimiter(')content(A)delimiter(')>operator(..)char<delimiter(')content(F)delimiter(')>operator(,) char<delimiter(')content(a)delimiter(')>operator(..)char<delimiter(')content(f)delimiter(')>operator(])operator(;)
+  ident(OctalChars) operator(=) operator([)char<delimiter(')content(0)delimiter(')>operator(..)char<delimiter(')content(7)delimiter(')>operator(])operator(;)
+  ident(BinaryChars) operator(=) operator([)char<delimiter(')content(0)delimiter(')>operator(,) char<delimiter(')content(1)delimiter(')>operator(])operator(;)
 
-  ident(QuoteChars) operator(=) operator([)char<delimiter(')content('')delimiter(')>operator(,) char<delimiter(')content(")delimiter(')>operator(];)
-  ident(WildCards) operator(=) operator([)char<delimiter(')content(*)delimiter(')>operator(,) char<delimiter(')content(?)delimiter(')>operator(];)
-  ident(FileNameEnemies) operator(=) ident(WildCards) operator(+) operator([)char<delimiter(')content(\\)delimiter(')>operator(,) char<delimiter(')content(/)delimiter(')>operator(,) char<delimiter(')content(:)delimiter(')>operator(,) char<delimiter(')content(<)delimiter(')>operator(,) char<delimiter(')content(>)delimiter(')>operator(,) char<delimiter(')content(|)delimiter(')>operator(];)
+  ident(QuoteChars) operator(=) operator([)char<delimiter(')content('')delimiter(')>operator(,) char<delimiter(')content(")delimiter(')>operator(])operator(;)
+  ident(WildCards) operator(=) operator([)char<delimiter(')content(*)delimiter(')>operator(,) char<delimiter(')content(?)delimiter(')>operator(])operator(;)
+  ident(FileNameEnemies) operator(=) ident(WildCards) operator(+) operator([)char<delimiter(')content(\\)delimiter(')>operator(,) char<delimiter(')content(/)delimiter(')>operator(,) char<delimiter(')content(:)delimiter(')>operator(,) char<delimiter(')content(<)delimiter(')>operator(,) char<delimiter(')content(>)delimiter(')>operator(,) char<delimiter(')content(|)delimiter(')>operator(])operator(;)
 
   ident(HexChar)operator(:) reserved(array)operator([)ident(THex)operator(]) reserved(of) ident(Char) operator(=) operator(()
-    char<delimiter(')content(0)delimiter(')>operator(,)char<delimiter(')content(1)delimiter(')>operator(,)char<delimiter(')content(2)delimiter(')>operator(,)char<delimiter(')content(3)delimiter(')>operator(,)char<delimiter(')content(4)delimiter(')>operator(,)char<delimiter(')content(5)delimiter(')>operator(,)char<delimiter(')content(6)delimiter(')>operator(,)char<delimiter(')content(7)delimiter(')>operator(,)char<delimiter(')content(8)delimiter(')>operator(,)char<delimiter(')content(9)delimiter(')>operator(,)char<delimiter(')content(A)delimiter(')>operator(,)char<delimiter(')content(B)delimiter(')>operator(,)char<delimiter(')content(C)delimiter(')>operator(,)char<delimiter(')content(D)delimiter(')>operator(,)char<delimiter(')content(E)delimiter(')>operator(,)char<delimiter(')content(F)delimiter(')>operator(\);)
+    char<delimiter(')content(0)delimiter(')>operator(,)char<delimiter(')content(1)delimiter(')>operator(,)char<delimiter(')content(2)delimiter(')>operator(,)char<delimiter(')content(3)delimiter(')>operator(,)char<delimiter(')content(4)delimiter(')>operator(,)char<delimiter(')content(5)delimiter(')>operator(,)char<delimiter(')content(6)delimiter(')>operator(,)char<delimiter(')content(7)delimiter(')>operator(,)char<delimiter(')content(8)delimiter(')>operator(,)char<delimiter(')content(9)delimiter(')>operator(,)char<delimiter(')content(A)delimiter(')>operator(,)char<delimiter(')content(B)delimiter(')>operator(,)char<delimiter(')content(C)delimiter(')>operator(,)char<delimiter(')content(D)delimiter(')>operator(,)char<delimiter(')content(E)delimiter(')>operator(,)char<delimiter(')content(F)delimiter(')>operator(\))operator(;)
   ident(LowerHexChar)operator(:) reserved(array)operator([)ident(THex)operator(]) reserved(of) ident(Char) operator(=) operator(()
-    char<delimiter(')content(0)delimiter(')>operator(,)char<delimiter(')content(1)delimiter(')>operator(,)char<delimiter(')content(2)delimiter(')>operator(,)char<delimiter(')content(3)delimiter(')>operator(,)char<delimiter(')content(4)delimiter(')>operator(,)char<delimiter(')content(5)delimiter(')>operator(,)char<delimiter(')content(6)delimiter(')>operator(,)char<delimiter(')content(7)delimiter(')>operator(,)char<delimiter(')content(8)delimiter(')>operator(,)char<delimiter(')content(9)delimiter(')>operator(,)char<delimiter(')content(a)delimiter(')>operator(,)char<delimiter(')content(b)delimiter(')>operator(,)char<delimiter(')content(c)delimiter(')>operator(,)char<delimiter(')content(d)delimiter(')>operator(,)char<delimiter(')content(e)delimiter(')>operator(,)char<delimiter(')content(f)delimiter(')>operator(\);)
+    char<delimiter(')content(0)delimiter(')>operator(,)char<delimiter(')content(1)delimiter(')>operator(,)char<delimiter(')content(2)delimiter(')>operator(,)char<delimiter(')content(3)delimiter(')>operator(,)char<delimiter(')content(4)delimiter(')>operator(,)char<delimiter(')content(5)delimiter(')>operator(,)char<delimiter(')content(6)delimiter(')>operator(,)char<delimiter(')content(7)delimiter(')>operator(,)char<delimiter(')content(8)delimiter(')>operator(,)char<delimiter(')content(9)delimiter(')>operator(,)char<delimiter(')content(a)delimiter(')>operator(,)char<delimiter(')content(b)delimiter(')>operator(,)char<delimiter(')content(c)delimiter(')>operator(,)char<delimiter(')content(d)delimiter(')>operator(,)char<delimiter(')content(e)delimiter(')>operator(,)char<delimiter(')content(f)delimiter(')>operator(\))operator(;)
   ident(BaseNChar)operator(:) reserved(array)operator([)ident(TBaseN)operator(]) reserved(of) ident(Char) operator(=) operator(()
     char<delimiter(')content(0)delimiter(')>operator(,)char<delimiter(')content(1)delimiter(')>operator(,)char<delimiter(')content(2)delimiter(')>operator(,)char<delimiter(')content(3)delimiter(')>operator(,)char<delimiter(')content(4)delimiter(')>operator(,)char<delimiter(')content(5)delimiter(')>operator(,)char<delimiter(')content(6)delimiter(')>operator(,)char<delimiter(')content(7)delimiter(')>operator(,)char<delimiter(')content(8)delimiter(')>operator(,)char<delimiter(')content(9)delimiter(')>operator(,)char<delimiter(')content(A)delimiter(')>operator(,)char<delimiter(')content(B)delimiter(')>operator(,)char<delimiter(')content(C)delimiter(')>operator(,)char<delimiter(')content(D)delimiter(')>operator(,)char<delimiter(')content(E)delimiter(')>operator(,)char<delimiter(')content(F)delimiter(')>operator(,)char<delimiter(')content(G)delimiter(')>operator(,)char<delimiter(')content(H)delimiter(')>operator(,)
-    char<delimiter(')content(I)delimiter(')>operator(,)char<delimiter(')content(J)delimiter(')>operator(,)char<delimiter(')content(K)delimiter(')>operator(,)char<delimiter(')content(L)delimiter(')>operator(,)char<delimiter(')content(M)delimiter(')>operator(,)char<delimiter(')content(N)delimiter(')>operator(,)char<delimiter(')content(O)delimiter(')>operator(,)char<delimiter(')content(P)delimiter(')>operator(,)char<delimiter(')content(Q)delimiter(')>operator(,)char<delimiter(')content(R)delimiter(')>operator(,)char<delimiter(')content(S)delimiter(')>operator(,)char<delimiter(')content(T)delimiter(')>operator(,)char<delimiter(')content(U)delimiter(')>operator(,)char<delimiter(')content(V)delimiter(')>operator(,)char<delimiter(')content(W)delimiter(')>operator(,)char<delimiter(')content(X)delimiter(')>operator(,)char<delimiter(')content(Y)delimiter(')>operator(,)char<delimiter(')content(Z)delimiter(')>operator(\);)
+    char<delimiter(')content(I)delimiter(')>operator(,)char<delimiter(')content(J)delimiter(')>operator(,)char<delimiter(')content(K)delimiter(')>operator(,)char<delimiter(')content(L)delimiter(')>operator(,)char<delimiter(')content(M)delimiter(')>operator(,)char<delimiter(')content(N)delimiter(')>operator(,)char<delimiter(')content(O)delimiter(')>operator(,)char<delimiter(')content(P)delimiter(')>operator(,)char<delimiter(')content(Q)delimiter(')>operator(,)char<delimiter(')content(R)delimiter(')>operator(,)char<delimiter(')content(S)delimiter(')>operator(,)char<delimiter(')content(T)delimiter(')>operator(,)char<delimiter(')content(U)delimiter(')>operator(,)char<delimiter(')content(V)delimiter(')>operator(,)char<delimiter(')content(W)delimiter(')>operator(,)char<delimiter(')content(X)delimiter(')>operator(,)char<delimiter(')content(Y)delimiter(')>operator(,)char<delimiter(')content(Z)delimiter(')>operator(\))operator(;)
 
   ident(cYcnusOverlayColor) operator(=) hex($050001)operator(;)
 
   ident(faFindEveryFile) operator(=) ident(faReadOnly) operator(+) ident(faHidden) operator(+) ident(faSysFile) operator(+) ident(faArchive)operator(;)
 
-  ident(platWin9x) operator(=) operator([)ident(VER_PLATFORM_WIN32s)operator(,) ident(VER_PLATFORM_WIN32_WINDOWS)operator(];)
+  ident(platWin9x) operator(=) operator([)ident(VER_PLATFORM_WIN32s)operator(,) ident(VER_PLATFORM_WIN32_WINDOWS)operator(])operator(;)
 
 
 comment({ Debugging })
-reserved(procedure) ident(ClearReport)operator(()reserved(const) ident(ReportName)operator(:) reserved(string)operator(\);)
-reserved(procedure) ident(Report)operator(()reserved(const) ident(ReportName)operator(,) ident(Text)operator(:) reserved(string)operator(\);)
-reserved(procedure) ident(ReportFmt)operator(()reserved(const) ident(ReportName)operator(,) ident(Fmt)operator(:) reserved(string)operator(;) reserved(const) ident(Args)operator(:) reserved(array) reserved(of) reserved(const)operator(\);)
+reserved(procedure) ident(ClearReport)operator(()reserved(const) ident(ReportName)operator(:) reserved(string)operator(\))operator(;)
+reserved(procedure) ident(Report)operator(()reserved(const) ident(ReportName)operator(,) ident(Text)operator(:) reserved(string)operator(\))operator(;)
+reserved(procedure) ident(ReportFmt)operator(()reserved(const) ident(ReportName)operator(,) ident(Fmt)operator(:) reserved(string)operator(;) reserved(const) ident(Args)operator(:) reserved(array) reserved(of) reserved(const)operator(\))operator(;)
 
 comment({ Params })
-reserved(procedure) ident(GetParams)operator(()ident(Strings)operator(:) ident(TStrings)operator(\);) directive(overload)operator(;)
-reserved(function) ident(GetParams)operator(()reserved(const) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;) directive(overload)operator(;)
+reserved(procedure) ident(GetParams)operator(()ident(Strings)operator(:) ident(TStrings)operator(\))operator(;) directive(overload)operator(;)
+reserved(function) ident(GetParams)operator(()reserved(const) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;)
 
-reserved(function) ident(ParamNum)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Integer)operator(;)
-reserved(function) ident(ParamPrefixNum)operator(()reserved(const) ident(Prefix)operator(:) reserved(string)operator(\):) ident(Integer)operator(;)
-reserved(function) ident(Param)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
-reserved(function) ident(ParamPrefix)operator(()reserved(const) ident(Prefix)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(ParamNum)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;)
+reserved(function) ident(ParamPrefixNum)operator(()reserved(const) ident(Prefix)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;)
+reserved(function) ident(Param)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
+reserved(function) ident(ParamPrefix)operator(()reserved(const) ident(Prefix)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 
 reserved(function) ident(Switch)operator(()reserved(const) ident(Switch)operator(:) reserved(string)operator(;) reserved(const) ident(PrefixChars)operator(:) ident(TCharSet) operator(=) ident(SwitchChars)operator(;)
-  ident(IgnoreCase)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) ident(Boolean)operator(;)
-reserved(function) ident(GetParam)operator(()reserved(const) ident(Prefix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(;) reserved(const) ident(Default)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\):) reserved(string)operator(;)
+  ident(IgnoreCase)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) ident(Boolean)operator(;)
+reserved(function) ident(GetParam)operator(()reserved(const) ident(Prefix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(;) reserved(const) ident(Default)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(:) reserved(string)operator(;)
 
 comment({ Dirs & UserName})
-reserved(function) ident(GetMyDir)operator(()ident(FullPath)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) reserved(string)operator(;)
+reserved(function) ident(GetMyDir)operator(()ident(FullPath)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) reserved(string)operator(;)
 reserved(function) ident(WinDir)operator(:) reserved(string)operator(;)
 reserved(function) ident(SysDir)operator(:) reserved(string)operator(;)
 reserved(function) ident(UserName)operator(:) reserved(string)operator(;)
 
 comment({ Strings & Chars})
-reserved(function) ident(FirstChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Char)operator(;)
-reserved(function) ident(LastChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Char)operator(;)
-
-reserved(function) ident(CharPos)operator(()ident(C)operator(:) ident(Char)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;) directive(overload)operator(;)
-reserved(function) ident(CharPos)operator(()ident(C)operator(:) ident(TCharSet)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;) directive(overload)operator(;)
-reserved(function) ident(CharPosR)operator(()ident(C)operator(:) ident(Char)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) operator(-)integer(1)operator(\):) ident(Integer)operator(;)
-reserved(function) ident(PosEx)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;)
-reserved(function) ident(PosExText)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;)
-reserved(function) ident(PosExAnsiText)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;)
-
-reserved(function) ident(UntilChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(\):) reserved(string)operator(;) directive(overload)operator(;)
-reserved(function) ident(UntilChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(TCharSet)operator(\):) reserved(string)operator(;) directive(overload)operator(;)
+reserved(function) ident(FirstChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Char)operator(;)
+reserved(function) ident(LastChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Char)operator(;)
+
+reserved(function) ident(CharPos)operator(()ident(C)operator(:) ident(Char)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;)
+reserved(function) ident(CharPos)operator(()ident(C)operator(:) ident(TCharSet)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;)
+reserved(function) ident(CharPosR)operator(()ident(C)operator(:) ident(Char)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) operator(-)integer(1)operator(\))operator(:) ident(Integer)operator(;)
+reserved(function) ident(PosEx)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;)
+reserved(function) ident(PosExText)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;)
+reserved(function) ident(PosExAnsiText)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;)
+
+reserved(function) ident(UntilChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;)
+reserved(function) ident(UntilChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(TCharSet)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;)
 reserved(function) ident(UntilLastChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(;)
-  ident(IgnoreNoBrake)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) reserved(string)operator(;)
+  ident(IgnoreNoBrake)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) reserved(string)operator(;)
 
-reserved(function) ident(FromChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(\):) reserved(string)operator(;) directive(overload)operator(;)
-reserved(function) ident(FromChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(TCharSet)operator(\):) reserved(string)operator(;) directive(overload)operator(;)
+reserved(function) ident(FromChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;)
+reserved(function) ident(FromChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(TCharSet)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;)
 reserved(function) ident(FromLastChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(;)
-  ident(IgnoreNoBrake)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) reserved(string)operator(;)
+  ident(IgnoreNoBrake)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) reserved(string)operator(;)
 
 reserved(function) ident(BetweenChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Start)operator(,) ident(Finish)operator(:) ident(Char)operator(;)
-  ident(Inclusive)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) reserved(string)operator(;)
+  ident(Inclusive)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) reserved(string)operator(;)
 
-reserved(function) ident(UntilStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
-reserved(function) ident(FromStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(UntilStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(FromStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 
-reserved(function) ident(StringWrap)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Width)operator(:) ident(Integer)operator(;) reserved(const) ident(LineEnd)operator(:) reserved(string) operator(=) ident(EOL)operator(\):) reserved(string)operator(;)
+reserved(function) ident(StringWrap)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Width)operator(:) ident(Integer)operator(;) reserved(const) ident(LineEnd)operator(:) reserved(string) operator(=) ident(EOL)operator(\))operator(:) reserved(string)operator(;)
 
 comment({ Splitting & Combining })
 reserved(function) ident(Split)operator(()reserved(const) ident(S)operator(,) ident(Separator)operator(:) reserved(string)operator(;) ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(;)
-  ident(MinCount)operator(:) ident(Integer) operator(=) integer(0)operator(\):) ident(TStrA)operator(;) directive(overload)operator(;)
+  ident(MinCount)operator(:) ident(Integer) operator(=) integer(0)operator(\))operator(:) ident(TStrA)operator(;) directive(overload)operator(;)
 reserved(procedure) ident(Split)operator(()reserved(const) ident(S)operator(,) ident(Separator)operator(:) reserved(string)operator(;) ident(Strings)operator(:) ident(TStrings)operator(;)
-  ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(\);) directive(overload)operator(;)
+  ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(;) directive(overload)operator(;)
 reserved(function) ident(Split)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Separators)operator(:) ident(TCharSet)operator(;)
-  ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(;) ident(MinCount)operator(:) ident(Integer) operator(=) integer(0)operator(\):) ident(TStrA)operator(;) directive(overload)operator(;)
+  ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(;) ident(MinCount)operator(:) ident(Integer) operator(=) integer(0)operator(\))operator(:) ident(TStrA)operator(;) directive(overload)operator(;)
 
 reserved(procedure) ident(TileStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(BrakeStart)operator(:) ident(Integer)operator(;) ident(BrakeEnd)operator(:) ident(Integer)operator(;)
-  reserved(out) ident(Left)operator(,) ident(Right)operator(:) reserved(string)operator(\);)
+  reserved(out) ident(Left)operator(,) ident(Right)operator(:) reserved(string)operator(\))operator(;)
 
-reserved(function) ident(Join)operator(()ident(Strings)operator(:) ident(TStrings)operator(;) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;) directive(overload)operator(;)
-reserved(function) ident(Join)operator(()ident(StrA)operator(:) ident(TStrA)operator(;) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;) directive(overload)operator(;)
+reserved(function) ident(Join)operator(()ident(Strings)operator(:) ident(TStrings)operator(;) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;)
+reserved(function) ident(Join)operator(()ident(StrA)operator(:) ident(TStrA)operator(;) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;)
 
-reserved(function) ident(MulStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Count)operator(:) ident(Integer)operator(\):) reserved(string)operator(;)
+reserved(function) ident(MulStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Count)operator(:) ident(Integer)operator(\))operator(:) reserved(string)operator(;)
 
 comment({ Strings ausrichten })
-reserved(function) ident(AlignR)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Width)operator(:) ident(Integer)operator(;) ident(Filler)operator(:) ident(Char) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;)
-reserved(function) ident(MaxStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(MaxLen)operator(:) ident(Integer)operator(\):) reserved(string)operator(;)
+reserved(function) ident(AlignR)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Width)operator(:) ident(Integer)operator(;) ident(Filler)operator(:) ident(Char) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(MaxStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(MaxLen)operator(:) ident(Integer)operator(\))operator(:) reserved(string)operator(;)
 
 comment({ Stringing })
-reserved(function) ident(TrimAll)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(TrimAll)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 
-reserved(function) ident(ControlChar)operator(()ident(C)operator(:) ident(Char)operator(\):) ident(Boolean)operator(;)
-reserved(function) ident(FriendlyChar)operator(()ident(C)operator(:) ident(Char)operator(\):) ident(Char)operator(;)
+reserved(function) ident(ControlChar)operator(()ident(C)operator(:) ident(Char)operator(\))operator(:) ident(Boolean)operator(;)
+reserved(function) ident(FriendlyChar)operator(()ident(C)operator(:) ident(Char)operator(\))operator(:) ident(Char)operator(;)
 
-reserved(function) ident(FriendlyStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;) directive(overload)operator(;)
-reserved(function) ident(FriendlyStr)operator(()ident(a)operator(:) ident(TByteA)operator(\):) reserved(string)operator(;) directive(overload)operator(;)
+reserved(function) ident(FriendlyStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;)
+reserved(function) ident(FriendlyStr)operator(()ident(a)operator(:) ident(TByteA)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;)
 
-reserved(function) ident(Quote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Quoter)operator(:) ident(Char) operator(=) char<delimiter(')content(")delimiter(')>operator(\):) reserved(string)operator(;)
-reserved(function) ident(UnQuote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
-reserved(function) ident(DeQuote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(Quote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Quoter)operator(:) ident(Char) operator(=) char<delimiter(')content(")delimiter(')>operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(UnQuote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(DeQuote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 
 reserved(function) ident(StrNumerus)operator(()reserved(const) ident(Value)operator(:) ident(Integer)operator(;) reserved(const) ident(Singular)operator(,) ident(Plural)operator(:) reserved(string)operator(;)
-  reserved(const) ident(Zero)operator(:) reserved(string) operator(=) char<delimiter(')content(0)delimiter(')>operator(\):) reserved(string)operator(;)
+  reserved(const) ident(Zero)operator(:) reserved(string) operator(=) char<delimiter(')content(0)delimiter(')>operator(\))operator(:) reserved(string)operator(;)
 
-reserved(function) ident(MakeStr)operator(()reserved(const) ident(Items)operator(:) reserved(array) reserved(of) reserved(const)operator(;) ident(Separator)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\):) reserved(string)operator(;)
-reserved(procedure) ident(ShowText)operator(()reserved(const) ident(Items)operator(:) reserved(array) reserved(of) reserved(const)operator(;) ident(Separator)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\);)
+reserved(function) ident(MakeStr)operator(()reserved(const) ident(Items)operator(:) reserved(array) reserved(of) reserved(const)operator(;) ident(Separator)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(:) reserved(string)operator(;)
+reserved(procedure) ident(ShowText)operator(()reserved(const) ident(Items)operator(:) reserved(array) reserved(of) reserved(const)operator(;) ident(Separator)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(;)
 
 comment({ Delete })
-reserved(function) ident(DeleteChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\):) reserved(string)operator(;) directive(overload)operator(;)
-reserved(function) ident(DeleteChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\):) reserved(string)operator(;) directive(overload)operator(;)
-reserved(function) ident(ExtractChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\):) reserved(string)operator(;)
+reserved(function) ident(DeleteChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;)
+reserved(function) ident(DeleteChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;)
+reserved(function) ident(ExtractChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\))operator(:) reserved(string)operator(;)
 
 comment({ Find })
-reserved(function) ident(CharCount)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\):) ident(Integer)operator(;)
-
-reserved(function) ident(CharIn)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\):) ident(Boolean)operator(;) directive(overload)operator(;)
-reserved(function) ident(CharIn)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\):) ident(Boolean)operator(;) directive(overload)operator(;)
-
-reserved(function) ident(StrAtPos)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Pos)operator(:) ident(Integer)operator(;) reserved(const) ident(Str)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
-reserved(function) ident(StrAtBegin)operator(()reserved(const) ident(S)operator(,) ident(Str)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
-reserved(function) ident(StrIn)operator(()reserved(const) ident(S)operator(,) ident(SubStr)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) directive(overload)operator(;)
-reserved(function) ident(StrIn)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) directive(overload)operator(;)
-reserved(function) ident(StrIn)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) directive(overload)operator(;)
-reserved(function) ident(StrIndex)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) directive(overload)operator(;)
-reserved(function) ident(StrIndex)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) directive(overload)operator(;)
-
-reserved(function) ident(TextAtPos)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Pos)operator(:) ident(Integer)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
-reserved(function) ident(TextAtBegin)operator(()reserved(const) ident(S)operator(,) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
-reserved(function) ident(TextIn)operator(()reserved(const) ident(S)operator(,) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) directive(overload)operator(;)
-reserved(function) ident(TextIn)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) directive(overload)operator(;)
-reserved(function) ident(TextIn)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;) directive(overload)operator(;)
-reserved(function) ident(TextIndex)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) directive(overload)operator(;)
-reserved(function) ident(TextIndex)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Integer)operator(;) directive(overload)operator(;)
+reserved(function) ident(CharCount)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\))operator(:) ident(Integer)operator(;)
+
+reserved(function) ident(CharIn)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\))operator(:) ident(Boolean)operator(;) directive(overload)operator(;)
+reserved(function) ident(CharIn)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\))operator(:) ident(Boolean)operator(;) directive(overload)operator(;)
+
+reserved(function) ident(StrAtPos)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Pos)operator(:) ident(Integer)operator(;) reserved(const) ident(Str)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
+reserved(function) ident(StrAtBegin)operator(()reserved(const) ident(S)operator(,) ident(Str)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
+reserved(function) ident(StrIn)operator(()reserved(const) ident(S)operator(,) ident(SubStr)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) directive(overload)operator(;)
+reserved(function) ident(StrIn)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) directive(overload)operator(;)
+reserved(function) ident(StrIn)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) directive(overload)operator(;)
+reserved(function) ident(StrIndex)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;)
+reserved(function) ident(StrIndex)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;)
+
+reserved(function) ident(TextAtPos)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Pos)operator(:) ident(Integer)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
+reserved(function) ident(TextAtBegin)operator(()reserved(const) ident(S)operator(,) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
+reserved(function) ident(TextIn)operator(()reserved(const) ident(S)operator(,) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) directive(overload)operator(;)
+reserved(function) ident(TextIn)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) directive(overload)operator(;)
+reserved(function) ident(TextIn)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;) directive(overload)operator(;)
+reserved(function) ident(TextIndex)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;)
+reserved(function) ident(TextIndex)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;)
 
 comment({ Replace })
-reserved(function) ident(ReplaceChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Old)operator(,) ident(New)operator(:) ident(Char)operator(\):) reserved(string)operator(;) directive(overload)operator(;)
-reserved(function) ident(ReplaceChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Old)operator(:) ident(TCharSet)operator(;) ident(New)operator(:) ident(Char)operator(\):) reserved(string)operator(;) directive(overload)operator(;)
+reserved(function) ident(ReplaceChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Old)operator(,) ident(New)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;)
+reserved(function) ident(ReplaceChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Old)operator(:) ident(TCharSet)operator(;) ident(New)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;)
 
-reserved(function) ident(Replace)operator(()reserved(const) ident(S)operator(,) ident(Old)operator(,) ident(New)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(Replace)operator(()reserved(const) ident(S)operator(,) ident(Old)operator(,) ident(New)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 
 comment({ TStrings })
-reserved(function) ident(SLOfFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) ident(TStringList)operator(;)
-reserved(function) ident(ContainsEmptyLines)operator(()ident(SL)operator(:) ident(TStrings)operator(\):) ident(Boolean)operator(;)
-reserved(procedure) ident(DeleteEmptyLines)operator(()ident(SL)operator(:) ident(TStrings)operator(\);)
-reserved(procedure) ident(DeleteCommentLines)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(CommentSign)operator(:) reserved(string) operator(=) string<delimiter(')content(//)delimiter(')>operator(\);)
+reserved(function) ident(SLOfFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(TStringList)operator(;)
+reserved(function) ident(ContainsEmptyLines)operator(()ident(SL)operator(:) ident(TStrings)operator(\))operator(:) ident(Boolean)operator(;)
+reserved(procedure) ident(DeleteEmptyLines)operator(()ident(SL)operator(:) ident(TStrings)operator(\))operator(;)
+reserved(procedure) ident(DeleteCommentLines)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(CommentSign)operator(:) reserved(string) operator(=) string<delimiter(')content(//)delimiter(')>operator(\))operator(;)
 reserved(procedure) ident(WriteSL)operator(()ident(Strings)operator(:) ident(TStrings)operator(;) reserved(const) ident(Prefix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(;)
-  reserved(const) ident(Suffix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\);)
+  reserved(const) ident(Suffix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(;)
 
-reserved(function) ident(FindLine)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(FindLine)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;)
 
-reserved(procedure) ident(QuickSortSL)operator(()ident(SL)operator(:) ident(TStringList)operator(\);)
+reserved(procedure) ident(QuickSortSL)operator(()ident(SL)operator(:) ident(TStringList)operator(\))operator(;)
 
 comment({ TStrA })
-reserved(function) ident(IncStrA)operator(()ident(StrA)operator(:) ident(TStrA)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(IncStrA)operator(()ident(StrA)operator(:) ident(TStrA)operator(\))operator(:) ident(Integer)operator(;)
 
 comment({ TByteA })
-reserved(function) ident(StrOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(\):) reserved(string)operator(;)
-reserved(function) ident(ByteAOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(TByteA)operator(;)
-reserved(function) ident(ByteAOfInt)operator(()ident(i)operator(:) ident(Integer)operator(\):) ident(TByteA)operator(;)
-reserved(function) ident(IntOfByteA)operator(()ident(A)operator(:) ident(TByteA)operator(\):) ident(Integer)operator(;)
-reserved(function) ident(ByteAOfHex)operator(()reserved(const) ident(Hex)operator(:) reserved(string)operator(\):) ident(TByteA)operator(;)
+reserved(function) ident(StrOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(ByteAOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(TByteA)operator(;)
+reserved(function) ident(ByteAOfInt)operator(()ident(i)operator(:) ident(Integer)operator(\))operator(:) ident(TByteA)operator(;)
+reserved(function) ident(IntOfByteA)operator(()ident(A)operator(:) ident(TByteA)operator(\))operator(:) ident(Integer)operator(;)
+reserved(function) ident(ByteAOfHex)operator(()reserved(const) ident(Hex)operator(:) reserved(string)operator(\))operator(:) ident(TByteA)operator(;)
 
-reserved(function) ident(SameByteA)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(TByteA)operator(\):) ident(Boolean)operator(;)
-reserved(function) ident(Reverse)operator(()ident(a)operator(:) ident(TByteA)operator(\):) ident(TByteA)operator(;)
-reserved(function) ident(SaveByteA)operator(()ident(Data)operator(:) ident(TByteA)operator(;) reserved(const) ident(FileName)operator(:) reserved(string)operator(;) ident(Overwrite)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) ident(Boolean)operator(;)
-reserved(function) ident(LoadByteA)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) ident(TByteA)operator(;)
+reserved(function) ident(SameByteA)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(TByteA)operator(\))operator(:) ident(Boolean)operator(;)
+reserved(function) ident(Reverse)operator(()ident(a)operator(:) ident(TByteA)operator(\))operator(:) ident(TByteA)operator(;)
+reserved(function) ident(SaveByteA)operator(()ident(Data)operator(:) ident(TByteA)operator(;) reserved(const) ident(FileName)operator(:) reserved(string)operator(;) ident(Overwrite)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) ident(Boolean)operator(;)
+reserved(function) ident(LoadByteA)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(TByteA)operator(;)
 
-reserved(function) ident(Endian)operator(()ident(i)operator(:) ident(Integer)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(Endian)operator(()ident(i)operator(:) ident(Integer)operator(\))operator(:) ident(Integer)operator(;)
 
 comment({ Files })
-reserved(function) ident(SizeOfFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) ident(Integer)operator(;)
-reserved(function) ident(FileEx)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(;) ident(AllowFolders)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) ident(Boolean)operator(;)
-reserved(function) ident(LWPSolve)operator(()reserved(const) ident(Dir)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
-reserved(function) ident(LWPSlash)operator(()reserved(const) ident(Dir)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(SizeOfFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;)
+reserved(function) ident(FileEx)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(;) ident(AllowFolders)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) ident(Boolean)operator(;)
+reserved(function) ident(LWPSolve)operator(()reserved(const) ident(Dir)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(LWPSlash)operator(()reserved(const) ident(Dir)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 
-reserved(function) ident(ExtractDrive)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
-reserved(function) ident(ExtractPath)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
-reserved(function) ident(ExtractPrefix)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
-reserved(function) ident(ExtractSuffix)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(ExtractDrive)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(ExtractPath)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(ExtractPrefix)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(ExtractSuffix)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 
-reserved(function) ident(IsValidFileName)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
-reserved(function) ident(MakeValidFileName)operator(()ident(FileName)operator(:) reserved(string)operator(;) reserved(const) ident(Default)operator(:) reserved(string) operator(=) string<delimiter(')content(File)delimiter(')>operator(\):) reserved(string)operator(;)
+reserved(function) ident(IsValidFileName)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
+reserved(function) ident(MakeValidFileName)operator(()ident(FileName)operator(:) reserved(string)operator(;) reserved(const) ident(Default)operator(:) reserved(string) operator(=) string<delimiter(')content(File)delimiter(')>operator(\))operator(:) reserved(string)operator(;)
 
 comment({ Converting })
-reserved(function) ident(IsValidInteger)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
-reserved(function) ident(IsValidCardinal)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(IsValidInteger)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
+reserved(function) ident(IsValidCardinal)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 
 reserved(function) ident(StrOfBool)operator(()ident(flag)operator(:) ident(Boolean)operator(;) reserved(const) ident(TrueStr)operator(:) reserved(string) operator(=) string<delimiter(')content(True)delimiter(')>operator(;)
-  reserved(const) ident(FalseStr)operator(:) reserved(string) operator(=) string<delimiter(')content(False)delimiter(')>operator(\):) reserved(string)operator(;)
-reserved(function) ident(StrOfInt)operator(()ident(i)operator(:) ident(Integer)operator(\):) reserved(string)operator(;)
-reserved(function) ident(CardOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Cardinal)operator(;)
+  reserved(const) ident(FalseStr)operator(:) reserved(string) operator(=) string<delimiter(')content(False)delimiter(')>operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(StrOfInt)operator(()ident(i)operator(:) ident(Integer)operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(CardOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Cardinal)operator(;)
 
-reserved(function) ident(HexOrd)operator(()ident(Hex)operator(:) ident(Char)operator(\):) ident(THex)operator(;)
-reserved(function) ident(ByteOfHex)operator(()ident(Hex)operator(:) ident(THexByteStr)operator(\):) ident(Byte)operator(;)
+reserved(function) ident(HexOrd)operator(()ident(Hex)operator(:) ident(Char)operator(\))operator(:) ident(THex)operator(;)
+reserved(function) ident(ByteOfHex)operator(()ident(Hex)operator(:) ident(THexByteStr)operator(\))operator(:) ident(Byte)operator(;)
 
-reserved(function) ident(DecOfHex)operator(()reserved(const) ident(Hex)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
-reserved(function) ident(HexOfByte)operator(()ident(b)operator(:) ident(Byte)operator(\):) ident(THexByteStr)operator(;)
-reserved(function) ident(HexOfCard)operator(()ident(i)operator(:) ident(Cardinal)operator(\):) reserved(string)operator(;) directive(overload)operator(;)
-reserved(function) ident(HexOfCard)operator(()ident(i)operator(:) ident(Cardinal)operator(;) ident(Digits)operator(:) ident(Integer)operator(\):) reserved(string)operator(;) directive(overload)operator(;)
+reserved(function) ident(DecOfHex)operator(()reserved(const) ident(Hex)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(HexOfByte)operator(()ident(b)operator(:) ident(Byte)operator(\))operator(:) ident(THexByteStr)operator(;)
+reserved(function) ident(HexOfCard)operator(()ident(i)operator(:) ident(Cardinal)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;)
+reserved(function) ident(HexOfCard)operator(()ident(i)operator(:) ident(Cardinal)operator(;) ident(Digits)operator(:) ident(Integer)operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;)
 
-reserved(function) ident(PascalHexArray)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(Name)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(PascalHexArray)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(Name)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 
 reserved(function) ident(HexOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(Blocks)operator(:) ident(Integer) operator(=) integer(1)operator(;)
-  reserved(const) ident(Splitter)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;)
+  reserved(const) ident(Splitter)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;)
 reserved(function) ident(BinOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(Blocks)operator(:) ident(Integer) operator(=) integer(4)operator(;)
-  reserved(const) ident(Splitter)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;)
+  reserved(const) ident(Splitter)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;)
 
-reserved(function) ident(CardOfHex)operator(()ident(Hex)operator(:) reserved(string)operator(\):) ident(Cardinal)operator(;)
-reserved(function) ident(IntOfBin)operator(()ident(Bin)operator(:) reserved(string)operator(\):) ident(Cardinal)operator(;)
+reserved(function) ident(CardOfHex)operator(()ident(Hex)operator(:) reserved(string)operator(\))operator(:) ident(Cardinal)operator(;)
+reserved(function) ident(IntOfBin)operator(()ident(Bin)operator(:) reserved(string)operator(\))operator(:) ident(Cardinal)operator(;)
 
-reserved(function) ident(BinOfIntFill)operator(()ident(n)operator(:) ident(cardinal)operator(;) ident(MinCount)operator(:) ident(Integer) operator(=) integer(8)operator(\):) reserved(string)operator(;)
-reserved(function) ident(BinOfInt)operator(()ident(n)operator(:) ident(cardinal)operator(\):) reserved(string)operator(;)
+reserved(function) ident(BinOfIntFill)operator(()ident(n)operator(:) ident(cardinal)operator(;) ident(MinCount)operator(:) ident(Integer) operator(=) integer(8)operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(BinOfInt)operator(()ident(n)operator(:) ident(cardinal)operator(\))operator(:) reserved(string)operator(;)
 
-reserved(function) ident(BaseNOfInt)operator(()ident(I)operator(:) ident(Cardinal)operator(;) ident(B)operator(:) ident(TBaseN)operator(\):) reserved(string)operator(;)
-reserved(function) ident(IntOfBaseN)operator(()ident(V)operator(:) reserved(string)operator(;) ident(B)operator(:) ident(TBaseN)operator(\):) ident(Cardinal)operator(;)
+reserved(function) ident(BaseNOfInt)operator(()ident(I)operator(:) ident(Cardinal)operator(;) ident(B)operator(:) ident(TBaseN)operator(\))operator(:) reserved(string)operator(;)
+reserved(function) ident(IntOfBaseN)operator(()ident(V)operator(:) reserved(string)operator(;) ident(B)operator(:) ident(TBaseN)operator(\))operator(:) ident(Cardinal)operator(;)
 
 comment({ Ranges })
-reserved(function) ident(KeepIn)operator(()ident(i)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\):) ident(Variant)operator(;)
-reserved(function) ident(InRange)operator(()ident(Value)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\):) ident(Boolean)operator(;)
-reserved(function) ident(InStrictRange)operator(()ident(Value)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\):) ident(Boolean)operator(;)
-reserved(function) ident(Min)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(Integer)operator(\):) ident(Integer)operator(;) directive(overload)operator(;)
-reserved(function) ident(Min)operator(()reserved(const) ident(A)operator(:) ident(TIntA)operator(\):) ident(Integer)operator(;) directive(overload)operator(;)
-reserved(function) ident(Max)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(Integer)operator(\):) ident(Integer)operator(;) directive(overload)operator(;)
-reserved(function) ident(Max)operator(()reserved(const) ident(A)operator(:) ident(TIntA)operator(\):) ident(Integer)operator(;) directive(overload)operator(;)
+reserved(function) ident(KeepIn)operator(()ident(i)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\))operator(:) ident(Variant)operator(;)
+reserved(function) ident(InRange)operator(()ident(Value)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\))operator(:) ident(Boolean)operator(;)
+reserved(function) ident(InStrictRange)operator(()ident(Value)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\))operator(:) ident(Boolean)operator(;)
+reserved(function) ident(Min)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(Integer)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;)
+reserved(function) ident(Min)operator(()reserved(const) ident(A)operator(:) ident(TIntA)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;)
+reserved(function) ident(Max)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(Integer)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;)
+reserved(function) ident(Max)operator(()reserved(const) ident(A)operator(:) ident(TIntA)operator(\))operator(:) ident(Integer)operator(;) directive(overload)operator(;)
 
 reserved(const)
   ident(RangesSeparator) operator(=) char<delimiter(')content(,)delimiter(')>operator(;)
   ident(RangeInnerSeparator) operator(=) char<delimiter(')content(-)delimiter(')>operator(;)
   ident(RangeInfinite) operator(=) char<delimiter(')content(*)delimiter(')>operator(;)
-  ident(RangeSpecialChars) operator(=) operator([)ident(RangesSeparator)operator(,) ident(RangeInnerSeparator)operator(,) ident(RangeInfinite)operator(];)
+  ident(RangeSpecialChars) operator(=) operator([)ident(RangesSeparator)operator(,) ident(RangeInnerSeparator)operator(,) ident(RangeInfinite)operator(])operator(;)
 
-reserved(function) ident(RangesOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(TRanges)operator(;)
-reserved(function) ident(InRanges)operator(()ident(Ranges)operator(:) ident(TRanges)operator(;) ident(TestValue)operator(:) ident(Cardinal)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(RangesOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(TRanges)operator(;)
+reserved(function) ident(InRanges)operator(()ident(Ranges)operator(:) ident(TRanges)operator(;) ident(TestValue)operator(:) ident(Cardinal)operator(\))operator(:) ident(Boolean)operator(;)
 
-reserved(function) ident(Success)operator(()ident(Res)operator(:) ident(Integer)operator(;) ident(ResultOnSuccess)operator(:) ident(Integer) operator(=) ident(ERROR_SUCCESS)operator(\):) ident(Boolean)operator(;)
-reserved(function) ident(Failure)operator(()ident(Res)operator(:) ident(Integer)operator(;) ident(ResultOnSuccess)operator(:) ident(Integer) operator(=) ident(ERROR_SUCCESS)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(Success)operator(()ident(Res)operator(:) ident(Integer)operator(;) ident(ResultOnSuccess)operator(:) ident(Integer) operator(=) ident(ERROR_SUCCESS)operator(\))operator(:) ident(Boolean)operator(;)
+reserved(function) ident(Failure)operator(()ident(Res)operator(:) ident(Integer)operator(;) ident(ResultOnSuccess)operator(:) ident(Integer) operator(=) ident(ERROR_SUCCESS)operator(\))operator(:) ident(Boolean)operator(;)
 
-reserved(function) ident(ExpandString)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(ExpandString)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 
 comment({ Files })
 reserved(procedure) ident(DeleteFiles)operator(()reserved(const) ident(Mask)operator(:) reserved(string)operator(;) ident(ScanSubDirs)operator(:) ident(Boolean) operator(=) ident(True)operator(;)
-  ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(\);)
-reserved(procedure) ident(FileNew)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\);)
-reserved(function) ident(DateTimeOfFileTime)operator(()reserved(const) ident(FileTime)operator(:) ident(TFileTime)operator(\):) ident(TDateTime)operator(;)
+  ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(\))operator(;)
+reserved(procedure) ident(FileNew)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(;)
+reserved(function) ident(DateTimeOfFileTime)operator(()reserved(const) ident(FileTime)operator(:) ident(TFileTime)operator(\))operator(:) ident(TDateTime)operator(;)
 
 comment({ FileNames })
-reserved(function) ident(GetFileNew)operator(()ident(FileName)operator(:) reserved(string)operator(;) ident(NoFloppyDrives)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) reserved(string)operator(;)
+reserved(function) ident(GetFileNew)operator(()ident(FileName)operator(:) reserved(string)operator(;) ident(NoFloppyDrives)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) reserved(string)operator(;)
 
 comment({ Finding Files })
 reserved(function) ident(FindAll)operator(()ident(Strings)operator(:) ident(TStrings)operator(;) reserved(const) ident(Mask)operator(:) reserved(string)operator(;)
   ident(ScanSubDirs)operator(:) ident(Boolean) operator(=) ident(True)operator(;) ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(;)
-  ident(FileReturn)operator(:) ident(TFileNameFunc) operator(=) reserved(nil)operator(\):) ident(Boolean)operator(;)
+  ident(FileReturn)operator(:) ident(TFileNameFunc) operator(=) reserved(nil)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(function) ident(FindAllFirst)operator(()reserved(const) ident(Mask)operator(:) reserved(string)operator(;) ident(ScanSubDirs)operator(:) ident(Boolean) operator(=) ident(True)operator(;)
-  ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(\):) reserved(string)operator(;)
+  ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(\))operator(:) reserved(string)operator(;)
 
 reserved(function) ident(FullOSInfo)operator(:) reserved(string)operator(;)
 reserved(function) ident(Win32PlatformStr)operator(:) reserved(string)operator(;)
@@ -317,7 +317,7 @@ reserved(var)
   
 comment({ Backward compatibility })
 preprocessor({$IFNDEF VER130})
-reserved(function) ident(SameText)operator(()reserved(const) ident(S1)operator(,) ident(S2)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(SameText)operator(()reserved(const) ident(S1)operator(,) ident(S2)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 preprocessor({$ENDIF})
 
 reserved(implementation)
@@ -326,49 +326,49 @@ reserved(uses) ident(FileCtrl)operator(;)
 preprocessor({$ENDIF})
 
 preprocessor({$IFNDEF VER130})
-reserved(function) ident(SameText)operator(()reserved(const) ident(S1)operator(,) ident(S2)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(SameText)operator(()reserved(const) ident(S1)operator(,) ident(S2)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(CompareText)operator(()ident(S1)operator(,) ident(S2)operator(\)) operator(=) integer(0)operator(;)
 reserved(end)operator(;)
 preprocessor({$ENDIF})
 
-reserved(procedure) ident(Report)operator(()reserved(const) ident(ReportName)operator(,) ident(Text)operator(:) reserved(string)operator(\);)
+reserved(procedure) ident(Report)operator(()reserved(const) ident(ReportName)operator(,) ident(Text)operator(:) reserved(string)operator(\))operator(;)
 reserved(var)
   ident(F)operator(:) ident(TextFile)operator(;)
   ident(FileName)operator(:) reserved(string)operator(;)
 reserved(begin)
   ident(FileName) operator(:=) ident(MyDir) operator(+) ident(ReportName) operator(+) string<delimiter(')content(.rep)delimiter(')>operator(;)
-  ident(Assign)operator(()ident(F)operator(,) ident(FileName)operator(\);)
+  ident(Assign)operator(()ident(F)operator(,) ident(FileName)operator(\))operator(;)
   reserved(try)
     reserved(if) reserved(not) ident(FileExists)operator(()ident(FileName)operator(\)) reserved(then)
       ident(Rewrite)operator(()ident(F)operator(\))
     reserved(else)
-      ident(Append)operator(()ident(F)operator(\);)
-    ident(WriteLn)operator(()ident(F)operator(,) ident(Text)operator(\);)
+      ident(Append)operator(()ident(F)operator(\))operator(;)
+    ident(WriteLn)operator(()ident(F)operator(,) ident(Text)operator(\))operator(;)
   reserved(finally)
-    ident(Close)operator(()ident(F)operator(\);)
+    ident(Close)operator(()ident(F)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(ClearReport)operator(()reserved(const) ident(ReportName)operator(:) reserved(string)operator(\);)
+reserved(procedure) ident(ClearReport)operator(()reserved(const) ident(ReportName)operator(:) reserved(string)operator(\))operator(;)
 reserved(var)
   ident(FileName)operator(:) reserved(string)operator(;)
 reserved(begin)
   ident(FileName) operator(:=) ident(MyDir) operator(+) ident(ReportName) operator(+) string<delimiter(')content(.rep)delimiter(')>operator(;)
-  ident(DeleteFile)operator(()ident(FileName)operator(\);)
+  ident(DeleteFile)operator(()ident(FileName)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(ReportFmt)operator(()reserved(const) ident(ReportName)operator(,) ident(Fmt)operator(:) reserved(string)operator(;) reserved(const) ident(Args)operator(:) reserved(array) reserved(of) reserved(const)operator(\);)
+reserved(procedure) ident(ReportFmt)operator(()reserved(const) ident(ReportName)operator(,) ident(Fmt)operator(:) reserved(string)operator(;) reserved(const) ident(Args)operator(:) reserved(array) reserved(of) reserved(const)operator(\))operator(;)
 reserved(begin)
-  ident(Report)operator(()ident(ReportName)operator(,) ident(Format)operator(()ident(Fmt)operator(,) ident(Args)operator(\)\);)
+  ident(Report)operator(()ident(ReportName)operator(,) ident(Format)operator(()ident(Fmt)operator(,) ident(Args)operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(GetParams)operator(()ident(Strings)operator(:) ident(TStrings)operator(\);)
+reserved(procedure) ident(GetParams)operator(()ident(Strings)operator(:) ident(TStrings)operator(\))operator(;)
 reserved(var)
   ident(P)operator(:) ident(PChar)operator(;)
   ident(Param)operator(:) reserved(string)operator(;)
 
-  reserved(function) ident(GetParamStr)operator(()reserved(var) ident(P)operator(:) ident(PChar)operator(;) reserved(var) ident(Param)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+  reserved(function) ident(GetParamStr)operator(()reserved(var) ident(P)operator(:) ident(PChar)operator(;) reserved(var) ident(Param)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
   reserved(var)
     ident(Quoted)operator(:) ident(Boolean)operator(;)
   reserved(begin)
@@ -376,20 +376,20 @@ reserved(var)
 
     reserved(repeat)
       reserved(while) operator(()ident(P)operator([)integer(0)operator(]) operator(<>) char(#0)operator(\)) reserved(and) operator(()ident(P)operator([)integer(0)operator(]) operator(<=) char<delimiter(')content( )delimiter(')>operator(\)) reserved(do)
-        ident(Inc)operator(()ident(P)operator(\);)
+        ident(Inc)operator(()ident(P)operator(\))operator(;)
 
       ident(Quoted) operator(:=) ident(False)operator(;)
       reserved(while) ident(P)operator([)integer(0)operator(]) operator(<>) char(#0) reserved(do) reserved(begin)
         reserved(if) ident(P)operator([)integer(0)operator(]) operator(=) char<delimiter(')content(")delimiter(')> reserved(then) reserved(begin)
           ident(Quoted) operator(:=) reserved(not) ident(Quoted)operator(;)
-          ident(Inc)operator(()ident(P)operator(\);)
+          ident(Inc)operator(()ident(P)operator(\))operator(;)
         ident(Continue)operator(;) reserved(end)operator(;)
         reserved(if) operator(()ident(P)operator([)integer(0)operator(]) operator(<=) char<delimiter(')content( )delimiter(')>operator(\)) reserved(and) reserved(not) ident(Quoted) reserved(then)
           ident(Break)operator(;)
-        ident(Param) operator(:=) ident(Param) operator(+) ident(P)operator([)integer(0)operator(];)
-        ident(Inc)operator(()ident(P)operator(\);)
+        ident(Param) operator(:=) ident(Param) operator(+) ident(P)operator([)integer(0)operator(])operator(;)
+        ident(Inc)operator(()ident(P)operator(\))operator(;)
       reserved(end)operator(;)
-    reserved(until) operator(()ident(Param) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(or) operator(()ident(P)operator([)integer(0)operator(]) operator(=) char(#0)operator(\);)
+    reserved(until) operator(()ident(Param) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(or) operator(()ident(P)operator([)integer(0)operator(]) operator(=) char(#0)operator(\))operator(;)
 
     ident(Result) operator(:=) ident(Param) operator(<>) string<delimiter(')delimiter(')>operator(;)
   reserved(end)operator(;)
@@ -397,23 +397,23 @@ reserved(var)
 reserved(begin)
   ident(Strings)operator(.)ident(Clear)operator(;)
   ident(P) operator(:=) ident(GetCommandLine)operator(;)
-  ident(GetParamStr)operator(()ident(P)operator(,) ident(Param)operator(\);)
+  ident(GetParamStr)operator(()ident(P)operator(,) ident(Param)operator(\))operator(;)
   reserved(while) ident(GetParamStr)operator(()ident(P)operator(,) ident(Param)operator(\)) reserved(do)
-    ident(Strings)operator(.)ident(Add)operator(()ident(Param)operator(\);)
+    ident(Strings)operator(.)ident(Add)operator(()ident(Param)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(GetParams)operator(()reserved(const) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;)
+reserved(function) ident(GetParams)operator(()reserved(const) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(SL)operator(:) ident(TStringList)operator(;)
 reserved(begin)
   ident(SL) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
-  ident(GetParams)operator(()ident(SL)operator(\);)
-  ident(Result) operator(:=) ident(Join)operator(()ident(SL)operator(,) ident(Separator)operator(\);)
+  ident(GetParams)operator(()ident(SL)operator(\))operator(;)
+  ident(Result) operator(:=) ident(Join)operator(()ident(SL)operator(,) ident(Separator)operator(\))operator(;)
   ident(SL)operator(.)ident(Free)operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(Switch)operator(()reserved(const) ident(Switch)operator(:) reserved(string)operator(;) reserved(const) ident(PrefixChars)operator(:) ident(TCharSet) operator(=) ident(SwitchChars)operator(;)
-  ident(IgnoreCase)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) ident(Boolean)operator(;)
+  ident(IgnoreCase)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) ident(Boolean)operator(;)
 comment(//= SysUtils.FindCmdLineSwitch)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
@@ -422,12 +422,12 @@ reserved(begin)
   ident(Result) operator(:=) ident(True)operator(;)
 
   reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(ParamCount) reserved(do) reserved(begin)
-    ident(s) operator(:=) ident(ParamStr)operator(()ident(i)operator(\);)
+    ident(s) operator(:=) ident(ParamStr)operator(()ident(i)operator(\))operator(;)
 
     reserved(if) operator(()ident(s) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(s)operator([)integer(1)operator(]) reserved(in) ident(PrefixChars)operator(\)) reserved(then) reserved(begin)
     comment(//i know that always s <> '', but this is saver)
-      ident(s) operator(:=) ident(Copy)operator(()ident(s)operator(,) integer(2)operator(,) ident(MaxInt)operator(\);)
-      reserved(if) operator(()ident(s) operator(=) ident(Switch)operator(\)) reserved(or) operator(()ident(IgnoreCase) reserved(and) operator(()integer(0)operator(=)ident(AnsiCompareText)operator(()ident(s)operator(,) ident(Switch)operator(\)\)\)) reserved(then)
+      ident(s) operator(:=) ident(Copy)operator(()ident(s)operator(,) integer(2)operator(,) ident(MaxInt)operator(\))operator(;)
+      reserved(if) operator(()ident(s) operator(=) ident(Switch)operator(\)) reserved(or) operator(()ident(IgnoreCase) reserved(and) operator(()integer(0)operator(=)ident(AnsiCompareText)operator(()ident(s)operator(,) ident(Switch)operator(\))operator(\))operator(\)) reserved(then)
         ident(Exit)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
@@ -435,61 +435,61 @@ reserved(begin)
   ident(Result) operator(:=) ident(False)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ParamNum)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(ParamNum)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(for) ident(Result) operator(:=) integer(1) reserved(to) ident(ParamCount) reserved(do)
-    reserved(if) integer(0)operator(=)ident(AnsiCompareText)operator(()ident(ParamStr)operator(()ident(Result)operator(\),) ident(S)operator(\)) reserved(then)
+    reserved(if) integer(0)operator(=)ident(AnsiCompareText)operator(()ident(ParamStr)operator(()ident(Result)operator(\))operator(,) ident(S)operator(\)) reserved(then)
       ident(Exit)operator(;)
 
   ident(Result) operator(:=) integer(0)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ParamPrefixNum)operator(()reserved(const) ident(Prefix)operator(:) reserved(string)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(ParamPrefixNum)operator(()reserved(const) ident(Prefix)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;)
 reserved(var)
   ident(Len)operator(:) ident(Integer)operator(;)
 reserved(begin)
-  ident(Len) operator(:=) ident(Length)operator(()ident(Prefix)operator(\);)
+  ident(Len) operator(:=) ident(Length)operator(()ident(Prefix)operator(\))operator(;)
   reserved(for) ident(Result) operator(:=) integer(1) reserved(to) ident(ParamCount) reserved(do)
-    reserved(if) integer(0)operator(=)ident(AnsiCompareText)operator(()ident(Copy)operator(()ident(ParamStr)operator(()ident(Result)operator(\),) integer(1)operator(,) ident(Len)operator(\),) ident(Prefix)operator(\)) reserved(then)
+    reserved(if) integer(0)operator(=)ident(AnsiCompareText)operator(()ident(Copy)operator(()ident(ParamStr)operator(()ident(Result)operator(\))operator(,) integer(1)operator(,) ident(Len)operator(\))operator(,) ident(Prefix)operator(\)) reserved(then)
       ident(Exit)operator(;)
 
   ident(Result) operator(:=) integer(0)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(Param)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(Param)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(ParamNum)operator(()ident(S)operator(\)) operator(>) integer(0)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ParamPrefix)operator(()reserved(const) ident(Prefix)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(ParamPrefix)operator(()reserved(const) ident(Prefix)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(ParamPrefixNum)operator(()ident(Prefix)operator(\)) operator(>) integer(0)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(GetParam)operator(()reserved(const) ident(Prefix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(;) reserved(const) ident(Default)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\):) reserved(string)operator(;)
+reserved(function) ident(GetParam)operator(()reserved(const) ident(Prefix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(;) reserved(const) ident(Default)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(Default)operator(;)
 
   reserved(if) ident(Prefix) operator(=) string<delimiter(')delimiter(')> reserved(then) reserved(begin)
-    ident(Result) operator(:=) ident(ParamStr)operator(()integer(1)operator(\);)
+    ident(Result) operator(:=) ident(ParamStr)operator(()integer(1)operator(\))operator(;)
   ident(Exit)operator(;) reserved(end)operator(;)
 
-  ident(i) operator(:=) ident(ParamPrefixNum)operator(()ident(Prefix)operator(\);)
+  ident(i) operator(:=) ident(ParamPrefixNum)operator(()ident(Prefix)operator(\))operator(;)
   reserved(if) ident(i) operator(>) integer(0) reserved(then)
-    ident(Result) operator(:=) ident(Copy)operator(()ident(ParamStr)operator(()ident(i)operator(\),) ident(Length)operator(()ident(Prefix)operator(\)) operator(+) integer(1)operator(,) ident(MaxInt)operator(\);)
+    ident(Result) operator(:=) ident(Copy)operator(()ident(ParamStr)operator(()ident(i)operator(\))operator(,) ident(Length)operator(()ident(Prefix)operator(\)) operator(+) integer(1)operator(,) ident(MaxInt)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(GetMyDir)operator(()ident(FullPath)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) reserved(string)operator(;)
+reserved(function) ident(GetMyDir)operator(()ident(FullPath)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(Buffer)operator(:) reserved(array)operator([)integer(0)operator(..)integer(260)operator(]) reserved(of) ident(Char)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
-  ident(SetString)operator(()ident(Result)operator(,) ident(Buffer)operator(,) ident(GetModuleFileName)operator(()integer(0)operator(,) ident(Buffer)operator(,) ident(SizeOf)operator(()ident(Buffer)operator(\)\)\);)
+  ident(SetString)operator(()ident(Result)operator(,) ident(Buffer)operator(,) ident(GetModuleFileName)operator(()integer(0)operator(,) ident(Buffer)operator(,) ident(SizeOf)operator(()ident(Buffer)operator(\))operator(\))operator(\))operator(;)
   reserved(if) ident(FullPath) reserved(then)
-    ident(Result) operator(:=) ident(GetFileNew)operator(()ident(Result)operator(\);)
-  ident(Result) operator(:=) ident(ExtractPath)operator(()ident(Result)operator(\);)
+    ident(Result) operator(:=) ident(GetFileNew)operator(()ident(Result)operator(\))operator(;)
+  ident(Result) operator(:=) ident(ExtractPath)operator(()ident(Result)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(WinDir)operator(:) reserved(string)operator(;)
@@ -497,10 +497,10 @@ reserved(var)
   ident(Res)operator(:) ident(PChar)operator(;)
 reserved(begin)
   ident(Result) operator(:=) char<delimiter(')content(\\)delimiter(')>operator(;)
-  ident(GetMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\);)
-  ident(GetWindowsDirectory)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\);)
+  ident(GetMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\))operator(;)
+  ident(GetWindowsDirectory)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\))operator(;)
   ident(Result) operator(:=) ident(Res) operator(+) char<delimiter(')content(\\)delimiter(')>operator(;)
-  ident(FreeMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\);)
+  ident(FreeMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(SysDir)operator(:) reserved(string)operator(;)
@@ -508,10 +508,10 @@ reserved(var)
   ident(Res)operator(:) ident(PChar)operator(;)
 reserved(begin)
   ident(Result) operator(:=) char<delimiter(')content(\\)delimiter(')>operator(;)
-  ident(GetMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\);)
-  ident(GetSystemDirectory)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\);)
+  ident(GetMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\))operator(;)
+  ident(GetSystemDirectory)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\))operator(;)
   ident(Result) operator(:=) ident(Res) operator(+) char<delimiter(')content(\\)delimiter(')>operator(;)
-  ident(FreeMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\);)
+  ident(FreeMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(UserName)operator(:) reserved(string)operator(;)
@@ -520,78 +520,78 @@ reserved(var)
   ident(Res)operator(:) ident(PChar)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
-  ident(GetMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\);)
+  ident(GetMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\))operator(;)
   ident(Len) operator(:=) ident(MAX_PATH)operator(;)
-  ident(GetUserName)operator(()ident(Res)operator(,) ident(Len)operator(\);)
+  ident(GetUserName)operator(()ident(Res)operator(,) ident(Len)operator(\))operator(;)
   ident(Result) operator(:=) ident(Res)operator(;)
-  ident(FreeMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\);)
+  ident(FreeMem)operator(()ident(Res)operator(,) ident(MAX_PATH)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(FirstChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Char)operator(;)
+reserved(function) ident(FirstChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Char)operator(;)
 reserved(begin)
   reserved(if) ident(s) operator(=) string<delimiter(')delimiter(')> reserved(then)
     ident(Result) operator(:=) char(#0)
   reserved(else)
-    ident(Result) operator(:=) ident(s)operator([)integer(1)operator(];)
+    ident(Result) operator(:=) ident(s)operator([)integer(1)operator(])operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(LastChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Char)operator(;)
+reserved(function) ident(LastChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Char)operator(;)
 reserved(begin)
   reserved(if) ident(s) operator(=) string<delimiter(')delimiter(')> reserved(then)
     ident(Result) operator(:=) char(#0)
   reserved(else)
-    ident(Result) operator(:=) ident(s)operator([)ident(Length)operator(()ident(s)operator(\)];)
+    ident(Result) operator(:=) ident(s)operator([)ident(Length)operator(()ident(s)operator(\))operator(])operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(CharPos)operator(()ident(C)operator(:) ident(Char)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(CharPos)operator(()ident(C)operator(:) ident(Char)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;)
 reserved(var)
   ident(MaxPosToSearch)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(Offset)operator(;)
-  ident(MaxPosToSearch) operator(:=) ident(Length)operator(()ident(S)operator(\);)
+  ident(MaxPosToSearch) operator(:=) ident(Length)operator(()ident(S)operator(\))operator(;)
 
   reserved(while) ident(Result) operator(<=) ident(MaxPosToSearch) reserved(do) reserved(begin)
     reserved(if) ident(S)operator([)ident(Result)operator(]) operator(=) ident(C) reserved(then)
       ident(Exit)operator(;)
-    ident(Inc)operator(()ident(Result)operator(\);)
+    ident(Inc)operator(()ident(Result)operator(\))operator(;)
   reserved(end)operator(;)
 
   ident(Result) operator(:=) integer(0)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(CharPos)operator(()ident(C)operator(:) ident(TCharSet)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(CharPos)operator(()ident(C)operator(:) ident(TCharSet)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;)
 reserved(var)
   ident(MaxPosToSearch)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(Offset)operator(;)
-  ident(MaxPosToSearch) operator(:=) ident(Length)operator(()ident(S)operator(\);)
+  ident(MaxPosToSearch) operator(:=) ident(Length)operator(()ident(S)operator(\))operator(;)
 
   reserved(while) ident(Result) operator(<=) ident(MaxPosToSearch) reserved(do) reserved(begin)
     reserved(if) ident(S)operator([)ident(Result)operator(]) reserved(in) ident(C) reserved(then)
       ident(Exit)operator(;)
-    ident(Inc)operator(()ident(Result)operator(\);)
+    ident(Inc)operator(()ident(Result)operator(\))operator(;)
   reserved(end)operator(;)
 
   ident(Result) operator(:=) integer(0)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(CharPosR)operator(()ident(C)operator(:) ident(Char)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) operator(-)integer(1)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(CharPosR)operator(()ident(C)operator(:) ident(Char)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) operator(-)integer(1)operator(\))operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(if) ident(Offset) operator(<) integer(0) reserved(then)
     ident(Result) operator(:=) ident(Length)operator(()ident(S)operator(\)) operator(+) integer(1) operator(-) ident(Offset)
   reserved(else)
     ident(Result) operator(:=) ident(Offset)operator(;)
   reserved(if) ident(Result) operator(>) ident(Length)operator(()ident(S)operator(\)) reserved(then)
-    ident(Result) operator(:=) ident(Length)operator(()ident(S)operator(\);)
+    ident(Result) operator(:=) ident(Length)operator(()ident(S)operator(\))operator(;)
 
   reserved(while) ident(Result) operator(>) integer(0) reserved(do) reserved(begin)
     reserved(if) ident(S)operator([)ident(Result)operator(]) operator(=) ident(C) reserved(then)
       ident(Exit)operator(;)
-    ident(Dec)operator(()ident(Result)operator(\);)
+    ident(Dec)operator(()ident(Result)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(PosEx)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(PosEx)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;)
 reserved(var)
   ident(MaxPosToSearch)operator(,) ident(LenSubStr)operator(,) ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -604,7 +604,7 @@ reserved(begin)
   reserved(else)
     ident(Result) operator(:=) ident(Offset)operator(;)
 
-  ident(LenSubStr) operator(:=) ident(Length)operator(()ident(SubStr)operator(\);)
+  ident(LenSubStr) operator(:=) ident(Length)operator(()ident(SubStr)operator(\))operator(;)
   ident(MaxPosToSearch) operator(:=) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(LenSubStr) operator(+) integer(1)operator(;)
 
   reserved(while) ident(Result) operator(<=) ident(MaxPosToSearch) reserved(do) reserved(begin)
@@ -612,23 +612,23 @@ reserved(begin)
       ident(i) operator(:=) integer(1)operator(;)
 
       reserved(while) operator(()ident(i) operator(<) ident(LenSubStr)operator(\))
-       reserved(and) operator(()ident(S)operator([)ident(Result) operator(+) ident(i)operator(]) operator(=) ident(SubStr)operator([)ident(i) operator(+) integer(1)operator(]\)) reserved(do)
-        ident(Inc)operator(()ident(i)operator(\);)
+       reserved(and) operator(()ident(S)operator([)ident(Result) operator(+) ident(i)operator(]) operator(=) ident(SubStr)operator([)ident(i) operator(+) integer(1)operator(])operator(\)) reserved(do)
+        ident(Inc)operator(()ident(i)operator(\))operator(;)
 
       reserved(if) ident(i) operator(=) ident(LenSubStr) reserved(then)
         ident(Exit)operator(;)
     reserved(end)operator(;)
-    ident(Inc)operator(()ident(Result)operator(\);)
+    ident(Inc)operator(()ident(Result)operator(\))operator(;)
   reserved(end)operator(;)
 
   ident(Result) operator(:=) integer(0)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(PosExText)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(PosExText)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;)
 reserved(var)
   ident(MaxPosToSearch)operator(,) ident(LenSubStr)operator(,) ident(i)operator(:) ident(Integer)operator(;)
 
-  reserved(function) ident(SameChar)operator(()ident(a)operator(,) ident(b)operator(:) ident(Char)operator(\):) ident(Boolean)operator(;)
+  reserved(function) ident(SameChar)operator(()ident(a)operator(,) ident(b)operator(:) ident(Char)operator(\))operator(:) ident(Boolean)operator(;)
   reserved(begin)
     ident(Result) operator(:=) ident(UpCase)operator(()ident(a)operator(\)) operator(=) ident(UpCase)operator(()ident(b)operator(\))
   reserved(end)operator(;)
@@ -643,33 +643,33 @@ reserved(begin)
   reserved(else)
     ident(Result) operator(:=) ident(Offset)operator(;)
 
-  ident(LenSubStr) operator(:=) ident(Length)operator(()ident(SubStr)operator(\);)
+  ident(LenSubStr) operator(:=) ident(Length)operator(()ident(SubStr)operator(\))operator(;)
   ident(MaxPosToSearch) operator(:=) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(LenSubStr) operator(+) integer(1)operator(;)
 
   reserved(while) ident(Result) operator(<=) ident(MaxPosToSearch) reserved(do) reserved(begin)
-    reserved(if) ident(SameChar)operator(()ident(S)operator([)ident(Result)operator(],) ident(SubStr)operator([)integer(1)operator(]\)) reserved(then) reserved(begin)
+    reserved(if) ident(SameChar)operator(()ident(S)operator([)ident(Result)operator(])operator(,) ident(SubStr)operator([)integer(1)operator(])operator(\)) reserved(then) reserved(begin)
       ident(i) operator(:=) integer(1)operator(;)
 
       reserved(while) operator(()ident(i) operator(<) ident(LenSubStr)operator(\))
-       reserved(and) operator(()ident(SameChar)operator(()ident(S)operator([)ident(Result) operator(+) ident(i)operator(],) ident(SubStr)operator([)ident(i) operator(+) integer(1)operator(]\)\)) reserved(do)
-        ident(Inc)operator(()ident(i)operator(\);)
+       reserved(and) operator(()ident(SameChar)operator(()ident(S)operator([)ident(Result) operator(+) ident(i)operator(])operator(,) ident(SubStr)operator([)ident(i) operator(+) integer(1)operator(])operator(\))operator(\)) reserved(do)
+        ident(Inc)operator(()ident(i)operator(\))operator(;)
 
       reserved(if) ident(i) operator(=) ident(LenSubStr) reserved(then)
         ident(Exit)operator(;)
     reserved(end)operator(;)
-    ident(Inc)operator(()ident(Result)operator(\);)
+    ident(Inc)operator(()ident(Result)operator(\))operator(;)
   reserved(end)operator(;)
 
   ident(Result) operator(:=) integer(0)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(PosExAnsiText)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(PosExAnsiText)operator(()reserved(const) ident(SubStr)operator(,) ident(S)operator(:) reserved(string)operator(;) ident(Offset)operator(:) ident(Integer) operator(=) integer(1)operator(\))operator(:) ident(Integer)operator(;)
 reserved(var)
   ident(MaxPosToSearch)operator(,) ident(LenSubStr)operator(,) ident(i)operator(:) ident(Integer)operator(;)
 
-  reserved(function) ident(SameChar)operator(()ident(a)operator(,) ident(b)operator(:) ident(Char)operator(\):) ident(Boolean)operator(;)
+  reserved(function) ident(SameChar)operator(()ident(a)operator(,) ident(b)operator(:) ident(Char)operator(\))operator(:) ident(Boolean)operator(;)
   reserved(begin)
-    ident(Result) operator(:=) ident(CharLower)operator(()ident(PChar)operator(()ident(a)operator(\)\)) operator(=) ident(CharLower)operator(()ident(PChar)operator(()ident(b)operator(\)\);)
+    ident(Result) operator(:=) ident(CharLower)operator(()ident(PChar)operator(()ident(a)operator(\))operator(\)) operator(=) ident(CharLower)operator(()ident(PChar)operator(()ident(b)operator(\))operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
@@ -682,31 +682,31 @@ reserved(begin)
   reserved(else)
     ident(Result) operator(:=) ident(Offset)operator(;)
 
-  ident(LenSubStr) operator(:=) ident(Length)operator(()ident(SubStr)operator(\);)
+  ident(LenSubStr) operator(:=) ident(Length)operator(()ident(SubStr)operator(\))operator(;)
   ident(MaxPosToSearch) operator(:=) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(LenSubStr) operator(+) integer(1)operator(;)
 
   reserved(while) ident(Result) operator(<=) ident(MaxPosToSearch) reserved(do) reserved(begin)
-    reserved(if) ident(SameChar)operator(()ident(S)operator([)ident(Result)operator(],) ident(SubStr)operator([)integer(1)operator(]\)) reserved(then) reserved(begin)
+    reserved(if) ident(SameChar)operator(()ident(S)operator([)ident(Result)operator(])operator(,) ident(SubStr)operator([)integer(1)operator(])operator(\)) reserved(then) reserved(begin)
       ident(i) operator(:=) integer(1)operator(;)
 
       reserved(while) operator(()ident(i) operator(<) ident(LenSubStr)operator(\))
-       reserved(and) operator(()ident(SameChar)operator(()ident(S)operator([)ident(Result) operator(+) ident(i)operator(],) ident(SubStr)operator([)ident(i) operator(+) integer(1)operator(]\)\)) reserved(do)
-        ident(Inc)operator(()ident(i)operator(\);)
+       reserved(and) operator(()ident(SameChar)operator(()ident(S)operator([)ident(Result) operator(+) ident(i)operator(])operator(,) ident(SubStr)operator([)ident(i) operator(+) integer(1)operator(])operator(\))operator(\)) reserved(do)
+        ident(Inc)operator(()ident(i)operator(\))operator(;)
 
       reserved(if) ident(i) operator(=) ident(LenSubStr) reserved(then)
         ident(Exit)operator(;)
     reserved(end)operator(;)
-    ident(Inc)operator(()ident(Result)operator(\);)
+    ident(Inc)operator(()ident(Result)operator(\))operator(;)
   reserved(end)operator(;)
 
   ident(Result) operator(:=) integer(0)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(UntilChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(\):) reserved(string)operator(;)
+reserved(function) ident(UntilChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(p)operator(:) ident(Integer)operator(;)
 reserved(begin)
-  ident(p) operator(:=) ident(CharPos)operator(()ident(Brake)operator(,) ident(S)operator(\);)
+  ident(p) operator(:=) ident(CharPos)operator(()ident(Brake)operator(,) ident(S)operator(\))operator(;)
 
   reserved(if) ident(p) operator(>) integer(0) reserved(then)
     ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(p) operator(-) integer(1)operator(\))
@@ -714,12 +714,12 @@ reserved(begin)
     ident(Result) operator(:=) ident(S)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(UntilChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(TCharSet)operator(\):) reserved(string)operator(;)
+reserved(function) ident(UntilChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(TCharSet)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(p)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
-  ident(p) operator(:=) ident(CharPos)operator(()ident(Brake)operator(,) ident(S)operator(\);)
+  ident(p) operator(:=) ident(CharPos)operator(()ident(Brake)operator(,) ident(S)operator(\))operator(;)
 
   reserved(if) ident(p) operator(>) integer(0) reserved(then)
     ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(p) operator(-) integer(1)operator(\))
@@ -728,12 +728,12 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(function) ident(UntilLastChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(;)
-  ident(IgnoreNoBrake)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) reserved(string)operator(;)
+  ident(IgnoreNoBrake)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(p)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
-  ident(p) operator(:=) ident(CharPosR)operator(()ident(Brake)operator(,) ident(S)operator(\);)
+  ident(p) operator(:=) ident(CharPosR)operator(()ident(Brake)operator(,) ident(S)operator(\))operator(;)
 
   reserved(if) ident(p) operator(>) integer(0) reserved(then)
     ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(p) operator(-) integer(1)operator(\))
@@ -741,35 +741,35 @@ reserved(begin)
     ident(Result) operator(:=) ident(S)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(FromChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(\):) reserved(string)operator(;)
+reserved(function) ident(FromChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(p)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
-  ident(p) operator(:=) ident(CharPos)operator(()ident(Brake)operator(,) ident(S)operator(\);)
+  ident(p) operator(:=) ident(CharPos)operator(()ident(Brake)operator(,) ident(S)operator(\))operator(;)
 
   reserved(if) ident(p) operator(>) integer(0) reserved(then)
-    ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p) operator(+) integer(1)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p)operator(\);)
+    ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p) operator(+) integer(1)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(FromChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(TCharSet)operator(\):) reserved(string)operator(;)
+reserved(function) ident(FromChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(TCharSet)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(p)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
-  ident(p) operator(:=) ident(CharPos)operator(()ident(Brake)operator(,) ident(S)operator(\);)
+  ident(p) operator(:=) ident(CharPos)operator(()ident(Brake)operator(,) ident(S)operator(\))operator(;)
 
   reserved(if) ident(p) operator(>) integer(0) reserved(then)
-    ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p) operator(+) integer(1)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p)operator(\);)
+    ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p) operator(+) integer(1)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(FromLastChar)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) ident(Char)operator(;)
-  ident(IgnoreNoBrake)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) reserved(string)operator(;)
+  ident(IgnoreNoBrake)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(p)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
-  ident(p) operator(:=) ident(CharPosR)operator(()ident(Brake)operator(,) ident(S)operator(\);)
+  ident(p) operator(:=) ident(CharPosR)operator(()ident(Brake)operator(,) ident(S)operator(\))operator(;)
 
   reserved(if) ident(p) operator(>) integer(0) reserved(then)
     ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p) operator(+) integer(1)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p)operator(\))
@@ -778,37 +778,37 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(function) ident(BetweenChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Start)operator(,) ident(Finish)operator(:) ident(Char)operator(;)
-  ident(Inclusive)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) reserved(string)operator(;)
+  ident(Inclusive)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(p)operator(,) ident(fin)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
 
-  ident(p) operator(:=) ident(CharPos)operator(()ident(Start)operator(,) ident(S)operator(\);)
+  ident(p) operator(:=) ident(CharPos)operator(()ident(Start)operator(,) ident(S)operator(\))operator(;)
   reserved(if) ident(p) operator(=) integer(0) reserved(then)
     ident(Exit)operator(;)
 
-  ident(fin) operator(:=) ident(CharPos)operator(()ident(Finish)operator(,) ident(S)operator(,) ident(p) operator(+) integer(1)operator(\);)
+  ident(fin) operator(:=) ident(CharPos)operator(()ident(Finish)operator(,) ident(S)operator(,) ident(p) operator(+) integer(1)operator(\))operator(;)
   reserved(if) ident(fin) operator(=) integer(0) reserved(then)
     ident(Exit)operator(;)
 
   reserved(if) reserved(not) ident(Inclusive) reserved(then) reserved(begin)
-    ident(Inc)operator(()ident(p)operator(\);)
-    ident(Dec)operator(()ident(fin)operator(\);)
+    ident(Inc)operator(()ident(p)operator(\))operator(;)
+    ident(Dec)operator(()ident(fin)operator(\))operator(;)
   reserved(end)operator(;)
 
-  ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(fin) operator(-) ident(p) operator(+) integer(1)operator(\);)
+  ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(fin) operator(-) ident(p) operator(+) integer(1)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(UntilStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(UntilStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(p)operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(if) ident(Length)operator(()ident(Brake)operator(\)) operator(=) integer(1) reserved(then) reserved(begin)
-    ident(Result) operator(:=) ident(UntilChar)operator(()ident(S)operator(,) ident(Brake)operator([)integer(1)operator(]\);)
+    ident(Result) operator(:=) ident(UntilChar)operator(()ident(S)operator(,) ident(Brake)operator([)integer(1)operator(])operator(\))operator(;)
   ident(Exit)operator(;) reserved(end)operator(;)
 
-  ident(p) operator(:=) ident(PosEx)operator(()ident(Brake)operator(,) ident(S)operator(\);)
+  ident(p) operator(:=) ident(PosEx)operator(()ident(Brake)operator(,) ident(S)operator(\))operator(;)
 
   reserved(if) ident(p) operator(>) integer(0) reserved(then)
     ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(p) operator(-) integer(1)operator(\))
@@ -816,24 +816,24 @@ reserved(begin)
     ident(Result) operator(:=) ident(S)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(FromStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(FromStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Brake)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(p)operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(if) ident(Length)operator(()ident(Brake)operator(\)) operator(=) integer(1) reserved(then) reserved(begin)
-    ident(Result) operator(:=) ident(FromChar)operator(()ident(S)operator(,) ident(Brake)operator([)integer(1)operator(]\);)
+    ident(Result) operator(:=) ident(FromChar)operator(()ident(S)operator(,) ident(Brake)operator([)integer(1)operator(])operator(\))operator(;)
   ident(Exit)operator(;) reserved(end)operator(;)
 
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
-  ident(p) operator(:=) ident(PosEx)operator(()ident(Brake)operator(,) ident(s)operator(\);)
+  ident(p) operator(:=) ident(PosEx)operator(()ident(Brake)operator(,) ident(s)operator(\))operator(;)
 
   reserved(if) ident(p) operator(>) integer(0) reserved(then) reserved(begin)
-    ident(Inc)operator(()ident(p)operator(,) ident(Length)operator(()ident(Brake)operator(\)\);)
-    ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p) operator(+) integer(1)operator(\);)
+    ident(Inc)operator(()ident(p)operator(,) ident(Length)operator(()ident(Brake)operator(\))operator(\))operator(;)
+    ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p) operator(+) integer(1)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(StringWrap)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Width)operator(:) ident(Integer)operator(;) reserved(const) ident(LineEnd)operator(:) reserved(string) operator(=) ident(EOL)operator(\):) reserved(string)operator(;)
+reserved(function) ident(StringWrap)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Width)operator(:) ident(Integer)operator(;) reserved(const) ident(LineEnd)operator(:) reserved(string) operator(=) ident(EOL)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -843,8 +843,8 @@ reserved(begin)
 
   ident(i) operator(:=) integer(1)operator(;)
   reserved(while) ident(True) reserved(do) reserved(begin)
-    ident(Result) operator(:=) ident(Result) operator(+) ident(Copy)operator(()ident(S)operator(,) ident(i)operator(,) ident(Width)operator(\);)
-    ident(Inc)operator(()ident(i)operator(,) ident(Width)operator(\);)
+    ident(Result) operator(:=) ident(Result) operator(+) ident(Copy)operator(()ident(S)operator(,) ident(i)operator(,) ident(Width)operator(\))operator(;)
+    ident(Inc)operator(()ident(i)operator(,) ident(Width)operator(\))operator(;)
     reserved(if) ident(i) operator(<=) ident(Length)operator(()ident(S)operator(\)) reserved(then)
       ident(Result) operator(:=) ident(Result) operator(+) ident(LineEnd)
     reserved(else)
@@ -853,50 +853,50 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(function) ident(Split)operator(()reserved(const) ident(S)operator(,) ident(Separator)operator(:) reserved(string)operator(;) ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(;)
-  ident(MinCount)operator(:) ident(Integer) operator(=) integer(0)operator(\):) ident(TStrA)operator(;)
+  ident(MinCount)operator(:) ident(Integer) operator(=) integer(0)operator(\))operator(:) ident(TStrA)operator(;)
 reserved(var)
   ident(p)operator(,) ident(fin)operator(,) ident(SepLen)operator(:) ident(Integer)operator(;)
 
-  reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\);)
+  reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(;)
   reserved(begin)
     reserved(if) ident(IgnoreMultiSep) reserved(and) operator(()ident(S) operator(=) string<delimiter(')delimiter(')>operator(\)) reserved(then)
       ident(Exit)operator(;)
-    ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(Result)operator(\)) operator(+) integer(1)operator(\);)
-    ident(Result)operator([)ident(High)operator(()ident(Result)operator(\)]) operator(:=) ident(S)operator(;)
+    ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(Result)operator(\)) operator(+) integer(1)operator(\))operator(;)
+    ident(Result)operator([)ident(High)operator(()ident(Result)operator(\))operator(]) operator(:=) ident(S)operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
   reserved(if) ident(S) operator(=) string<delimiter(')delimiter(')> reserved(then) reserved(begin)
     reserved(if) ident(Length)operator(()ident(Result)operator(\)) operator(<) ident(MinCount) reserved(then)
-      ident(SetLength)operator(()ident(Result)operator(,) ident(MinCount)operator(\);)
+      ident(SetLength)operator(()ident(Result)operator(,) ident(MinCount)operator(\))operator(;)
   ident(Exit)operator(;) reserved(end)operator(;)
 
   ident(Result) operator(:=) reserved(nil)operator(;)
-  ident(SepLen) operator(:=) ident(Length)operator(()ident(Separator)operator(\);)
+  ident(SepLen) operator(:=) ident(Length)operator(()ident(Separator)operator(\))operator(;)
 
   ident(p) operator(:=) integer(1)operator(;)
-  ident(fin) operator(:=) ident(PosEx)operator(()ident(Separator)operator(,) ident(S)operator(\);)
+  ident(fin) operator(:=) ident(PosEx)operator(()ident(Separator)operator(,) ident(S)operator(\))operator(;)
   reserved(while) ident(fin) operator(>) integer(0) reserved(do) reserved(begin)
-    ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(fin) operator(-) ident(p)operator(\)\);)
+    ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(fin) operator(-) ident(p)operator(\))operator(\))operator(;)
     ident(p) operator(:=) ident(fin) operator(+) ident(SepLen)operator(;)
-    ident(fin) operator(:=) ident(PosEx)operator(()ident(Separator)operator(,) ident(S)operator(,) ident(p)operator(\);)
+    ident(fin) operator(:=) ident(PosEx)operator(()ident(Separator)operator(,) ident(S)operator(,) ident(p)operator(\))operator(;)
   reserved(end)operator(;)
-  ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p) operator(+) integer(1)operator(\)\);)
+  ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p) operator(+) integer(1)operator(\))operator(\))operator(;)
 
   reserved(if) ident(Length)operator(()ident(Result)operator(\)) operator(<) ident(MinCount) reserved(then)
-    ident(SetLength)operator(()ident(Result)operator(,) ident(MinCount)operator(\);)
+    ident(SetLength)operator(()ident(Result)operator(,) ident(MinCount)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(Split)operator(()reserved(const) ident(S)operator(,) ident(Separator)operator(:) reserved(string)operator(;) ident(Strings)operator(:) ident(TStrings)operator(;)
-  ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(\);) 
+  ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(;) 
 reserved(var)
   ident(p)operator(,) ident(fin)operator(,) ident(SepLen)operator(:) ident(Integer)operator(;)
 
-  reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\);)
+  reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(;)
   reserved(begin)
     reserved(if) ident(IgnoreMultiSep) reserved(and) operator(()ident(S) operator(=) string<delimiter(')delimiter(')>operator(\)) reserved(then)
       ident(Exit)operator(;)
-    ident(Strings)operator(.)ident(Add)operator(()ident(S)operator(\);)
+    ident(Strings)operator(.)ident(Add)operator(()ident(S)operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
@@ -904,85 +904,85 @@ reserved(begin)
     ident(Exit)operator(;)
 
   ident(Strings)operator(.)ident(BeginUpdate)operator(;)
-  ident(SepLen) operator(:=) ident(Length)operator(()ident(Separator)operator(\);)
+  ident(SepLen) operator(:=) ident(Length)operator(()ident(Separator)operator(\))operator(;)
   ident(p) operator(:=) integer(1)operator(;)
-  ident(fin) operator(:=) ident(PosEx)operator(()ident(Separator)operator(,) ident(S)operator(\);)
+  ident(fin) operator(:=) ident(PosEx)operator(()ident(Separator)operator(,) ident(S)operator(\))operator(;)
   reserved(while) ident(fin) operator(>) integer(0) reserved(do) reserved(begin)
-    ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(fin) operator(-) ident(p)operator(\)\);)
+    ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(fin) operator(-) ident(p)operator(\))operator(\))operator(;)
     ident(p) operator(:=) ident(fin) operator(+) ident(SepLen)operator(;)
-    ident(fin) operator(:=) ident(PosEx)operator(()ident(Separator)operator(,) ident(S)operator(,) ident(p)operator(\);)
+    ident(fin) operator(:=) ident(PosEx)operator(()ident(Separator)operator(,) ident(S)operator(,) ident(p)operator(\))operator(;)
   reserved(end)operator(;)
-  ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p) operator(+) integer(1)operator(\)\);)
+  ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p) operator(+) integer(1)operator(\))operator(\))operator(;)
   ident(Strings)operator(.)ident(EndUpdate)operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(Split)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Separators)operator(:) ident(TCharSet)operator(;)
-  ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(;) ident(MinCount)operator(:) ident(Integer) operator(=) integer(0)operator(\):) ident(TStrA)operator(;)
+  ident(IgnoreMultiSep)operator(:) ident(Boolean) operator(=) ident(True)operator(;) ident(MinCount)operator(:) ident(Integer) operator(=) integer(0)operator(\))operator(:) ident(TStrA)operator(;)
 reserved(var)
   ident(p)operator(,) ident(fin)operator(:) ident(Integer)operator(;)
 
-  reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\);)
+  reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(;)
   reserved(begin)
     reserved(if) ident(IgnoreMultiSep) reserved(and) operator(()ident(S) operator(=) string<delimiter(')delimiter(')>operator(\)) reserved(then)
       ident(Exit)operator(;)
-    ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(Result)operator(\)) operator(+) integer(1)operator(\);)
-    ident(Result)operator([)ident(High)operator(()ident(Result)operator(\)]) operator(:=) ident(S)operator(;)
+    ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(Result)operator(\)) operator(+) integer(1)operator(\))operator(;)
+    ident(Result)operator([)ident(High)operator(()ident(Result)operator(\))operator(]) operator(:=) ident(S)operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
   reserved(if) ident(S) operator(=) string<delimiter(')delimiter(')> reserved(then) reserved(begin)
     reserved(if) ident(Length)operator(()ident(Result)operator(\)) operator(<) ident(MinCount) reserved(then)
-      ident(SetLength)operator(()ident(Result)operator(,) ident(MinCount)operator(\);)
+      ident(SetLength)operator(()ident(Result)operator(,) ident(MinCount)operator(\))operator(;)
   ident(Exit)operator(;) reserved(end)operator(;)
 
   ident(Result) operator(:=) reserved(nil)operator(;)
 
   ident(p) operator(:=) integer(1)operator(;)
-  ident(fin) operator(:=) ident(CharPos)operator(()ident(Separators)operator(,) ident(S)operator(\);)
+  ident(fin) operator(:=) ident(CharPos)operator(()ident(Separators)operator(,) ident(S)operator(\))operator(;)
   reserved(while) ident(fin) operator(>) integer(0) reserved(do) reserved(begin)
-    ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(fin) operator(-) ident(p)operator(\)\);)
+    ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(fin) operator(-) ident(p)operator(\))operator(\))operator(;)
     ident(p) operator(:=) ident(fin) operator(+) integer(1)operator(;)
-    ident(fin) operator(:=) ident(CharPos)operator(()ident(Separators)operator(,) ident(S)operator(,) ident(p)operator(\);)
+    ident(fin) operator(:=) ident(CharPos)operator(()ident(Separators)operator(,) ident(S)operator(,) ident(p)operator(\))operator(;)
   reserved(end)operator(;)
-  ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p) operator(+) integer(1)operator(\)\);)
+  ident(Add)operator(()ident(Copy)operator(()ident(S)operator(,) ident(p)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(p) operator(+) integer(1)operator(\))operator(\))operator(;)
 
   reserved(if) ident(Length)operator(()ident(Result)operator(\)) operator(<) ident(MinCount) reserved(then)
-    ident(SetLength)operator(()ident(Result)operator(,) ident(MinCount)operator(\);)
+    ident(SetLength)operator(()ident(Result)operator(,) ident(MinCount)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(TileStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(BrakeStart)operator(:) ident(Integer)operator(;) ident(BrakeEnd)operator(:) ident(Integer)operator(;)
-  reserved(out) ident(Left)operator(,) ident(Right)operator(:) reserved(string)operator(\);)
+  reserved(out) ident(Left)operator(,) ident(Right)operator(:) reserved(string)operator(\))operator(;)
 reserved(begin)
-  ident(Left) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(BrakeStart)operator(-)integer(1)operator(\);)
-  ident(Right) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(BrakeEnd) operator(+) integer(1)operator(,) ident(MaxInt)operator(\);)
+  ident(Left) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(BrakeStart)operator(-)integer(1)operator(\))operator(;)
+  ident(Right) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(BrakeEnd) operator(+) integer(1)operator(,) ident(MaxInt)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(Join)operator(()ident(Strings)operator(:) ident(TStrings)operator(;) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;)
+reserved(function) ident(Join)operator(()ident(Strings)operator(:) ident(TStrings)operator(;) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(i)operator(,) ident(imax)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
   ident(imax) operator(:=) ident(Strings)operator(.)ident(Count)operator(-)integer(1)operator(;)
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(imax) reserved(do) reserved(begin)
-    ident(Result) operator(:=) ident(Result) operator(+) ident(Strings)operator([)ident(i)operator(];)
+    ident(Result) operator(:=) ident(Result) operator(+) ident(Strings)operator([)ident(i)operator(])operator(;)
     reserved(if) ident(i) operator(<) ident(imax) reserved(then)
       ident(Result) operator(:=) ident(Result) operator(+) ident(Separator)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(Join)operator(()ident(StrA)operator(:) ident(TStrA)operator(;) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;) directive(overload)operator(;)
+reserved(function) ident(Join)operator(()ident(StrA)operator(:) ident(TStrA)operator(;) ident(Separator)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;) directive(overload)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(StrA)operator(\)) reserved(do) reserved(begin)
-    ident(Result) operator(:=) ident(Result) operator(+) ident(StrA)operator([)ident(i)operator(];)
+    ident(Result) operator(:=) ident(Result) operator(+) ident(StrA)operator([)ident(i)operator(])operator(;)
     reserved(if) ident(i) operator(<) ident(High)operator(()ident(StrA)operator(\)) reserved(then)
       ident(Result) operator(:=) ident(Result) operator(+) ident(Separator)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(MulStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Count)operator(:) ident(Integer)operator(\):) reserved(string)operator(;)
+reserved(function) ident(MulStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Count)operator(:) ident(Integer)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(P)operator(:) ident(PChar)operator(;)
   ident(Len)operator(,) ident(i)operator(:) ident(Integer)operator(;)
@@ -991,26 +991,26 @@ reserved(begin)
   reserved(if) ident(Count) operator(=) integer(0) reserved(then)
     ident(Exit)operator(;)
 
-  ident(Len) operator(:=) ident(Length)operator(()ident(S)operator(\);)
-  ident(SetLength)operator(()ident(Result)operator(,) ident(Len) operator(*) ident(Count)operator(\);)
+  ident(Len) operator(:=) ident(Length)operator(()ident(S)operator(\))operator(;)
+  ident(SetLength)operator(()ident(Result)operator(,) ident(Len) operator(*) ident(Count)operator(\))operator(;)
 
-  ident(P) operator(:=) ident(Pointer)operator(()ident(Result)operator(\);)
+  ident(P) operator(:=) ident(Pointer)operator(()ident(Result)operator(\))operator(;)
   reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(Count) reserved(do) reserved(begin)
-    ident(Move)operator(()ident(Pointer)operator(()ident(S)operator(\)^,) ident(P)operator(^,) ident(Len)operator(\);)
-    ident(Inc)operator(()ident(P)operator(,) ident(Len)operator(\);)
+    ident(Move)operator(()ident(Pointer)operator(()ident(S)operator(\))operator(^)operator(,) ident(P)operator(^)operator(,) ident(Len)operator(\))operator(;)
+    ident(Inc)operator(()ident(P)operator(,) ident(Len)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(AlignR)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Width)operator(:) ident(Integer)operator(;) ident(Filler)operator(:) ident(Char) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;)
+reserved(function) ident(AlignR)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Width)operator(:) ident(Integer)operator(;) ident(Filler)operator(:) ident(Char) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(MulStr)operator(()ident(Filler)operator(,) ident(Width) operator(-) ident(Length)operator(()ident(S)operator(\)\)) operator(+) ident(S)operator(;)
+  ident(Result) operator(:=) ident(MulStr)operator(()ident(Filler)operator(,) ident(Width) operator(-) ident(Length)operator(()ident(S)operator(\))operator(\)) operator(+) ident(S)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(MaxStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(MaxLen)operator(:) ident(Integer)operator(\):) reserved(string)operator(;)
+reserved(function) ident(MaxStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(MaxLen)operator(:) ident(Integer)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(Len)operator(:) ident(Integer)operator(;)
 reserved(begin)
-  ident(Len) operator(:=) ident(Length)operator(()ident(S)operator(\);)
+  ident(Len) operator(:=) ident(Length)operator(()ident(S)operator(\))operator(;)
   reserved(if) ident(Len) operator(<=) ident(MaxLen) reserved(then) reserved(begin)
     ident(Result) operator(:=) ident(S)operator(;)
   ident(Exit) reserved(end)operator(;)
@@ -1018,21 +1018,21 @@ reserved(begin)
   ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(MaxLen) operator(-) integer(3)operator(\)) operator(+) string<delimiter(')content(...)delimiter(')>operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(TrimAll)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(TrimAll)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(Length)operator(()ident(S)operator(\)) reserved(do)
     reserved(if) ident(S)operator([)ident(i)operator(]) operator(>) char(#32) reserved(then)
-      ident(Result) operator(:=) ident(Result) operator(+) ident(S)operator([)ident(i)operator(];)
+      ident(Result) operator(:=) ident(Result) operator(+) ident(S)operator([)ident(i)operator(])operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ControlChar)operator(()ident(C)operator(:) ident(Char)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(ControlChar)operator(()ident(C)operator(:) ident(Char)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(C) reserved(in) ident(StrangeChars)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(FriendlyChar)operator(()ident(C)operator(:) ident(Char)operator(\):) ident(Char)operator(;)
+reserved(function) ident(FriendlyChar)operator(()ident(C)operator(:) ident(Char)operator(\))operator(:) ident(Char)operator(;)
 reserved(begin)
   reserved(case) ident(C) reserved(of)
     char(#0)operator(:) ident(Result) operator(:=) char<delimiter(')content(.)delimiter(')>operator(;)
@@ -1043,25 +1043,25 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(FriendlyStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(FriendlyStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
-  ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(S)operator(\)\);)
+  ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(S)operator(\))operator(\))operator(;)
   reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(Length)operator(()ident(S)operator(\)) reserved(do)
-    ident(Result)operator([)ident(i)operator(]) operator(:=) ident(FriendlyChar)operator(()ident(S)operator([)ident(i)operator(]\);)
+    ident(Result)operator([)ident(i)operator(]) operator(:=) ident(FriendlyChar)operator(()ident(S)operator([)ident(i)operator(])operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(FriendlyStr)operator(()ident(a)operator(:) ident(TByteA)operator(\):) reserved(string)operator(;)
+reserved(function) ident(FriendlyStr)operator(()ident(a)operator(:) ident(TByteA)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
-  ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(a)operator(\)\);)
+  ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(a)operator(\))operator(\))operator(;)
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(a)operator(\)) reserved(do)
-    ident(Result)operator([)ident(i) operator(+) integer(1)operator(]) operator(:=) ident(FriendlyChar)operator(()ident(Char)operator(()ident(a)operator([)ident(i)operator(]\)\);)
+    ident(Result)operator([)ident(i) operator(+) integer(1)operator(]) operator(:=) ident(FriendlyChar)operator(()ident(Char)operator(()ident(a)operator([)ident(i)operator(])operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(Quote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Quoter)operator(:) ident(Char) operator(=) char<delimiter(')content(")delimiter(')>operator(\):) reserved(string)operator(;)
+reserved(function) ident(Quote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Quoter)operator(:) ident(Char) operator(=) char<delimiter(')content(")delimiter(')>operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(S)operator(;)
 
@@ -1072,31 +1072,31 @@ reserved(begin)
     ident(Result) operator(:=) ident(Result) operator(+) ident(Quoter)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(DeQuote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(DeQuote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
   reserved(if) ident(Length)operator(()ident(S)operator(\)) operator(>) integer(2) reserved(then)
-    ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(2)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) integer(2)operator(\);)
+    ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) integer(2)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) integer(2)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(UnQuote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(UnQuote)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(Start)operator(,) ident(Len)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Start) operator(:=) integer(1)operator(;)
-  ident(Len) operator(:=) ident(Length)operator(()ident(S)operator(\);)
+  ident(Len) operator(:=) ident(Length)operator(()ident(S)operator(\))operator(;)
 
-  reserved(if) operator(()ident(S) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(S)operator([)integer(1)operator(]) reserved(in) operator(([)char(#0)operator(..)char(#32)operator(]) operator(+) ident(QuoteChars)operator(\)\)) reserved(then) reserved(begin)
-    reserved(if) operator(()ident(LastChar)operator(()ident(S)operator(\)) operator(=) ident(S)operator([)integer(1)operator(]\)) reserved(then)
-      ident(Dec)operator(()ident(Len)operator(\);)
-    ident(Inc)operator(()ident(Start)operator(\);)
+  reserved(if) operator(()ident(S) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(S)operator([)integer(1)operator(]) reserved(in) operator(()operator([)char(#0)operator(..)char(#32)operator(]) operator(+) ident(QuoteChars)operator(\))operator(\)) reserved(then) reserved(begin)
+    reserved(if) operator(()ident(LastChar)operator(()ident(S)operator(\)) operator(=) ident(S)operator([)integer(1)operator(])operator(\)) reserved(then)
+      ident(Dec)operator(()ident(Len)operator(\))operator(;)
+    ident(Inc)operator(()ident(Start)operator(\))operator(;)
   reserved(end)operator(;)
 
-  ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(Start)operator(,) ident(Len) operator(-) ident(Start) operator(+) integer(1)operator(\);)
+  ident(Result) operator(:=) ident(Copy)operator(()ident(S)operator(,) ident(Start)operator(,) ident(Len) operator(-) ident(Start) operator(+) integer(1)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(StrNumerus)operator(()reserved(const) ident(Value)operator(:) ident(Integer)operator(;) reserved(const) ident(Singular)operator(,) ident(Plural)operator(:) reserved(string)operator(;)
-  reserved(const) ident(Zero)operator(:) reserved(string) operator(=) char<delimiter(')content(0)delimiter(')>operator(\):) reserved(string)operator(;)
+  reserved(const) ident(Zero)operator(:) reserved(string) operator(=) char<delimiter(')content(0)delimiter(')>operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
   reserved(if) ident(Abs)operator(()ident(Value)operator(\)) operator(=) integer(1) reserved(then)
     ident(Result) operator(:=) ident(IntToStr)operator(()ident(Value)operator(\)) operator(+) char<delimiter(')content( )delimiter(')> operator(+) ident(Singular)
@@ -1106,22 +1106,22 @@ reserved(begin)
     ident(Result) operator(:=) ident(IntToStr)operator(()ident(Value)operator(\)) operator(+) char<delimiter(')content( )delimiter(')> operator(+) ident(Plural)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(MakeStr)operator(()reserved(const) ident(Items)operator(:) reserved(array) reserved(of) reserved(const)operator(;) ident(Separator)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\):) reserved(string)operator(;)
+reserved(function) ident(MakeStr)operator(()reserved(const) ident(Items)operator(:) reserved(array) reserved(of) reserved(const)operator(;) ident(Separator)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(:) reserved(string)operator(;)
 reserved(const)
-  ident(BoolStrings)operator(:) reserved(array)operator([)ident(Boolean)operator(]) reserved(of) reserved(string) operator(=) operator(()string<delimiter(')content(False)delimiter(')>operator(,) string<delimiter(')content(True)delimiter(')>operator(\);)
+  ident(BoolStrings)operator(:) reserved(array)operator([)ident(Boolean)operator(]) reserved(of) reserved(string) operator(=) operator(()string<delimiter(')content(False)delimiter(')>operator(,) string<delimiter(')content(True)delimiter(')>operator(\))operator(;)
 
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 
-  reserved(function) ident(StrOfP)operator(()ident(P)operator(:) ident(Pointer)operator(\):) reserved(string)operator(;)
+  reserved(function) ident(StrOfP)operator(()ident(P)operator(:) ident(Pointer)operator(\))operator(:) reserved(string)operator(;)
   reserved(begin)
     reserved(if) ident(P) operator(=) reserved(nil) reserved(then)
       ident(Result) operator(:=) string<delimiter(')content([nil])delimiter(')>
     reserved(else)
-      ident(Result) operator(:=) char<delimiter(')content([)delimiter(')> operator(+) ident(IntToStr)operator(()ident(Cardinal)operator(()ident(P)operator(\)\)) operator(+) char<delimiter(')content(])delimiter(')>operator(;)
+      ident(Result) operator(:=) char<delimiter(')content([)delimiter(')> operator(+) ident(IntToStr)operator(()ident(Cardinal)operator(()ident(P)operator(\))operator(\)) operator(+) char<delimiter(')content(])delimiter(')>operator(;)
   reserved(end)operator(;)
 
-  reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\);)
+  reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(;)
   reserved(begin)
     ident(Result) operator(:=) ident(Result) operator(+) ident(s) operator(+) ident(Separator)operator(;)
   reserved(end)operator(;)
@@ -1131,102 +1131,102 @@ reserved(begin)
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(Items)operator(\)) reserved(do)
     reserved(with) ident(Items)operator([)ident(i)operator(]) reserved(do)
       reserved(case) ident(VType) reserved(of)
-        ident(vtString)operator(:)     ident(Add)operator(()ident(VString)operator(^\);)
-        ident(vtInteger)operator(:)    ident(Add)operator(()ident(IntToStr)operator(()ident(VInteger)operator(\)\);)
-        ident(vtBoolean)operator(:)    ident(Add)operator(()ident(BoolStrings)operator([)ident(VBoolean)operator(]\);)
-        ident(vtChar)operator(:)       ident(Add)operator(()ident(VChar)operator(\);)
-        ident(vtPChar)operator(:)      ident(Add)operator(()ident(VPChar)operator(\);)
-        ident(vtExtended)operator(:)   ident(Add)operator(()ident(FloatToStr)operator(()ident(VExtended)operator(^\)\);)
+        ident(vtString)operator(:)     ident(Add)operator(()ident(VString)operator(^)operator(\))operator(;)
+        ident(vtInteger)operator(:)    ident(Add)operator(()ident(IntToStr)operator(()ident(VInteger)operator(\))operator(\))operator(;)
+        ident(vtBoolean)operator(:)    ident(Add)operator(()ident(BoolStrings)operator([)ident(VBoolean)operator(])operator(\))operator(;)
+        ident(vtChar)operator(:)       ident(Add)operator(()ident(VChar)operator(\))operator(;)
+        ident(vtPChar)operator(:)      ident(Add)operator(()ident(VPChar)operator(\))operator(;)
+        ident(vtExtended)operator(:)   ident(Add)operator(()ident(FloatToStr)operator(()ident(VExtended)operator(^)operator(\))operator(\))operator(;)
         ident(vtObject)operator(:)     reserved(if) ident(VObject) reserved(is) ident(TComponent) reserved(then)
-                        ident(Add)operator(()ident(TComponent)operator(()ident(VObject)operator(\).)ident(Name)operator(\))
+                        ident(Add)operator(()ident(TComponent)operator(()ident(VObject)operator(\))operator(.)ident(Name)operator(\))
                       reserved(else)
-                        ident(Add)operator(()ident(VObject)operator(.)ident(ClassName)operator(\);)
-        ident(vtClass)operator(:)      ident(Add)operator(()ident(VClass)operator(.)ident(ClassName)operator(\);)
-        ident(vtAnsiString)operator(:) ident(Add)operator(()reserved(string)operator(()ident(VAnsiString)operator(\)\);)
-        ident(vtCurrency)operator(:)   ident(Add)operator(()ident(CurrToStr)operator(()ident(VCurrency)operator(^\)\);)
-        ident(vtInt64)operator(:)      ident(Add)operator(()ident(IntToStr)operator(()ident(VInt64)operator(^\)\);)
-        ident(vtVariant)operator(:)    ident(Add)operator(()reserved(string)operator(()ident(VVariant)operator(^\)\);)
-
-        ident(vtWideChar)operator(:)   ident(Add)operator(()ident(VWideChar)operator(\);)
-        ident(vtPWideChar)operator(:)  ident(Add)operator(()ident(VPWideChar)operator(\);)
-        ident(vtInterface)operator(:)  ident(Add)operator(()ident(StrOfP)operator(()ident(VInterface)operator(\)\);)
-        ident(vtPointer)operator(:)    ident(Add)operator(()ident(StrOfP)operator(()ident(VPointer)operator(\)\);)
-        ident(vtWideString)operator(:) ident(Add)operator(()ident(WideString)operator(()ident(VWideString)operator(\)\);)
+                        ident(Add)operator(()ident(VObject)operator(.)ident(ClassName)operator(\))operator(;)
+        ident(vtClass)operator(:)      ident(Add)operator(()ident(VClass)operator(.)ident(ClassName)operator(\))operator(;)
+        ident(vtAnsiString)operator(:) ident(Add)operator(()reserved(string)operator(()ident(VAnsiString)operator(\))operator(\))operator(;)
+        ident(vtCurrency)operator(:)   ident(Add)operator(()ident(CurrToStr)operator(()ident(VCurrency)operator(^)operator(\))operator(\))operator(;)
+        ident(vtInt64)operator(:)      ident(Add)operator(()ident(IntToStr)operator(()ident(VInt64)operator(^)operator(\))operator(\))operator(;)
+        ident(vtVariant)operator(:)    ident(Add)operator(()reserved(string)operator(()ident(VVariant)operator(^)operator(\))operator(\))operator(;)
+
+        ident(vtWideChar)operator(:)   ident(Add)operator(()ident(VWideChar)operator(\))operator(;)
+        ident(vtPWideChar)operator(:)  ident(Add)operator(()ident(VPWideChar)operator(\))operator(;)
+        ident(vtInterface)operator(:)  ident(Add)operator(()ident(StrOfP)operator(()ident(VInterface)operator(\))operator(\))operator(;)
+        ident(vtPointer)operator(:)    ident(Add)operator(()ident(StrOfP)operator(()ident(VPointer)operator(\))operator(\))operator(;)
+        ident(vtWideString)operator(:) ident(Add)operator(()ident(WideString)operator(()ident(VWideString)operator(\))operator(\))operator(;)
       reserved(end)operator(;)
   reserved(if) ident(Result) operator(<>) string<delimiter(')delimiter(')> reserved(then)
-    ident(SetLength)operator(()ident(result)operator(,) ident(Length)operator(()ident(Result)operator(\)) operator(-) ident(Length)operator(()ident(Separator)operator(\)\);)
+    ident(SetLength)operator(()ident(result)operator(,) ident(Length)operator(()ident(Result)operator(\)) operator(-) ident(Length)operator(()ident(Separator)operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(ShowText)operator(()reserved(const) ident(Items)operator(:) reserved(array) reserved(of) reserved(const)operator(;) ident(Separator)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\);)
+reserved(procedure) ident(ShowText)operator(()reserved(const) ident(Items)operator(:) reserved(array) reserved(of) reserved(const)operator(;) ident(Separator)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(;)
 reserved(var)
   ident(Text)operator(:) reserved(string)operator(;)
 reserved(begin)
-  ident(Text) operator(:=) ident(MakeStr)operator(()ident(Items)operator(,) ident(Separator)operator(\);)
+  ident(Text) operator(:=) ident(MakeStr)operator(()ident(Items)operator(,) ident(Separator)operator(\))operator(;)
 
-  ident(MessageBox)operator(()integer(0)operator(,) ident(PChar)operator(()ident(Text)operator(\),) string<delimiter(')content(Info)delimiter(')>operator(,) ident(MB_OK) reserved(and) ident(MB_APPLMODAL)operator(\);)
+  ident(MessageBox)operator(()integer(0)operator(,) ident(PChar)operator(()ident(Text)operator(\))operator(,) string<delimiter(')content(Info)delimiter(')>operator(,) ident(MB_OK) reserved(and) ident(MB_APPLMODAL)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(DeleteChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\):) reserved(string)operator(;)
+reserved(function) ident(DeleteChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
   reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(Length)operator(()ident(S)operator(\)) reserved(do)
     reserved(if) ident(S)operator([)ident(i)operator(]) operator(<>) ident(C) reserved(then)
-      ident(Result) operator(:=) ident(Result) operator(+) ident(S)operator([)ident(i)operator(];)
+      ident(Result) operator(:=) ident(Result) operator(+) ident(S)operator([)ident(i)operator(])operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(DeleteChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\):) reserved(string)operator(;)
+reserved(function) ident(DeleteChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
   reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(Length)operator(()ident(S)operator(\)) reserved(do)
     reserved(if) reserved(not) operator(()ident(S)operator([)ident(i)operator(]) reserved(in) ident(C)operator(\)) reserved(then)
-      ident(Result) operator(:=) ident(Result) operator(+) ident(S)operator([)ident(i)operator(];)
+      ident(Result) operator(:=) ident(Result) operator(+) ident(S)operator([)ident(i)operator(])operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ExtractChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\):) reserved(string)operator(;)
+reserved(function) ident(ExtractChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
   reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(Length)operator(()ident(S)operator(\)) reserved(do)
     reserved(if) ident(S)operator([)ident(i)operator(]) reserved(in) ident(C) reserved(then)
-      ident(Result) operator(:=) ident(Result) operator(+) ident(S)operator([)ident(i)operator(];)
+      ident(Result) operator(:=) ident(Result) operator(+) ident(S)operator([)ident(i)operator(])operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(CharCount)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(CharCount)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\))operator(:) ident(Integer)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) integer(0)operator(;)
   reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(Length)operator(()ident(S)operator(\)) reserved(do)
     reserved(if) ident(S)operator([)ident(i)operator(]) operator(=) ident(C) reserved(then)
-      ident(Inc)operator(()ident(Result)operator(\);)
+      ident(Inc)operator(()ident(Result)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(StrAtPos)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Pos)operator(:) ident(Integer)operator(;) reserved(const) ident(Str)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(StrAtPos)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Pos)operator(:) ident(Integer)operator(;) reserved(const) ident(Str)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) operator(()ident(Str) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(Str) operator(=) ident(Copy)operator(()ident(S)operator(,) ident(Pos)operator(,) ident(Length)operator(()ident(Str)operator(\)\)\);)
+  ident(Result) operator(:=) operator(()ident(Str) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(Str) operator(=) ident(Copy)operator(()ident(S)operator(,) ident(Pos)operator(,) ident(Length)operator(()ident(Str)operator(\))operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(TextAtPos)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Pos)operator(:) ident(Integer)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(TextAtPos)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Pos)operator(:) ident(Integer)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) operator(()ident(Text) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) ident(SameText)operator(()ident(Text)operator(,) ident(Copy)operator(()ident(S)operator(,) ident(Pos)operator(,) ident(Length)operator(()ident(Text)operator(\)\)\);)
+  ident(Result) operator(:=) operator(()ident(Text) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) ident(SameText)operator(()ident(Text)operator(,) ident(Copy)operator(()ident(S)operator(,) ident(Pos)operator(,) ident(Length)operator(()ident(Text)operator(\))operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(StrAtBegin)operator(()reserved(const) ident(S)operator(,) ident(Str)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(StrAtBegin)operator(()reserved(const) ident(S)operator(,) ident(Str)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(StrAtPos)operator(()ident(S)operator(,) integer(1)operator(,) ident(Str)operator(\);)
+  ident(Result) operator(:=) ident(StrAtPos)operator(()ident(S)operator(,) integer(1)operator(,) ident(Str)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(TextAtBegin)operator(()reserved(const) ident(S)operator(,) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(TextAtBegin)operator(()reserved(const) ident(S)operator(,) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(TextAtPos)operator(()ident(S)operator(,) integer(1)operator(,) ident(Text)operator(\);)
+  ident(Result) operator(:=) ident(TextAtPos)operator(()ident(S)operator(,) integer(1)operator(,) ident(Text)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(CharIn)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(CharIn)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(Char)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -1236,7 +1236,7 @@ reserved(begin)
   ident(Result) operator(:=) ident(False)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(CharIn)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(CharIn)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(C)operator(:) ident(TCharSet)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -1248,65 +1248,65 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(StrIn)operator(()reserved(const) ident(S)operator(,) ident(SubStr)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(StrIn)operator(()reserved(const) ident(S)operator(,) ident(SubStr)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(PosEx)operator(()ident(SubStr)operator(,) ident(S)operator(\)) operator(>) integer(0)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(StrIn)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(StrIn)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(False)operator(;)
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin)
-    ident(Result) operator(:=) operator(()ident(S) operator(=) ident(SL)operator([)ident(i)operator(]\);)
+    ident(Result) operator(:=) operator(()ident(S) operator(=) ident(SL)operator([)ident(i)operator(])operator(\))operator(;)
     reserved(if) ident(Result) reserved(then)
       ident(Exit)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(StrIn)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(StrIn)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(False)operator(;)
   reserved(for) ident(i) operator(:=) ident(Low)operator(()ident(A)operator(\)) reserved(to) ident(High)operator(()ident(A)operator(\)) reserved(do) reserved(begin)
-    ident(Result) operator(:=) operator(()ident(S) operator(=) ident(A)operator([)ident(i)operator(]\);)
+    ident(Result) operator(:=) operator(()ident(S) operator(=) ident(A)operator([)ident(i)operator(])operator(\))operator(;)
     reserved(if) ident(Result) reserved(then)
       ident(Exit)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(TextIn)operator(()reserved(const) ident(S)operator(,) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(TextIn)operator(()reserved(const) ident(S)operator(,) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(PosExText)operator(()ident(Text)operator(,) ident(S)operator(\)) operator(>) integer(0)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(TextIn)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(TextIn)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(False)operator(;)
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin)
-    ident(Result) operator(:=) ident(SameText)operator(()ident(Text)operator(,) ident(SL)operator([)ident(i)operator(]\);)
+    ident(Result) operator(:=) ident(SameText)operator(()ident(Text)operator(,) ident(SL)operator([)ident(i)operator(])operator(\))operator(;)
     reserved(if) ident(Result) reserved(then)
       ident(Exit)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(TextIn)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(TextIn)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(False)operator(;)
   reserved(for) ident(i) operator(:=) ident(Low)operator(()ident(A)operator(\)) reserved(to) ident(High)operator(()ident(A)operator(\)) reserved(do) reserved(begin)
-    ident(Result) operator(:=) ident(SameText)operator(()ident(Text)operator(,) ident(A)operator([)ident(i)operator(]\);)
+    ident(Result) operator(:=) ident(SameText)operator(()ident(Text)operator(,) ident(A)operator([)ident(i)operator(])operator(\))operator(;)
     reserved(if) ident(Result) reserved(then)
       ident(Exit)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(StrIndex)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(StrIndex)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(for) ident(Result) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do)
     reserved(if) ident(S) operator(=) ident(SL)operator([)ident(Result)operator(]) reserved(then)
@@ -1314,7 +1314,7 @@ reserved(begin)
   ident(Result) operator(:=) operator(-)integer(1)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(StrIndex)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(StrIndex)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(for) ident(Result) operator(:=) ident(Low)operator(()ident(A)operator(\)) reserved(to) ident(High)operator(()ident(A)operator(\)) reserved(do)
     reserved(if) ident(S) operator(=) ident(A)operator([)ident(Result)operator(]) reserved(then)
@@ -1322,23 +1322,23 @@ reserved(begin)
   ident(Result) operator(:=) operator(-)integer(1)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(TextIndex)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(TextIndex)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(for) ident(Result) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do)
-    reserved(if) ident(SameText)operator(()ident(Text)operator(,) ident(SL)operator([)ident(Result)operator(]\)) reserved(then)
+    reserved(if) ident(SameText)operator(()ident(Text)operator(,) ident(SL)operator([)ident(Result)operator(])operator(\)) reserved(then)
       ident(Exit)operator(;)
   ident(Result) operator(:=) operator(-)integer(1)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(TextIndex)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(TextIndex)operator(()ident(A)operator(:) ident(TStrA)operator(;) reserved(const) ident(Text)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(for) ident(Result) operator(:=) ident(Low)operator(()ident(A)operator(\)) reserved(to) ident(High)operator(()ident(A)operator(\)) reserved(do)
-    reserved(if) ident(SameText)operator(()ident(Text)operator(,) ident(A)operator([)ident(Result)operator(]\)) reserved(then)
+    reserved(if) ident(SameText)operator(()ident(Text)operator(,) ident(A)operator([)ident(Result)operator(])operator(\)) reserved(then)
       ident(Exit)operator(;)
   ident(Result) operator(:=) operator(-)integer(1)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ReplaceChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Old)operator(,) ident(New)operator(:) ident(Char)operator(\):) reserved(string)operator(;)
+reserved(function) ident(ReplaceChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Old)operator(,) ident(New)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -1348,7 +1348,7 @@ reserved(begin)
       ident(Result)operator([)ident(i)operator(]) operator(:=) ident(New)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ReplaceChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Old)operator(:) ident(TCharSet)operator(;) ident(New)operator(:) ident(Char)operator(\):) reserved(string)operator(;)
+reserved(function) ident(ReplaceChars)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) ident(Old)operator(:) ident(TCharSet)operator(;) ident(New)operator(:) ident(Char)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -1358,7 +1358,7 @@ reserved(begin)
       ident(Result)operator([)ident(i)operator(]) operator(:=) ident(New)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(Replace)operator(()reserved(const) ident(S)operator(,) ident(Old)operator(,) ident(New)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(Replace)operator(()reserved(const) ident(S)operator(,) ident(Old)operator(,) ident(New)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(oldp)operator(,) ident(ps)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -1366,28 +1366,28 @@ reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
   reserved(while) ident(True) reserved(do) reserved(begin)
     ident(oldp) operator(:=) ident(ps)operator(;)
-    ident(ps) operator(:=) ident(PosEx)operator(()ident(Old)operator(,) ident(S)operator(,) ident(oldp)operator(\);)
+    ident(ps) operator(:=) ident(PosEx)operator(()ident(Old)operator(,) ident(S)operator(,) ident(oldp)operator(\))operator(;)
     reserved(if) ident(ps) operator(=) integer(0) reserved(then) reserved(begin)
-      ident(Result) operator(:=) ident(Result) operator(+) ident(Copy)operator(()ident(S)operator(,) ident(oldp)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(oldp) operator(+) integer(1)operator(\);)
+      ident(Result) operator(:=) ident(Result) operator(+) ident(Copy)operator(()ident(S)operator(,) ident(oldp)operator(,) ident(Length)operator(()ident(S)operator(\)) operator(-) ident(oldp) operator(+) integer(1)operator(\))operator(;)
     ident(Exit)operator(;) reserved(end)operator(;)
     ident(Result) operator(:=) ident(Result) operator(+) ident(Copy)operator(()ident(S)operator(,) ident(oldp)operator(,) ident(ps) operator(-) ident(oldp)operator(\)) operator(+) ident(New)operator(;)
-    ident(Inc)operator(()ident(ps)operator(,) ident(Length)operator(()ident(Old)operator(\)\);)
+    ident(Inc)operator(()ident(ps)operator(,) ident(Length)operator(()ident(Old)operator(\))operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(SLOfFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) ident(TStringList)operator(;)
+reserved(function) ident(SLOfFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(TStringList)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
   reserved(if) ident(FileExists)operator(()ident(FileName)operator(\)) reserved(then)
-    ident(Result)operator(.)ident(LoadFromFile)operator(()ident(FileName)operator(\);)
+    ident(Result)operator(.)ident(LoadFromFile)operator(()ident(FileName)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ContainsEmptyLines)operator(()ident(SL)operator(:) ident(TStrings)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(ContainsEmptyLines)operator(()ident(SL)operator(:) ident(TStrings)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(StrIn)operator(()ident(SL)operator(,) string<delimiter(')delimiter(')>operator(\);)
+  ident(Result) operator(:=) ident(StrIn)operator(()ident(SL)operator(,) string<delimiter(')delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(DeleteEmptyLines)operator(()ident(SL)operator(:) ident(TStrings)operator(\);)
+reserved(procedure) ident(DeleteEmptyLines)operator(()ident(SL)operator(:) ident(TStrings)operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -1396,113 +1396,113 @@ reserved(begin)
     reserved(if) ident(SL)operator([)ident(i)operator(]) operator(=) string<delimiter(')delimiter(')> reserved(then)
       ident(SL)operator(.)ident(Delete)operator(()ident(i)operator(\))
     reserved(else)
-      ident(Inc)operator(()ident(i)operator(\);)
+      ident(Inc)operator(()ident(i)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(DeleteCommentLines)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(CommentSign)operator(:) reserved(string) operator(=) string<delimiter(')content(//)delimiter(')>operator(\);)
+reserved(procedure) ident(DeleteCommentLines)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(CommentSign)operator(:) reserved(string) operator(=) string<delimiter(')content(//)delimiter(')>operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(i) operator(:=) integer(0)operator(;)
   reserved(while) ident(i) operator(<) ident(SL)operator(.)ident(Count) reserved(do) reserved(begin)
-    reserved(if) operator(()ident(SL)operator([)ident(i)operator(]) operator(=) string<delimiter(')delimiter(')>operator(\)) reserved(or) operator(()ident(StrAtBegin)operator(()ident(TrimLeft)operator(()ident(SL)operator([)ident(i)operator(]\),) ident(CommentSign)operator(\)\)) reserved(then)
+    reserved(if) operator(()ident(SL)operator([)ident(i)operator(]) operator(=) string<delimiter(')delimiter(')>operator(\)) reserved(or) operator(()ident(StrAtBegin)operator(()ident(TrimLeft)operator(()ident(SL)operator([)ident(i)operator(])operator(\))operator(,) ident(CommentSign)operator(\))operator(\)) reserved(then)
       ident(SL)operator(.)ident(Delete)operator(()ident(i)operator(\))
     reserved(else)
-      ident(Inc)operator(()ident(i)operator(\);)
+      ident(Inc)operator(()ident(i)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(FindLine)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(FindLine)operator(()ident(SL)operator(:) ident(TStrings)operator(;) reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(for) ident(Result) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do)
-    reserved(if) ident(TextAtBegin)operator(()ident(SL)operator([)ident(Result)operator(],) ident(S)operator(\)) reserved(then)
+    reserved(if) ident(TextAtBegin)operator(()ident(SL)operator([)ident(Result)operator(])operator(,) ident(S)operator(\)) reserved(then)
       ident(Exit)operator(;)
   ident(Result) operator(:=) operator(-)integer(1)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(QuickSortSL)operator(()ident(SL)operator(:) ident(TStringList)operator(\);)
+reserved(procedure) ident(QuickSortSL)operator(()ident(SL)operator(:) ident(TStringList)operator(\))operator(;)
 
-  reserved(procedure) ident(Sort)operator(()ident(l)operator(,) ident(r)operator(:) ident(Integer)operator(\);)
+  reserved(procedure) ident(Sort)operator(()ident(l)operator(,) ident(r)operator(:) ident(Integer)operator(\))operator(;)
   reserved(var)
     ident(i)operator(,)ident(j)operator(:) ident(Integer)operator(;)
     ident(z)operator(,)ident(x)operator(:) reserved(string)operator(;)
   reserved(begin)
     ident(i) operator(:=) ident(l)operator(;)
     ident(j) operator(:=) ident(r)operator(;)
-    ident(x) operator(:=) ident(SL)operator([()ident(j) operator(+) ident(i)operator(\)) reserved(div) integer(2)operator(];)
+    ident(x) operator(:=) ident(SL)operator([)operator(()ident(j) operator(+) ident(i)operator(\)) reserved(div) integer(2)operator(])operator(;)
     reserved(repeat)
-      reserved(while) ident(SL)operator([)ident(i)operator(]) operator(<) ident(x) reserved(do) ident(Inc)operator(()ident(i)operator(\);)
-      reserved(while) ident(SL)operator([)ident(j)operator(]) operator(>) ident(x) reserved(do) ident(Dec)operator(()ident(j)operator(\);)
+      reserved(while) ident(SL)operator([)ident(i)operator(]) operator(<) ident(x) reserved(do) ident(Inc)operator(()ident(i)operator(\))operator(;)
+      reserved(while) ident(SL)operator([)ident(j)operator(]) operator(>) ident(x) reserved(do) ident(Dec)operator(()ident(j)operator(\))operator(;)
       reserved(if) ident(i) operator(<=) ident(j) reserved(then) reserved(begin)
-        ident(z) operator(:=) ident(SL)operator([)ident(i)operator(];)
-        ident(SL)operator([)ident(i)operator(]) operator(:=) ident(SL)operator([)ident(j)operator(];)
+        ident(z) operator(:=) ident(SL)operator([)ident(i)operator(])operator(;)
+        ident(SL)operator([)ident(i)operator(]) operator(:=) ident(SL)operator([)ident(j)operator(])operator(;)
         ident(SL)operator([)ident(j)operator(]) operator(:=) ident(z)operator(;)
-        ident(Inc)operator(()ident(i)operator(\);) ident(Dec)operator(()ident(j)operator(\);)
+        ident(Inc)operator(()ident(i)operator(\))operator(;) ident(Dec)operator(()ident(j)operator(\))operator(;)
       reserved(end)operator(;)
     reserved(until) ident(i) operator(>) ident(j)operator(;)
-    reserved(if) ident(j) operator(>) ident(l) reserved(then) ident(Sort)operator(()ident(l)operator(,) ident(j)operator(\);)
-    reserved(if) ident(i) operator(<) ident(r) reserved(then) ident(Sort)operator(()ident(i)operator(,) ident(r)operator(\);)
+    reserved(if) ident(j) operator(>) ident(l) reserved(then) ident(Sort)operator(()ident(l)operator(,) ident(j)operator(\))operator(;)
+    reserved(if) ident(i) operator(<) ident(r) reserved(then) ident(Sort)operator(()ident(i)operator(,) ident(r)operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
   reserved(if) ident(SL)operator(.)ident(Count) operator(>) integer(0) reserved(then)
-    ident(Sort)operator(()integer(0)operator(,) ident(SL)operator(.)ident(Count)operator(-)integer(1)operator(\);)
+    ident(Sort)operator(()integer(0)operator(,) ident(SL)operator(.)ident(Count)operator(-)integer(1)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(IncStrA)operator(()ident(StrA)operator(:) ident(TStrA)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(IncStrA)operator(()ident(StrA)operator(:) ident(TStrA)operator(\))operator(:) ident(Integer)operator(;)
 reserved(begin)
-  ident(SetLength)operator(()ident(StrA)operator(,) ident(Length)operator(()ident(StrA)operator(\)) operator(+) integer(1)operator(\);)
-  ident(Result) operator(:=) ident(High)operator(()ident(StrA)operator(\);)
+  ident(SetLength)operator(()ident(StrA)operator(,) ident(Length)operator(()ident(StrA)operator(\)) operator(+) integer(1)operator(\))operator(;)
+  ident(Result) operator(:=) ident(High)operator(()ident(StrA)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(StrOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(\):) reserved(string)operator(;)
+reserved(function) ident(StrOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) reserved(string)operator(()ident(Copy)operator(()ident(a)operator(,) integer(0)operator(,) ident(Length)operator(()ident(a)operator(\)\)\);)
+  ident(Result) operator(:=) reserved(string)operator(()ident(Copy)operator(()ident(a)operator(,) integer(0)operator(,) ident(Length)operator(()ident(a)operator(\))operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ByteAOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(TByteA)operator(;)
+reserved(function) ident(ByteAOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(TByteA)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(TByteA)operator(()ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(Length)operator(()ident(s)operator(\)\)\);)
+  ident(Result) operator(:=) ident(TByteA)operator(()ident(Copy)operator(()ident(S)operator(,) integer(1)operator(,) ident(Length)operator(()ident(s)operator(\))operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ByteAOfInt)operator(()ident(i)operator(:) ident(Integer)operator(\):) ident(TByteA)operator(;)
+reserved(function) ident(ByteAOfInt)operator(()ident(i)operator(:) ident(Integer)operator(\))operator(:) ident(TByteA)operator(;)
 reserved(begin)
-  ident(SetLength)operator(()ident(Result)operator(,) ident(SizeOf)operator(()ident(Integer)operator(\)\);)
-  ident(Move)operator(()ident(i)operator(,) ident(Pointer)operator(()ident(Result)operator(\)^,) ident(SizeOf)operator(()ident(Integer)operator(\)\);)
+  ident(SetLength)operator(()ident(Result)operator(,) ident(SizeOf)operator(()ident(Integer)operator(\))operator(\))operator(;)
+  ident(Move)operator(()ident(i)operator(,) ident(Pointer)operator(()ident(Result)operator(\))operator(^)operator(,) ident(SizeOf)operator(()ident(Integer)operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(IntOfByteA)operator(()ident(A)operator(:) ident(TByteA)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(IntOfByteA)operator(()ident(A)operator(:) ident(TByteA)operator(\))operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) integer(0)operator(;)
-  ident(Move)operator(()ident(Pointer)operator(()ident(A)operator(\)^,) ident(Result)operator(,) ident(Min)operator(()ident(Length)operator(()ident(A)operator(\),) ident(SizeOf)operator(()ident(Integer)operator(\)\)\);)
+  ident(Move)operator(()ident(Pointer)operator(()ident(A)operator(\))operator(^)operator(,) ident(Result)operator(,) ident(Min)operator(()ident(Length)operator(()ident(A)operator(\))operator(,) ident(SizeOf)operator(()ident(Integer)operator(\))operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ByteAOfHex)operator(()reserved(const) ident(Hex)operator(:) reserved(string)operator(\):) ident(TByteA)operator(;)
+reserved(function) ident(ByteAOfHex)operator(()reserved(const) ident(Hex)operator(:) reserved(string)operator(\))operator(:) ident(TByteA)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
   ident(h)operator(:) reserved(string)operator(;)
 reserved(begin)
-  ident(h) operator(:=) ident(ExtractChars)operator(()ident(Hex)operator(,) ident(HexadecimalChars)operator(\);)
-  ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(h)operator(\)) reserved(div) integer(2)operator(\);)
+  ident(h) operator(:=) ident(ExtractChars)operator(()ident(Hex)operator(,) ident(HexadecimalChars)operator(\))operator(;)
+  ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(h)operator(\)) reserved(div) integer(2)operator(\))operator(;)
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(Result)operator(\)) reserved(do)
-    ident(Result)operator([)ident(i)operator(]) operator(:=) ident(ByteOfHex)operator(()ident(Copy)operator(()ident(h)operator(,) operator(()ident(i) reserved(shl) integer(1)operator(\)) operator(+) integer(1)operator(,) integer(2)operator(\)\);)
+    ident(Result)operator([)ident(i)operator(]) operator(:=) ident(ByteOfHex)operator(()ident(Copy)operator(()ident(h)operator(,) operator(()ident(i) reserved(shl) integer(1)operator(\)) operator(+) integer(1)operator(,) integer(2)operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(SizeOfFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(SizeOfFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(Integer)operator(;)
 reserved(var)
   ident(F)operator(:) reserved(file)operator(;)
 reserved(begin)
-  ident(AssignFile)operator(()ident(F)operator(,) ident(FileName)operator(\);)
-  preprocessor({$I-})ident(Reset)operator(()ident(F)operator(,) integer(1)operator(\);)preprocessor({$I+})
+  ident(AssignFile)operator(()ident(F)operator(,) ident(FileName)operator(\))operator(;)
+  preprocessor({$I-})ident(Reset)operator(()ident(F)operator(,) integer(1)operator(\))operator(;)preprocessor({$I+})
   reserved(if) ident(IOResult) operator(=) integer(0) reserved(then) reserved(begin)
-    ident(Result) operator(:=) ident(FileSize)operator(()ident(F)operator(\);)
-    ident(CloseFile)operator(()ident(F)operator(\);)
+    ident(Result) operator(:=) ident(FileSize)operator(()ident(F)operator(\))operator(;)
+    ident(CloseFile)operator(()ident(F)operator(\))operator(;)
   reserved(end) reserved(else)
     ident(Result) operator(:=) integer(0)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(FileEx)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(;) ident(AllowFolders)operator(:) ident(Boolean) operator(=) ident(False)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(FileEx)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(;) ident(AllowFolders)operator(:) ident(Boolean) operator(=) ident(False)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(var)
   ident(FindData)operator(:) ident(TWin32FindData)operator(;)
 reserved(begin)
@@ -1510,88 +1510,88 @@ reserved(begin)
     ident(Result) operator(:=) ident(False)operator(;)
   ident(Exit)operator(;) reserved(end)operator(;)
 
-  ident(Result) operator(:=) operator(()ident(AllowFolders) reserved(and) ident(DirectoryExists)operator(()ident(FileName)operator(\)\)) reserved(or)
-    operator(()ident(FindFirstFile)operator(()ident(PChar)operator(()ident(FileName)operator(\),) ident(FindData)operator(\)) operator(<>) ident(INVALID_HANDLE_VALUE)operator(\);)
-  ident(Result) operator(:=) ident(Result) reserved(and) reserved(not) ident(CharIn)operator(()ident(FileName)operator(,) ident(WildCards)operator(\);)
+  ident(Result) operator(:=) operator(()ident(AllowFolders) reserved(and) ident(DirectoryExists)operator(()ident(FileName)operator(\))operator(\)) reserved(or)
+    operator(()ident(FindFirstFile)operator(()ident(PChar)operator(()ident(FileName)operator(\))operator(,) ident(FindData)operator(\)) operator(<>) ident(INVALID_HANDLE_VALUE)operator(\))operator(;)
+  ident(Result) operator(:=) ident(Result) reserved(and) reserved(not) ident(CharIn)operator(()ident(FileName)operator(,) ident(WildCards)operator(\))operator(;)
   ident(Result) operator(:=) ident(Result) reserved(and) operator(()ident(AllowFolders)
-    reserved(or) operator((()ident(FindData)operator(.)ident(dwFileAttributes) reserved(and) ident(FILE_ATTRIBUTE_DIRECTORY)operator(\)) operator(=) integer(0)operator(\)\);)
+    reserved(or) operator(()operator(()ident(FindData)operator(.)ident(dwFileAttributes) reserved(and) ident(FILE_ATTRIBUTE_DIRECTORY)operator(\)) operator(=) integer(0)operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(LWPSolve)operator(()reserved(const) ident(Dir)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(LWPSolve)operator(()reserved(const) ident(Dir)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
-  reserved(if) operator(()ident(Dir) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(Dir)operator([)ident(Length)operator(()ident(Dir)operator(\)]) operator(=) char<delimiter(')content(\\)delimiter(')>operator(\)) reserved(then) reserved(begin)
-    ident(Result) operator(:=) ident(Copy)operator(()ident(Dir)operator(,) integer(1)operator(,) ident(Length)operator(()ident(Dir)operator(\)) operator(-) integer(1)operator(\);)
+  reserved(if) operator(()ident(Dir) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(Dir)operator([)ident(Length)operator(()ident(Dir)operator(\))operator(]) operator(=) char<delimiter(')content(\\)delimiter(')>operator(\)) reserved(then) reserved(begin)
+    ident(Result) operator(:=) ident(Copy)operator(()ident(Dir)operator(,) integer(1)operator(,) ident(Length)operator(()ident(Dir)operator(\)) operator(-) integer(1)operator(\))operator(;)
   reserved(end) reserved(else)
     ident(Result) operator(:=) ident(Dir)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(LWPSlash)operator(()reserved(const) ident(Dir)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(LWPSlash)operator(()reserved(const) ident(Dir)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
-  reserved(if) operator(()ident(Dir) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(Dir)operator([)ident(Length)operator(()ident(Dir)operator(\)]) operator(=) char<delimiter(')content(\\)delimiter(')>operator(\)) reserved(then) reserved(begin)
-    ident(Result) operator(:=) ident(Copy)operator(()ident(Dir)operator(,) integer(1)operator(,) ident(Length)operator(()ident(Dir)operator(\)\);)
+  reserved(if) operator(()ident(Dir) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) operator(()ident(Dir)operator([)ident(Length)operator(()ident(Dir)operator(\))operator(]) operator(=) char<delimiter(')content(\\)delimiter(')>operator(\)) reserved(then) reserved(begin)
+    ident(Result) operator(:=) ident(Copy)operator(()ident(Dir)operator(,) integer(1)operator(,) ident(Length)operator(()ident(Dir)operator(\))operator(\))operator(;)
   reserved(end) reserved(else)
     ident(Result) operator(:=) ident(Dir) operator(+) char<delimiter(')content(\\)delimiter(')>operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ExtractDrive)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(ExtractDrive)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
   reserved(if) operator(()ident(Length)operator(()ident(FileName)operator(\)) operator(>=) integer(2)operator(\)) reserved(and) operator(()ident(FileName)operator([)integer(2)operator(]) operator(=) char<delimiter(')content(:)delimiter(')>operator(\)) reserved(then)
-    ident(Result) operator(:=) ident(UpperCase)operator(()ident(FileName)operator([)integer(1)operator(]) operator(+) string<delimiter(')content(:\\)delimiter(')>operator(\);)
+    ident(Result) operator(:=) ident(UpperCase)operator(()ident(FileName)operator([)integer(1)operator(]) operator(+) string<delimiter(')content(:\\)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ExtractPath)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(ExtractPath)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(p)operator(:) ident(Integer)operator(;)
 reserved(begin)
-  ident(p) operator(:=) ident(CharPosR)operator(()char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(\);)
+  ident(p) operator(:=) ident(CharPosR)operator(()char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(\))operator(;)
   reserved(if) ident(P) operator(>) integer(0) reserved(then)
     ident(Result) operator(:=) ident(Copy)operator(()ident(FileName)operator(,) integer(1)operator(,) ident(p)operator(\))
   reserved(else)
     ident(Result) operator(:=) ident(FileName)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ExtractPrefix)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(ExtractPrefix)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(UntilLastChar)operator(()ident(ExtractFileName)operator(()ident(FileName)operator(\),) char<delimiter(')content(.)delimiter(')>operator(\);)
+  ident(Result) operator(:=) ident(UntilLastChar)operator(()ident(ExtractFileName)operator(()ident(FileName)operator(\))operator(,) char<delimiter(')content(.)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ExtractSuffix)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(ExtractSuffix)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(FromLastChar)operator(()ident(ExtractFileName)operator(()ident(FileName)operator(\),) char<delimiter(')content(.)delimiter(')>operator(\);)
+  ident(Result) operator(:=) ident(FromLastChar)operator(()ident(ExtractFileName)operator(()ident(FileName)operator(\))operator(,) char<delimiter(')content(.)delimiter(')>operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(SameByteA)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(TByteA)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(SameByteA)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(TByteA)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) operator(()ident(A) operator(=) ident(B)operator(\)) reserved(or) operator((()ident(Length)operator(()ident(A)operator(\)) operator(=) ident(Length)operator(()ident(B)operator(\)\)) reserved(and) ident(CompareMem)operator(()ident(A)operator(,) ident(B)operator(,) ident(Length)operator(()ident(A)operator(\)\)\);)
+  ident(Result) operator(:=) operator(()ident(A) operator(=) ident(B)operator(\)) reserved(or) operator(()operator(()ident(Length)operator(()ident(A)operator(\)) operator(=) ident(Length)operator(()ident(B)operator(\))operator(\)) reserved(and) ident(CompareMem)operator(()ident(A)operator(,) ident(B)operator(,) ident(Length)operator(()ident(A)operator(\))operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(Reverse)operator(()ident(A)operator(:) ident(TByteA)operator(\):) ident(TByteA)operator(;)
+reserved(function) ident(Reverse)operator(()ident(A)operator(:) ident(TByteA)operator(\))operator(:) ident(TByteA)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
-  ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(A)operator(\)\);)
+  ident(SetLength)operator(()ident(Result)operator(,) ident(Length)operator(()ident(A)operator(\))operator(\))operator(;)
 
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(A)operator(\)) reserved(do)
-    ident(Result)operator([)ident(High)operator(()ident(Result)operator(\)) operator(-) ident(i)operator(]) operator(:=) ident(A)operator([)ident(i)operator(];)
+    ident(Result)operator([)ident(High)operator(()ident(Result)operator(\)) operator(-) ident(i)operator(]) operator(:=) ident(A)operator([)ident(i)operator(])operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(Endian)operator(()ident(i)operator(:) ident(Integer)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(Endian)operator(()ident(i)operator(:) ident(Integer)operator(\))operator(:) ident(Integer)operator(;)
 reserved(type)
   ident(EndianArray) operator(=) reserved(packed) reserved(array)operator([)integer(0)operator(..)integer(3)operator(]) reserved(of) ident(Byte)operator(;)
 reserved(var)
   ident(a)operator(,) ident(b)operator(:) ident(EndianArray)operator(;)
 reserved(begin)
-  ident(a) operator(:=) ident(EndianArray)operator(()ident(i)operator(\);)
-  ident(b)operator([)integer(0)operator(]) operator(:=) ident(a)operator([)integer(3)operator(];)
-  ident(b)operator([)integer(1)operator(]) operator(:=) ident(a)operator([)integer(2)operator(];)
-  ident(b)operator([)integer(2)operator(]) operator(:=) ident(a)operator([)integer(1)operator(];)
-  ident(b)operator([)integer(3)operator(]) operator(:=) ident(a)operator([)integer(0)operator(];)
-  ident(Result) operator(:=) ident(Integer)operator(()ident(b)operator(\);)
+  ident(a) operator(:=) ident(EndianArray)operator(()ident(i)operator(\))operator(;)
+  ident(b)operator([)integer(0)operator(]) operator(:=) ident(a)operator([)integer(3)operator(])operator(;)
+  ident(b)operator([)integer(1)operator(]) operator(:=) ident(a)operator([)integer(2)operator(])operator(;)
+  ident(b)operator([)integer(2)operator(]) operator(:=) ident(a)operator([)integer(1)operator(])operator(;)
+  ident(b)operator([)integer(3)operator(]) operator(:=) ident(a)operator([)integer(0)operator(])operator(;)
+  ident(Result) operator(:=) ident(Integer)operator(()ident(b)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(SaveByteA)operator(()ident(Data)operator(:) ident(TByteA)operator(;) reserved(const) ident(FileName)operator(:) reserved(string)operator(;)
-  ident(Overwrite)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) ident(Boolean)operator(;)
+  ident(Overwrite)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(var)
   ident(F)operator(:) reserved(file)operator(;)
 reserved(begin)
@@ -1599,52 +1599,52 @@ reserved(begin)
     ident(Result) operator(:=) ident(False)operator(;)
   ident(Exit) reserved(end)operator(;)
 
-  ident(AssignFile)operator(()ident(F)operator(,) ident(FileName)operator(\);)
-  preprocessor({$I-})ident(Rewrite)operator(()ident(F)operator(,) integer(1)operator(\);)preprocessor({$I+})
+  ident(AssignFile)operator(()ident(F)operator(,) ident(FileName)operator(\))operator(;)
+  preprocessor({$I-})ident(Rewrite)operator(()ident(F)operator(,) integer(1)operator(\))operator(;)preprocessor({$I+})
   reserved(if) ident(IOResult) operator(=) integer(0) reserved(then) reserved(begin)
     reserved(if) ident(Length)operator(()ident(Data)operator(\)) operator(>) integer(0) reserved(then)
-      ident(BlockWrite)operator(()ident(F)operator(,) ident(Data)operator([)integer(0)operator(],) ident(Length)operator(()ident(Data)operator(\)\);)
-    ident(CloseFile)operator(()ident(F)operator(\);)
+      ident(BlockWrite)operator(()ident(F)operator(,) ident(Data)operator([)integer(0)operator(])operator(,) ident(Length)operator(()ident(Data)operator(\))operator(\))operator(;)
+    ident(CloseFile)operator(()ident(F)operator(\))operator(;)
     ident(Result) operator(:=) ident(True)operator(;)
   reserved(end) reserved(else)
     ident(Result) operator(:=) ident(False)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(LoadByteA)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) ident(TByteA)operator(;)
+reserved(function) ident(LoadByteA)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(TByteA)operator(;)
 reserved(var)
   ident(F)operator(:) reserved(file)operator(;)
 reserved(begin)
-  ident(AssignFile)operator(()ident(F)operator(,) ident(FileName)operator(\);)
-  preprocessor({$I-})ident(Reset)operator(()ident(F)operator(,) integer(1)operator(\);)preprocessor({$I+})
+  ident(AssignFile)operator(()ident(F)operator(,) ident(FileName)operator(\))operator(;)
+  preprocessor({$I-})ident(Reset)operator(()ident(F)operator(,) integer(1)operator(\))operator(;)preprocessor({$I+})
   reserved(if) ident(IOResult) operator(=) integer(0) reserved(then) reserved(begin)
-    ident(SetLength)operator(()ident(Result)operator(,) ident(FileSize)operator(()ident(F)operator(\)\);)
+    ident(SetLength)operator(()ident(Result)operator(,) ident(FileSize)operator(()ident(F)operator(\))operator(\))operator(;)
     reserved(if) ident(Length)operator(()ident(Result)operator(\)) operator(>) integer(0) reserved(then)
-      ident(BlockRead)operator(()ident(F)operator(,) ident(Result)operator([)integer(0)operator(],) ident(FileSize)operator(()ident(F)operator(\)\);)
-    ident(CloseFile)operator(()ident(F)operator(\);)
+      ident(BlockRead)operator(()ident(F)operator(,) ident(Result)operator([)integer(0)operator(])operator(,) ident(FileSize)operator(()ident(F)operator(\))operator(\))operator(;)
+    ident(CloseFile)operator(()ident(F)operator(\))operator(;)
   reserved(end) reserved(else)
-    ident(SetLength)operator(()ident(Result)operator(,) integer(0)operator(\);)
+    ident(SetLength)operator(()ident(Result)operator(,) integer(0)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(IsValidFileName)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(IsValidFileName)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
   ident(Result) operator(:=) operator(()ident(FileName) operator(<>) string<delimiter(')delimiter(')>operator(\)) reserved(and) reserved(not) ident(CharIn)operator(()ident(FileName)operator(,) ident(FileNameEnemies)operator(\))
-    reserved(and) ident(CharIn)operator(()ident(Trim)operator(()ident(FileName)operator(\),) ident(AllChars) operator(-) operator([)char<delimiter(')content(.)delimiter(')>operator(]\);)
+    reserved(and) ident(CharIn)operator(()ident(Trim)operator(()ident(FileName)operator(\))operator(,) ident(AllChars) operator(-) operator([)char<delimiter(')content(.)delimiter(')>operator(])operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(MakeValidFileName)operator(()ident(FileName)operator(:) reserved(string)operator(;) reserved(const) ident(Default)operator(:) reserved(string) operator(=) string<delimiter(')content(File)delimiter(')>operator(\):) reserved(string)operator(;)
+reserved(function) ident(MakeValidFileName)operator(()ident(FileName)operator(:) reserved(string)operator(;) reserved(const) ident(Default)operator(:) reserved(string) operator(=) string<delimiter(')content(File)delimiter(')>operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
   reserved(if) ident(FileName) operator(=) string<delimiter(')delimiter(')> reserved(then)
     ident(FileName) operator(:=) ident(Default)operator(;)
 
   reserved(if) ident(CharIn)operator(()ident(FileName)operator(,) ident(FileNameEnemies)operator(\)) reserved(then)
     ident(Result) operator(:=) ident(ReplaceChars)operator(()ident(FileName)operator(,) ident(FileNameEnemies)operator(,) char<delimiter(')content(_)delimiter(')>operator(\))
-  reserved(else) reserved(if) reserved(not) ident(CharIn)operator(()ident(Trim)operator(()ident(FileName)operator(\),) ident(AllChars) operator(-) operator([)char<delimiter(')content(.)delimiter(')>operator(]\)) reserved(then)
+  reserved(else) reserved(if) reserved(not) ident(CharIn)operator(()ident(Trim)operator(()ident(FileName)operator(\))operator(,) ident(AllChars) operator(-) operator([)char<delimiter(')content(.)delimiter(')>operator(])operator(\)) reserved(then)
     ident(Result) operator(:=) ident(Default)
   reserved(else)
     ident(Result) operator(:=) ident(FileName)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(IsValidInteger)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(IsValidInteger)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 comment({const
   LowInt = '2147483648';
   HighInt = '2147483647';
@@ -1710,11 +1710,11 @@ begin
 reserved(var)
   ident(i)operator(:) ident(Int64)operator(;)
 reserved(begin)
-  ident(i) operator(:=) ident(StrToInt64Def)operator(()ident(S)operator(,) ident(High)operator(()ident(Int64)operator(\)\);)
-  ident(Result) operator(:=) operator(()ident(i) operator(>=) ident(Low)operator(()ident(Integer)operator(\)\)) reserved(and) operator(()ident(i) operator(<=) ident(High)operator(()ident(Integer)operator(\)\);)
+  ident(i) operator(:=) ident(StrToInt64Def)operator(()ident(S)operator(,) ident(High)operator(()ident(Int64)operator(\))operator(\))operator(;)
+  ident(Result) operator(:=) operator(()ident(i) operator(>=) ident(Low)operator(()ident(Integer)operator(\))operator(\)) reserved(and) operator(()ident(i) operator(<=) ident(High)operator(()ident(Integer)operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(IsValidCardinal)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(IsValidCardinal)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
 comment({const
   HighCard = '4294967295';
 var
@@ -1752,12 +1752,12 @@ begin
 reserved(var)
   ident(i)operator(:) ident(Int64)operator(;)
 reserved(begin)
-  ident(i) operator(:=) ident(StrToInt64Def)operator(()ident(S)operator(,) operator(-)integer(1)operator(\);)
-  ident(Result) operator(:=) operator(()ident(i) operator(>=) integer(0)operator(\)) reserved(and) operator(()ident(i) operator(<=) ident(High)operator(()ident(Cardinal)operator(\)\);)
+  ident(i) operator(:=) ident(StrToInt64Def)operator(()ident(S)operator(,) operator(-)integer(1)operator(\))operator(;)
+  ident(Result) operator(:=) operator(()ident(i) operator(>=) integer(0)operator(\)) reserved(and) operator(()ident(i) operator(<=) ident(High)operator(()ident(Cardinal)operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(StrOfBool)operator(()ident(flag)operator(:) ident(Boolean)operator(;) reserved(const) ident(TrueStr)operator(:) reserved(string) operator(=) string<delimiter(')content(True)delimiter(')>operator(;)
-  reserved(const) ident(FalseStr)operator(:) reserved(string) operator(=) string<delimiter(')content(False)delimiter(')>operator(\):) reserved(string)operator(;)
+  reserved(const) ident(FalseStr)operator(:) reserved(string) operator(=) string<delimiter(')content(False)delimiter(')>operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
   reserved(if) ident(Flag) reserved(then)
     ident(Result) operator(:=) ident(TrueStr)
@@ -1765,7 +1765,7 @@ reserved(begin)
     ident(Result) operator(:=) ident(FalseStr)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(StrOfInt)operator(()ident(i)operator(:) ident(Integer)operator(\):) reserved(string)operator(;)
+reserved(function) ident(StrOfInt)operator(()ident(i)operator(:) ident(Integer)operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
 comment({  if i = 0 then begin
     Result := '0';
@@ -1775,22 +1775,22 @@ comment({  if i = 0 then begin
     Result := Char(Byte('0'\) + (i mod 10\)\) + Result;
     i := i div 10;
   end;})
-  ident(Result) operator(:=) ident(IntToStr)operator(()ident(i)operator(\);)
+  ident(Result) operator(:=) ident(IntToStr)operator(()ident(i)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(CardOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(Cardinal)operator(;)
+reserved(function) ident(CardOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(Cardinal)operator(;)
 reserved(var)
   ident(Res)operator(:) ident(Int64)operator(;)
 reserved(begin)
-  ident(Res) operator(:=) ident(StrToInt64Def)operator(()ident(S)operator(,) operator(-)integer(1)operator(\);)
+  ident(Res) operator(:=) ident(StrToInt64Def)operator(()ident(S)operator(,) operator(-)integer(1)operator(\))operator(;)
   reserved(if) ident(Res) operator(>) ident(High)operator(()ident(Cardinal)operator(\)) reserved(then)
     ident(Res) operator(:=) ident(High)operator(()ident(Cardinal)operator(\))
   reserved(else) reserved(if) ident(Res) operator(<) integer(0) reserved(then)
     ident(Res) operator(:=) integer(0)operator(;)
-  ident(Result) operator(:=) ident(Cardinal)operator(()ident(Res)operator(\);)
+  ident(Result) operator(:=) ident(Cardinal)operator(()ident(Res)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(HexOrd)operator(()ident(Hex)operator(:) ident(Char)operator(\):) ident(THex)operator(;)
+reserved(function) ident(HexOrd)operator(()ident(Hex)operator(:) ident(Char)operator(\))operator(:) ident(THex)operator(;)
 reserved(begin)
   reserved(case) ident(Hex) reserved(of)
     char<delimiter(')content(0)delimiter(')>operator(..)char<delimiter(')content(9)delimiter(')>operator(:)
@@ -1804,20 +1804,20 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ByteOfHex)operator(()ident(Hex)operator(:) ident(THexByteStr)operator(\):) ident(Byte)operator(;)
+reserved(function) ident(ByteOfHex)operator(()ident(Hex)operator(:) ident(THexByteStr)operator(\))operator(:) ident(Byte)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) operator(()ident(HexOrd)operator(()ident(Hex)operator([)integer(1)operator(]\)) reserved(shl) integer(4)operator(\)) operator(+) ident(HexOrd)operator(()ident(Hex)operator([)integer(2)operator(]\);)
+  ident(Result) operator(:=) operator(()ident(HexOrd)operator(()ident(Hex)operator([)integer(1)operator(])operator(\)) reserved(shl) integer(4)operator(\)) operator(+) ident(HexOrd)operator(()ident(Hex)operator([)integer(2)operator(])operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(DecOfHex)operator(()reserved(const) ident(Hex)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(DecOfHex)operator(()reserved(const) ident(Hex)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(IntToStr)operator(()ident(CardOfHex)operator(()ident(Hex)operator(\)\);)
+  ident(Result) operator(:=) ident(IntToStr)operator(()ident(CardOfHex)operator(()ident(Hex)operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(HexOfByte)operator(()ident(b)operator(:) ident(Byte)operator(\):) ident(THexByteStr)operator(;)
+reserved(function) ident(HexOfByte)operator(()ident(b)operator(:) ident(Byte)operator(\))operator(:) ident(THexByteStr)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(HexChar)operator([()ident(b) reserved(and) hex($F0)operator(\)) reserved(shr) integer(4)operator(])
-          operator(+) ident(HexChar)operator([) ident(b) reserved(and) hex($0F)       operator(];)
+  ident(Result) operator(:=) ident(HexChar)operator([)operator(()ident(b) reserved(and) hex($F0)operator(\)) reserved(shr) integer(4)operator(])
+          operator(+) ident(HexChar)operator([) ident(b) reserved(and) hex($0F)       operator(])operator(;)
 reserved(end)operator(;)
 
 comment({function HexOfCard2(c: Cardinal\): string;
@@ -1841,7 +1841,7 @@ begin
           + Data[(c and (((1 shl (1 shl 2\)\) - 1\) shl (0 shl 2\)\)\) shr (0 shl 2\)];
 end; })
 
-reserved(function) ident(HexOfCard)operator(()ident(i)operator(:) ident(Cardinal)operator(\):) reserved(string)operator(;)
+reserved(function) ident(HexOfCard)operator(()ident(i)operator(:) ident(Cardinal)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(a)operator(:) ident(Cardinal)operator(;)
 reserved(begin)
@@ -1853,7 +1853,7 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(HexOfCard)operator(()ident(i)operator(:) ident(Cardinal)operator(;) ident(Digits)operator(:) ident(Integer)operator(\):) reserved(string)operator(;)
+reserved(function) ident(HexOfCard)operator(()ident(i)operator(:) ident(Cardinal)operator(;) ident(Digits)operator(:) ident(Integer)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(a)operator(:) ident(Cardinal)operator(;)
 reserved(begin)
@@ -1863,21 +1863,21 @@ reserved(begin)
     ident(Result) operator(:=) ident(HexChar)operator([)ident(a)operator(]) operator(+) ident(Result)operator(;)
     ident(i) operator(:=) ident(i) reserved(shr) integer(4)operator(;)
   reserved(end)operator(;)
-  ident(Result) operator(:=) ident(MulStr)operator(()char<delimiter(')content(0)delimiter(')>operator(,) ident(Digits) operator(-) ident(Length)operator(()ident(Result)operator(\)\)) operator(+) ident(Result)operator(;)
+  ident(Result) operator(:=) ident(MulStr)operator(()char<delimiter(')content(0)delimiter(')>operator(,) ident(Digits) operator(-) ident(Length)operator(()ident(Result)operator(\))operator(\)) operator(+) ident(Result)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(PascalHexArray)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(Name)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(PascalHexArray)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(Name)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(i)operator(,) ident(len)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')content(const)delimiter(')> operator(+) ident(EOL) operator(+)
-    string<delimiter(')content(  )delimiter(')> operator(+) ident(Name) operator(+) string<delimiter(')content(: array[0..)delimiter(')> operator(+) ident(IntToStr)operator(()ident(High)operator(()ident(a)operator(\)\)) operator(+) string<delimiter(')content(] of Byte = ()delimiter(')>operator(;)
+    string<delimiter(')content(  )delimiter(')> operator(+) ident(Name) operator(+) string<delimiter(')content(: array[0..)delimiter(')> operator(+) ident(IntToStr)operator(()ident(High)operator(()ident(a)operator(\))operator(\)) operator(+) string<delimiter(')content(] of Byte = ()delimiter(')>operator(;)
 
-  ident(len) operator(:=) ident(Length)operator(()ident(a)operator(\);)
+  ident(len) operator(:=) ident(Length)operator(()ident(a)operator(\))operator(;)
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(len)operator(-)integer(1) reserved(do) reserved(begin)
     reserved(if) operator(()ident(i) reserved(mod) integer(19)operator(\)) operator(=) integer(0) reserved(then)
       ident(Result) operator(:=) ident(Result) operator(+) ident(EOL) operator(+) string<delimiter(')content(  )delimiter(')> operator(+) string<delimiter(')content(  )delimiter(')>operator(;)
-    ident(Result) operator(:=) ident(Result) operator(+) char<delimiter(')content($)delimiter(')> operator(+) ident(HexOfByte)operator(()ident(a)operator([)ident(i)operator(]\);)
+    ident(Result) operator(:=) ident(Result) operator(+) char<delimiter(')content($)delimiter(')> operator(+) ident(HexOfByte)operator(()ident(a)operator([)ident(i)operator(])operator(\))operator(;)
     reserved(if) ident(i) operator(<) ident(len)operator(-)integer(1) reserved(then)
       ident(Result) operator(:=) ident(Result) operator(+) char<delimiter(')content(,)delimiter(')>operator(;)
   reserved(end)operator(;)
@@ -1885,7 +1885,7 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(function) ident(HexOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(Blocks)operator(:) ident(Integer) operator(=) integer(1)operator(;)
-  reserved(const) ident(Splitter)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;)
+  reserved(const) ident(Splitter)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -1893,18 +1893,18 @@ reserved(begin)
 
   reserved(if) ident(Blocks) operator(>) integer(0) reserved(then)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(a)operator(\)) reserved(do) reserved(begin)
-      ident(Result) operator(:=) ident(Result) operator(+) ident(HexOfByte)operator(()ident(a)operator([)ident(i)operator(]\);)
+      ident(Result) operator(:=) ident(Result) operator(+) ident(HexOfByte)operator(()ident(a)operator([)ident(i)operator(])operator(\))operator(;)
       reserved(if) ident(i) operator(<) ident(High)operator(()ident(a)operator(\)) reserved(then)
-        reserved(if) operator((()ident(i)operator(+)integer(1)operator(\)) reserved(mod) ident(Blocks)operator(\)) operator(=) integer(0) reserved(then)
+        reserved(if) operator(()operator(()ident(i)operator(+)integer(1)operator(\)) reserved(mod) ident(Blocks)operator(\)) operator(=) integer(0) reserved(then)
           ident(Result) operator(:=) ident(Result) operator(+) ident(Splitter)operator(;)
     reserved(end)
   reserved(else)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(a)operator(\)) reserved(do)
-      ident(Result) operator(:=) ident(Result) operator(+) ident(HexOfByte)operator(()ident(a)operator([)ident(i)operator(]\);)
+      ident(Result) operator(:=) ident(Result) operator(+) ident(HexOfByte)operator(()ident(a)operator([)ident(i)operator(])operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(BinOfByteA)operator(()ident(a)operator(:) ident(TByteA)operator(;) ident(Blocks)operator(:) ident(Integer) operator(=) integer(4)operator(;)
-  reserved(const) ident(Splitter)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\):) reserved(string)operator(;)
+  reserved(const) ident(Splitter)operator(:) reserved(string) operator(=) char<delimiter(')content( )delimiter(')>operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(i)operator(,) ident(max)operator(:) ident(Integer)operator(;)
   ident(Bit)operator(:) ident(Boolean)operator(;)
@@ -1912,44 +1912,44 @@ reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
 
   reserved(if) ident(Blocks) operator(>) integer(0) reserved(then) reserved(begin)
-    ident(max) operator(:=) integer(8) operator(*) operator(()ident(High)operator(()ident(a)operator(\)\)) operator(+) integer(7)operator(;)
+    ident(max) operator(:=) integer(8) operator(*) operator(()ident(High)operator(()ident(a)operator(\))operator(\)) operator(+) integer(7)operator(;)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(max) reserved(do) reserved(begin)
-      ident(Bit) operator(:=) integer(7)operator(-()ident(i) reserved(mod) integer(8)operator(\)) reserved(in) ident(TBitSet)operator(()ident(a)operator([)ident(i) reserved(div) integer(8)operator(]\);)
-      ident(Result) operator(:=) ident(Result) operator(+) ident(Char)operator(()ident(Byte)operator(()char<delimiter(')content(0)delimiter(')>operator(\)) operator(+) ident(Byte)operator(()ident(Bit)operator(\)\);)
+      ident(Bit) operator(:=) integer(7)operator(-)operator(()ident(i) reserved(mod) integer(8)operator(\)) reserved(in) ident(TBitSet)operator(()ident(a)operator([)ident(i) reserved(div) integer(8)operator(])operator(\))operator(;)
+      ident(Result) operator(:=) ident(Result) operator(+) ident(Char)operator(()ident(Byte)operator(()char<delimiter(')content(0)delimiter(')>operator(\)) operator(+) ident(Byte)operator(()ident(Bit)operator(\))operator(\))operator(;)
       reserved(if) ident(i) operator(<) ident(max) reserved(then)
-        reserved(if) operator((()ident(i)operator(+)integer(1)operator(\)) reserved(mod) ident(Blocks)operator(\)) operator(=) integer(0) reserved(then)
+        reserved(if) operator(()operator(()ident(i)operator(+)integer(1)operator(\)) reserved(mod) ident(Blocks)operator(\)) operator(=) integer(0) reserved(then)
           ident(Result) operator(:=) ident(Result) operator(+) ident(Splitter)operator(;)
     reserved(end)operator(;)
   reserved(end) reserved(else)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(High)operator(()ident(a)operator(\)) reserved(do)
-      ident(Result) operator(:=) ident(Result) operator(+) ident(Char)operator(()ident(Byte)operator(()char<delimiter(')content(0)delimiter(')>operator(\)) operator(+) ident(a)operator([)ident(i)operator(]) reserved(shr) operator(()ident(i) reserved(and) integer(8)operator(\)\);)
+      ident(Result) operator(:=) ident(Result) operator(+) ident(Char)operator(()ident(Byte)operator(()char<delimiter(')content(0)delimiter(')>operator(\)) operator(+) ident(a)operator([)ident(i)operator(]) reserved(shr) operator(()ident(i) reserved(and) integer(8)operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(CardOfHex)operator(()ident(Hex)operator(:) reserved(string)operator(\):) ident(Cardinal)operator(;)
+reserved(function) ident(CardOfHex)operator(()ident(Hex)operator(:) reserved(string)operator(\))operator(:) ident(Cardinal)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) integer(0)operator(;)
-  ident(Hex) operator(:=) ident(Copy)operator(()ident(ExtractChars)operator(()ident(Hex)operator(,) ident(HexadecimalChars)operator(\),) integer(1)operator(,) integer(8)operator(\);)
+  ident(Hex) operator(:=) ident(Copy)operator(()ident(ExtractChars)operator(()ident(Hex)operator(,) ident(HexadecimalChars)operator(\))operator(,) integer(1)operator(,) integer(8)operator(\))operator(;)
 
   reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(Length)operator(()ident(Hex)operator(\)) reserved(do)
     reserved(if) ident(Hex)operator([)ident(i)operator(]) operator(<>) char<delimiter(')content(0)delimiter(')> reserved(then)
-      ident(Inc)operator(()ident(Result)operator(,) ident(HexOrd)operator(()ident(Hex)operator([)ident(i)operator(]\)) reserved(shl) operator((()ident(Length)operator(()ident(Hex)operator(\)) operator(-) ident(i)operator(\)) reserved(shl) integer(2)operator(\)\);)
+      ident(Inc)operator(()ident(Result)operator(,) ident(HexOrd)operator(()ident(Hex)operator([)ident(i)operator(])operator(\)) reserved(shl) operator(()operator(()ident(Length)operator(()ident(Hex)operator(\)) operator(-) ident(i)operator(\)) reserved(shl) integer(2)operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(IntOfBin)operator(()ident(Bin)operator(:) reserved(string)operator(\):) ident(Cardinal)operator(;)
+reserved(function) ident(IntOfBin)operator(()ident(Bin)operator(:) reserved(string)operator(\))operator(:) ident(Cardinal)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) integer(0)operator(;)
-  ident(Bin) operator(:=) ident(Copy)operator(()ident(ExtractChars)operator(()ident(Bin)operator(,) ident(BinaryChars)operator(\),) integer(1)operator(,) integer(32)operator(\);)
+  ident(Bin) operator(:=) ident(Copy)operator(()ident(ExtractChars)operator(()ident(Bin)operator(,) ident(BinaryChars)operator(\))operator(,) integer(1)operator(,) integer(32)operator(\))operator(;)
 
   reserved(for) ident(i) operator(:=) ident(Length)operator(()ident(Bin)operator(\)) reserved(downto) integer(1) reserved(do)
     reserved(if) ident(Bin)operator([)ident(i)operator(]) operator(=) char<delimiter(')content(1)delimiter(')> reserved(then)
-      ident(Inc)operator(()ident(Result)operator(,) integer(1) reserved(shl) operator(()ident(Length)operator(()ident(Bin)operator(\)) operator(-) ident(i)operator(\)\);)
+      ident(Inc)operator(()ident(Result)operator(,) integer(1) reserved(shl) operator(()ident(Length)operator(()ident(Bin)operator(\)) operator(-) ident(i)operator(\))operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(BinOfInt)operator(()ident(n)operator(:) ident(Cardinal)operator(\):) reserved(string)operator(;)
+reserved(function) ident(BinOfInt)operator(()ident(n)operator(:) ident(Cardinal)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(a)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -1960,29 +1960,29 @@ reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
   reserved(while) ident(n) operator(>) integer(0) reserved(do) reserved(begin)
     ident(a) operator(:=) ident(n) reserved(and) integer(1)operator(;)
-    ident(Result) operator(:=) ident(Char)operator(()ident(a) operator(+) ident(Byte)operator(()char<delimiter(')content(0)delimiter(')>operator(\)\)) operator(+) ident(Result)operator(;)
+    ident(Result) operator(:=) ident(Char)operator(()ident(a) operator(+) ident(Byte)operator(()char<delimiter(')content(0)delimiter(')>operator(\))operator(\)) operator(+) ident(Result)operator(;)
     ident(n) operator(:=) ident(n) reserved(shr) integer(1)operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(BinOfIntFill)operator(()ident(n)operator(:) ident(Cardinal)operator(;) ident(MinCount)operator(:) ident(Integer) operator(=) integer(8)operator(\):) reserved(string)operator(;)
+reserved(function) ident(BinOfIntFill)operator(()ident(n)operator(:) ident(Cardinal)operator(;) ident(MinCount)operator(:) ident(Integer) operator(=) integer(8)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(a)operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(if) ident(n) operator(=) integer(0) reserved(then) reserved(begin)
-    ident(Result) operator(:=) ident(MulStr)operator(()char<delimiter(')content(0)delimiter(')>operator(,) ident(MinCount)operator(\);)
+    ident(Result) operator(:=) ident(MulStr)operator(()char<delimiter(')content(0)delimiter(')>operator(,) ident(MinCount)operator(\))operator(;)
   ident(Exit)operator(;) reserved(end)operator(;)
 
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
   reserved(while) ident(n) operator(>) integer(0) reserved(do) reserved(begin)
     ident(a) operator(:=) ident(n) reserved(and) integer(1)operator(;)
-    ident(Result) operator(:=) ident(Char)operator(()ident(a) operator(+) ident(Byte)operator(()char<delimiter(')content(0)delimiter(')>operator(\)\)) operator(+) ident(Result)operator(;)
+    ident(Result) operator(:=) ident(Char)operator(()ident(a) operator(+) ident(Byte)operator(()char<delimiter(')content(0)delimiter(')>operator(\))operator(\)) operator(+) ident(Result)operator(;)
     ident(n) operator(:=) ident(n) reserved(shr) integer(1)operator(;)
   reserved(end)operator(;)
-  ident(Result) operator(:=) ident(MulStr)operator(()char<delimiter(')content(0)delimiter(')>operator(,) ident(MinCount) operator(-) ident(Length)operator(()ident(Result)operator(\)\)) operator(+) ident(Result)operator(;)
+  ident(Result) operator(:=) ident(MulStr)operator(()char<delimiter(')content(0)delimiter(')>operator(,) ident(MinCount) operator(-) ident(Length)operator(()ident(Result)operator(\))operator(\)) operator(+) ident(Result)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(BaseNOfInt)operator(()ident(I)operator(:) ident(Cardinal)operator(;) ident(B)operator(:) ident(TBaseN)operator(\):) reserved(string)operator(;)
+reserved(function) ident(BaseNOfInt)operator(()ident(I)operator(:) ident(Cardinal)operator(;) ident(B)operator(:) ident(TBaseN)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(a)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -1998,17 +1998,17 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(IntOfBaseN)operator(()ident(V)operator(:) reserved(string)operator(;) ident(B)operator(:) ident(TBaseN)operator(\):) ident(Cardinal)operator(;)
+reserved(function) ident(IntOfBaseN)operator(()ident(V)operator(:) reserved(string)operator(;) ident(B)operator(:) ident(TBaseN)operator(\))operator(:) ident(Cardinal)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
   ident(F)operator(:) ident(Cardinal)operator(;)
   ident(c)operator(:) ident(Byte)operator(;)
 reserved(begin)
   ident(Result) operator(:=) integer(0)operator(;)
-  ident(V) operator(:=) ident(TrimAll)operator(()ident(V)operator(\);)
+  ident(V) operator(:=) ident(TrimAll)operator(()ident(V)operator(\))operator(;)
   ident(F) operator(:=) integer(1)operator(;)
   reserved(for) ident(i) operator(:=) ident(Length)operator(()ident(V)operator(\)) reserved(downto) integer(1) reserved(do) reserved(begin)
-    ident(c) operator(:=) ident(Byte)operator(()ident(UpCase)operator(()ident(V)operator([)ident(i)operator(]\)\);)
+    ident(c) operator(:=) ident(Byte)operator(()ident(UpCase)operator(()ident(V)operator([)ident(i)operator(])operator(\))operator(\))operator(;)
     reserved(case) ident(Char)operator(()ident(c)operator(\)) reserved(of)
       char<delimiter(')content(0)delimiter(')>operator(..)char<delimiter(')content(9)delimiter(')>operator(:) ident(c) operator(:=) ident(c) operator(-) integer(48)operator(;)
       char<delimiter(')content(A)delimiter(')>operator(..)char<delimiter(')content(Z)delimiter(')>operator(:) ident(c) operator(:=) ident(c) operator(-) integer(55)operator(;)
@@ -2019,7 +2019,7 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(KeepIn)operator(()ident(i)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\):) ident(Variant)operator(;)
+reserved(function) ident(KeepIn)operator(()ident(i)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\))operator(:) ident(Variant)operator(;)
 reserved(begin)
   ident(Result) operator(:=) ident(i)operator(;)
   reserved(if) ident(Result) operator(>) ident(Top) reserved(then)
@@ -2028,17 +2028,17 @@ reserved(begin)
     ident(Result) operator(:=) ident(Bottom)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(InRange)operator(()ident(Value)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(InRange)operator(()ident(Value)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) operator(()ident(Value) operator(>=) ident(Bottom)operator(\)) reserved(and) operator(()ident(Value) operator(<=) ident(Top)operator(\);)
+  ident(Result) operator(:=) operator(()ident(Value) operator(>=) ident(Bottom)operator(\)) reserved(and) operator(()ident(Value) operator(<=) ident(Top)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(InStrictRange)operator(()ident(Value)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(InStrictRange)operator(()ident(Value)operator(,) ident(Bottom)operator(,) ident(Top)operator(:) ident(Variant)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) operator(()ident(Value) operator(>) ident(Bottom)operator(\)) reserved(and) operator(()ident(Value) operator(<) ident(Top)operator(\);)
+  ident(Result) operator(:=) operator(()ident(Value) operator(>) ident(Bottom)operator(\)) reserved(and) operator(()ident(Value) operator(<) ident(Top)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(Min)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(Integer)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(Min)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(Integer)operator(\))operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(if) ident(A) operator(<) ident(B) reserved(then)
     ident(Result) operator(:=) ident(A)
@@ -2046,7 +2046,7 @@ reserved(begin)
     ident(Result) operator(:=) ident(B)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(Min)operator(()reserved(const) ident(A)operator(:) ident(TIntA)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(Min)operator(()reserved(const) ident(A)operator(:) ident(TIntA)operator(\))operator(:) ident(Integer)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -2054,13 +2054,13 @@ reserved(begin)
   reserved(if) ident(Length)operator(()ident(A)operator(\)) operator(=) integer(0) reserved(then)
     ident(Exit)operator(;)
 
-  ident(Result) operator(:=) ident(A)operator([)integer(0)operator(];)
+  ident(Result) operator(:=) ident(A)operator([)integer(0)operator(])operator(;)
   reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(High)operator(()ident(A)operator(\)) reserved(do)
     reserved(if) ident(A)operator([)ident(i)operator(]) operator(<) ident(Result) reserved(then)
-      ident(Result) operator(:=) ident(A)operator([)ident(i)operator(];)
+      ident(Result) operator(:=) ident(A)operator([)ident(i)operator(])operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(Max)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(Integer)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(Max)operator(()reserved(const) ident(A)operator(,) ident(B)operator(:) ident(Integer)operator(\))operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(if) ident(A) operator(>) ident(B) reserved(then)
     ident(Result) operator(:=) ident(A)
@@ -2068,7 +2068,7 @@ reserved(begin)
     ident(Result) operator(:=) ident(B)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(Max)operator(()reserved(const) ident(A)operator(:) ident(TIntA)operator(\):) ident(Integer)operator(;)
+reserved(function) ident(Max)operator(()reserved(const) ident(A)operator(:) ident(TIntA)operator(\))operator(:) ident(Integer)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -2076,23 +2076,23 @@ reserved(begin)
   reserved(if) ident(Length)operator(()ident(A)operator(\)) operator(=) integer(0) reserved(then)
     ident(Exit)operator(;)
 
-  ident(Result) operator(:=) ident(A)operator([)integer(0)operator(];)
+  ident(Result) operator(:=) ident(A)operator([)integer(0)operator(])operator(;)
   reserved(for) ident(i) operator(:=) integer(1) reserved(to) ident(High)operator(()ident(A)operator(\)) reserved(do)
     reserved(if) ident(A)operator([)ident(i)operator(]) operator(>) ident(Result) reserved(then)
-      ident(Result) operator(:=) ident(A)operator([)ident(i)operator(];)
+      ident(Result) operator(:=) ident(A)operator([)ident(i)operator(])operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(RangesOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) ident(TRanges)operator(;)
+reserved(function) ident(RangesOfStr)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) ident(TRanges)operator(;)
 reserved(var)
   ident(SL)operator(:) ident(TStringList)operator(;)
   ident(r)operator(,) ident(b)operator(,) ident(t)operator(:) reserved(string)operator(;)
   ident(i)operator(,) ident(p)operator(:) ident(Integer)operator(;)
 
-  reserved(function) ident(TryStrToCard)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) reserved(out) ident(Value)operator(:) ident(Cardinal)operator(\):) ident(Boolean)operator(;)
+  reserved(function) ident(TryStrToCard)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(;) reserved(out) ident(Value)operator(:) ident(Cardinal)operator(\))operator(:) ident(Boolean)operator(;)
   reserved(var)
     ident(E)operator(:) ident(Integer)operator(;)
   reserved(begin)
-    ident(Val)operator(()ident(S)operator(,) ident(Value)operator(,) ident(E)operator(\);)
+    ident(Val)operator(()ident(S)operator(,) ident(Value)operator(,) ident(E)operator(\))operator(;)
     ident(Result) operator(:=) ident(E) operator(=) integer(0)operator(;)
   reserved(end)operator(;)
 
@@ -2100,23 +2100,23 @@ reserved(begin)
   ident(Result) operator(:=) reserved(nil)operator(;)
   ident(SL) operator(:=) ident(TStringList)operator(.)ident(Create)operator(;)
   reserved(try)
-    ident(Split)operator(()ident(S)operator(,) ident(RangesSeparator)operator(,) ident(SL)operator(\);)
-    ident(SetLength)operator(()ident(Result)operator(,) ident(SL)operator(.)ident(Count)operator(\);)
+    ident(Split)operator(()ident(S)operator(,) ident(RangesSeparator)operator(,) ident(SL)operator(\))operator(;)
+    ident(SetLength)operator(()ident(Result)operator(,) ident(SL)operator(.)ident(Count)operator(\))operator(;)
     reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(SL)operator(.)ident(Count)operator(-)integer(1) reserved(do) reserved(begin)
-      ident(r) operator(:=) ident(SL)operator([)ident(i)operator(];)
+      ident(r) operator(:=) ident(SL)operator([)ident(i)operator(])operator(;)
       reserved(with) ident(Result)operator([)ident(i)operator(]) reserved(do) reserved(begin)
-        ident(p) operator(:=) ident(CharPos)operator(()ident(RangeInnerSeparator)operator(,) ident(r)operator(\);)
+        ident(p) operator(:=) ident(CharPos)operator(()ident(RangeInnerSeparator)operator(,) ident(r)operator(\))operator(;)
         ident(Simple) operator(:=) ident(p) operator(=) integer(0)operator(;) comment(// no '-' found)
         reserved(if) ident(Simple) reserved(then) reserved(begin)
           reserved(if) ident(r) operator(=) ident(RangeInfinite) reserved(then) reserved(begin) comment(// * --> *-*)
             ident(Simple) operator(:=) ident(False)operator(;)
-            ident(Bottom) operator(:=) ident(Low)operator(()ident(Bottom)operator(\);)
-            ident(Top) operator(:=) ident(High)operator(()ident(Top)operator(\);)
+            ident(Bottom) operator(:=) ident(Low)operator(()ident(Bottom)operator(\))operator(;)
+            ident(Top) operator(:=) ident(High)operator(()ident(Top)operator(\))operator(;)
           reserved(end) reserved(else) reserved(if) reserved(not) ident(TryStrToCard)operator(()ident(r)operator(,) ident(Value)operator(\)) reserved(then)
             ident(Break)operator(;)
 
         reserved(end) reserved(else) reserved(begin)
-          ident(TileStr)operator(()ident(r)operator(,) ident(p)operator(,) ident(p)operator(,) ident(b)operator(,) ident(t)operator(\);)
+          ident(TileStr)operator(()ident(r)operator(,) ident(p)operator(,) ident(p)operator(,) ident(b)operator(,) ident(t)operator(\))operator(;)
 
           reserved(if) ident(b) operator(=) ident(RangeInfinite) reserved(then)
             ident(Bottom) operator(:=) ident(Low)operator(()ident(Bottom)operator(\))
@@ -2142,7 +2142,7 @@ reserved(begin)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(InRanges)operator(()ident(Ranges)operator(:) ident(TRanges)operator(;) ident(TestValue)operator(:) ident(Cardinal)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(InRanges)operator(()ident(Ranges)operator(:) ident(TRanges)operator(;) ident(TestValue)operator(:) ident(Cardinal)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
@@ -2162,219 +2162,219 @@ reserved(begin)
 reserved(end)operator(;)
 
 reserved(procedure) ident(WriteSL)operator(()ident(Strings)operator(:) ident(TStrings)operator(;) reserved(const) ident(Prefix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(;)
-  reserved(const) ident(Suffix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\);)
+  reserved(const) ident(Suffix)operator(:) reserved(string) operator(=) string<delimiter(')delimiter(')>operator(\))operator(;)
 reserved(var)
   ident(i)operator(:) ident(Integer)operator(;)
 reserved(begin)
   reserved(for) ident(i) operator(:=) integer(0) reserved(to) ident(Strings)operator(.)ident(Count)operator(-)integer(1) reserved(do)
-    ident(WriteLn)operator(()ident(Prefix) operator(+) ident(Strings)operator([)ident(i)operator(]) operator(+) ident(Suffix)operator(\);)
+    ident(WriteLn)operator(()ident(Prefix) operator(+) ident(Strings)operator([)ident(i)operator(]) operator(+) ident(Suffix)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(Success)operator(()ident(Res)operator(:) ident(Integer)operator(;) ident(ResultOnSuccess)operator(:) ident(Integer) operator(=) ident(ERROR_SUCCESS)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(Success)operator(()ident(Res)operator(:) ident(Integer)operator(;) ident(ResultOnSuccess)operator(:) ident(Integer) operator(=) ident(ERROR_SUCCESS)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) operator(()ident(Res) operator(=) ident(ResultOnSuccess)operator(\);)
+  ident(Result) operator(:=) operator(()ident(Res) operator(=) ident(ResultOnSuccess)operator(\))operator(;)
   ident(LastSuccessRes) operator(:=) ident(Res)operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(Failure)operator(()ident(Res)operator(:) ident(Integer)operator(;) ident(ResultOnSuccess)operator(:) ident(Integer) operator(=) ident(ERROR_SUCCESS)operator(\):) ident(Boolean)operator(;)
+reserved(function) ident(Failure)operator(()ident(Res)operator(:) ident(Integer)operator(;) ident(ResultOnSuccess)operator(:) ident(Integer) operator(=) ident(ERROR_SUCCESS)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(begin)
-  ident(Result) operator(:=) reserved(not) ident(Success)operator(()ident(Res)operator(,) ident(ResultOnSuccess)operator(\);)
+  ident(Result) operator(:=) reserved(not) ident(Success)operator(()ident(Res)operator(,) ident(ResultOnSuccess)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(ExpandString)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\):) reserved(string)operator(;)
+reserved(function) ident(ExpandString)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(Len)operator(:) ident(Integer)operator(;)
   ident(P)operator(,) ident(Res)operator(:) ident(PChar)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
-  ident(P) operator(:=) ident(PChar)operator(()ident(S)operator(\);)
-  ident(Len) operator(:=) ident(ExpandEnvironmentStrings)operator(()ident(P)operator(,) reserved(nil)operator(,) integer(0)operator(\);)
+  ident(P) operator(:=) ident(PChar)operator(()ident(S)operator(\))operator(;)
+  ident(Len) operator(:=) ident(ExpandEnvironmentStrings)operator(()ident(P)operator(,) reserved(nil)operator(,) integer(0)operator(\))operator(;)
   reserved(if) ident(Len) operator(=) integer(0) reserved(then)
     ident(Exit)operator(;)
 
-  ident(GetMem)operator(()ident(Res)operator(,) ident(Len)operator(\);)
-  ident(ExpandEnvironmentStrings)operator(()ident(P)operator(,) ident(Res)operator(,) ident(Len)operator(\);)
+  ident(GetMem)operator(()ident(Res)operator(,) ident(Len)operator(\))operator(;)
+  ident(ExpandEnvironmentStrings)operator(()ident(P)operator(,) ident(Res)operator(,) ident(Len)operator(\))operator(;)
 
   ident(Result) operator(:=) ident(Res)operator(;)
-  ident(FreeMem)operator(()ident(Res)operator(,) ident(Len)operator(\);)
+  ident(FreeMem)operator(()ident(Res)operator(,) ident(Len)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(FindAll)operator(()ident(Strings)operator(:) ident(TStrings)operator(;) reserved(const) ident(Mask)operator(:) reserved(string)operator(;)
   ident(ScanSubDirs)operator(:) ident(Boolean) operator(=) ident(True)operator(;) ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(;)
-  ident(FileReturn)operator(:) ident(TFileNameFunc) operator(=) reserved(nil)operator(\):) ident(Boolean)operator(;)
+  ident(FileReturn)operator(:) ident(TFileNameFunc) operator(=) reserved(nil)operator(\))operator(:) ident(Boolean)operator(;)
 reserved(var)
   ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(;)
 
-  reserved(procedure) ident(ScanDir)operator(()reserved(const) ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(\);)
+  reserved(procedure) ident(ScanDir)operator(()reserved(const) ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(\))operator(;)
   reserved(var)
     ident(PSR)operator(:) ident(TSearchRec)operator(;)
     ident(Res)operator(:) ident(Integer)operator(;)
 
-    reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\);)
+    reserved(procedure) ident(Add)operator(()reserved(const) ident(S)operator(:) reserved(string)operator(\))operator(;)
     reserved(begin)
       reserved(if) ident(S) operator(<>) string<delimiter(')delimiter(')> reserved(then)
-        ident(Strings)operator(.)ident(Add)operator(()ident(S)operator(\);)
+        ident(Strings)operator(.)ident(Add)operator(()ident(S)operator(\))operator(;)
     reserved(end)operator(;)
 
   reserved(begin)
-    ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) ident(FileName)operator(,) ident(Attributes)operator(,) ident(PSR)operator(\);)
+    ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) ident(FileName)operator(,) ident(Attributes)operator(,) ident(PSR)operator(\))operator(;)
     reserved(while) ident(Success)operator(()ident(Res)operator(,) integer(0)operator(\)) reserved(do) reserved(begin)
       reserved(if) ident(Assigned)operator(()ident(FileReturn)operator(\)) reserved(then)
-        ident(Add)operator(()ident(FileReturn)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\)\))
+        ident(Add)operator(()ident(FileReturn)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\))operator(\))
       reserved(else)
-        ident(Add)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\);)
-      ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\);)
+        ident(Add)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\))operator(;)
+      ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\))operator(;)
     reserved(end)operator(;)
-    ident(FindClose)operator(()ident(PSR)operator(\);)
+    ident(FindClose)operator(()ident(PSR)operator(\))operator(;)
     reserved(if) reserved(not) ident(ScanSubDirs) reserved(then)
       ident(Exit)operator(;)
 
-    ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) char<delimiter(')content(*)delimiter(')>operator(,) ident(faDirectory)operator(,) ident(PSR)operator(\);)
+    ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) char<delimiter(')content(*)delimiter(')>operator(,) ident(faDirectory)operator(,) ident(PSR)operator(\))operator(;)
     reserved(while) ident(Success)operator(()ident(Res)operator(,) integer(0)operator(\)) reserved(do) reserved(begin)
       reserved(if) operator(()ident(PSR)operator(.)ident(Attr) reserved(and) ident(faDirectory) operator(>) integer(0)operator(\))
        reserved(and) operator(()ident(PSR)operator(.)ident(Name) operator(<>) char<delimiter(')content(.)delimiter(')>operator(\)) reserved(and) operator(()ident(PSR)operator(.)ident(Name) operator(<>) string<delimiter(')content(..)delimiter(')>operator(\)) reserved(then)
-        ident(ScanDir)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name) operator(+) char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(\);)
-      ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\);)
+        ident(ScanDir)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name) operator(+) char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(\))operator(;)
+      ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\))operator(;)
     reserved(end)operator(;)
-    ident(FindClose)operator(()ident(PSR)operator(\);)
+    ident(FindClose)operator(()ident(PSR)operator(\))operator(;)
   reserved(end)operator(;)
 
 reserved(begin)
   ident(Strings)operator(.)ident(Clear)operator(;)
-  ident(Path) operator(:=) ident(ExtractPath)operator(()ident(Mask)operator(\);)
-  ident(FileName) operator(:=) ident(ExtractFileName)operator(()ident(Mask)operator(\);)
-  ident(ScanDir)operator(()ident(Path)operator(,) ident(FileName)operator(\);)
+  ident(Path) operator(:=) ident(ExtractPath)operator(()ident(Mask)operator(\))operator(;)
+  ident(FileName) operator(:=) ident(ExtractFileName)operator(()ident(Mask)operator(\))operator(;)
+  ident(ScanDir)operator(()ident(Path)operator(,) ident(FileName)operator(\))operator(;)
   ident(Result) operator(:=) ident(Strings)operator(.)ident(Count) operator(>) integer(0)operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(FindAllFirst)operator(()reserved(const) ident(Mask)operator(:) reserved(string)operator(;) ident(ScanSubDirs)operator(:) ident(Boolean) operator(=) ident(True)operator(;)
-  ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(\):) reserved(string)operator(;)
+  ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(;)
 
-  reserved(function) ident(ScanDir)operator(()reserved(const) ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(\):) ident(Boolean)operator(;)
+  reserved(function) ident(ScanDir)operator(()reserved(const) ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(\))operator(:) ident(Boolean)operator(;)
   reserved(var)
     ident(PSR)operator(:) ident(TSearchRec)operator(;)
     ident(Res)operator(:) ident(Integer)operator(;)
   reserved(begin)
     ident(Result) operator(:=) ident(False)operator(;)
-    reserved(if) ident(Success)operator(()ident(FindFirst)operator(()ident(Path) operator(+) ident(FileName)operator(,) ident(Attributes)operator(,) ident(PSR)operator(\),) integer(0)operator(\)) reserved(then) reserved(begin)
+    reserved(if) ident(Success)operator(()ident(FindFirst)operator(()ident(Path) operator(+) ident(FileName)operator(,) ident(Attributes)operator(,) ident(PSR)operator(\))operator(,) integer(0)operator(\)) reserved(then) reserved(begin)
       ident(FindAllFirst) operator(:=) ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(;)
       ident(Result) operator(:=) ident(True)operator(;)
-      ident(FindClose)operator(()ident(PSR)operator(\);)
+      ident(FindClose)operator(()ident(PSR)operator(\))operator(;)
     ident(Exit)operator(;) reserved(end)operator(;)
     reserved(if) reserved(not) ident(ScanSubDirs) reserved(then)
       ident(Exit)operator(;)
 
-    ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) char<delimiter(')content(*)delimiter(')>operator(,) ident(faDirectory)operator(,) ident(PSR)operator(\);)
+    ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) char<delimiter(')content(*)delimiter(')>operator(,) ident(faDirectory)operator(,) ident(PSR)operator(\))operator(;)
     reserved(while) reserved(not) ident(Result) reserved(and) ident(Success)operator(()ident(Res)operator(,) integer(0)operator(\)) reserved(do) reserved(begin)
       reserved(if) operator(()ident(PSR)operator(.)ident(Attr) reserved(and) ident(faDirectory) operator(>) integer(0)operator(\))
        reserved(and) operator(()ident(PSR)operator(.)ident(Name) operator(<>) char<delimiter(')content(.)delimiter(')>operator(\)) reserved(and) operator(()ident(PSR)operator(.)ident(Name) operator(<>) string<delimiter(')content(..)delimiter(')>operator(\)) reserved(then)
-        ident(Result) operator(:=) ident(ScanDir)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name) operator(+) char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(\);)
-      ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\);)
+        ident(Result) operator(:=) ident(ScanDir)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name) operator(+) char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(\))operator(;)
+      ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\))operator(;)
     reserved(end)operator(;)
-    ident(FindClose)operator(()ident(PSR)operator(\);)
+    ident(FindClose)operator(()ident(PSR)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
-  ident(Path) operator(:=) ident(ExtractPath)operator(()ident(Mask)operator(\);)
-  ident(FileName) operator(:=) ident(ExtractFileName)operator(()ident(Mask)operator(\);)
-  ident(ScanDir)operator(()ident(Path)operator(,) ident(FileName)operator(\);)
+  ident(Path) operator(:=) ident(ExtractPath)operator(()ident(Mask)operator(\))operator(;)
+  ident(FileName) operator(:=) ident(ExtractFileName)operator(()ident(Mask)operator(\))operator(;)
+  ident(ScanDir)operator(()ident(Path)operator(,) ident(FileName)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(procedure) ident(DeleteFiles)operator(()reserved(const) ident(Mask)operator(:) reserved(string)operator(;) ident(ScanSubDirs)operator(:) ident(Boolean) operator(=) ident(True)operator(;)
-  ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(\);)
+  ident(Attributes)operator(:) ident(Integer) operator(=) ident(faFindEveryFile)operator(\))operator(;)
 reserved(var)
   ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(;)
 
-  reserved(procedure) ident(ScanDir)operator(()reserved(const) ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(\);)
+  reserved(procedure) ident(ScanDir)operator(()reserved(const) ident(Path)operator(,) ident(FileName)operator(:) reserved(string)operator(\))operator(;)
   reserved(var)
     ident(PSR)operator(:) ident(TSearchRec)operator(;)
     ident(Res)operator(:) ident(Integer)operator(;)
 
-    reserved(procedure) ident(TryDeleteFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\);)
+    reserved(procedure) ident(TryDeleteFile)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(;)
     reserved(begin)
       reserved(try)
-        ident(DeleteFile)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\);)
+        ident(DeleteFile)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\))operator(;)
       reserved(except)
       reserved(end)operator(;)
     reserved(end)operator(;)
 
   reserved(begin)
-    ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) ident(FileName)operator(,) ident(Attributes)operator(,) ident(PSR)operator(\);)
+    ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) ident(FileName)operator(,) ident(Attributes)operator(,) ident(PSR)operator(\))operator(;)
     reserved(while) ident(Success)operator(()ident(Res)operator(,) integer(0)operator(\)) reserved(do) reserved(begin)
-      ident(TryDeleteFile)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\);)
-      ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\);)
+      ident(TryDeleteFile)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\))operator(;)
+      ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\))operator(;)
     reserved(end)operator(;)
-    ident(FindClose)operator(()ident(PSR)operator(\);)
+    ident(FindClose)operator(()ident(PSR)operator(\))operator(;)
     reserved(if) reserved(not) ident(ScanSubDirs) reserved(then)
       ident(Exit)operator(;)
 
-    ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) char<delimiter(')content(*)delimiter(')>operator(,) ident(faDirectory)operator(,) ident(PSR)operator(\);)
+    ident(Res) operator(:=) ident(FindFirst)operator(()ident(Path) operator(+) char<delimiter(')content(*)delimiter(')>operator(,) ident(faDirectory)operator(,) ident(PSR)operator(\))operator(;)
     reserved(while) ident(Success)operator(()ident(Res)operator(,) integer(0)operator(\)) reserved(do) reserved(begin)
       reserved(if) operator(()ident(PSR)operator(.)ident(Attr) reserved(and) ident(faDirectory) operator(>) integer(0)operator(\))
        reserved(and) operator(()ident(PSR)operator(.)ident(Name) operator(<>) char<delimiter(')content(.)delimiter(')>operator(\)) reserved(and) operator(()ident(PSR)operator(.)ident(Name) operator(<>) string<delimiter(')content(..)delimiter(')>operator(\)) reserved(then) reserved(begin)
-        ident(ScanDir)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name) operator(+) char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(\);)
-        ident(TryDeleteFile)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\);)
+        ident(ScanDir)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name) operator(+) char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(\))operator(;)
+        ident(TryDeleteFile)operator(()ident(Path) operator(+) ident(PSR)operator(.)ident(Name)operator(\))operator(;)
       reserved(end)operator(;)
-      ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\);)
+      ident(Res) operator(:=) ident(FindNext)operator(()ident(PSR)operator(\))operator(;)
     reserved(end)operator(;)
-    ident(FindClose)operator(()ident(PSR)operator(\);)
+    ident(FindClose)operator(()ident(PSR)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(begin)
-  ident(Path) operator(:=) ident(ExtractPath)operator(()ident(Mask)operator(\);)
-  ident(FileName) operator(:=) ident(ExtractFileName)operator(()ident(Mask)operator(\);)
-  ident(ScanDir)operator(()ident(Path)operator(,) ident(FileName)operator(\);)
+  ident(Path) operator(:=) ident(ExtractPath)operator(()ident(Mask)operator(\))operator(;)
+  ident(FileName) operator(:=) ident(ExtractFileName)operator(()ident(Mask)operator(\))operator(;)
+  ident(ScanDir)operator(()ident(Path)operator(,) ident(FileName)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(GetFileNew)operator(()ident(FileName)operator(:) reserved(string)operator(;) ident(NoFloppyDrives)operator(:) ident(Boolean) operator(=) ident(True)operator(\):) reserved(string)operator(;)
+reserved(function) ident(GetFileNew)operator(()ident(FileName)operator(:) reserved(string)operator(;) ident(NoFloppyDrives)operator(:) ident(Boolean) operator(=) ident(True)operator(\))operator(:) reserved(string)operator(;)
 reserved(var)
   ident(Drive)operator(:) reserved(string)operator(;)
   ident(pf)operator(,) ident(pd)operator(,) ident(Len)operator(:) ident(Integer)operator(;)
   ident(PSR)operator(:) ident(TSearchRec)operator(;)
 reserved(begin)
   ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
-  ident(FileName) operator(:=) ident(Trim)operator(()ident(FileName)operator(\);)
+  ident(FileName) operator(:=) ident(Trim)operator(()ident(FileName)operator(\))operator(;)
   reserved(if) ident(Length)operator(()ident(FileName)operator(\)) operator(<) integer(2) reserved(then)
     ident(Exit)operator(;)
 
-  ident(Drive) operator(:=) ident(ExtractDrive)operator(()ident(FileName)operator(\);)
+  ident(Drive) operator(:=) ident(ExtractDrive)operator(()ident(FileName)operator(\))operator(;)
   reserved(if) reserved(not) ident(DirectoryExists)operator(()ident(Drive)operator(\)) reserved(then)
     ident(Exit)operator(;)
 
-  reserved(if) ident(NoFloppyDrives) reserved(and) operator(()ident(Drive)operator([)integer(1)operator(]) reserved(in) operator([)char<delimiter(')content(A)delimiter(')>operator(,) char<delimiter(')content(B)delimiter(')>operator(]\)) reserved(then)
+  reserved(if) ident(NoFloppyDrives) reserved(and) operator(()ident(Drive)operator([)integer(1)operator(]) reserved(in) operator([)char<delimiter(')content(A)delimiter(')>operator(,) char<delimiter(')content(B)delimiter(')>operator(])operator(\)) reserved(then)
     ident(Exit)operator(;)
 
-  ident(Len) operator(:=) ident(Length)operator(()ident(FileName)operator(\);)
+  ident(Len) operator(:=) ident(Length)operator(()ident(FileName)operator(\))operator(;)
   ident(Result) operator(:=) ident(Drive)operator(;)
   ident(pf) operator(:=) ident(Length)operator(()ident(Drive)operator(\)) operator(+) integer(1)operator(;)
   reserved(while) ident(pf) operator(<=) ident(Len) reserved(do) reserved(begin)
     reserved(if) ident(FileName)operator([)ident(pf)operator(]) operator(=) char<delimiter(')content(\\)delimiter(')> reserved(then) reserved(begin)
       ident(Result) operator(:=) ident(Result) operator(+) char<delimiter(')content(\\)delimiter(')>operator(;)
-      ident(Inc)operator(()ident(pf)operator(\);)
+      ident(Inc)operator(()ident(pf)operator(\))operator(;)
     ident(Continue)operator(;) reserved(end)operator(;)
 
-    ident(pd) operator(:=) ident(CharPos)operator(()char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(,) ident(pf)operator(\);)
+    ident(pd) operator(:=) ident(CharPos)operator(()char<delimiter(')content(\\)delimiter(')>operator(,) ident(FileName)operator(,) ident(pf)operator(\))operator(;)
     reserved(if) ident(pd) operator(=) integer(0) reserved(then) reserved(begin)
-      reserved(if) integer(0)operator(=)ident(FindFirst)operator(()ident(Result) operator(+) ident(Copy)operator(()ident(FileName)operator(,) ident(pf)operator(,) ident(MaxInt)operator(\),) ident(faFindEveryFile)operator(,) ident(PSR)operator(\)) reserved(then) reserved(begin)
+      reserved(if) integer(0)operator(=)ident(FindFirst)operator(()ident(Result) operator(+) ident(Copy)operator(()ident(FileName)operator(,) ident(pf)operator(,) ident(MaxInt)operator(\))operator(,) ident(faFindEveryFile)operator(,) ident(PSR)operator(\)) reserved(then) reserved(begin)
         ident(Result) operator(:=) ident(Result) operator(+) ident(PSR)operator(.)ident(Name)operator(;)
       ident(Break)operator(;) reserved(end) reserved(else) reserved(begin)
-        ident(FindClose)operator(()ident(PSR)operator(\);)
-        reserved(if) integer(0)operator(=)ident(FindFirst)operator(()ident(Result) operator(+) ident(Copy)operator(()ident(FileName)operator(,) ident(pf)operator(,) ident(MaxInt)operator(\),) ident(faDirectory)operator(,) ident(PSR)operator(\)) reserved(then)
+        ident(FindClose)operator(()ident(PSR)operator(\))operator(;)
+        reserved(if) integer(0)operator(=)ident(FindFirst)operator(()ident(Result) operator(+) ident(Copy)operator(()ident(FileName)operator(,) ident(pf)operator(,) ident(MaxInt)operator(\))operator(,) ident(faDirectory)operator(,) ident(PSR)operator(\)) reserved(then)
           ident(Result) operator(:=) ident(Result) operator(+) ident(PSR)operator(.)ident(Name) operator(+) char<delimiter(')content(\\)delimiter(')>
         reserved(else)
           ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
-        ident(FindClose)operator(()ident(PSR)operator(\);)
+        ident(FindClose)operator(()ident(PSR)operator(\))operator(;)
         reserved(if) ident(Result) operator(=) string<delimiter(')delimiter(')> reserved(then)
           ident(Break)operator(;)
       reserved(end)operator(;)
     reserved(end)operator(;)
 
-    reserved(if) integer(0)operator(=)ident(FindFirst)operator(()ident(Result) operator(+) ident(Copy)operator(()ident(FileName)operator(,) ident(pf)operator(,) ident(pd) operator(-) ident(pf)operator(\),) ident(faDirectory)operator(,) ident(PSR)operator(\)) reserved(then)
+    reserved(if) integer(0)operator(=)ident(FindFirst)operator(()ident(Result) operator(+) ident(Copy)operator(()ident(FileName)operator(,) ident(pf)operator(,) ident(pd) operator(-) ident(pf)operator(\))operator(,) ident(faDirectory)operator(,) ident(PSR)operator(\)) reserved(then)
       ident(Result) operator(:=) ident(Result) operator(+) ident(PSR)operator(.)ident(Name) operator(+) char<delimiter(')content(\\)delimiter(')>
     reserved(else)
       ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
-    ident(FindClose)operator(()ident(PSR)operator(\);)
+    ident(FindClose)operator(()ident(PSR)operator(\))operator(;)
     reserved(if) ident(Result) operator(=) string<delimiter(')delimiter(')> reserved(then)
       ident(Break)operator(;)
 
@@ -2385,40 +2385,40 @@ reserved(begin)
     ident(Result) operator(:=) string<delimiter(')delimiter(')>operator(;)
 reserved(end)operator(;)
 
-reserved(function) ident(DateTimeOfFileTime)operator(()reserved(const) ident(FileTime)operator(:) ident(TFileTime)operator(\):) ident(TDateTime)operator(;)
+reserved(function) ident(DateTimeOfFileTime)operator(()reserved(const) ident(FileTime)operator(:) ident(TFileTime)operator(\))operator(:) ident(TDateTime)operator(;)
 reserved(var)
   ident(LocalFileTime)operator(:) ident(TFileTime)operator(;)
   ident(Res)operator(:) ident(Integer)operator(;)
 reserved(begin)
   ident(Result) operator(:=) integer(0)operator(;)
 
-  ident(FileTimeToLocalFileTime)operator(()ident(FileTime)operator(,) ident(LocalFileTime)operator(\);)
-  reserved(if) reserved(not) ident(FileTimeToDosDateTime)operator(()ident(LocalFileTime)operator(,) ident(LongRec)operator(()ident(Res)operator(\).)ident(Hi)operator(,)
-   ident(LongRec)operator(()ident(Res)operator(\).)ident(Lo)operator(\)) reserved(then)
+  ident(FileTimeToLocalFileTime)operator(()ident(FileTime)operator(,) ident(LocalFileTime)operator(\))operator(;)
+  reserved(if) reserved(not) ident(FileTimeToDosDateTime)operator(()ident(LocalFileTime)operator(,) ident(LongRec)operator(()ident(Res)operator(\))operator(.)ident(Hi)operator(,)
+   ident(LongRec)operator(()ident(Res)operator(\))operator(.)ident(Lo)operator(\)) reserved(then)
     ident(Res) operator(:=) operator(-)integer(1)operator(;)
 
   reserved(if) operator(()ident(Res) operator(=) operator(-)integer(1)operator(\)) reserved(or) operator(()ident(Res) operator(=) integer(0)operator(\)) reserved(then)
     ident(Exit)operator(;)
   reserved(try)
-    ident(Result) operator(:=) ident(FileDateToDateTime)operator(()ident(Res)operator(\);)
+    ident(Result) operator(:=) ident(FileDateToDateTime)operator(()ident(Res)operator(\))operator(;)
   reserved(except)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(FileNew)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\);)
+reserved(procedure) ident(FileNew)operator(()reserved(const) ident(FileName)operator(:) reserved(string)operator(\))operator(;)
 reserved(var)
   ident(Handle)operator(:) ident(Integer)operator(;)
 reserved(begin)
-  ident(Handle) operator(:=) ident(FileCreate)operator(()ident(FileName)operator(\);)
-  ident(FileClose)operator(()ident(Handle)operator(\);)
+  ident(Handle) operator(:=) ident(FileCreate)operator(()ident(FileName)operator(\))operator(;)
+  ident(FileClose)operator(()ident(Handle)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(Win32PlatformStr)operator(:) reserved(string)operator(;)
 reserved(const)
   ident(PlatformStrings)operator(:) reserved(array)operator([)ident(VER_PLATFORM_WIN32s)operator(..)ident(VER_PLATFORM_WIN32_NT)operator(]) reserved(of) reserved(string) operator(=)
-    operator(()string<delimiter(')content(VER_PLATFORM_WIN32s)delimiter(')>operator(,) string<delimiter(')content(VER_PLATFORM_WIN32_WINDOWS)delimiter(')>operator(,) string<delimiter(')content(VER_PLATFORM_WIN32_NT)delimiter(')>operator(\);)
+    operator(()string<delimiter(')content(VER_PLATFORM_WIN32s)delimiter(')>operator(,) string<delimiter(')content(VER_PLATFORM_WIN32_WINDOWS)delimiter(')>operator(,) string<delimiter(')content(VER_PLATFORM_WIN32_NT)delimiter(')>operator(\))operator(;)
 reserved(begin)
-  ident(Result) operator(:=) ident(PlatformStrings)operator([)ident(Win32Platform)operator(];)
+  ident(Result) operator(:=) ident(PlatformStrings)operator([)ident(Win32Platform)operator(])operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(FullOSInfo)operator(:) reserved(string)operator(;)
@@ -2432,7 +2432,7 @@ reserved(begin)
       ident(Win32MajorVersion)operator(,) ident(Win32MinorVersion)operator(,) ident(Win32BuildNumber)operator(,)
       ident(Win32CSDVersion)
     operator(])
-  operator(\);)
+  operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(Win9x)operator(:) ident(Boolean)operator(;)
@@ -2448,7 +2448,7 @@ reserved(end)operator(;)
 reserved(function) ident(Win2000)operator(:) ident(Boolean)operator(;)
 reserved(begin)
   ident(Result) operator(:=) operator(()ident(Win32Platform) operator(=) ident(VER_PLATFORM_WIN32_NT)operator(\))
-            reserved(and) operator(()ident(Win32MajorVersion) operator(=) integer(4)operator(\);)
+            reserved(and) operator(()ident(Win32MajorVersion) operator(=) integer(4)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(function) ident(WinXP)operator(:) ident(Boolean)operator(;)
@@ -2474,7 +2474,7 @@ reserved(type)
   ident(PMemChunk) operator(=) operator(^)ident(TMemChunk)operator(;)
   ident(TMemChunk) operator(=) reserved(record)
     ident(Filled)operator(:) ident(Longword)operator(;)
-    ident(Read)operator(:) ident(Longword)operator(;)
+    directive(Read)operator(:) ident(Longword)operator(;)
     ident(Data)operator(:) ident(pointer)operator(;)
   reserved(end)operator(;)
 
@@ -2490,9 +2490,9 @@ reserved(type)
   directive(public)
     reserved(constructor) ident(Create)operator(;)
     reserved(destructor) ident(Destroy)operator(;) directive(override)operator(;)
-    reserved(procedure) ident(Write)operator(()ident(Data)operator(:) ident(pointer)operator(;) ident(Size)operator(:) ident(LongWord)operator(\);)
-    reserved(procedure) ident(Read)operator(()ident(Buff)operator(:) ident(pointer)operator(;) reserved(var) ident(ReqSize)operator(:) ident(LongWord)operator(\);)
-    reserved(procedure) ident(PeekData)operator(()ident(Buff)operator(:) ident(pointer)operator(;) reserved(var) ident(ReqSize)operator(:) ident(LongWord)operator(\);)
+    reserved(procedure) ident(Write)operator(()ident(Data)operator(:) ident(pointer)operator(;) ident(Size)operator(:) ident(LongWord)operator(\))operator(;)
+    reserved(procedure) ident(Read)operator(()ident(Buff)operator(:) ident(pointer)operator(;) reserved(var) ident(ReqSize)operator(:) ident(LongWord)operator(\))operator(;)
+    reserved(procedure) ident(PeekData)operator(()ident(Buff)operator(:) ident(pointer)operator(;) reserved(var) ident(ReqSize)operator(:) ident(LongWord)operator(\))operator(;)
   directive(published)
     reserved(property) ident(BytesInFifo)operator(:) ident(LongWord) directive(read) ident(FBytesInFifo)operator(;)
   reserved(end)operator(;)
@@ -2505,24 +2505,24 @@ reserved(begin)
   ident(FBuffers) operator(:=) ident(TList)operator(.)ident(Create)operator(;)
   comment(// set default chunksize...)
   ident(FChunksize) operator(:=) ident(DefaultChunksize)operator(;)
-  ident(InitializeCriticalSection)operator(()ident(FCritSect)operator(\);)
+  ident(InitializeCriticalSection)operator(()ident(FCritSect)operator(\))operator(;)
 reserved(end)operator(;)
 
 reserved(destructor) ident(TFifo)operator(.)ident(Destroy)operator(;)
 reserved(var)
   ident(I)operator(:) ident(Integer)operator(;)
 reserved(begin)
-  ident(EnterCriticalSection)operator(()ident(FCritSect)operator(\);)
+  ident(EnterCriticalSection)operator(()ident(FCritSect)operator(\))operator(;)
   reserved(for) ident(I) operator(:=) integer(0) reserved(to) ident(FBuffers)operator(.)ident(count) operator(-) integer(1) reserved(do)
   reserved(begin)
-    ident(FreeMem)operator(()ident(PMemChunk)operator(()ident(Fbuffers)operator([)ident(I)operator(]\).)ident(Data)operator(\);)
-    ident(Dispose)operator(()ident(PMemChunk)operator(()ident(Fbuffers)operator([)ident(I)operator(]\)\);)
+    ident(FreeMem)operator(()ident(PMemChunk)operator(()ident(Fbuffers)operator([)ident(I)operator(])operator(\))operator(.)ident(Data)operator(\))operator(;)
+    ident(Dispose)operator(()ident(PMemChunk)operator(()ident(Fbuffers)operator([)ident(I)operator(])operator(\))operator(\))operator(;)
   reserved(end)operator(;)
   ident(FBuffers)operator(.)ident(Clear)operator(;)
   ident(FBuffers)operator(.)ident(Free)operator(;)
-  ident(LeaveCriticalSection)operator(()ident(FCritSect)operator(\);)
+  ident(LeaveCriticalSection)operator(()ident(FCritSect)operator(\))operator(;)
 
-  ident(DeleteCriticalSection)operator(()ident(FCritSect)operator(\);)
+  ident(DeleteCriticalSection)operator(()ident(FCritSect)operator(\))operator(;)
   reserved(inherited)operator(;)
 reserved(end)operator(;)
 
@@ -2536,13 +2536,13 @@ reserved(begin)
   reserved(else)
   reserved(begin)
     reserved(if) ident(FBuffers)operator(.)ident(Count) operator(>) integer(1) reserved(then)
-      ident(Inc)operator(()ident(Result)operator(,) operator(()ident(FBuffers)operator(.)ident(Count) operator(-) integer(1)operator(\)) operator(*) ident(FChunkSize)operator(\);)
-    ident(Inc)operator(()ident(Result)operator(,) ident(PMemChunk)operator(()ident(FBuffers)operator([)ident(Fbuffers)operator(.)ident(Count) operator(-) integer(1)operator(]\).)ident(Filled)operator(\);)
-    ident(Dec)operator(()ident(Result)operator(,) ident(PMemChunk)operator(()ident(FBuffers)operator([)integer(0)operator(]\).)ident(Read)operator(\);)
+      ident(Inc)operator(()ident(Result)operator(,) operator(()ident(FBuffers)operator(.)ident(Count) operator(-) integer(1)operator(\)) operator(*) ident(FChunkSize)operator(\))operator(;)
+    ident(Inc)operator(()ident(Result)operator(,) ident(PMemChunk)operator(()ident(FBuffers)operator([)ident(Fbuffers)operator(.)ident(Count) operator(-) integer(1)operator(])operator(\))operator(.)ident(Filled)operator(\))operator(;)
+    ident(Dec)operator(()ident(Result)operator(,) ident(PMemChunk)operator(()ident(FBuffers)operator([)integer(0)operator(])operator(\))operator(.)ident(Read)operator(\))operator(;)
   reserved(end)operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFifo)operator(.)ident(Write)operator(()ident(Data)operator(:) ident(pointer)operator(;) ident(Size)operator(:) ident(LongWord)operator(\);)
+reserved(procedure) ident(TFifo)operator(.)ident(Write)operator(()ident(Data)operator(:) ident(pointer)operator(;) ident(Size)operator(:) ident(LongWord)operator(\))operator(;)
 reserved(var)
   ident(Privpointer)operator(:) ident(pointer)operator(;)
   ident(PrivSize)operator(:) ident(LongWord)operator(;)
@@ -2554,70 +2554,70 @@ reserved(begin)
     comment(// null pointer? somebody is trying to fool us, get out...)
     ident(Exit)operator(;)
   reserved(end)operator(;)
-  ident(EnterCriticalSection)operator(()ident(FCritSect)operator(\);)
+  ident(EnterCriticalSection)operator(()ident(FCritSect)operator(\))operator(;)
   ident(PrivPointer) operator(:=) ident(Data)operator(;)
   ident(PrivSize) operator(:=) integer(0)operator(;)
   comment(// are already buffers there?)
   reserved(if) ident(FBuffers)operator(.)ident(count) operator(>) integer(0) reserved(then)
   reserved(begin)
     comment(// is the last one of them not completely filled?)
-    reserved(if) ident(PMemChunk)operator(()ident(FBuffers)operator([)ident(FBuffers)operator(.)ident(count) operator(-) integer(1)operator(]\).)ident(filled) operator(<) ident(FChunksize) reserved(then)
+    reserved(if) ident(PMemChunk)operator(()ident(FBuffers)operator([)ident(FBuffers)operator(.)ident(count) operator(-) integer(1)operator(])operator(\))operator(.)ident(filled) operator(<) ident(FChunksize) reserved(then)
       comment(// not completely filled, so fill up the buffer.)
     reserved(begin)
-      ident(Chunk) operator(:=) ident(PMemChunk)operator(()ident(FBuffers)operator([)ident(FBuffers)operator(.)ident(count) operator(-) integer(1)operator(]\);)
+      ident(Chunk) operator(:=) ident(PMemChunk)operator(()ident(FBuffers)operator([)ident(FBuffers)operator(.)ident(count) operator(-) integer(1)operator(])operator(\))operator(;)
       comment(// fetch chunkdata.)
       ident(PosInChunk) operator(:=) ident(Chunk)operator(.)ident(Data)operator(;)
       comment(// move to current fill pos...)
-      ident(Inc)operator(()ident(LongWord)operator(()ident(PosInChunk)operator(\),) ident(Chunk)operator(.)ident(Filled)operator(\);)
+      ident(Inc)operator(()ident(LongWord)operator(()ident(PosInChunk)operator(\))operator(,) ident(Chunk)operator(.)ident(Filled)operator(\))operator(;)
       comment(// can we fill the chunk completely?)
       reserved(if) ident(Size) operator(>) ident(FChunksize) operator(-) ident(Chunk)operator(.)ident(Filled) reserved(then)
       reserved(begin)
         comment(// yes we can.)
-        ident(Move)operator(()ident(PrivPointer)operator(^,) ident(PosInChunk)operator(^,) ident(FChunksize) operator(-) ident(Chunk)operator(.)ident(Filled)operator(\);)
-        ident(Inc)operator(()ident(PrivSize)operator(,) ident(FChunksize) operator(-) ident(Chunk)operator(.)ident(Filled)operator(\);)
-        ident(Inc)operator(()ident(LongWord)operator(()ident(PrivPointer)operator(\),) ident(FChunksize) operator(-) ident(Chunk)operator(.)ident(Filled)operator(\);)
+        ident(Move)operator(()ident(PrivPointer)operator(^)operator(,) ident(PosInChunk)operator(^)operator(,) ident(FChunksize) operator(-) ident(Chunk)operator(.)ident(Filled)operator(\))operator(;)
+        ident(Inc)operator(()ident(PrivSize)operator(,) ident(FChunksize) operator(-) ident(Chunk)operator(.)ident(Filled)operator(\))operator(;)
+        ident(Inc)operator(()ident(LongWord)operator(()ident(PrivPointer)operator(\))operator(,) ident(FChunksize) operator(-) ident(Chunk)operator(.)ident(Filled)operator(\))operator(;)
         ident(Chunk)operator(.)ident(Filled) operator(:=) ident(FChunkSize)operator(;)
       reserved(end)
       reserved(else)
         comment(// we have to less data for filling the chunk completely,)
         comment(// just put everything in.)
       reserved(begin)
-        ident(Move)operator(()ident(PrivPointer)operator(^,) ident(PosInChunk)operator(^,) ident(Size)operator(\);)
-        ident(Inc)operator(()ident(PrivSize)operator(,) ident(Size)operator(\);)
-        ident(Inc)operator(()ident(Chunk)operator(.)ident(Filled)operator(,) ident(Size)operator(\);)
+        ident(Move)operator(()ident(PrivPointer)operator(^)operator(,) ident(PosInChunk)operator(^)operator(,) ident(Size)operator(\))operator(;)
+        ident(Inc)operator(()ident(PrivSize)operator(,) ident(Size)operator(\))operator(;)
+        ident(Inc)operator(()ident(Chunk)operator(.)ident(Filled)operator(,) ident(Size)operator(\))operator(;)
       reserved(end)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
   comment(// as long as we have remaining stuff put it into new chunks.)
   reserved(while) operator(()ident(PrivSize) operator(<) ident(Size)operator(\)) reserved(do)
   reserved(begin)
-    ident(new)operator(()ident(Chunk)operator(\);)
-    ident(GetMem)operator(()ident(Chunk)operator(.)ident(Data)operator(,) ident(FChunksize)operator(\);)
+    ident(new)operator(()ident(Chunk)operator(\))operator(;)
+    ident(GetMem)operator(()ident(Chunk)operator(.)ident(Data)operator(,) ident(FChunksize)operator(\))operator(;)
     ident(Chunk)operator(.)ident(Read) operator(:=) integer(0)operator(;)
     comment(// can we fill an entire chunk with the remaining data?)
     reserved(if) ident(Privsize) operator(+) ident(FChunksize) operator(<) ident(Size) reserved(then)
     reserved(begin)
       comment(// yes we can, so put the stuff in.)
-      ident(Move)operator(()ident(Privpointer)operator(^,) ident(Chunk)operator(.)ident(Data)operator(^,) ident(FChunksize)operator(\);)
-      ident(Inc)operator(()ident(LongWord)operator(()ident(PrivPointer)operator(\),) ident(FChunksize)operator(\);)
-      ident(Inc)operator(()ident(PrivSize)operator(,) ident(FChunksize)operator(\);)
+      ident(Move)operator(()ident(Privpointer)operator(^)operator(,) ident(Chunk)operator(.)ident(Data)operator(^)operator(,) ident(FChunksize)operator(\))operator(;)
+      ident(Inc)operator(()ident(LongWord)operator(()ident(PrivPointer)operator(\))operator(,) ident(FChunksize)operator(\))operator(;)
+      ident(Inc)operator(()ident(PrivSize)operator(,) ident(FChunksize)operator(\))operator(;)
       ident(Chunk)operator(.)ident(Filled) operator(:=) ident(FChunksize)operator(;)
     reserved(end)
     reserved(else) comment(// we have to less data to fill the entire chunk, just put the remaining stuff in.)
     reserved(begin)
-      ident(Move)operator(()ident(Privpointer)operator(^,) ident(Chunk)operator(.)ident(Data)operator(^,) ident(Size) operator(-) ident(Privsize)operator(\);)
+      ident(Move)operator(()ident(Privpointer)operator(^)operator(,) ident(Chunk)operator(.)ident(Data)operator(^)operator(,) ident(Size) operator(-) ident(Privsize)operator(\))operator(;)
       ident(Chunk)operator(.)ident(Filled) operator(:=) ident(Size) operator(-) ident(Privsize)operator(;)
-      ident(Inc)operator(()ident(PrivSize)operator(,) ident(Size) operator(-) ident(Privsize)operator(\);)
+      ident(Inc)operator(()ident(PrivSize)operator(,) ident(Size) operator(-) ident(Privsize)operator(\))operator(;)
     reserved(end)operator(;)
-    ident(Fbuffers)operator(.)ident(Add)operator(()ident(Chunk)operator(\);)
+    ident(Fbuffers)operator(.)ident(Add)operator(()ident(Chunk)operator(\))operator(;)
   reserved(end)operator(;)
   reserved(if) ident(Size) operator(<>) ident(Privsize) reserved(then)
-    ident(Showmessage)operator(()string<delimiter(')content(miscalculation in TFifo.write)delimiter(')>operator(\);)
+    ident(Showmessage)operator(()string<delimiter(')content(miscalculation in TFifo.write)delimiter(')>operator(\))operator(;)
   ident(FBytesInFifo) operator(:=) ident(GetBytesInFifo)operator(;)
-  ident(LeaveCriticalSection)operator(()ident(FCritSect)operator(\);)
+  ident(LeaveCriticalSection)operator(()ident(FCritSect)operator(\))operator(;)
 reserved(end)operator(;)
 
-reserved(procedure) ident(TFifo)operator(.)ident(Read)operator(()ident(Buff)operator(:) ident(pointer)operator(;) reserved(var) ident(ReqSize)operator(:) ident(LongWord)operator(\);)
+reserved(procedure) ident(TFifo)operator(.)ident(Read)operator(()ident(Buff)operator(:) ident(pointer)operator(;) reserved(var) ident(ReqSize)operator(:) ident(LongWord)operator(\))operator(;)
 reserved(var)
   ident(PrivSize)operator(:) ident(Integer)operator(;)
   ident(Privpos)operator(:) ident(pointer)operator(;)
@@ -2629,41 +2629,41 @@ reserved(begin)
     comment(// null pointer? somebody is trying to fool us, get out...)
     ident(Exit)operator(;)
   reserved(end)operator(;)
-  ident(EnterCriticalSection)operator(()ident(FCritSect)operator(\);)
+  ident(EnterCriticalSection)operator(()ident(FCritSect)operator(\))operator(;)
   ident(PrivSize) operator(:=) integer(0)operator(;)
   ident(Privpos) operator(:=) ident(Buff)operator(;)
   reserved(while) ident(FBuffers)operator(.)ident(Count) operator(>) integer(0) reserved(do)
   reserved(begin)
-    ident(Chunk) operator(:=) ident(PMemChunk)operator(()ident(FBuffers)operator([)integer(0)operator(]\);)
+    ident(Chunk) operator(:=) ident(PMemChunk)operator(()ident(FBuffers)operator([)integer(0)operator(])operator(\))operator(;)
     ident(ChunkPos) operator(:=) ident(Chunk)operator(.)ident(data)operator(;)
-    ident(Inc)operator(()ident(LongWord)operator(()ident(ChunkPos)operator(\),) ident(Chunk)operator(.)ident(Read)operator(\);)
+    ident(Inc)operator(()ident(LongWord)operator(()ident(ChunkPos)operator(\))operator(,) ident(Chunk)operator(.)ident(Read)operator(\))operator(;)
     comment(// does the remaining part of the chunk fit into the buffer?)
-    reserved(if) ident(PrivSize) operator(+) operator(()ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)directive(read)operator(\)) operator(<) ident(ReqSize) reserved(then)
+    reserved(if) ident(PrivSize) operator(+) operator(()ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)ident(read)operator(\)) operator(<) ident(ReqSize) reserved(then)
     reserved(begin) comment(// yep, it fits)
-      ident(Move)operator(()ident(ChunkPos)operator(^,) ident(Privpos)operator(^,) ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)directive(read)operator(\);)
-      ident(Inc)operator(()ident(PrivSize)operator(,) ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)directive(read)operator(\);)
-      ident(FreeMem)operator(()ident(Chunk)operator(.)ident(Data)operator(\);)
-      ident(Dispose)operator(()ident(Chunk)operator(\);)
-      ident(FBuffers)operator(.)ident(Delete)operator(()integer(0)operator(\);)
+      ident(Move)operator(()ident(ChunkPos)operator(^)operator(,) ident(Privpos)operator(^)operator(,) ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)ident(read)operator(\))operator(;)
+      ident(Inc)operator(()ident(PrivSize)operator(,) ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)ident(read)operator(\))operator(;)
+      ident(FreeMem)operator(()ident(Chunk)operator(.)ident(Data)operator(\))operator(;)
+      ident(Dispose)operator(()ident(Chunk)operator(\))operator(;)
+      ident(FBuffers)operator(.)ident(Delete)operator(()integer(0)operator(\))operator(;)
     reserved(end)
     reserved(else) comment(// remaining part didn't fit, get as much as we can and increment the)
       comment(// read attribute.)
     reserved(begin)
-      ident(Move)operator(()ident(ChunkPos)operator(^,) ident(Privpos)operator(^,) ident(ReqSize) operator(-) ident(PrivSize)operator(\);)
-      ident(Inc)operator(()ident(Chunk)operator(.)directive(read)operator(,) ident(ReqSize) operator(-) ident(PrivSize)operator(\);)
-      ident(Inc)operator(()ident(PrivSize)operator(,) ident(ReqSize) operator(-) ident(PrivSize)operator(\);)
+      ident(Move)operator(()ident(ChunkPos)operator(^)operator(,) ident(Privpos)operator(^)operator(,) ident(ReqSize) operator(-) ident(PrivSize)operator(\))operator(;)
+      ident(Inc)operator(()ident(Chunk)operator(.)ident(read)operator(,) ident(ReqSize) operator(-) ident(PrivSize)operator(\))operator(;)
+      ident(Inc)operator(()ident(PrivSize)operator(,) ident(ReqSize) operator(-) ident(PrivSize)operator(\))operator(;)
       comment(// as we filled the buffer, we'll have to break here.)
       ident(break)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
   ident(FBytesInFifo) operator(:=) ident(GetBytesInFifo)operator(;)
-  ident(LeaveCriticalSection)operator(()ident(FCritSect)operator(\);)
+  ident(LeaveCriticalSection)operator(()ident(FCritSect)operator(\))operator(;)
   ident(ReqSize) operator(:=) ident(PrivSize)operator(;)
 reserved(end)operator(;)
 
 comment(// read Data from Stream without removing it from the Stream...)
 
-reserved(procedure) ident(TFifo)operator(.)ident(PeekData)operator(()ident(Buff)operator(:) ident(pointer)operator(;) reserved(var) ident(ReqSize)operator(:) ident(LongWord)operator(\);)
+reserved(procedure) ident(TFifo)operator(.)ident(PeekData)operator(()ident(Buff)operator(:) ident(pointer)operator(;) reserved(var) ident(ReqSize)operator(:) ident(LongWord)operator(\))operator(;)
 reserved(var)
   ident(PrivSize)operator(:) ident(Integer)operator(;)
   ident(Privpos)operator(:) ident(pointer)operator(;)
@@ -2676,32 +2676,32 @@ reserved(begin)
     comment(// null pointer? somebody is trying to fool us, get out...)
     ident(Exit)operator(;)
   reserved(end)operator(;)
-  ident(EnterCriticalSection)operator(()ident(FCritSect)operator(\);)
+  ident(EnterCriticalSection)operator(()ident(FCritSect)operator(\))operator(;)
   ident(PrivSize) operator(:=) integer(0)operator(;)
   ident(Privpos) operator(:=) ident(Buff)operator(;)
   ident(ChunkNr) operator(:=) integer(0)operator(;)
   reserved(while) ident(FBuffers)operator(.)ident(Count) operator(>) ident(ChunkNr) reserved(do)
   reserved(begin)
-    ident(Chunk) operator(:=) ident(PMemChunk)operator(()ident(FBuffers)operator([)ident(ChunkNr)operator(]\);)
+    ident(Chunk) operator(:=) ident(PMemChunk)operator(()ident(FBuffers)operator([)ident(ChunkNr)operator(])operator(\))operator(;)
     ident(ChunkPos) operator(:=) ident(Chunk)operator(.)ident(data)operator(;)
-    ident(Inc)operator(()ident(LongWord)operator(()ident(ChunkPos)operator(\),) ident(Chunk)operator(.)ident(Read)operator(\);)
+    ident(Inc)operator(()ident(LongWord)operator(()ident(ChunkPos)operator(\))operator(,) ident(Chunk)operator(.)ident(Read)operator(\))operator(;)
     comment(// does the remaining part of the chunk fit into the buffer?)
-    reserved(if) ident(PrivSize) operator(+) operator(()ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)directive(read)operator(\)) operator(<) ident(ReqSize) reserved(then)
+    reserved(if) ident(PrivSize) operator(+) operator(()ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)ident(read)operator(\)) operator(<) ident(ReqSize) reserved(then)
     reserved(begin) comment(// yep, it fits)
-      ident(Move)operator(()ident(ChunkPos)operator(^,) ident(Privpos)operator(^,) ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)directive(read)operator(\);)
-      ident(Inc)operator(()ident(PrivSize)operator(,) ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)directive(read)operator(\);)
-      ident(Inc)operator(()ident(ChunkNr)operator(\);)
+      ident(Move)operator(()ident(ChunkPos)operator(^)operator(,) ident(Privpos)operator(^)operator(,) ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)ident(read)operator(\))operator(;)
+      ident(Inc)operator(()ident(PrivSize)operator(,) ident(Chunk)operator(.)ident(Filled) operator(-) ident(Chunk)operator(.)ident(read)operator(\))operator(;)
+      ident(Inc)operator(()ident(ChunkNr)operator(\))operator(;)
     reserved(end)
     reserved(else) comment(// remaining part didn't fit, get as much as we can and increment the)
       comment(// read attribute.)
     reserved(begin)
-      ident(Move)operator(()ident(ChunkPos)operator(^,) ident(Privpos)operator(^,) ident(ReqSize) operator(-) ident(PrivSize)operator(\);)
-      ident(Inc)operator(()ident(PrivSize)operator(,) ident(ReqSize) operator(-) ident(PrivSize)operator(\);)
+      ident(Move)operator(()ident(ChunkPos)operator(^)operator(,) ident(Privpos)operator(^)operator(,) ident(ReqSize) operator(-) ident(PrivSize)operator(\))operator(;)
+      ident(Inc)operator(()ident(PrivSize)operator(,) ident(ReqSize) operator(-) ident(PrivSize)operator(\))operator(;)
       comment(// as we filled the buffer, we'll have to break here.)
       ident(break)operator(;)
     reserved(end)operator(;)
   reserved(end)operator(;)
-  ident(LeaveCriticalSection)operator(()ident(FCritSect)operator(\);)
+  ident(LeaveCriticalSection)operator(()ident(FCritSect)operator(\))operator(;)
   ident(ReqSize) operator(:=) ident(PrivSize)operator(;)
 reserved(end)operator(;)