Говнокод #25354 — PHP — Говнокод.ру

PA3yMHblu_nemyx 03.02.2019 22:31 # 0

Без кокококонтекста ничего понять нельзя.

Ответить

cmepmop 03.02.2019 23:05 # 0

Твоя тупорылость прогрессирует.
Ответить
- PA3yMHblu_nemyx 03.02.2019 23:29 # 0
  
  Поведайте же нам, о, мудрейший, что Вам удалось понять в представленном фрагменте кода и в чём тут говно?
  Ответить
  - Rooster 04.02.2019 05:31 # 0
    
    У меня есть предположение, что icamys забыл приоритеты арифметических операций.
    Ответить
    - bormand 04.02.2019 07:42 # 0
      
      Ну я тут вижу только магическое число 200. Надо бы в константу.
      Ответить
      - PA3yMHblu_nemyx 04.02.2019 12:54 # +1
        
        Ну ещё 1. Толи дело «Паскококококаль», в кокококотором можно вместо (page - 1) написа́ть Pred(page).
        
        Пофиксил:
        function Pred($x) { --$x; return $x; } function Succ($x) { ++$x; return $x; } define('MAGIC', 200); $i = Succ(Pred($data->page) * MAGIC);
        
        Теперь всё норм.
        Ответить
  - cmepmop 04.02.2019 12:38 # −1
    
    Хотел было ответить стихом - но Муза не хочет без презика, а их у меня нет сейчас под рукой. Поэтому напишу в прозе: талантом читать меж строк наделен далеко не всякий, но и это - лишь половина успеха. Талант ничего не стоит без опыта. Нужен большой опыт, чтобы узреть говно там, где его нет, и ещё больший - чтобы не заметить.
    Ответить
    - Rooster 07.02.2019 13:40 # 0
      
      {kokoko
      Ответить
      - guest8 07.02.2019 13:43 # −999
        
        показать все, что скрытоvanished
        Ответить

bormand 04.02.2019 07:41 # +2

Поясните суть проблемы.

Ответить

Lorip1971 04.02.2019 12:37 # +1

походу какой-то неразумный питух зашкварился, выложив нормальный код.
Ответить

Rooster 07.02.2019 13:39 # 0

}</code></pre></span></div><a href="http://govnokod.xyz/">Какой багор )))</a>

Ответить

PA3yMHblu_nemyx 07.02.2019 13:46 # 0

kokoko}kokoko

Ответить

Rooster 07.02.2019 13:49 # +1

Вобщем, в комент со строкой "{kokoko" в теге code копируется и спешлчарица весь html-код до закрывающей "}" ниже, но нижние коменты сохраняются, кроме комента с закрывающей скобкой, он почему-то приклеивается к верхнему коменту.

Ответить

Rooster 07.02.2019 13:55 # +1

Забавно, что именно с помощью "J" всегда обнаруживаются косяки парсеров.

Ответить

Rooster 07.02.2019 13:59 # 0

[hop hey

Ответить

Rooster 07.02.2019 14:00 # 0

lalalay]

Ответить

PA3yMHblu_nemyx 07.02.2019 14:06 # 0

(to li verit'

Ответить

PA3yMHblu_nemyx 07.02.2019 14:07 # 0

to li net)

Ответить

PA3yMHblu_nemyx 07.02.2019 14:07 # 0

<gde vopros

Ответить

PA3yMHblu_nemyx 07.02.2019 14:08 # 0

a gde otvet>

Ответить

gueest8 07.02.2019 19:54 # 0

аааааааа
1995-й год встал у меня перед глазами

Ответить

Kakou-mo_nemyx 07.02.2019 19:58 # 0

