Add(MainForm,2953706,140,84)
{
 Height=250
 link(onCreate,10223849:doRead,[])
}
Add(Memo,4377762,518,98)
{
 Left=90
 Top=5
 Width=280
 Height=200
}
Add(Registry,10223849,196,98)
{
 HKey=1
 Key="Software\Microsoft\Windows\DWM\"
 Value="ColorizationColor"
 DataType=3
 link(onRead,14329994:doConvert,[])
}
Add(StreamConvertor,14329994,245,98)
{
 link(onResult,5518469:doEvent1,[])
}
Add(Hub,5518469,287,98)
{
 link(onEvent1,801853:doWork2,[])
 link(onEvent2,582424:doEnum,[(312,111)(312,132)])
}
Add(Str_Enum,582424,322,126)
{
 Delimiter=""
 Step=2
 Direct=1
 link(onEnum,8342452:doStrCat,[])
 link(onEndEnum,1441726:doData,[(403,139)(403,195)])
}
Add(StrCat,8342452,420,126)
{
 link(Str1,16159061:Var1,[(426,117)(412,117)(412,166)])
}
Add(DoData,1441726,420,189)
{
 link(onEventData,801853:doWork3,[(494,195)])
 link(Data,16159061:Var2,[])
}
Add(GetDataEx,16159061,420,161)
{
 link(Data,8342452:Result,[])
}
Add(HubEx,801853,490,98)
{
 link(onEvent,4377762:doAdd,[])
}

Add(MainForm,2953706,217,105)
{
 link(onCreate,7764312:doString,[])
}
Add(FormatStr,7764312,280,119)
{
 Mask="REG QUERY HKCU\Software\Microsoft\Windows\DWM /v ColorizationColor"
 link(onFString,14545432:doConsoleExec,[])
}
Add(WinExec,14545432,336,105)
{
 Mode=0
 Point(doConsoleExec)
 Point(doConsoleInput)
 Point(onConsoleResult)
 link(onConsoleResult,861132:doAdd,[])
}
Add(Memo,861132,392,119)
{
 Left=445
 Top=125
 Align=5
 ScrollBars=3
}