Как я сошёл с ума - страница 7

Шрифт
Интервал


РАКЕТА ДЁРНУЛАСЬ И ВЗМЫЛА В КОСМОС. КОСМОС ОТКРЫЛ СВОИ ОБЪЯТИЯ И ПРИНЯЛ РАКЕТУ. ОН НАЧАЛ КАЧАТЬ ЕЁ, КАК МАЛЕНЬКОЕ ДИТЯ НА СВОИХ ЗВЁЗДНЫХ РУКАХ (Данный текст, в котором употребляется словосочетание «звёздные руки», по мнению Белого Кролика, характеризирует его как антинигилистический текст, а по мнению доктора Ганнибала Лектора – я, автор, на стороне «нигилистов». Звёздные руки укачивают в своих объятиях молодых людей «нового поколения», интеллигентов-разночинцев, одержимых идеей изменения государственного строя, быта и нравственных устоев).

 Dim fIgEnd As Integer… ПУСТЬ НЕ ОБИЖАЮТСЯ ДЕТИ НА БЕЗОБРАЗИЯ ГРЕМЛИНОВ. НАЗНАЧАЕМ СЛЕДУЮЩУЮ ПРОЦЕДУРУ ДЛЯ АКТИВАЦИИ НЕОБХОДИМОГО СОБЫТИЯ. ПИШЕМ В РЕДАКТОРЕ КОДА ЗАКЛИНАНИЕН – Private Sub Form Load(). ИЩЕМ, КУДА СПРЯТАЛСЯ НОЛЬ И НАХОДИМ ЕГО В МИРЕ ВСЕХ МИРОВ, В ГИПЕРУНИВЕРСАЛЬНОМ ПРОСТРАНСТВЕ fIgEnd. ТОГДА ВСЕ ПЕЙЗАЖИ И КАРТИНЫ НАШЕГО РЕАЛЬНОГО МИРА ПОЛУЧАТ ПЕРЕМЕННУЮ КРАСНОГО ЦВЕТА imgStatus.Picture = picRed.Picture. ОБЯЗАТЕЛЬНО НАДО ДОБАВИТЬ, ЧТО ТЕПЕРЬ ВРЕМЕНИ И ПРОСТРАНСТВА НЕТ. ОСТАЛОСЬ ОДНО ИЗМЕРЕНИЕ. ЕГО НАИМЕНОВАНИЕ – ИЗМЕРЕНИЕ. ОНО В МОЕЙ ГОЛОВЕ. В ЭТОМ СЛУЧАЕ КОД СТАНЕТ FormForGraphics-Caption = "ИЗМЕРЕНИЕ". ОБЪЯВЛЯЕМ ПОКА КОНЕЦ. КОНЕЦ ПРОЦЕДУРЫ End Sub.