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

• Все
• Лучший
• Сток
• Глупый поиск
• Наговнокодить!
• 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 (32)
21. Swift (29)
22. Haskell (28)
23. Kotlin (15)

1. Assembler / Говнокод #27782

   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

   .org 80h
   data:
   	db "Hello, world!\n"
   	db 0
   start:
   	mov %c 1h
   	mov %bp @data
   	mov %si 0
   	.loop:
   		mov %al [%si + %bp]
   		inc %si
   		cmp %al 0h
   		jz @.exit
   		int 5h
   		jmp @.loop
   	.exit:
   	int 0h
   
     0080  48 65 6C 6C 6F 20 77 6F 72 6C 64 21 0A 00 02 02
     0090  01 00 02 06 80 00 02 05 00 00 03 0A 38 09 05 0C
     00A0 0A 00 00 0E AB 00 0B 05 0D 9A 00 0B 00 00 00 00

   накодил виртуальную машину, заспидранил Hello World за четыре дня. рекорд.
   https://github.com/kcalbSphere/PVC-16

   digitalEugene, 01 Ноября 2021

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

2. Assembler / Говнокод #27418

   +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
   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
   83. 83
   84. 84
   85. 85
   86. 86
   87. 87
   88. 88
   89. 89

   .ALIAS HALT 10h
   .ALIAS VBI   0h
   .ALIAS VPUSCRADDR 3000h
   .ALIAS VPUATRADDR 3002h
   .ALIAS VPUCTRL 3004h
   .ALIAS VPUCTRL_WH 3005h
   .ALIAS VPUCTRL_F 3006h
   .ALIAS VPUCTRL_VBI 0
   .ALIAS VPUCTRL_ACT 1
   .ALIAS VPUCTRL_TICK 2
   
   .ALIAS W 10
   .ALIAS H 5
   
   .ALIAS I   %BL
   .ALIAS PTR %C
   
   .ORG 2000h SCR:
   .ORG 2100h ATR:
   
   .ORG #VBI
   DD @VBI
   
   .ORG 30h
   DATA:
   
   .ORG 40h
   STATE:
   	X: DB 0
   	
   .ORG 80h
   _START:
   	SET   %AL #VPUCTRL_VBI
   	SET   %AL #VPUCTRL_ACT
   	STORE %AL #VPUCTRL_F
   	MOV   %AL #H
   	SHL   %AL 4
   	OR    %AL #W
   
   	STORE %AL #VPUCTRL_WH
   	
   	MOV   %A @SCR
   	STORE %A #VPUSCRADDR
   	MOV   %A @ATR
   	STORE %A #VPUATRADDR
   	
   	LOAD  %AL #VPUCTRL_F
   	SET   %AL #VPUCTRL_TICK
   	STORE %AL #VPUCTRL_F
   	STORE %AL #VPUCTRL_F
   	LOOP:
   	JMP @LOOP
   
   VBI:
   	PUSH  %A
   	PUSH  %B
   	PUSH  %C
   	
   	LOAD  %AL @X
   	ADD   %AL 1
   	
   	CMP   %AL #W JNE @VBI_CONTINUE
   	XOR   %AL %AL     VBI_CONTINUE:
   	STORE %AL @X
   	
   	CMP   %AL 0  JNE @VBI_ELSE
   		MOV   #PTR @SCR
   		ADD   #PTR #W
   		SUB   #PTR 1
   		STORE #PTR %AL 
   		JMP @VBI_SKIP
   	
   	VBI_ELSE:
   		MOV   #PTR @SCR
   		ADD   #PTR %AL
   		SUB   #PTR 1
   		MOV   %BH 0
   		STORE #PTR %BH
   	VBI_SKIP:
   
   	MOV   #PTR @SCR
   	ADD   #PTR %AL
   	MOV   %BH  FFh
   	STORE #PTR %BH
   	
   	POP %C
   	POP %B
   	POP %A
   	RET

   похождения моей ебанутой вмки продолжаются.
   bormand сказало что писать подставным прерыванием в консольку это читерство. реализовал видеовывод. теперь нормально? (слегка криво, и на
   атрибуты вмке похуй, как и мне.)
   
   вопреки моим огромным сомнениям, выдает 600 фпс даже на моей скромной конфигурации.
   
   https://imgur.com/fdLlQvx

   digitalEugene, 11 Мая 2021

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

