- 1
- 2
fstp qword [tmp]
fild qword [tmp]-
Лучший говнокод
- В номинации:
-
- Лучший рейтинг
- Самый комментируемый
- За время:
-
- за сегодня
- за неделю
- за месяц
- за всё время
-
Assembler / Говнокод #3194
+225
суровое округление через память
3.14159265,
11 Мая 2010
Комментарии (26) -
PHP / Говнокод #3073
+162
- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
if ($_FILES['upfile']['size'] > 0) { $fname = $_FILES['upfile']['name']; $fcat = $_POST['category']; $ext = explode(".", $fname); if ($ext[1] == 'txt') { if (!file_exists("$fcat/$fname")) { if ((move_uploaded_file($_FILES['upfile']['tmp_name'], "$fcat/$fname"))) { chmod("$fcat/$fname", 0777); echo 'Текстовой файл успешно загружен! <br />'; echo '<a href="index.php?file=' . $fname . '&kat=' . $fcat . '&view=2">Посмотреть</a>'; } else { echo 'Ошибка прикрепления файла<br />'; echo '<a href="index.php?kat=' . $fcat . '&view=1">Назад</a>'; } } else { echo 'Такой файл уже существует<br />'; echo '<a href="index.php?kat=' . $fcat . '&view=1">Назад</a>'; } } else { echo 'Для загрузки доступны лишь файлы, с расширением .txt<br />'; echo '<a href="index.php?kat=' . $fcat . '&view=1">Назад</a>'; } } else { echo 'Недопустимый размер файла<br />'; echo '<a href="index.php?kat=' . $fcat . '&view=1">Назад</a>'; }WAP-ENGINE
Мега зашита при опланде :D
lugaro,
22 Апреля 2010
Комментарии (26) -
SQL / Говнокод #2978
−180.2
- 1
SELECT ((SELECT COUNT(*) FROM `books` WHERE `author` = '?') + (SELECT COUNT(*) FROM `magazins` WHERE `author` = '?')));не многовато ли селектов?:))
вместо '?' пхпшный код ставит значение.
litrumb,
09 Апреля 2010
Комментарии (26) -
1C / Говнокод #2936
−364.8
- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
- 29
- 30
- 31
- 32
- 33
- 34
- 35
- 36
- 37
Процедура ДействияФормыСформировать(Кнопка) Запись = Новый Структура; Запись.Вставить("Номер",); Запись.Вставить("ФизЛицо",); Запись.Вставить("ТабНомер",); Запись.Вставить("д1",); Запись.Вставить("д2",); Запись.Вставить("д3",); Запись.Вставить("д4",); Запись.Вставить("д5",); Запись.Вставить("д6",); Запись.Вставить("д7",); Запись.Вставить("д8",); Запись.Вставить("д9",); Запись.Вставить("д10",); Запись.Вставить("д11",); Запись.Вставить("д12",); Запись.Вставить("д13",); Запись.Вставить("д14",); Запись.Вставить("д15",); Запись.Вставить("д16",); Запись.Вставить("д17",); Запись.Вставить("д18",); Запись.Вставить("д19",); Запись.Вставить("д20",); Запись.Вставить("д21",); Запись.Вставить("д22",); Запись.Вставить("д23",); Запись.Вставить("д24",); Запись.Вставить("д25",); Запись.Вставить("д26",); Запись.Вставить("д27",); Запись.Вставить("д28",); Запись.Вставить("д29",); Запись.Вставить("д30",); Запись.Вставить("д31",);Не ожидал от своего коллеги такого говнокода :) Хорошо, что в месяце не 100 дней ;_)
Данный код можно заменить
Для й = 1 По 31 Цикл
Запись.Вставить("д" + Строка(й));
КонецЦикла;
tiger_x,
06 Апреля 2010
Комментарии (26) -
C++ / Говнокод #2465
+50.4
- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
map<string, int> M; ... M["one"] = 1; M["two"] = 2; M["google"] = 1e100; ... // найдём сумму всех значений --- т.е. всех правых частей // пар <string, int> int r = 0; tr(M, it) { r += it->second; // (*it).first == [string], (*it).second == [int] }и это на сайте обучения программирования!!!
http://informatics.mccme.ru/moodle/mod/book/view.php?id=492&chapterid=216
Novi4oK,
21 Января 2010
Комментарии (26) -
Pascal / Говнокод #2354
+102
- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
begin tru:=false; if tru=false then begin ObrMatritsa(Sigm,Sigm_transp); tru:=true; det:=abs(Determinant(Sigm)); if det=0 then begin ShowMessage('Determinant = 0'); tru:=false; Application.Terminate; exit; end; //if det=0 then begin result:=0 ; exit end; sum:=1/sqrt(power(2*pi,kol_prizn)*det* exp(Mas)); if sum=0 then result:=0 ; end else exit; end;
TAX,
30 Декабря 2009
Комментарии (26) -
C++ / Говнокод #2210
+922
- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
int proverka_na_chislo(string str){ int l=0; for(unsigned int i=0; i<str.length();i++) { if(str.compare(i,i+1,"0")!=0){ if(str.compare(i,i+1,"1")!=0){ if(str.compare(i,i+1,"2")!=0){ if(str.compare(i,i+1,"3")!=0){ if(str.compare(i,i+1,"4")!=0){ if(str.compare(i,i+1,"5")!=0){ if(str.compare(i,i+1,"6")!=0){ if(str.compare(i,i+1,"7")!=0){ if(str.compare(i,i+1,"8")!=0){ if(str.compare(i,i+1,"9")!=0){ throw std::invalid_argument("invalid argument\n"); l=-1; } } } } } } } } } } } return l; }Проверка на число.
LocalStorm,
03 Декабря 2009
Комментарии (26) -
C++ / Говнокод #1768
+66.8
- 1
- 2
- 3
- 4
- 5
- 6
- 7
- 8
- 9
PChar GetFileContent(PChar FileName) { ... }; static inline signed int GetFileSize(PChar FileName) { return(((signed int)(strlen(GetFileContent(FileName))))); };Всё гениальное - просто...
Говногость,
04 Сентября 2009
Комментарии (26) -
Си / Говнокод #1761
+133
- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
- 29
- 30
- 31
- 32
- 33
- 34
- 35
- 36
- 37
- 38
- 39
- 40
- 41
- 42
- 43
- 44
- 45
- 46
- 47
- 48
- 49
- 50
- 51
- 52
- 53
- 54
- 55
- 56
- 57
- 58
- 59
- 60
- 61
- 62
- 63
- 64
- 65
- 66
- 67
- 68
- 69
- 70
//рекурсивная процедура создающая структуру меню byte form_hash(phasharray vrarr, WORD* ni, byte* ne) { byte ct=MainMenu[(*ni)].numSubMenus, ict; phasharray vrarrcr; if((*ni)++==0) pmain=vrarr; // если первый проход - запоминаем ссылку на главное меню for (ict=0; ict<ct; ict++) { vrarr->hash[ict].pitem=(tmenuitem*)RTKGetBuffer(&menuPool); //инициализация строки элемента scopy0(((*((*vrarr).hash[ict].pitem)).menustr), MainMenu[*ni].nameMenu); if (MainMenu[*ni].numSubMenus!=0) { (*((*vrarr).hash[ict].pitem)).pnextlev=RTKGetBuffer(&hashMenuPool);// создание хэша vrarrcr=(phasharray)(*((*vrarr).hash[ict].pitem)).pnextlev;//вводим новую переменную для облегчения доступа к созданной структуре (*vrarr).hash[ict].quantity=(byte)MainMenu[*ni].numSubMenus;//запоминаем количество элементов в меню уровнем выше (*vrarrcr).pPrevLev=vrarr; // ссылка на предыдущий элемент (*((*vrarr).hash[ict].pitem)).fpmenu=true; if (MainMenu[*ni].numSubMenus==MENU_FUNC) // вызов процедуры динамического формирования меню { menupr_params.vrarr=vrarrcr; menupr_params.phashprev=vrarr; menupr_params.ni=ni; menupr_params.ne=ne; menupr_params.ict=ict; (MainMenu[*ni].pproc)(); (*ni)++; } else { if(MainMenu[*ni].pproc) // если исключение (перед входом в подменю необходимо выполнить функцию) { changeArr[(*ne)++]=vrarrcr; (*((*vrarr).hash[ict].pitem)).pexec=MainMenu[*ni].pproc; (*((*vrarr).hash[ict].pitem)).fpmenu=false; }; // исправляем значение элементов (*(vrarr)).hash[ict].quantity=form_hash(vrarrcr, ni, ne); }; // проверка сформированного меню switch ((*(vrarr)).hash[ict].quantity) { case MENU_NO: // нет подменю // освободить эл-т RTKFreeBuffer(&hashMenuPool, vrarrcr); (*((*(vrarr)).hash[ict].pitem)).pexec=*menu_refresh; (*((*(vrarr)).hash[ict].pitem)).fpmenu=false; break; case MENU_NOEL: // не формировать эл-т // освободить эл-т RTKFreeBuffer(&hashMenuPool, vrarrcr); RTKFreeBuffer(&menuPool, vrarr->hash[ict].pitem); ict--; ct--; break; case MENU_FUNC: // нет подменю, нормальная функция RTKFreeBuffer(&hashMenuPool, vrarrcr); (*(vrarr)).hash[ict].quantity=0; //(*((*vrarr).hash[ict].pitem)).fpmenu=false; break; } } else // заполнение элемента { (*((*vrarr).hash[ict].pitem)).pexec=MainMenu[*ni].pproc; (*((*vrarr).hash[ict].pitem)).fpmenu=false; (*ni)++; }; }; return ct; };Эх, бурная была молодость :-)
Barmaglot,
04 Сентября 2009
Комментарии (26) -
Куча / Говнокод #1311
+73
- 001
- 002
- 003
- 004
- 005
- 006
- 007
- 008
- 009
- 010
- 011
- 012
- 013
- 014
- 015
- 016
- 017
- 018
- 019
- 020
- 021
- 022
- 023
- 024
- 025
- 026
- 027
- 028
- 029
- 030
- 031
- 032
- 033
- 034
- 035
- 036
- 037
- 038
- 039
- 040
- 041
- 042
- 043
- 044
- 045
- 046
- 047
- 048
- 049
- 050
- 051
- 052
- 053
- 054
- 055
- 056
- 057
- 058
- 059
- 060
- 061
- 062
- 063
- 064
- 065
- 066
- 067
- 068
- 069
- 070
- 071
- 072
- 073
- 074
- 075
- 076
- 077
- 078
- 079
- 080
- 081
- 082
- 083
- 084
- 085
- 086
- 087
- 088
- 089
- 090
- 091
- 092
- 093
- 094
- 095
- 096
- 097
- 098
- 099
- 100
program test; uses crt; label ww,1,2,ww2,ee,ee2,rr,rr2,tt,tt2,tt3,yy,yy2,yy3,uu,uu2,uu3,ii,ii2,ii3,ii4,oo,oo2,oo3,oo4,00,z,x,c,v; var q,q2,w,e,r,t,w2,e2,r2,t2,t3,y,y2,y3,u,u2,u3,i,i2,i3,i4,o,o2,o3,o4:real; begin 1:clrscr; textcolor(4); writeln('++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++'); textcolor(2); writeln('+Если вы отвечаете "ДА",то нажимайте "1" ,а если "НЕТ",то "0"+ '); textcolor(4); writeln('++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++'); writeln; textcolor(2); writeln('Ответьте пожалуйста на следующие вопросы:'); writeln('*****************************************'); textcolor(8); writeln('Вы помните всю таблицу умножения?'); read(q); if q=1 then begin writeln('Вы давно были на рок-концерте?');read(w);goto ww end; if q=0 then begin writeln('Вы играете в волейбол?');read(w2);goto ww2 end; ww:if w=1 then begin writeln('Вы играете в волейбол?');read(w2);goto ww2 end; if w=0 then begin writeln('Вы йог?');read(e);goto ee end; ww2:if w2=1 then begin writeln('Вы летали на истребителе?');read(e2);goto ee2 end; if w2=0 then begin writeln('Вы йог?');read(e);goto ee end; ee:if e=1 then begin writeln('Вы играете в очко?');read(r2);goto rr2 end; if e=0 then begin writeln('У вас часто болит голова?');read(r);goto rr end; ee2:if e2=1 then begin writeln('У вас часто болит голова?');read(r);goto rr end; if e2=0 then begin writeln('Вы играете в очко?');read(r2);goto rr2 end; rr:if r=1 then begin writeln('У вас смуглая кожа?');read(t);goto tt end; if r=0 then begin writeln('У вас есть загородный дом?');read(t2);goto tt2 end; rr2:if r2=1 then begin writeln('Вы часто лежите в больнице?');read(t3);goto tt3 end; if r2=0 then begin writeln('У вас часто болит голова?');read(r);goto rr end; tt:if t=1 then begin writeln('У вас есть загородный дом?');read(t2);goto tt2 end; if t=0 then begin writeln('В вашем подъезде кодовый замок?');read(y);goto yy end; tt2:if t2=1 then begin writeln('Вы часто лежите в больнице?');read(t3);goto tt3 end; if t2=0 then begin writeln('В вашем подъезде кодовый замок?');read(y);goto yy end; tt3:if t3=1 then begin writeln('Телесериалы бывают интересными?');read(y3);goto yy3 end; if t3=0 then begin writeln('Вы пишете роман?');read(y2);goto yy2 end; yy:if y=1 then begin writeln('Вы знаете что такое "дежа вю"?');read(u2);goto uu2 end; if y=0 then begin writeln('Вам всегда жалко бездомных собак?');read(u);goto uu end; yy2:if y2=1 then begin writeln('В вашем подъезде кодовый замок?');read(y);goto yy end; if y2=0 then begin writeln('Телесериалы бывают интересными?');read(y3);goto yy3 end; yy3:if y3=1 then begin writeln('Вы знаете что такое "дежа вю"?');read(u2);goto uu2 end; if y3=0 then begin writeln('В детстве вы играли в индейцев?');read(u3);goto uu3 end; uu:if u=1 then begin writeln('Вы любите варёную рыбу?');read(i);goto ii end; if u=0 then begin writeln('Вы знаете что такое ДЕЖА ВЮ ?');read(u2);goto uu2 end; uu2:if u2=1 then begin writeln('Вы любите вареную рыбу?');read(i);goto ii end; if u2=0 then begin writeln('В детстве вы играли в индейцев?');read(u3);goto uu3 end; uu3:if u3=1 then begin writeln('У вас отключена горячая вода?');read(i4);goto ii4 end; if u3=0 then begin writeln('Макароны вы едите с хлебом ?');read(i3);goto ii3 end; ii:if i=1 then begin writeln('Вы могли бы рекламировать бельё?');read(i2);goto ii2 end; if i=0 then begin writeln('Вы любите петь?');read(o);goto oo end; ii2:if i2=1 then begin writeln('Вы любите морковный сок?');read(o3);goto oo3 end; if i2=0 then begin writeln('Вы хотите стать гражданином США ?');read(o2);goto oo2 end; ii3:if i3=1 then begin writeln('Вам нравятся горы?');read(o4);goto oo4 end; if i3=0 then begin writeln('Вы любите морковный сок?');read(o3);goto oo3 end; ii4:if i4=1 then begin writeln('Вам нравятся горы?');read(o4);goto oo4 end; if i4=0 then begin writeln('Вы любите морковный сок?');read(o3);goto oo3 end; oo:if o=1 then goto z; if o=0 then goto x; oo2:if o2=1 then goto z; if o2=0 then goto x; oo3:if o3=1 then goto c; if o3=0 then begin writeln('Вы хотите стать гражданином США ?');read(o2);goto oo2 end; oo4:if o4=1 then goto v; if o4=0 then goto c; z:clrscr; textcolor(5); writeln(' ------ИТОГ: добрый ли вы человек?-------'); textcolor(14); writeln('Вы случайно не мать Тереза?Бескрайняя ваша доброта...почти также как и глупость'); writeln('Мало настрадались по своей вине?То ли ещё будет.');goto 00; x:clrscr; textcolor(5); writeln(' ------ИТОГ: добрый ли вы человек? -------'); textcolor(14); writeln('Вы не безнадёжны.В детстве с вами явно занимались.Но годы делают своё дело-'); writeln('ещё немного и от ваших лучших качеств не останется и следа.');goto 00; c:clrscr; textcolor(5); writeln(' -------ИТОГ: добрый ли вы человек?-------'); textcolor(14); writeln('Брр... С вами близко лучше не знакомиться.Кошек вы конечно не мучаете ,но и на'); writeln('гуманиста абсолютно не тянете.Надо за собой следить');goto 00; v:clrscr; textcolor(5); writeln(' ------ИТОГ: добрый ли вы человек? -------'); textcolor(14); writeln('Бесцветность вашей натуры не оставляет места для разговоров о добре и зле'); writeln('В вас всего по немногу-может это и есть идеальный вариант?');goto 00; 00:writeln; ... writeln('Если вы хотите ещё раз протестироваться нажмите "1",если нет "0"'); textcolor(4); writeln('-----------------------------------------------------------------'); read(q2); if q2=1 then goto 1; if q2=0 then goto 2; 2:end.Нашел свой старый код на паскале. Код был написан сразу после изучение конструкции if и goto. Было это в 10 классе, т.е. где-то лет 10 назад :))
Программа является реализацией точной копии теста из журнала "МК-бульвар" того времени
guest,
02 Июля 2009
Комментарии (26)
Follow us!