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

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

    0

    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
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    64. 64
    65. 65
    66. 66
    67. 67
    68. 68
    69. 69
    70. 70
    71. 71
    72. 72
    73. 73
    74. 74
    75. 75
    76. 76
    77. 77
    78. 78
    79. 79
    80. 80
    81. 81
    82. 82
    unit Unit1;
    
    interface
    
    uses
      Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
      Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls;
    
    type
      TForm1 = class(TForm)
        Edit1: TEdit;
        Edit2: TEdit;
        Button1: TButton;
        ListBox1: TListBox;
        Button2: TButton;
        procedure Button1Click(Sender: TObject);
        procedure Button2Click(Sender: TObject);
      private
        { Private declarations }
      public
        { Public declarations }
      end;
    
    var
      Form1: TForm1;
    
    implementation
    
    {$R *.dfm}
    
    procedure TForm1.Button1Click(Sender: TObject);
    var
    a,b:string;
    i:integer;
    begin
      a := Edit1.Text;
      b := Edit2.Text;
      for i := 0 to 9 do
        begin
            ListBox1.Items.Add('BEGIN:VCARD');
            ListBox1.Items.Add('VERSION:2.1');
            ListBox1.Items.Add('N:' + '000' + IntToStr(i) + ';' + '000' + IntToStr(i) + ';;;');
            ListBox1.Items.Add('FN:' + '000' + IntToStr(i) + ' ' + '000' + IntToStr(i));
            ListBox1.Items.Add('TEL;CELL:' + a + '000' + IntToStr(i) + b);
            ListBox1.Items.Add('END:VCARD');
        end;
      for i := 10 to 99 do
        begin
            ListBox1.Items.Add('BEGIN:VCARD');
            ListBox1.Items.Add('VERSION:2.1');
            ListBox1.Items.Add('N:' + '00' + IntToStr(i) + ';' + '00' + IntToStr(i) + ';;;');
            ListBox1.Items.Add('FN:' + '00' + IntToStr(i) + ' ' + '00' + IntToStr(i));
            ListBox1.Items.Add('TEL;CELL:' + a + '00' + IntToStr(i) + b);
            ListBox1.Items.Add('END:VCARD');
        end;
      for i := 100 to 999 do
        begin
            ListBox1.Items.Add('BEGIN:VCARD');
            ListBox1.Items.Add('VERSION:2.1');
            ListBox1.Items.Add('N:' + '0' + IntToStr(i) + ';' + '0' + IntToStr(i) + ';;;');
            ListBox1.Items.Add('FN:' + '0' + IntToStr(i) + ' ' + '0' + IntToStr(i));
            ListBox1.Items.Add('TEL;CELL:' + a + '0' + IntToStr(i) + b);
            ListBox1.Items.Add('END:VCARD');
        end;
      for i := 1000 to 9999 do
        begin
            ListBox1.Items.Add('BEGIN:VCARD');
            ListBox1.Items.Add('VERSION:2.1');
            ListBox1.Items.Add('N:' + IntToStr(i) + ';' + IntToStr(i) + ';;;');
            ListBox1.Items.Add('FN:' + IntToStr(i) + ' ' + IntToStr(i));
            ListBox1.Items.Add('TEL;CELL:' + a + IntToStr(i) + b);
            ListBox1.Items.Add('END:VCARD');
        end;
    
    end;
    
    procedure TForm1.Button2Click(Sender: TObject);
    begin
      ListBox1.Items.SaveToFile('C:\Users\Admin\Desktop\import_tel.vcf');
    end;
    
    end.

    Программа для генерации номеров телефона которую написал друг)

    Reds, 09 Января 2020

    Комментарии (7)
  3. Python / Говнокод #26299

    0

    1. 001
    2. 002
    3. 003
    4. 004
    5. 005
    6. 006
    7. 007
    8. 008
    9. 009
    10. 010
    11. 011
    12. 012
    13. 013
    14. 014
    15. 015
    16. 016
    17. 017
    18. 018
    19. 019
    20. 020
    21. 021
    22. 022
    23. 023
    24. 024
    25. 025
    26. 026
    27. 027
    28. 028
    29. 029
    30. 030
    31. 031
    32. 032
    33. 033
    34. 034
    35. 035
    36. 036
    37. 037
    38. 038
    39. 039
    40. 040
    41. 041
    42. 042
    43. 043
    44. 044
    45. 045
    46. 046
    47. 047
    48. 048
    49. 049
    50. 050
    51. 051
    52. 052
    53. 053
    54. 054
    55. 055
    56. 056
    57. 057
    58. 058
    59. 059
    60. 060
    61. 061
    62. 062
    63. 063
    64. 064
    65. 065
    66. 066
    67. 067
    68. 068
    69. 069
    70. 070
    71. 071
    72. 072
    73. 073
    74. 074
    75. 075
    76. 076
    77. 077
    78. 078
    79. 079
    80. 080
    81. 081
    82. 082
    83. 083
    84. 084
    85. 085
    86. 086
    87. 087
    88. 088
    89. 089
    90. 090
    91. 091
    92. 092
    93. 093
    94. 094
    95. 095
    96. 096
    97. 097
    98. 098
    99. 099
    100. 100
    """ASCII art generator braille only.
    
    To start, put this and the image (you need to rename it to input.jpg) in one folder.
    
    The main problem of the algorithm:
    Due to the fact that the 8 empty dots symbol and any other Braille symbol have different widths,
    the picture may 'float'.
    
    """
    from PIL import Image, ImageDraw
    
    # Change scale of image.
    scale = int(input('% of scale: ')) / 100
    imgForScale = Image.open('input.jpg')
    widthOldForScale, heightOldForScale = imgForScale.size
    widthNewForScale, heightNewForScale = int(widthOldForScale * scale), int(heightOldForScale * scale)
    scaleImg = imgForScale.resize((widthNewForScale, heightNewForScale), Image.ANTIALIAS)
    scaleImg.save('inputScale.jpg')
    # -------------
    
    # Makes the image BW.
    factor = int(input('factor: '))  # The more, the darker.
    imgForBW = Image.open('inputScale.jpg')
    draw = ImageDraw.Draw(imgForBW)
    widthForBW, heightForBW = imgForBW.size
    pix = imgForBW.load()
    for i in range(widthForBW):
        for j in range(heightForBW):
            a = pix[i, j][0]
            b = pix[i, j][1]
            c = pix[i, j][2]
            S = a + b + c
            if S > (((255 + factor) * 3) // 2):
                a, b, c = 255, 255, 255
            else:
                a, b, c = 0, 0, 0
            draw.point((i, j), (a, b, c))
    imgForBW.save("inputScaleBW.jpg")
    # -------------
    
    # The image should be divided by 2 horizontally, by 4 vertically. Otherwise, the extra pixels will be removed.
    img = Image.open('inputScaleBW.jpg')
    size = w, h = img.size
    if (w % 2) == 0:
        pass
    else:
        w -= 1
    hCut = h % 4
    if hCut == 0:
        pass
    else:
        h -= hCut
    # -------------
    
    data = img.load()
    yStart, yEnd = 0, 4
    xStart, xEnd = 0, 2
    valueOfPixNow = []
    b = w // 2  # I don`t remember.
    a = b - 1   # The same thing.
    i = 0
    
    while (yEnd <= h) and (xEnd <= w):
        # Getting data from a image.
        valueOfPixNow = []
        for y in range(yStart, yEnd):
            for x in range(xStart, xEnd):
                if not ((230 <= data[x, y][0] <= 255) and (230 <= data[x, y][1] <= 255) and (230 <= data[x, y][2] <= 255)):
                    valueOfPixNow.append(1)
                else:
                    valueOfPixNow.append(0)
        # -------------------
        # Convert data from image.
        normalBinaryReversed = [valueOfPixNow[0], valueOfPixNow[2], valueOfPixNow[4], valueOfPixNow[1], valueOfPixNow[3],
                                valueOfPixNow[5], valueOfPixNow[6], valueOfPixNow[7]]
        normalBinary = list(reversed(normalBinaryReversed))
        strBinary = ''.join(map(str, normalBinary))
        strHex = hex(int(strBinary, 2))
        twoLastNum = strHex[2:]
        if len(twoLastNum) == 1:
            twoLastNum = '0' + twoLastNum
        hexStrBraille = '28' + twoLastNum
        decimalBraille = int(hexStrBraille, 16)
        answer = chr(decimalBraille)
        # -------------------
        if i == a:
            a += b
            print(answer)
        else:
            print(answer, end='')
        i += 1
    
        if xEnd < w:
            xStart += 2
            xEnd += 2
        else:
            xStart = 0
            xEnd = 2
            yStart += 4
            yEnd += 4

    Fantoner, 02 Января 2020

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

    +1

    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
    Функция ДобавитьКДатеМесяц(НачальнаяДата, Количество)
    	
    	РезультатФункции = Дата("00010101");
    	
    	ЗапросПериода = Новый Запрос;
    	ЗапросПериода.УстановитьПараметр("ДатаНачала",		НачальнаяДата);
    	ЗапросПериода.УстановитьПараметр("Количество",		Количество);
    	ЗапросПериода.Текст = 
    	"ВЫБРАТЬ
    	|	ДОБАВИТЬКДАТЕ(&ДатаНачала, МЕСЯЦ, &Количество) КАК ДатаСмещения
    	|";
    	РезультатЗапросПериода = ЗапросПериода.Выполнить().Выбрать();
    	
    	Если РезультатЗапросПериода.Следующий() Тогда
    		РезультатФункции = РезультатЗапросПериода.ДатаСмещения;
    	КонецЕсли;
    	
    	Возврат РезультатФункции;
    	
    КонецФункции

    pahalovo, 05 Ноября 2019

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

    0

    1. 1
    let res: boolean = result.lmr_customertype === typeOfSaleValue ? false : true;

    m_sandman, 25 Октября 2019

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

    0

    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
    #include "pch.h"
    #include <iostream>
    #include <conio.h>
    #include <math.h>
    #include <stdlib.h>
    
    using namespace std;
    
    int main()
    {
    	setlocale(0, "rus");
    	int a[100], min = 0, sum=0, n, k=0;
    	double sr;
    	cout << "введите количество элементов массива: "; cin >> n;
    	cout << "\n---элементы массива должны быть ЦЕЛЫМИ---\n\n";
    	
    	for (int i = 0; i < n; i++) {
    		cout << "a[" << i + 1 << "] = "; cin >> a[i];
    		if (a[i] > 0) {
    			k++;
    			sum += a[i];
    		}
    		else {
    			if (a[i] < min) min = a[i];
    		}
    	}
    	sr = (double)sum / k;
    	cout << "произведение минимального среди отрицательных (" << min << ") на среднее арифметическое всех положительных (" << sr << ") равно: " << min * sr;
    	
            _getch();
    	return 0;
    }

    Произведение минимального среди отрицательных на среднее арифметическое всех положительных.

    maxrbs, 30 Сентября 2019

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

    0

    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
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    <КоммерческаяИнформация ВерсияСхемы="2.03" ДатаФормирования="2016-08-11">
    	<ПакетПредложений>
    		<Ид>0f6acf08-0501-11e5-a1ed-000ea6f880f2#</Ид>
    		<Наименование>Пакет предложений</Наименование>
    		<ИдКаталога>0f6acf08-0501-11e5-a1ed-000ea6f880f2</ИдКаталога>
    		<ИдКлассификатора>0f6acf08-0501-11e5-a1ed-000ea6f880f2</ИдКлассификатора>
    		<ТипыЦен>
    			<ТипЦены>
    				<Ид>0f6acf0e-0501-11e5-a1ed-000ea6f880f2</Ид>
    				<Наименование>Rozn</Наименование>
    				<Валюта>UAH</Валюта>
    				<Налог>
    					<Наименование>НДС</Наименование>
    					<УчтеноВСумме>false</УчтеноВСумме>
    				</Налог>
    			</ТипЦены>
    			<ТипЦены>
    				<Ид>0f6acf0d-0501-11e5-a1ed-000ea6f880f2</Ид>
    				<Наименование>Zakup</Наименование>
    				<Валюта>UAH</Валюта>
    				<Налог>
    					<Наименование>НДС</Наименование>
    					<УчтеноВСумме>false</УчтеноВСумме>
    				</Налог>
    			</ТипЦены>
    		</ТипыЦен>
    		<Предложения>
    			<Предложение>
    				<Ид>1eb6ad86-a729-11e2-be44-000a5e5fa127</Ид>
    				<Артикул>0084</Артикул>
    				<Артикулл>00000002839</Артикулл>
    				<Наименование>COLORPLAST   Автобус "Бусик №1"</Наименование>
    				<БазоваяЕдиница Код="2009" НаименованиеПолное="Штука" МеждународноеСокращение="">шт</БазоваяЕдиница>
    				<Цены>
    					<Цена>
    						<Представление>61,88 UAH за шт</Представление>
    						<ИдТипаЦены>0f6acf0e-0501-11e5-a1ed-000ea6f880f2</ИдТипаЦены>
    						<ЦенаЗаЕдиницу>61.88</ЦенаЗаЕдиницу>
    						<Валюта>UAH</Валюта>
    						<Единица>шт</Единица>
    						<Коэффициент>1</Коэффициент>
    					</Цена>
    					<Цена>
    						<Представление>44,2 UAH за шт</Представление>
    						<ИдТипаЦены>0f6acf0d-0501-11e5-a1ed-000ea6f880f2</ИдТипаЦены>
    						<ЦенаЗаЕдиницу>44.2</ЦенаЗаЕдиницу>
    						<Валюта>UAH</Валюта>
    						<Единица>шт</Единица>
    						<Коэффициент>1</Коэффициент>
    					</Цена>
    				</Цены>
    				<Количество>24</Количество>
    			</Предложение>		
    		<СодержитТолькоИзменения>false</СодержитТолькоИзменения>
    	</ПакетПредложений>
    </КоммерческаяИнформация>

    snegoviktlt, 23 Сентября 2019

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

    +1

    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
    34. 34
    export default class CheckboxFilter extends React.PureComponent {
    
      private handleChange = (field: string) => (value: unknown) => {
        const { onChange } = this.props;
        onChange({params: { [field]: value }})
      };
    
      private onChangeValue(value: string, onChange: (value: string | null) => void, checked: boolean) {
        onChange(checked ? value : null);
      }
    
      private onChange = (e: any) => {
        const {value, type} = this.props;
        if(value) {
          this.onChangeValue.bind(null, value, this.handleChange(type))(e);
        } else {
          this.handleChange(type)(e);
        }
      }
    
      public render() {
        const {checked, children} = this.props;
    
        return (
            <Checkbox
              onChange={this.onChange}
              name='check'
              checked={checked}
            >
              {children}
            </Checkbox>
        )
      }
    };

    Код на react / typescript.
    Особое внимание методу onChange

    gooseim, 12 Сентября 2019

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

    +4

    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
    private async Task CountResultAsync(IProgress<bool> progress)
    {
         object sync = new object();
    
        await Task.Run(() => Parallel.For(0, _dataList.Count, i =>
        {
            lock (sync)
            {
                 var index = _dataList.FindIndex(m => m.FullPath.Equals(_dataList[i].FullPath));
    
                _dataList[index] = new GridModel()
                {
                    FullPath = _dataList[i].FullPath,
                    Name = _dataList[i].Name,
                    Checksum = GetFileChecksum(_dataList[i].FullPath),
                    IsCompleted = true
                };
           }
        }));
    }

    Когда кто-то пытается написать параллельный код, но что-то идет не так.

    ShockWorker, 13 Июня 2019

    Комментарии (7)
  10. Lua / Говнокод #25633

    +1

    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
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    utf8 = {}
    function utf8.charbytes(s, i)
       -- argument defaults
       i = i or 1
       local c = string.byte(s, i)
       
       -- determine bytes needed for character, based on RFC 3629
       if c > 0 and c <= 127 then
          -- UTF8-1
          return 1
       elseif c >= 194 and c <= 223 then
          -- UTF8-2
          local c2 = string.byte(s, i + 1)
          return 2
       elseif c >= 224 and c <= 239 then
          -- UTF8-3
          local c2 = s:byte(i + 1)
          local c3 = s:byte(i + 2)
          return 3
       elseif c >= 240 and c <= 244 then
          -- UTF8-4
          local c2 = s:byte(i + 1)
          local c3 = s:byte(i + 2)
          local c4 = s:byte(i + 3)
          return 4
       end
    end
    
    function utf8.len(s)
       local pos = 1
       local bytes = string.len(s)
       local len = 0
       
       while pos <= bytes and len ~= chars do
          local c = string.byte(s,pos)
          len = len + 1
          
          pos = pos + utf8.charbytes(s, pos)
       end
       
       if chars ~= nil then
          return pos - 1
       end
       
       return len
    end
    
    print(utf8.len("Аутизм")) --6
    
    local mt = {__len = function(self) 
          local k=0
          for _,v in pairs(self) do 
            k = k+1;
            if k > 1 then  print(1) return #self end
          end
          if k==1 and type(self[1])=="string" then
            print(utf8.len(self[k]))
          end
        end};
    setmetatable(_G,{
        __index = function(self, key) return setmetatable({key},mt) end} 
      )
    t=(#Аутизм) --12

    Чот пытался - но словил хуйца.

    3oJIoTou_xyu, 22 Мая 2019

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

    −1

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    namespace belugina
    {
    struct list {               
             type elem ;              
             list *next, *pred ;             
    }
    list *headlist ; 
    }

    не могу понять что люблю больше, английски или транслит.

    dethless, 19 Мая 2019

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