3. Assembler / Говнокод #27218

   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

   format PE64 GUI 5.0
   include 'win64a.inc'
   entry $
      xor    rdi,rdi
      push   rdi
      push   rdi
      push   rdi;$400000
      push   rdi
      push   rdi
      mov    rax,CW_USEDEFAULT
      push   rax
      push   rax
      push   rax
      push   rax
      push   rdi
      push   rdi
      push   rdi
      push   rdi
      mov    r9,WS_VISIBLE+WS_OVERLAPPEDWINDOW
      mov    r8,_title
      mov    rdx,_class
      mov    rcx,rdi
      call   [CreateWindowEx]
      mov    r8,WindowProc
      mov    rdx,-4
      mov    rcx,rax
      call   [SetWindowLongPtrA]
      mov    qword[_title],rax
      pop    rdi
      mov    rsi,rsp
      xor    rbx,rbx
      mov    bl,40
   @@:sub    rsp,rbx
      xor    r9,r9
      xor    r8,r8
      xor    rdx,rdx
      mov    rcx,rsi
      call   [GetMessage]
      mov    rcx,rsi
      call   [DispatchMessage]
      add    rsp,rbx
      jmp    @b
   WindowProc:
      push   r9
      cmp    rdx,WM_CLOSE
      je     app_close
   defwndproc:
      push   rdi
      push   rdi
      push   rdi
      push   rdi
      mov    r9,r8
      mov    r8,rdx
      mov    rdx,rcx
      mov    rcx,qword[_title]
      call   [CallWindowProc]
      pop    rdi
      pop    rdi
      pop    rdi
      pop    rdi
      pop    rdi
      ret
   app_close:
      call   [exit]
     _title db '1KBytex64',0
     _class db '#32770',0
   data import
     library\
       user32,'USER32.DLL',\
       msvcrt,'msvcrt.dll'
     include 'api\user32.inc'
     import msvcrt,\
       exit,'_exit'
   end data

   Ничего интересного, просто извращённый 1KBytex64

   chiacorp, 17 Января 2021

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

4. Assembler / Говнокод #27216

   −4

   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

   format pe console
      include 'win32ax.inc'
   macro call1 f,p1{
      mov    ebx,p1
      call   f}
   macro call2 f,p1,p2{
      mov    ecx,p2
      call1  f,p1}
   macro call3 f,p1,p2,p3{
      mov    edx,p3
      call2  f,p1,p2}
   .data
      lead_time dd ?
      handle_input dd ?
      handle_output dd ?
      byte_read_write dd ?
   .code
      string db 'govnokod.ru ',13,10,0
      array_procs dd __strlen,_strlen,strlen,0
   putdword:;ebx-handle,ecx-byte
      mov    eax,esp
      mov    esi,eax
      sub    esp,16
      xchg   eax,ecx
      mov    edi,10
   @@:xor    edx,edx
      div    edi
      add    dl,'0'
      dec    ecx
      mov    [ecx],dl
      test   eax,eax
      jnz    @b
      sub    esi,ecx
      mov    edx,esi
      invoke WriteFile,ebx,ecx,edx,byte_read_write,0
      add    esp,16
      ret
   align 4
   strlen:;ebx-array of char
      mov    eax,12
      ret
   align 4
   _strlen:;ebx-array of char
      clc
      xor    ecx,ecx
      dec    ecx
      mov    edi,ebx
      xor    al,al
      repne  scasb
      not    ecx
      dec    ecx
      mov    eax,ecx
      ret
   align 4
   __strlen:;ebx-array of char
      xor    eax,eax
      dec    eax
   @@:inc    eax
      cmp    byte[ebx+eax],0
      jne    @b
      ret
   start:
      invoke GetStdHandle,STD_INPUT_HANDLE
      mov    [handle_input],eax
      invoke GetStdHandle,STD_OUTPUT_HANDLE
      mov    [handle_output],eax
      mov    ebp,array_procs
   next_step:
      call   [GetTickCount]
      mov    [lead_time],eax
      xor    ecx,
   @@:push   ecx
      mov    ebx,string
      call   dword[ebp]
      pop    ecx
      loop   @b
      push   eax
      call   [GetTickCount]
      sub    eax,[lead_time]
      mov    ecx,1000
      xor    edx,edx
      div    ecx
      push   edx
      call2  putdword,[handle_output],eax
      invoke WriteFile,ebx,string+8,1,byte_read_write,0
      pop    ecx
      call2  putdword,[handle_output],ecx
      invoke WriteFile,ebx,string+11,1,byte_read_write,0
      pop    ecx
      call2  putdword,[handle_output],ecx
      invoke WriteFile,[handle_output],string+12,2,byte_read_write,0
      add    ebp,4
      cmp    dword[ebp],0
      jne    next_step
      call   [GetTickCount]
      mov    [lead_time],eax
      invoke SetConsoleMode,[handle_input],0
      invoke ReadFile,[handle_input],byte_read_write,1,byte_read_write,0
      invoke ExitProcess,0
   .end start

   Поговнокодим однако.
   Зачем в процессоре занимают место команды типа repne scasb и прочее, если простые аналоги быстрее компактнее и проще встраивать в алгоритм без отдельной подпрограммы да и регистров в разы меньше требуется. Пустая подпрограмма для понимания сколько времени занимает лишний код. Есть предположение что раньше на заре развития они работали шустрее, но это только предположение.

   chiacorp, 15 Января 2021

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

