Примеры быдлокода, или как не нужно писать программы

[MaTBeu]

Сообщение от JUDAS

Уважаемый Матвей
Обосновываю свою "утончённость"
1. Где разделение говнокода на указанном ресурсе на языки программирования. Все слито в одну кучу и напоминает только одно место - помойку постов.

C++ (1651)  какой именно VisualC++  BorlaтdC++  протоС++(
Си (601)  какой именно , стандартный, Юникосвый  
Pascal (421) какой, Lasarus Турбо, Делфи, CodeGear ?
SQL (394)  то же
VisualBasic (118) то же
Assembler (63) то же

Уточняю.
Пост с кода который я привёл в этой теме 2-м сверху, для делфи является говнокодом, а для ТурбоПаскаля - нет

2. Как найти посты говнокода на тему циклы (for) или с наличием меток (label). Видимо местный программист, который писал код вышеуказаного сайта не знает или в меру своей высокой интеллектуальности не понимает, что сайт без поиска, что девушка без промежности.. или тут тоже у меня утончённое мнение ?
3. Порядок. Весь говнокод по конкретному языку слит в одну большую непрерывную .... личинку. Вы считаете такой стиль приемлемым для восприятия?

Совет: если Вы знакомы с автором указанного Выше ресурса, передайте ему пусть оформит его в стиле форума или упорядоченого древоподобного блога, а не в виде портянок постов сгруппированых по языкам.

Спасибо, что разъяснили. Я обязательно передам Ваши пожелания создателю сайта и настою на их скорейшем воплощении в жизнь.

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

Вы уж простите мое невежество, нечасто у нас тут знатоки такого калибра появляются.

С искренним уважением,
Матвей

[ДралсяСошибками]

Вполне нормальный сайт с необычной тематикой)))

[JUDAS]

Matvey с сайтом все нормально за исключением навигации которая желает лучшего
Кроме того, прочитал парочку портянок и понял, что сайт кишит недакватами изрыгающими маты и гадости. Вывод - система модерации желает лучшего
А так сайт вполне нормльный
С уважением judas

[kta87]

Да нормальный сайт, я прям с первой страницы выпал. Весь день настроение как то ни очень и ту вот оно счастье: govnokod.ru/17881

[Smitt&Wesson]

Мужики. Я вот не понимаю смысла этой темы. Просто приводить примеры г-кода? Ну, когда-то и я его писал. И кто его только не писал. Сейчас поднимаю распечатки и старые свои проекты, ржу-нимагу. А когда я это писал, казалось, что достиг верха совершенства, т.к. нашел решение. Блин, всё познаётся в срававнении...

[MaTBeu]

Сообщение от Smitt&Wesson

Мужики. Я вот не понимаю смысла этой темы. Просто приводить примеры г-кода? Ну, когда-то и я его писал. И кто его только не писал. Сейчас поднимаю распечатки и старые свои проекты, ржу-нимагу. А когда я это писал, казалось, что достиг верха совершенства, т.к. нашел решение. Блин, всё познаётся в срававнении...

Если не видите смысла в теме - зачем тогда отписываетесь?

В эти непростые времена, когда у нас наконец-то появилась надежда на улучшение дизайна и юзабилити сайта govnokod.ru, я не позволю вам все испортить!

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

У меня что-то ёкает внутри каждый раз, когда пользователь заходит на этот сайт и не может найти нужный кусок говнокода, потому что создатель не подумал о комфортном поиске! Мы это исправим. Я гарантирую.

[Utkin]

Мы это исправим. Я гарантирую.

Еще когда хотят отвязаться от проблемы пишут: Мы работаем над этим

[zvygin1964]

Спасибо создателю темы. Весь код, что буду писать, буду выкладывать сразу здесь.
Комментируйте, исправляйте. Даже не буду утруждаться в создании новых тем.
Вот счастье то! Месяцами ломаю голову, как сформулировать вопрос про: http://www.gunsmoker.ru/2008/10/x-y-z.html .
А оно само... http://citatyizfilmov.ru/video/1172/Гениально

[crazy horse]

Судя по постам, у кого-то пмс назрел. Я конечно все могу понять, но с таким подходом далеко не уедешь.

[JUDAS]

procedure TForm.UpdateMenuItems(Sender: TObject);
var
   nI: Integer;
   bI: Boolean;
begin
     bI := False;
     for nI := 0 to MDIChildCount - 1 do
         if MDIChildren [ nI ]. Name = 'Tlg' then bI := True;
     if bI then N2. Enabled := False
     else N2. Enabled := True;
     bI := False;
     for nI := 0 to MDIChildCount - 1 do
         if MDIChildren [ nI ]. Name = 'OCO' then bI := True;
     if bI then N51. Enabled := False
     else N51. Enabled := true;
     bI := False;
     for nI := 0 to MDIChildCount - 1 do
         if MDIChildren [ nI ]. Name = 'Tlg2' then bI := True;
     if bI then N5. Enabled := False
     else N5. Enabled := true;
     bI := False;
     for nI := 0 to MDIChildCount - 1 do
         if MDIChildren [ nI ]. Name = 'Form' then bI := True;
     if bI then N40. Enabled := False
     else N40. Enabled := True;
     bI := False;
     for nI := 0 to MDIChildCount - 1 do
         if MDIChildren [ nI ]. Name = 'Air' then bI := True;
     if bI then N41. Enabled := False
     else N41. Enabled := true;
     bI := False;
     for nI := 0 to MDIChildCount - 1 do
         if MDIChildren [ nI ]. Name = 'Country' then bI := True;
     if bI then N38. Enabled := False
     else N38. Enabled := true;
     bI := False;
     for nI := 0 to MDIChildCount - 1 do
         if MDIChildren [ nI ]. Name = 'Type' then bI := True;
     if bI then N43. Enabled := False
     else N43. Enabled := true;
     bI := False;
     for nI := 0 to MDIChildCount - 1 do
         if MDIChildren [ nI ]. Name = 'Ppm' then bI := True;
     if bI then N7. Enabled := False
     else N7. Enabled := true;
     bI := False;
     for nI := 0 to MDIChildCount - 1 do
         if MDIChildren [ nI ]. Name = 'Company' then bI := True;
     if bI then N42. Enabled := False
     else N42. Enabled := true;
     bI := False;
     for nI := 0 to MDIChildCount - 1 do
         if MDIChildren [ nI ]. Name = 'FormB' then bI := True;
     if bI then N34. Enabled := False
     else N34. Enabled := true;
     bI := False;
     for nI := 0 to MDIChildCount - 1 do
         if MDIChildren [ nI ]. Name = 'Punkt' then bI := True;
     if bI then N46. Enabled := False
     else N46. Enabled := true;
     bI := False;
     for nI := 0 to MDIChildCount - 1 do
         if MDIChildren [ nI ]. Name = 'Trassa' then bI := True;
     if bI then N44. Enabled := False
     else N44. Enabled := true;
     bI := False;
     for nI := 0 to MDIChildCount - 1 do
         if MDIChildren [ nI ]. Name = 'Jurnal' then bI := True;
     if bI then N48. Enabled := True
     else N48. Enabled := true;
     bI := False;
     for nI := 0 to MDIChildCount - 1 do
         if MDIChildren [ nI ]. Name = 'Perm' then bI := True;
     if bI then N50. Enabled := False
     else N50. Enabled := true;
     for nI := 0 to MDIChildCount - 1 do
         if MDIChildren [ nI ]. Name = 'Litle' then bI := True;
     if bI then N52. Enabled := False
     else N52. Enabled := true;
     bI := False;
end;