Add(Button,4119252,315,329)
{
 Left=140
 Top=30
 Width=145
 Height=40
 Caption="Запуск"
 link(onClick,16131930:doEvent2,[])
}
Add(Edit,4468566,462,196)
{
 Left=5
 Top=5
 Width=280
 Text="Выберите образ"
}
Add(Hub,1653830,357,196)
{
 InCount=2
 OutCount=3
 link(onEvent1,4468566:doText,[])
 link(onEvent2,72678:doString,[(417,209)(417,265)])
 link(onEvent3,16131930:doEvent1,[(392,216)(392,328)])
}
Add(Hub,16131930,413,322)
{
 InCount=2
 OutCount=1
 link(onEvent1,624012:doConsoleExec,[])
}
Add(Message,4038514,504,315)
{
}
Add(FormatStr,72678,462,259)
{
 DataCount=1
 Mask="-m 256 -cdrom "%1" -boot d"
 Point(FString)
 link(Str1,4468566:Text,[])
}
Add(Browse,9261220,280,175)
{
 BrowseObj=3
 Edit=1
 NewStyle=0
 NewDirButton=1
 link(onBrowse,1653830:doEvent1,[(334,181)(334,202)])
}
Add(Button,7998072,189,224)
{
 Left=6
 Top=50
 Width=125
 Caption="C ним не работает"
 link(onClick,5252398:doOpenDialog,[])
}
Add(Button,9216284,189,175)
{
 Left=6
 Top=30
 Width=125
 Caption="С ним работает"
 link(onClick,9261220:doBrowse,[])
}
Add(StyleXP,6843008,91,175)
{
}
Add(MainForm,2901188,91,217)
{
 Width=298
 Height=110
 Caption="Оболочка для QEMU"
 Icon=[ZIP7E03000078DAAD92314BC34014C75FE992C12183480687061C1A7030E060A083061C0C3818E860C04182A07492E020A120D249FAB9EA8710BA3864E890314387F3775CAD472D52C597CB235C7EFFFBBF7777222D1ED715B227B76D911D11E9F232251D31F33A8EDBF21F111E841B0EE0EC32ABDEAB7258AE198F65715F0CEE06F94D9E5D65693F45A2F9AAE27BFA364558CF6AA2691AF52D50191E06DEEFF8FE9E4FF6763D77DB75B61CBB66788C167CADF9F0308C8E223293413740654BE0A9CDF0B8C3276749729E90E39318E18A049E760CAFE60A9E8EF2EB455FA88C84C2BEF8E127AF142B63573C1464FA42820B7FB585A32DA8C1E6E3D378F43C1ABF8CC94870C1825E68DF94448F361FF522E0C9EB848C0B85E14849EC98AB6F8E98335AF22CF5F3FA9C8ECD07FB81DECF5E44D990E9454A0B2BC3E6D7C75CD1A63EEF59CD1DA0A4E515DA70FCE1322B25F2D4FABD4E6BB4F603C5C115BE]
 Position=1
 Point(onClose)
}
Add(VBJScript,5252398,280,224)
{
 WorkPoints=#12:doOpenDialog|
 EventPoints=#10:onFileName|8:onCancel|
 Script=#23:Sub doWork(Data, Index)|21:    Select Case Index|30:           Case "doOpenDialog"|11:           |69:            Set objDialog = CreateObject("UserAccounts.CommonDialog")|56:            objDialog.Filter = "ISO Образ(*.iso)|*.iso|"|37:            objDialog.FilterIndex = 1|40:            objDialog.InitialDir = "C:"|42:            intResult = objDialog.ShowOpen|33:            If intResult = 0 Then|30:                sys.onCancel 0|28:                Wscript.Quit|16:            Else|49:                sys.onFileName objDialog.FileName|18:            End If|14:    End Select|7:End Sub|
 UseName=0
 link(onFileName,1653830:doEvent2,[(334,230)(334,209)])
}
Add(WinExec,624012,455,308)
{
 FileName=".qemu.exe"
 Point(doConsoleExec)
 Point(onConsoleError)
 Point(doConsoleInput)
 Point(onConsoleResult)
 link(Params,72678:FString,[])
 link(onConsoleError,4038514:doMessage,[])
}