Unit      Int_0405; Interface
{ ------------------------------------------------------------------------- }
{ Support module for units optimized by Sally Peephole Optimizer.           }
{ Copyright 1993 by Sally I/S.                                              }
{                                                                           }
{ Private individuals may distribute compiled versions of this unit as part }
{ of their own software provided that the copyright messages are left       }
{ intact.                                                                   }
{                                                                           }
{ Installs handlers for exceptions 04 and 05.  These are generated by the   }
{ IntO and Bound instructions.  As IBM used 05 for print screen despite its }
{ being reserved by Intel we check for the origin of the interrupt -- it's  }
{ fool proof but it's not damn fool proof.                                  }
{ ------------------------------------------------------------------------- }
{$R-,S-,I-,Q-,O-,F-,G-,A+}
{$IFNDEF MSDOS}
  {$C Fixed Preload Permanent} { Holds exception handlers }
{$ENDIF}

Implementation

Uses      Dos;
{ ------------------------------------------------------------------------- }
Var       Halterror  : Pointer;
          SaveInt04  : Pointer;
          SaveInt05  : Pointer;
          SaveExit   : Pointer;
{ ------------------------------------------------------------------------- }
{$IFDEF MSDOS}
Procedure Real_Int04; Far; Assembler;
Asm
          Jmp    @@0
  @@1:    Db     0Eah
          Dd     0
  @@0:    Jno    @@1
          Push   Ax
          Mov    Ax,Ds
          Cmp    Ax,Seg @Data
          Pop    Ax
          Jne    @@1
          Mov    Ax,215
          Jmp    [Dword Ptr Halterror]
End;

Ответить

Kakou-mo_nemyx 07.02.2019 19:58 # 0

{ ------------------------------------------------------------------------- }
Procedure Real_Int05; Far; Assembler;
Asm
          Jmp    @@0
  @@1:    Db     0Eah
          Dd     0
  @@0:    Push   Ax
          Mov    Ax,Ds
          Cmp    Ax,Seg @Data
          Pop    Ax
          Jne    @@1
          Push   Bp
          Mov    Bp,Sp
          Lds    Bp,[Bp+2]
          Cmp    [Word Ptr Ds:Bp],$622E          { Bound Ax,[Cs:....] }
          Je     @@5
          Cmp    [Word Ptr Ds:Bp],$2E66          { Op32, Cs: }
          Je     @@3
          Cmp    [Word Ptr Ds:Bp],$662E          { Cs:, Op32 }
          Jne    @@2
  @@3:    Cmp    [Word Ptr Ds:Bp+2],$0662        { Bound Eax,[....] }
          Jne    @@2
  @@5:    Mov    Bp,Seg @Data
          Mov    Ds,Bp
          Pop    Bp
          Mov    Ax,201
          Jmp    [Dword Ptr Halterror]
  @@2:    Mov    Bp,Seg @Data
          Mov    Ds,Bp
          Pop    Bp
          Jmp    @@1
End;
{$ENDIF MSDOS}
{ ------------------------------------------------------------------------- }
{$IFNDEF MSDOS}
Procedure Protected_Except04; Far; Assembler;
Asm       Push   Ax
          Mov    Ax,215
          Db     0Eah
          Dd     0
End;
{ ------------------------------------------------------------------------- }
Procedure Protected_Except05; Far; Assembler;
Asm       Push   Ax
          Mov    Ax,201
          Db     0Eah
          Dd     0
End;
{$ENDIF MSDOS}

Ответить

Kakou-mo_nemyx 07.02.2019 20:01 # 0

Procedure Install;
Var       Where     : Pointer;
          Copyright : String;
Begin
  Copyright:='Portions copyright 1993 by Sally I/S'#13#10;
  SaveExit:=ExitProc;
  ExitProc:=@NewExit;

  {$IFDEF MSDOS}
    GetIntVec($04,SaveInt04);          { Save state }
    GetIntVec($05,SaveInt05);
    SetIntVec($04,@Real_Int04);
    SetIntVec($05,@Real_Int05);

    Where:=@Real_Int04;                { Place handlers for easy access. }
    Inc(Word(Where),3);
    Pointer(Where^):=SaveInt04;
    Where:=@Real_Int05;
    Inc(Word(Where),3);
    Pointer(Where^):=SaveInt05;

    GetIntVec($00,Where);              { Dirty hack to find HaltError. }
    Inc(Word(Where),3);
    Halterror:=Where;
  {$ELSE}
    Asm    Mov   Ax,0202H
           Mov   Bl,04H
           Int   31H
           Mov   [Word Ptr SaveInt04],Dx
           Mov   [Word Ptr SaveInt04+2],Cx

           Mov   Ax,0202H
           Mov   Bl,05H
           Int   31H
           Mov   [Word Ptr SaveInt05],Dx
           Mov   [Word Ptr SaveInt05+2],Cx

           Mov   Ax,0203H
           Mov   Bl,04H
           Mov   Cx,Cs
           Mov   Dx,Offset Protected_Except04
           Int   31H

           Mov   Ax,0203H
           Mov   Bl,05H
           Mov   Cx,Cs
           Mov   Dx,Offset Protected_Except05
           Int   31H

           Mov   Ax,0202H              { Get and save exception entry }
           Mov   Bl,00H
           Int   31H
           Add   Dx,4
           Mov   Ax,Cs
           Add   Ax,[Selectorinc]
           Mov   Es,Ax
           Mov   [Word Ptr Es:Protected_Except04+5],Dx
           Mov   [Word Ptr Es:Protected_Except04+7],Cx
           Mov   [Word Ptr Es:Protected_Except05+5],Dx
           Mov   [Word Ptr Es:Protected_Except05+7],Cx
    End;
  {$ENDIF}
End;

Ответить

Kakou-mo_nemyx 07.02.2019 20:01 # 0

{ ------------------------------------------------------------------------- }
Procedure Zeroextend_Registers;
Const     Op32 = $66;
Begin
  If Test8086>=2 Then
    Asm    Db Op32 ; And Sp,$FFFF ; Dw 0
           Db Op32 ; And Bp,$FFFF ; Dw 0
    End;
End;
{ ------------------------------------------------------------------------- }
Begin
  Zeroextend_Registers;
  Install;
End.

Ответить

cmepmop 08.02.2019 02:14 # 0

Йоп твою мать нехай, ты погляди, а.
Ответить

gueest8 07.02.2019 20:19 # 0

Кто такая Салли щеледырка?
Ответить

PA3yMHblu_nemyx 07.02.2019 14:00 # +1
Я придумал, что делать с другими языками: вставлять комментарий с фигурной скобкой:
```
.tiny
start:
    int 20h
end start ; {
```
Или так:
```
#include<stdio.h>
int main() {
    printf("Hello, world!\n");
    return 0; // {
} /* { */
```
Или так:
```
#!/usr/bin/perl
print "Hello";
# {
```
Ответить
- PA3yMHblu_nemyx 07.02.2019 14:06 # 0
  Или совать скобку не в кокококомментарий, а в строковую кокококонстанту:
  
  #include<stdio.h> int main() { printf("Kakoy bagor {{{\n"); return 0; }
  Ответить
  - PA3yMHblu_nemyx 07.02.2019 14:11 # 0
    PROGRAM BAGOR(INPUT, OUTPUT); BEGIN WRITELN('KAKOY BAGOR}}}') END.
    Ответить
    - Rooster 07.02.2019 14:16 # 0
      
      begin {{{Именно поэтому я за "Pascal"} end.
      Ответить
      - Rooster 07.02.2019 14:16 # 0
        
        (*}*)
        Ответить
      - Rooster 07.02.2019 14:24 # 0
        
        Кстати, в "Algol-68" один из синтаксисов комментариев:
        CO комментарий CO
        Именно поэтому я за "Algol-68".
        Ответить
    - gueest8 07.02.2019 18:25 # 0
      
      паскальчек
      Ответить

guest8 07.02.2019 14:19 # −999

показать все, что скрытоvanished

Ответить

PA3yMHblu_nemyx 07.02.2019 14:22 # 0

Мы зря флудили что ли?
Ответить
guest8 07.02.2019 18:22 # −999

показать все, что скрытоvanished
Ответить
- gueest8 07.02.2019 18:24 # +1
  
  гэкашка это палимпсест: петух посрет, вордпресс поест.
  Ответить
- Rooster 07.02.2019 18:29 # 0
  
  Ещё у тебя 500-тые постоянно.
  Ответить
  - PA3yMHblu_nemyx 07.02.2019 19:10 # 0
    -- Какой багор }}}
    Ответить
- Kakou-mo_nemyx 07.02.2019 19:51 # 0
  Я не срал, братишка. Я тебе покушать принёс. }
  Ответить

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

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

Комментарии (42) RSS

Добавить комментарий