5. Assembler / Говнокод #27205

   −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
   32. 32
   33. 33
   34. 34

   includelib  C:\Irvine\User32.Lib
   includelib  C:\Irvine\Kernel32.Lib
   includelib  D:\masm32\lib\Irvine32.lib
   include     \masm32\include\Irvine32.inc
   
   ; D:/masm32/bin/ml.exe /c  /coff  "D:\asm\rcl.asm"
   ; D:/masm32\bin\link.exe /subsystem:console  "D:\asm\rcl.obj"
   
   .data
   
     
   .code
   main PROC
     xor eax, eax
     xor edx , edx
     
     mov al , 10101010b
     
     cmp al,80h
     jns just
     shr al,1
     jmp print
     
     just:
    
     shr al,1
     or ax,80h
    
     print:
     call WriteBin
   		
   	exit
   	main ENDP
   END main

   Дай бог здоровья товарищу Ирвину.

   Madhouse_camomile, 10 Января 2021

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

6. Assembler / Говнокод #26904

   +2

   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
   83. 83
   84. 84
   85. 85
   86. 86
   87. 87
   88. 88
   89. 89
   90. 90
   91. 91
   92. 92
   93. 93
   94. 94
   95. 95
   96. 96
   97. 97
   98. 98
   99. 99

   lea esi, cpu_name
       mov eax, 0
       mov mreg, eax
   
       ;[04/12] G
       mov eax, 0ffh
       and eax, ebx
       mov mreg, eax
       mov al, byte ptr [mreg]
       mov [esi], al
       inc esi
   
       ;[03/12] e
       mov eax, 0ff00h
       and eax, ebx
       mov mreg, eax
       mov al, byte ptr [mreg + 1]
       mov [esi], al
       inc esi
   
       ;[02/12] n
       mov eax, 0ff0000h
       and eax, ebx
       mov mreg, eax
       mov al, byte ptr [mreg + 2]
       mov [esi], al
       inc esi
   
       ;[01/12] u
       mov eax, 0ff000000h
       and eax, ebx
       mov mreg, eax
       mov al, byte ptr [mreg + 3]
       mov [esi], al
       inc esi
   
       ;[08/12] i
       mov eax, 0ffh
       and eax, edx
       mov mreg, eax
       mov al, byte ptr [mreg]
       mov [esi], al
       inc esi
   
       ;[07/12] n
       mov eax, 0ff00h
       and eax, edx
       mov mreg, eax
       mov al, byte ptr [mreg + 1]
       mov [esi], al
       inc esi
   
       ;[06/12] e
       mov eax, 0ff0000h
       and eax, edx
       mov mreg, eax
       mov al, byte ptr [mreg + 2]
       mov [esi], al
       inc esi
   
       ;[05/12] I
       mov eax, 0ff000000h
       and eax, edx
       mov mreg, eax
       mov al, byte ptr [mreg + 3]
       mov [esi], al
       inc esi
   
       ;[12/12] n
       mov eax, 0ffh
       and eax, ecx
       mov mreg, eax
       mov al, byte ptr [mreg]
       mov [esi], al
       inc esi
   
       ;[11/12] t
       mov eax, 0ff00h
       and eax, ecx
       mov mreg, eax
       mov al, byte ptr [mreg + 1]
       mov [esi], al
       inc esi
   
       ;[10/12] e
       mov eax, 0ff0000h
       and eax, ecx
       mov mreg, eax
       mov al, byte ptr [mreg + 2]
       mov [esi], al
       inc esi
   
       ;[09/12] l
       mov eax, 0ff000000h
       and eax, ecx
       mov mreg, eax
       mov al, byte ptr [mreg + 3]
       mov [esi], al
       inc esi

   oaoaoammm, 01 Сентября 2020

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

