Кстати, в процедурке есть небольшой баг... кто-нибудь нашел?