Add(MainForm,2953706,126,56)
{
 link(onCreate,12465902:doCreateMutex,[(191,76)(191,97)])
}
Add(Mutex,12465902,224,91)
{
 Name="YourProgName"
 link(onAlreadyExists,15994004:doMessage,[])
}
Add(Message,15994004,287,98)
{
 Message="Копия программы уже запущена!"
 link(onMessage,2953706:doClose,[(331,104)(331,94)(114,94)(114,83)])
}

Add(MainForm,2953706,126,56)
{
 link(onCreate,8240500:doCreate,[(166,76)(166,104)])
}
Add(Message,15994004,287,98)
{
 Message="Копия программы уже запущена!"
 link(onMessage,2953706:doClose,[(331,104)(331,94)(114,94)(114,83)])
}
Add(MailSlot_Server,8240500,182,98)
{
 Name="YourProgName"
 link(onStatus,15631515:doCase,[])
}
Add(Case,15631515,224,105)
{
 Value=Integer(1)
 link(onNextCase,15994004:doMessage,[(272,111)(272,104)])
}