С днём программиста!

ЯП-то почени, погромист!)

Это вопросы к программистам движка ЯПа, скорее

Всех причастных, с днем программиста!


Процедура Лес()
Ёлочка = СоздатьОбъект("Ёлка");
Пока Ёлочка.Жива()=1 Цикл
Ёлочка.Возраст=Ёлочка.Возраст+1;
Если (ТекущееВремяГода()="Зима") или (ТекущееВремяГода()="Лето") Тогда
Ёлочка.Стройность = 1;
Ёлочка.Цвет = глПолучитьЦвет("Зеленый");
КонецЕсли;

Метель = СоздатьОбъект("Метель");
Метель.ОткрытьФайл("D:\Music\NSYNC - Bye Bye Bye.mp3");
Система.Уснуть(1000);
Метель.Воспроизвести();

Мороз = СоздатьОбъект("Мороз");
Мороз.Укутать(Ёлочка);
Если Ёлочка.Замерзла()=1 Тогда
Ёлочка.Жива(0);
Возврат;
КонецЕсли;

Заяц = СоздатьОбъект("Заяц");
Заяц.Трусливый = 1;
Заяц.Цвет = глПолучитьЦвет("Серый");
ЛК = Ёлочка.ЛеваяКоордината;
ВК = Ёлочка.ВерхняяКоордината;
Пока 1=1 Цикл
Заяц.ЛеваяКоордината = ЛК;
ЛК=ЛК+1;
Заяц.НижняяКоордината = ВК + Окр(abs(sin(ЛК*pi/180)*10));
КонецЦикла;

КомандаСистемы("wolf3d.exe /evil");

СкопироватьВБуфер(Ёлочка);
Праздник = СоздатьОбъект("Праздник");
ВставитьИзБуфера(Ёлочка, Праздник);
Ёлочка.ЗагрузитьСкинИзФайла("нарядная.jpg");
Дети = СоздатьОбъект("Дети");
Для й=1 По Ёлочка.Радость.РазмерСписка() Цикл
Дети.Настроение=Дети.Настроение+Ёлочка.Радость.ПолучитьЗначение(й);
КонецЦикла;
КонецЦикла;
КонецПроцедуры //Лес()

10 PRINT "Пашкет мудак"
20 GOTO 10
30 END

Это сообщение отредактировал SurferNet - 13.09.2023 - 09:01

Поздно, уже начали.

хреновая отмазка для среднестатистического пользователя. "а ты сделай чтоб было хорошо" - классика ж.

Мы программисты народ плечистый,
Нас не заманишь CISCOй цветистой,
До серверов нету нам дела,
Лишь бы база не полетела,
Наш алгоритм прочен и строен,
Светлых голов наших достоен,
Празднику нашему очень мы рады,
Нам бы покодить - вот вся награда.
Труд программиста сложен и тяжек,
Просто сизифов, без всяких натяжек,
Мы как атланты, держим все небо,
Программы давай, не надо нам хлеба! © П.П.Г.

Размещено через приложение ЯПлакалъ

Код на 1с 7.7 ))

ТС, ты знаешь, за 1С тут можно и по щщам отхватить.
Найдите разницу, что называется. Без обид.

Ардуинка?

Вообще-то этот алгоритм был изначально на паскале, но я не нашел в сети.
Только извращенный 1Сный код...

Выебывайтесь выебывайтесь, пожалуйста.
Сходите к бухам со своим Ява Скрипом и рассказите им, зачем он нужОн

Какой же уебищный синтаксис в тс

Размещено через приложение ЯПлакалъ

Обломайся. ))) Они не на 1С сидят. Но тем программистам я бы ноги вырвал и в уши вставил. Настроение просто хорошее. ))

семерка, Сэр!

Татаре чтоль? или удмурты?

Размещено через приложение ЯПлакалъ

Вот про Cisco сейчас обидно было)))
ЗЫ: С праздником, кодеры! Не быдлокодьте, там!

Размещено через приложение ЯПлакалъ

День землекопа

Размещено через приложение ЯПлакалъ

Оба

Размещено через приложение ЯПлакалъ

Спасибо за напоминание, счас знакомых поздравлю.

Оба, У меня согласно трудовой книжке и дипломам 36 профессиональных праздников в году

И те, и другие. А если контора не ИТ-направления, то еще и праздник по профилю работы организации.
А я, если еще и с предыдущих работ все профильные праздники буду отмечать, так вообще не просохну никогда.

1C потянулись

Размещено через приложение ЯПлакалъ