Нашли или выдавили из себя код, который нельзя назвать нормальным,
на который без улыбки не взглянешь?
Не торопитесь его удалять или рефакторить, — запостите его на
говнокод.ру, посмеёмся вместе!
Уважаемые знатоки, вопрос такой:
sizeof('a') для С и Сpp имеет различное значение и это вам известно из
C99 Standard: 6.4.4.4 Character constants Para 2
и
C++03 Standard: 2.13.2 Character literals Para 1.
Интересует ваше предположение/мнение/версия/etc, для чего такое приняли?
# Some old m4's don't support m4exit. But they provide
# equivalent functionality by core dumping because of the
# long macros we define.
ifdef([__gnu__], ,
[errprint(M4sugar requires GNU M4. Install it before installing M4sugar or
set the M4 environment variable to its path name.)
m4exit(2)])
Классификация говнокода:
1. Легкий говнокод
2. Кучка говнокода
3. Автор думал, что самый умный
4. Жесткое порно в коде
5. Муть полнейшая, автор на следующий день не смог разобраться сам
6. После прочтения единственный путь нормально поспать - сделать лоботомию.
Сидел я и разбирал чей-то говнокод.
Чтобы расслабить нервы, которые уже на пределе, решил написать классификацию говнокода.
Предлагайте свои варианты.
Func Terminate() ; Функция выключения скрипта так как он работает в бесконечном цикле
Exit 0
EndFunc
HotKeySet("{ESC}", "Terminate") ; Привязывает функцию выключения к клавиши ESC
FileChangeDir ("C:Program FilesQIPUsersXXXXXXXXXHistory"); Изменяет рабочую директорию
while 1 ; Начинает бесконечный цикл работы скрипта
$Search=FileFindFirstFile("*.txt") ; Ищет txt-файлы в рабочей директории и возвращаемое значение поиска заносим в переменную $Search
if $Search = -1 then ; Проверяет наличие файлов по содержимому переменной
Sleep(1000) ; Если файлов не найдено, ждет секунду и запускает цикл сначала
else ; Если найден txt-файл, то...
$File=FileFindNextFile($Search) ; Заносит название файла в перменную $File
$Log=FileRead ($File) ; Заносит содержимое файла в переменную $log
$Log=StringSplit ($Log, @LF) ; Так как в QIP'е одно сообщение состоит из трех строк (пометка сообщения как входящее или исходящее, имя автора/дата/время отправки сообщения и само сообщение), то делает из переменной массив, в котором каждый элемент равен одной строке
$Mess=$log[3] ; Само сообщение заносит в переменную $Mess
FileDelete($File) ; Удаляет файл истории
MsgBox ("0","", $Mess, 1) ; На секунду выводит на экран сообщение с командой, которую скрипт будет сейчас выполнять - это реализовано для отладки
WinActivate ('[REGEXPCLASS:(?i){97E27FAA-C0B3-4b8e-A693-ED7881E99FC1}]') ; Делает активным окно Foobar'a, реализовал посредством обращения к классу, так как заголовок плеера меняется в зависимости от исполняемой композиции
WinWaitActive ('[REGEXPCLASS:(?i){97E27FAA-C0B3-4b8e-A693-ED7881E99FC1}]') ; Ждет когда окно Foobar'a станет активным
$Check=StringInStr($Mess, "local") ; Проверяет вхождение слова "local" в текст сообщения
if $Check=1 then ; Если "local" находится в начале сообщения, то...
Send("^f") ; Отправляет нажатие сочетания клавиш CTRL+F