Add(MainForm,2953706,182,168)
{
 link(onCreate,6654860:doString,[])
}
Add(FormatStr,6654860,245,182)
{
 Mask="sys.onValue InputBox("%1", "%2")\r\n\r\n"
 link(onFString,4900988:##SetScript,[])
 link(Str1,6398593:Text,[])
 link(Str2,9583772:Text,[(258,152)(265,152)])
}
Add(VBJScript,4900988,301,182)
{
 WorkPoints=#11:##SetScript|
 EventPoints=#7:onValue|
 Script=#0:|0:|
 UseName=0
 link(onValue,2996465:doText,[])
}
Add(VisualStrings,9583772,259,126)
{
 Lines=#9:Заголовок|
 Width=67
}
Add(VisualStrings,6398593,245,98)
{
 Lines=#16:Текст сообщения |
 Width=144
}
Add(Label,2996465,357,182)
{
 Left=45
 Top=35
 Height=28
 Font=[MS Sans Serif,14,0,0,1]
 Caption=""
}

Add(MainForm,2953706,217,133)
{
 link(onCreate,1827648:doString,[])
}
Add(WinExec,3485469,329,133)
{
 FileName="powershell.exe"
 Mode=0
 Point(doConsoleExec)
 Point(onConsoleResult)
 Point(onConsoleError)
 link(onConsoleResult,13069838:doCharset,[])
}
Add(FormatStr,1827648,273,147)
{
 Mask="$credential = Get-Credential\r\n# $credential = Get-Credential -Username "MyDomain\MyUsername" -Message "Inform your password"\r\n$UserName = $credential.UserName\r\n$password = [System.Runtime.InteropServices.Marshal]::PtrToStringAuto([System.Runtime.InteropServices.Marshal]::SecureStringToBSTR($credential.Password))\r\n\r\n-join('User - ', $UserName, ';', 'Password - ', $password) "
 link(onFString,3485469:doConsoleExec,[])
}
Add(Charset,13069838,392,147)
{
 link(onCharset,1188660:doEnum,[])
}
Add(Memo,1351460,504,147)
{
 Left=550
 Top=160
 Align=5
 Font=[MS Sans Serif,14,0,0,1]
 ScrollBars=3
}
Add(Str_Enum,1188660,448,147)
{
 link(onEnum,1351460:doAdd,[])
}