7. Assembler / Говнокод #26033

   −1

   1. 1
   2. 2

   Перекат
   http://govnokod.ru/18591

   Этот петух так и не выложил ответ.

   OCETuHCKuu_nemyx, 18 Ноября 2019

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

8. Assembler / Говнокод #25970

   −1

   1. 1

   stwu      r1, -0x18(r1)

   PPC как бы говорит нам

   nymuHckuu_nemyx, 17 Октября 2019

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

9. Assembler / Говнокод #25867

   +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

   #include <stdbool.h>
   
   bool impl(bool a, bool b) // ->
   {
       return (!a || b);
   }
   
   bool always_true(bool a, bool b)
   {
       return (impl(a,b) == impl(b,a)) == (a == b); // ( (a -> b) = (b -> a) ) = (a = b) tautology
   }
   
   /*
   GCC не хочет мне тавтологию оптимизировать!
   https://godbolt.org/z/kgFMpR
   always_true:
           movl    %esi, %eax
           xorl    %edi, %eax
           cmpb    %dil, %sil
           sete    %dl
           xorl    %edx, %eax
           ret
   Но Clang может
   https://godbolt.org/z/YcOat-
   always_true:                            # @always_true
           movb    $1, %al
           retq
   */

   ГОВНО!

   j123123, 24 Сентября 2019

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

10. Assembler / Говнокод #25491

    +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

    Решил я значит от нехуй делать нарисовать свой пиксельный шрифт
    (кому интересно - вот промежуточный результат https://i.imgur.com/2vIJoio.png)
    и решил посмотреть, какие там вообще бывают под GNU/Linux редакторы для
    шрифтов, и какие вообще шрифты бывают
    Так вот, нашел я вот такую хрень http://mensis.sourceforge.net/overview.html
    Вижу, что там какой-то ассемблер http://mensis.sourceforge.net/ttfcv-all.png или
    байткод ебаный. Погуглил по этим говноинструкциям со скриншота:
    Оказывается в TTF шрифтах есть встроенный тьюринг-полный ЯП, используемый
    для всяких там подсказок, типа "куда дорисовать пиксель вот при таком-то условии"
    и прочая подобная херота
    А еще в шиндошс (до Windows 10) этот шрифтоговнобайткод интерпретировался в
    пространстве ядра (ну тупыыые..) и разумеется таким образом удалось винду хакнуть
    https://security.stackexchange.com/a/91395 (разве могло быть иначе?)
    
    про шрифтоговнобайткод можно почитать например тут
    https://docs.microsoft.com/en-us/typography/opentype/spec/tt_instructions
    https://developer.apple.com/fonts/TrueType-Reference-Manual/RM05/Chap5.html#instructions
    
    На кой вообще хер делать тьюринг-полный язык для отрисовки глифов? Ну и раз вы его уже
    делаете, то заебошьте там что-нибудь на основе LLVM байткода, чтоб JIT, или вообще все глифы
    сразу компилировать в натив, или даже (чего мелочиться) под GPU. Типа мы хотим
    нарисовать какую-то букву с размером 10 - вызываем функцию
    drawA(10, bufptr, x, y); - рисуется десятого размера буква в буфер. И никаких непонятных
    говнобайткодов. Четко и дерзко!

    j123123, 01 Апреля 2019

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

• ← влево
• вправо →

• 15
• 14
• 13
• 12
• 11
• 10
• 9
• …
• 1