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

• Все
• Лучший
• Сток
• Глупый поиск
• Наговнокодить!
• Oтзывы

Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!

1. PHP (5703)
2. C++ (2740)
3. Куча (2337)
4. JavaScript (2030)
5. C# (1929)
6. Java (1503)
7. Си (1103)
8. Pascal (649)
9. Python (585)
10. 1C (536)
11. SQL (434)
12. ActionScript (294)
13. Objective C (204)
14. bash (200)
15. Perl (196)
16. Assembler (148)
17. Ruby (144)
18. VisualBasic (140)
19. Lua (51)
20. Go (31)
21. Swift (29)
22. Haskell (28)
23. Kotlin (15)

1. Список говнокодов пользователя spaceashot

   Всего: 2

2. 1C / Говнокод #23427

   +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

   Для каждого стр из Объект.УчётВремени цикл
   			НРВ = 0;
   			Если 
   				НачалоДня(стр.ДатаНачала) <> НачалоДня(стр.ДатаОкончания) 
   			Тогда
   				НРВ = НРВ + (стр.ДатаОкончания - Стр.ДатаНачала) /60 /60
   			ИначеЕсли //Начало и окончание задачи до начала рабочего дня
   				(Час(стр.ДатаНачала) < 10 или ( Час(стр.ДатаНачала) = 10 и Минута(стр.ДатаНачала) <=30)) и 
   				(Час(стр.ДатаОкончания) < 10 или ( Час(стр.ДатаОкончания) = 10 и Минута(стр.ДатаОкончания) <=30))
   			Тогда
   				НРВ = НРВ +  ((стр.ДатаОкончания - стр.ДатаНачала) /60 /60)
   			ИначеЕсли //Начало задачи до начала рабочего дня, окончание во время рабочего дня
   				(Час(стр.ДатаНачала) < 10 или ( Час(стр.ДатаНачала) = 10 и Минута(стр.ДатаНачала) <=30)) и 
   				(Час(стр.ДатаОкончания) < 19 и (Час(стр.ДатаОкончания) > 11 или ( Час(стр.ДатаОкончания) = 10 и Минута(стр.ДатаОкончания) > 30)))
   			Тогда
   				НРВ = НРВ +  ((НачалоДня(стр.ДатаОкончания) + ((10*60)*60) + 1800 - стр.ДатаНачала) /60 /60)
   			ИначеЕсли   //Начало задачи в рабочее время и окончание задачи в нерабочее время
   				(Час(стр.ДатаНачала) < 19 и (Час(стр.ДатаНачала) > 11 или ( Час(стр.ДатаНачала) = 10 и Минута(стр.ДатаНачала) > 30))) и
   				Час(Стр.ДатаОкончания) >= 19
   			Тогда
   				НРВ = НРВ +  (стр.ДатаНачала - (НачалоДня(стр.ДатаОкончания) + ((19*60)*60))) /60 /60
   			ИначеЕсли
   				Час(стр.ДатаНачала) >= 19 и Час(стр.ДатаОкончания) >= 19  
   			Тогда
   				НРВ = (стр.ДатаОкончания - Стр.ДатаНачала) /60 /60
   				
   			КонецЕсли;
   			стр.НРВ = НРВ;	
   				
   			Время = (стр.ДатаОкончания - стр.ДатаНачала) /60 /60;
   			РВ = Время - НРВ;
   			стр.РВ = РВ;
   			стр.Время = Время;
   			
   			
   		КонецЦикла;

   Вроде работает

   spaceashot, 18 Октября 2017

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

3. 1C / Говнокод #22708

   −98

   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

   ВЫБОР
   	КОГДА МЕСЯЦ(НДФЛСведенияОДоходах.ДатаПолученияДохода) = 1
   		ТОГДА "01 Январь"
   	КОГДА МЕСЯЦ(НДФЛСведенияОДоходах.ДатаПолученияДохода) = 2
   		ТОГДА "02 Февраль"
   	КОГДА МЕСЯЦ(НДФЛСведенияОДоходах.ДатаПолученияДохода) = 3
   		ТОГДА "03 Март"
   	КОГДА МЕСЯЦ(НДФЛСведенияОДоходах.ДатаПолученияДохода) = 4
   		ТОГДА "04 Апрель"
   	КОГДА МЕСЯЦ(НДФЛСведенияОДоходах.ДатаПолученияДохода) = 5
   		ТОГДА "05 Май"
   	КОГДА МЕСЯЦ(НДФЛСведенияОДоходах.ДатаПолученияДохода) = 6
   		ТОГДА "06 Июнь"
   	КОГДА МЕСЯЦ(НДФЛСведенияОДоходах.ДатаПолученияДохода) = 7
   		ТОГДА "07 Июль"
   	КОГДА МЕСЯЦ(НДФЛСведенияОДоходах.ДатаПолученияДохода) = 8
   		ТОГДА "08 Август"
   	КОГДА МЕСЯЦ(НДФЛСведенияОДоходах.ДатаПолученияДохода) = 9
   		ТОГДА "09 Сентябрь"
   	КОГДА МЕСЯЦ(НДФЛСведенияОДоходах.ДатаПолученияДохода) = 10
   		ТОГДА "10 Октябрь"
   	КОГДА МЕСЯЦ(НДФЛСведенияОДоходах.ДатаПолученияДохода) = 11
   		ТОГДА "11 Ноябрь"
   	ИНАЧЕ "12 Декабрь"
   КОНЕЦ

   Конвертация

   spaceashot, 30 Марта 2017

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