Bash.org.ru IT - Bash.org.ru IT Happens Истории ## 1701 – 1800

12:00 24.12.2009, IT happens

История случилась в далёком 2001-м в маленьком городке — не скажешь, что районный центр. Любимым времяпрепровождением местной молодёжи стало посещение игровых компьютерных клубов, и открывались они где ни попадя — дело было очень прибыльным.

Решили и два моих приятеля открыть такой клуб. О них нужно рассказать поподробнее: по образованию — классические программисты, но успели отслужить в ВДВ, да и комплекцией могли похвастаться. По профессии в региональном городке было практически нереально устроится, так что пошли приятели в учителя физкультуры в одну из школ города, а потом там же и забацали клуб, обговорив условия с директором — у того как раз освободилось боковое подсобное помещение. Дело нехитрое: заняли денег, купили технику, позвали друзей, развернули.

Дома у меня тогда пылилась груда железа, которая могла работать лишь печатной машинкой. Играть хотелось, и я частенько наведывался к друзьям в гости по выходным. Ребята часто сами не справлялись — и помощи были рады, и пиво было с кем попить.

Как-то в субботу с утречка забегаю к ним, а там двери нараспашку и милиция снуёт. Нахожу одного из товарищей, расспрашиваю, что стряслось. Оказывается, приехали к ним в гости в пятницу однослуживцы. Сидели в баре, отдыхали, потом решили в стрелялки погонять и уехали в клуб.

Двенадцать ВДВшников режутся в «контру». В дверь начинают стучать. Один из товарищей решил, что пришли знакомые (частенько такое по ночам бывало), пошёл открывать и тут же получил прикладом в нос. В клуб заваливаются трое в масках: один с автоматом, один с пистолетом, один с битой. ВДВшники, хоть и в хламину пьяные, отреагировали молниеносно.

Грабители не думали, что попадут в компьютерном клубе на здоровых ребят. На память о криминальных элементах остались лишь шестнадцать дырок от пуль в потолке (решили не закрашивать) и бейсбольная бита, а чуть позднее у клуба появился слоган: «Здесь реально стреляют!»

14:00 24.12.2009, IT happens

Сидим с коллегой в офисе, делать совсем нечего. На днях прислали нам одну деталь для цеха, завёрнутую в листы пузырчатого полиэтилена размером с лист A4. Решили на скорость лопать пузырики на плёнке. Первые два раунда я слил, но рационализаторский мозг быстро придумал решение.

Стоял у нас старенький струйник НР — когда им последний раз пользовались, и не помню уже. Из него тут же были извлечены картриджи и всё ненужное, чтобы осталось только два вала. Принтер быстренько захавал плёночку и со звуками, напоминающими очередь из пулемёта, выдавил в лоток ровный тонкий слой полиэтилена. Оставшиеся десять листов были с удвоенным энтузиазмом скормлены «хэпэшнику» — коллега присоединился.

Детальки нам присылают часто — принтер без еды не остаётся. Он и рад: кормите, мол, чем хотите, только не забывайте. Такая вот вторая жизнь.

14:00 24.12.2009, IT happens

Писали мы как-то с другом макрос на VBA, призванный автоматизировать решение нехитрой экономической задачки в Excel. Макрос должен был разметить ячейки на рабочем листе, забить нужные формулы, прочитать введённые значения и запустить «Поиск решений» — задача, в общем-то, элементарная.

Набросали предварительную модель задачи, по-быстрому проверили её этим самым «Поиском решений» — работает, результаты правдоподобные. На той же модели так же наскоро прикинули будущий интерфейс и приступили к автоматизации.

Написали макрос — формулы вводит, размечает красиво, всё здорово. Дошли до программного пуска «Поиска решений» и застряли. Запускать запускает, а задача не решается. Excel паникует: «Ошибка в модели. Проверьте правильность значений в ячейках и ограничениях».

Проверили всё. Нашли пару незначительных ошибок, исправили — то же самое. Вернулись к нашей предварительной модели, запустили на всякий случай ещё раз «Поиск решений» — падает с той же ошибкой. Мы в шоке — раньше ведь считало?!

Думали. Еще думали. Матерились. Снова думали. Где-то через час в результате научного тыкания мышкой по экрану причина таки обнаружилась.

В погоне за красотой рабочего листа возникла необходимость объединить несколько ячеек, в том числе и с изменяемыми в процессе поиска решений значениями. Как оказалось, Excel просто не умеет работать таким образом — ему подавай только обособленные, индивидуальные ячейки. Поскольку интерфейс мы планировали на предварительной модельке уже после того, как проверили ее решаемость, то после прикидок она так и осталась с объединёнными ячейками. Посчитать ответ ещё раз Excel уже не смог и только слабо огрызался пояснениями, заложенными в него предусмотрительными разработчиками.