Хабр Курсы для всех
РЕКЛАМА
Практикум, Хекслет, SkyPro, авторские курсы — собрали всех и попросили скидки. Осталось выбрать!
я как вполне состоявшийся в жизни человек, полез смотреть как это свёрстано
Если код разрастается, значит пора выделять отдельные классы, качественно их именовать и тогда код становится вполне читаемым
// Обработка прерывания по переполнению таймера.
ISR(TIMER0_OVF_vect)
{
// Да, здесь НИЧЕГО не происходит. Совсем. Да, так надо.
};
char i;
// Переменная <I> - 50 лет на рынке счётчиков!
_delay_ms(50);
// Пауза запуска (+ 50 мс к 65 (по "паспортным данным") при запуске контроллера).
SMCR = /*(1<<SM1)|(1<<SM0)|*/(1<<SE); // Режим PowerSave. Там просто... там работает USART0
// Нет, не работает.. Выбираем Idle
PRR = (1<<PRTWI)|(1<<PRTIM2)|(1<<PRTIM0)|(1<<PRTIM1)|(1<<PRSPI)|(1<<PRADC);
// Экономия мощности. Безразлично, но делаем.
init;
// Не пихать ничего, что пишет лог раньше строки init!
LogForm.SetLogLevel(I);
Application.ProcessMessages;
// Решение проблемы с запуском большого количества потоков -
// обработка событий при создании этой аравы.. Количество потоков
// ограничивается только здравым смыслом.
Activator[ThreadNum].ID := ThreadCntr;
begin
PDWord(@P)^ := PDWord(@Pd)^; // Теперь ОЧЕНЬ осторожно...
PacketAnalise(P); // Анализировать пакет
Inc(PDWord(@Pd)^, Pd^.PacketSize); // И сдвинуть указатель
end;
var
LilBuff: array [0..4095] of Byte;
begin
if FileExists(FileName) then
begin
LogForm.AddLog('FILE: Файл ПО присутствует.', dbgLvDebug_MED);
FS:= TFileStream.Create(FileName, fmOpenRead or fmShareDenyNone);
// +4 кб должно хватить на всё.
// 640 кб хватит всем! (с) :>
TmpStr := '--' + Bounder + #13#10 +
'Content-Disposition: form-data; name="filename";' +
// Вот таким вот странным методом добавляем строку в саму себя..
// Печально, знаю. Но что поделать!
begin
Sleep(50);
try
if flg_TerminateInProgress then Break;
{При уничтожении потока оно вылетает на этом месте.}
{А так - хоть не будет вызывать ругани системы / приложения}
if ( isFlag1 -and isFlag2) {
#Do nothing
} else {
Scriptblock
}
x = -x; // Не знаю, зачем это нужно, но от этого люди перестают быть верх-ногами

'Окончательное, бесповоротное развоплощение, уничтожение и тел, и душ.
Set obj = Nothing
/*
Б%я, ребята, да вы зае%%ли!
...
*/
# Woot! More recursion! I'm on a fucking roll!
def refactorIfs(inStr):
# I feel dirty even having written this regex
ifExtr = re.compile(r"((\[if\W?\(\W?\w+\W?[><=!]+\W?\w+\W?\)\W*?\\\"[\w \[\].,]+?\\\")(\W?else\W?)?(\\\"[\w \[\].,]+?\\\")?\])") <p>Текст не может подчеркиваться кривыми линиями, это <span class="vyebos">не хорошо</span>.</p>lex> читаю код
lex> каменты в процедуре удаления
lex> «из списка пользователей нельзя удалять админа
lex> и самого себя
lex> потому что это грешно»
One more refactoring and i quit.Действительно ушел довольно скоро.
I pity anyone who must try and understand this code. Sincerely, Paul.
// XXX: Beautiful code!
// YYY: Where?
// If this code works, it was written by %автор_кода%.
// If not, I don't know who wrote it.if($flag == false){
$flag = false; // на всякий случай
...
}
Секретные записки в коде