1. Лучший говнокод

    В номинации:
    За время:
  2. Pascal / Говнокод #2150

    +93.3

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    type
    chel = record
    name:string;
    tag:int64;
    end;
    
    procedure go_to_banaj (var obj:chel);
    begin
    obj.tag:=obj.tag+1;
    writeln(obj.name+', Пошел ты в баню')
    writeln('Тебя послали в баню '+inttostr(obj.tag)+' Раз')
    end;
    
    procedure prolaps;
    var
    obj:chel;
    begin
    obj.tag:=0;
    readln(obj.name);
    //obj.name:='Фyтбалёр';
    while 1=1 do 
    go_to_banaj(obj)
    end;

    Tonnelll, 17 Ноября 2009

    Комментарии (2)
  3. Java / Говнокод #2125

    +74.6

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    Object[] obj = nci.getFromTNVEDALL(id);
    if (obj[0] != null && obj[1] != null && !obj[0].equals(new BigDecimal(0))) {
    	if (obj[2] != null && obj[3] != null && !obj[2].equals(new BigDecimal(0))) {
    		if (obj[4] != null && obj[6] != null && !obj[4].equals(new BigDecimal(0))) {
    			// Проверка1
    			Object[] resProverka = proverka1(obj, numGoods, numRow, paymentDate, dutyRow, АКЦИЗ);
    			str = (String) resProverka[0];
    			date = (Date) resProverka[1];
    		} else {
    			// Проверка2
    			Object[] resProverka = proverka2(obj, numGoods, numRow, paymentDate, dutyRow, АКЦИЗ);
    			str = (String) resProverka[0];
    			date = (Date) resProverka[1];
    		}
    	} else {
    		// Проверка3
    		Object[] resProverka = proverka3(obj, numGoods, numRow, paymentDate, dutyRow, АКЦИЗ);
    		str = (String) resProverka[0];
    		date = (Date) resProverka[1];
    	}
    	if (obj[8] != null) {
    		if (gtdFields.getPreferencii(numGoods) == null ||
    				!((String) obj[8]).toUpperCase().equals(gtdFields.getPreferencii(numGoods).substring(2, 3))) {
    			str =
    					"|Для товара №" + (numGoods + 1) + " при применении ставки акциза " + obj[0] +
    							nci.getEdIzm((String) obj[1]) +
    							" в третьей позиции гр.36 ГТД необходимо указать преференцию '" + obj[8] + "'\n";
    		}
    	}
    	gtdFields.setCurrencyUseDate(numGoods, date, numRow);
    }

    ctepx, 11 Ноября 2009

    Комментарии (2)
  4. JavaScript / Говнокод #2089

    +143.3

    1. 1
    2. 2
    3. 3
    <div id="yad" style="width:230px; border:1px solid #e8e8e8;padding:5px;">
    <script type="text/javascript">draw_yandexcontext();</script>
    </div>

    id="yad"...
    выпей йаду!

    xeonix, 02 Ноября 2009

    Комментарии (2)
  5. PHP / Говнокод #2085

    +151.2

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    while($record = $sql->GetResultAssoc())
    {
    echo $tpl['main_table_item']->FillTemplate(array("%counter" => $counter, "%fio" => $record['fio'], "%phone" => $record['phone'], "%status" => statusToStr($record['status'])));
    $counter++;
    }

    самопальное шаблонное двигло. выводит данные из базы в табличном виде.

    nolka4, 02 Ноября 2009

    Комментарии (2)
  6. Ruby / Говнокод #2081

    −129.2

    1. 1
    2. 2
    3. 3
    def true_or_nil bool
      !!bool || nil
    end

    eveel, 01 Ноября 2009

    Комментарии (2)
  7. C# / Говнокод #2077

    +135.9

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    StiReport report = // создание отчета  StimulSoft Reporter          
     // . . . . .
     
    // . . . . . 
                string tempfilename = System.Guid.NewGuid().ToString() + ".tmp";
                report.ExportDocument(StiExportFormat.Word2007, tempfilename);    //позволяет конвертировать отчет только в поток 
    
                FileStream stream = new FileStream(tempfilename, FileMode.Open);
                byte[] reportFile = new byte[stream.Length];
                stream.Read(reportFile, 0, (int)stream.Length);
                stream.Close();
                File.Delete(tempfilename);
    
                if (reportFile.Length > 0)
                    if (MessageBox.Show("Зберегти друковану форму?", "Запит", MessageBoxButtons.OKCancel) == DialogResult.OK)
                         WriteToDB(reportFile, "Документ.docx");

    sven47, 31 Октября 2009

    Комментарии (2)
  8. JavaScript / Говнокод #2068

    +144.6

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    curEl.change(function (e) {
                switch(current_c){
                    case '1': l = 0.001;  break;
                    case '2': l = 0.001;  break;
                    case '3': l = 1 ;     break;
                }
    
                switch(curEl.val()){
                    case '1': l2 = 0.001;  break;
                    case '2': l2 = 0.001;  break;
                    case '3': l2 = 1 ;     break;
                }
    
                convfrom = parseFloat((curr[current_c]/curr[curEl.val()]) *from.val() * (l/l2));
                convto   = parseFloat((curr[current_c]/curr[curEl.val()])*to.val()*(l/l2));
    
                if(from.val()!='')	from.val(convfrom);
                if(to.val()!='')    to.val(convto);
                from.focus();
            });

    kovel, 28 Октября 2009

    Комментарии (2)
  9. PHP / Говнокод #2058

    +156.3

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    33. 33
    final class HelperCurrency {
      
      	public function format($number, $currency = '', $value = '', $format = TRUE) {
    		/*** .... some code .... ***/
        	if ($value) {
          		$value = $value;
        	} else {
          		$value = $this->currencies[$currency]['value'];
        	}
    
        	if ($value) {
          		$value = $number * $value;
        	} else {
          		$value = $number;
        	}
    
    		/*** .... some code .... ***/
    		
    		if ($format) {
    			$decimal_point = $this->language->get('decimal_point');
    		} else {
    			$decimal_point = '.';
    		}
    		
    		if ($format) {
    			$thousand_point = $this->language->get('thousand_point');
    		} else {
    			$thousand_point = '';
    		}
    
    		/*** .... some code .... ***/
      	}
    }

    класика от OpenCart v. 1.3.2

    Under, 27 Октября 2009

    Комментарии (2)
  10. Java / Говнокод #2050

    +77.3

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    // Год и месяц редактируются как Double, а хранятся в  базе как два инта
                    if (aValue == null) {
                        current.setStartMonth(0);
                        current.setStartMonth(0);
                    } else {
                        current.setStartMonth(Integer.parseInt(aValue.toString().split(".")[0]));
                        current.setStartMonth(Integer.parseInt(aValue.toString().split(".")[1]));
                    }

    Программисты клиента и базы стоят один другого

    Jk, 27 Октября 2009

    Комментарии (2)
  11. VisualBasic / Говнокод #2026

    −129.8

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    19. 19
    20. 20
    21. 21
    22. 22
    For intAtts As Integer = 5 To strParams.Length - 1
                Select Case (intAtts + 1) Mod 3
                    Case 0
                        '--- Set where to find the attachments
                        Select Case strParams(intAtts).ToUpper
                            Case "TASKVIEW"
                                strAttach = CType(Me.Parent, ctlTaskViewTemplate).ctlDocNavigator.ContainerID.ToString & ","
                            Case "WORKITEM"
                                strAttach = WorkItem.WorkItemContainer.ToString & ","
                            Case "CASE"
                                strAttach = BFECase.CaseContainerID.ToString & ","
                        End Select
                    Case 1
                        '--- Set the relative path of where to find the attachments
                        strAttach = strAttach & strParams(intAtts) & ","
                    Case 2
                        '--- Set the type of document used to find the attachments
                        strAttach = strAttach & strParams(intAtts)
                        arrAttachments.Add(strAttach)
                        strAttach = ""
                End Select
            Next intAtts

    вот и попробуй пойми что в этих массивах по какому принципу лежит

    6istik, 22 Октября 2009

    Комментарии (2)