По колено в коде — Говнокод.ру

1C / Говнокод #17549

0

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

Если Сумма<=0 тогда
		
		НС = Док.СуммыДолга.Добавить();
		НС.ВидЗадолженности     = Перечисления.ВидыЗадолженности.Кредиторская;
		НС.ДоговорКонтрагента     = ПолучитьДоговор(Клиент,Док.ВалютаДокумента);
		НС.КурсВзаиморасчетов   = Док.КурсДокумента;
		НС.КратностьВзаиморасчетов=Док.КратностьДокумента;
		НС.Сумма = -Сумма;
		НС.СуммаРегл = НС.Сумма*НС.КурсВзаиморасчетов/НС.КратностьВзаиморасчетов;
		
		НС.СчетУчетаАвансов  = СчетКонтрагента;
		НС.СчетУчетаРасчетов = СчетКонтрагента;
	Иначе
		
		НС = Док.СуммыДолга.Добавить();
		НС.ВидЗадолженности     = Перечисления.ВидыЗадолженности.Дебиторская;
		НС.ДоговорКонтрагента     = ПолучитьДоговор(Клиент,Док.ВалютаДокумента);
		НС.КурсВзаиморасчетов   = Док.КурсДокумента;
		НС.КратностьВзаиморасчетов=Док.КратностьДокумента;
		НС.Сумма = Сумма;
		НС.СуммаРегл = НС.Сумма*НС.КурсВзаиморасчетов/НС.КратностьВзаиморасчетов;
		
		НС.СчетУчетаАвансов  = СчетКонтрагента;
		НС.СчетУчетаРасчетов = СчетКонтрагента;
	
	КонецЕсли;

Код исправный, но... любит один наш программер "чтоб побольше строк"... а если добавить дополнительные отступы ("для удобства прочтения"), то будет казаться, что программа невообразимо длинная и сложная

dsfix, 30 Января 2015

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

ActionScript / Говнокод #17548

−2

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

F7:: 
hTray := WinExist("ahk_class Shell_TrayWnd")
ControlGetPos, X,,,, CiceroUIWndFrame1
WinGetPos,, Y_Tray,, H_Tray

Gui, -Caption +ToolWindow +AlwaysOnTop +Owner
Gui, Margin, 0, 0
Gui, Color, 0x99FF99
Gui, Font, s3
Gui, Add, Text, % "center x0 y4 cWhite w" H_Tray " h" H_Tray - 8, % sec := 10
Gui, Show, % "NA x" X-250 " y" Y_Tray - 4
StartTime := A_TickCount
SetTimer, Timer, 600000
Return

Timer:
   Gui, +AlwaysOnTop
   Time := (A_TickCount - StartTime)//1000
   if (Time != PrevTime)
   {
      GuiControl,, Static1, % res := sec - Time
      PrevTime := Time
   }
   if res = 0
   {
      SetTimer, Timer, Off
      SoundPlay, *16
	  Sleep 10
	  
Gui, -Caption +ToolWindow +AlwaysOnTop +Owner
Gui, Margin, 0, 0
Gui, Color, Red
Gui, Font, s3
Gui, Add, Text, % "center x0 y4 cWhite w" H_Tray " h" H_Tray - 8, % sec := 10
Gui, Show, % "NA x" X-250 " y" Y_Tray - 4
Return
}
      ExitApp

/b/

Fishyfishy, 30 Января 2015

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

C# / Говнокод #17547

0

1
2
3
4
5
6
7
8
9

public static IEnumerable<T> Remove<T>(this IEnumerable<T> source, T key)
{
    return source.Where(element => !element.Equals(key));
}

public static IEnumerable<string> Remove(this IEnumerable<string> source, string key)
{
    return source.Where(element => element != key);
}

Немного велосипедостроения.

pushistayapodmyshka, 30 Января 2015

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

C# / Говнокод #17546

+3

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

if (!File.Exists(comboBox1.Text + ".pck"))
            {
                MessageBox.Show("Файла " + comboBox1.Text + ".pck не существует!", "Ошибка");
            }
            else
            {
                StreamWriter writer = new StreamWriter("Extract.bat");
                writer.WriteLine("sPCK.exe -pw -x " + comboBox1.Text + ".pck" + Environment.NewLine + "del Extract.bat");
                writer.Close();
                System.Diagnostics.Process.Start("Extract.bat");
                Thread.Sleep(1000);
                if (File.Exists(comboBox1.Text + ".pck.files"))
                {
                    //Lol
                }
                else
                {
                    if (checkBox1.Checked)
                    {
                        System.Diagnostics.Process.Start(comboBox1.Text + ".pck.files");
                    }
                    else
                    {
                        //LoL
                    }
                }
            }

Решил я значить узнать почему рядом с одной из программ создается .bat файл

skydev, 30 Января 2015

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

Assembler / Говнокод #17545

+2

1
2
3
4
5
6

CFG ; start: scasb
DCG ; salc
AEEAFF ; and al,'\'-'/'
AAEAFO ; add al,'/'
DBFAFB ; int 29h
DFDDGG ; jmp start

Генератор лабиринта на Wct.

Mihip, 29 Января 2015

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

Си / Говнокод #17544

0

01
02
03
04
05
06
07
08
09
10
11
12

#include <stdio.h>
int main () {
char c;
int result=0;
while(scanf("%c",&c) ) {
if( (c<'0') || (c > '1') ) break;
result«=1;
result+=c-'0';
};
printf("%d",result);
return 0;
}

Этот код переводит число из двоичной системы в десятичную. Зачем-то основано на работе с символами.

alexmir, 29 Января 2015

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

Куча / Говнокод #17542

−3

1
2
3

<style>
.newObjectHref #getNewObject_btn{font-size:18px}
</style>

clgs, 29 Января 2015

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

C++ / Говнокод #17541

+11

1
2
3
4

catch (...) 
	{
		return -__LINE__;
	}

laMer007, 29 Января 2015

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

PHP / Говнокод #17540

+3

1
2
3
4
5
6
7
8

/* Проект на Kohana Framework
Таблица "курсы" (которую товарищ умудрился ещё обозвать tracks) имеет связь "многие ко многим" с таблицей "разделы курсов". 
Для этого в ней есть поле section_id вот такого содержания:
2|3|4|6|9
А вот так запрашиваются курсы из определённой категории:
*/
$tracks = ORM::factory('Tracks')->order_by($order_by,'ASC')->where('section_id','LIKE','%'.$this->track_id.'%')->find_all()->as_array();
// Ну то есть, если категорий будет больше 10, то появятся неожиданные результаты....

Всегда весело смотреть, как люди, не знающие как делать связь "многие-ко-многим" изобретаю велосипеды....

mkramer, 28 Января 2015

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

Говнокод: по колено в коде.

C++ / Говнокод #17550

1C / Говнокод #17549

ActionScript / Говнокод #17548

C# / Говнокод #17547

C# / Говнокод #17546

Assembler / Говнокод #17545

Си / Говнокод #17544

Куча / Говнокод #17542

C++ / Говнокод #17541

PHP / Говнокод #17540