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

    Всего: 12

  2. Pascal / Говнокод #28644

    +1

    1. 1
    В одном из минувших топиков приподымали тему POP SMDб я тоже решил напейсать генератор паролей к этой игре.

    https://pastebin.com/ANHTMmeM

    на основе исходников roman-pro

    Support, 20 Марта 2023

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

  3. Куча / Говнокод #28617

    +3

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    Итак, оказалось, что нас всего трое-четверо, не считая меня и временно съебнувших.
1. Инканус владеет большинством петушков и файкой Лолечка. Особо не переживает по поводу утраты фаек, ибо у него их - куры не клюют.

2. Человек под ником guest6. Перманент. Шанс того, что под этой файкой сидит несколько хуйцов столь мизерный, что не примем его в счёт. 
Несмотря на острый ум, довольно ограничен и имеет узкий кругозор. Также ему свойственны резкие скачки настроения. 
Я долго пытался угадать его знак зодиака, но впал в сомнения. Что-то из этого: [Скорпион. Дева. Стрелец].

3. Некто, владеющий soul_re@ver и прочими, с анимешной авой.

    Расследование продолжается.

    Support, 28 Февраля 2023

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

  4. Куча / Говнокод #28613

    +3

    1. 1
    http://getbug.ru/google-raskryila-bag-zero-day-v-windows-8-1-vyihoda-patcha/

    долистайте до конца страницы...
    как символично )))

    Support, 25 Февраля 2023

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

  5. Куча / Говнокод #28611

    +8

    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
    ...Примерно в 2008 году я заимел свой первый комп. Я тогда ещё был девственником.
Отцу захотелось взогреть меня ноутом, за то, что я успешно поступил в институт. 
Прихватив с собой местного компьютерщика, он двинулся в соседнюю республику.

Понятно, что папа мой кроме сохи и своего достоинства в руках ничего не держал, посему -  в IT - ни бум-бум, но, очевидно, 
и компьютерщик был слаб бошкой, ибо ноутбук они выбрали слабый и уже довольно устаревший; марку я Вам не скажу.
На компьютере была предустановлена Vista.  На ней я освоил работу и приобщился к IT. Жизнь моя заиграла красками...
Моей первой игрой была Готика. Позже я стал страдать вирусофобией, захотел разобраться в этом вопросе лучше - и так стал изучать программирование.

Но были и печальные минуты. Иной раз система вдруг замирала, вылетала либо я был вынужден созерцать сплошной голубой экран при запуске...

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

Потом, спустя много лет, вышли и 8, и 10, редакции но они были всяко гаже. Обилие блёсток и свистелок делает их не юзер-френдли, 
а откровенный шпионаж вызывает настороженность.

    Сейчас выходит уже Windows 11... И она не нужна.

    p.s. У кого какие планы на лето?

    Support, 24 Февраля 2023

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

  6. Куча / Говнокод #28605

    +4

    1. 1
    2. 2
    Мдас. Нелегко глядеть в глаза родителя, с чьим чей сынишкой у тебя отношения... Проблема в том, что с отцом мы тоже... друзья. 
Сложно сказать, догадывается папаша или нет, и вызвана ли эта улыбка радостью за своего ребенка или холодком подозрений.

    Такой скотиной себя давно не чувствовал.

    Support, 17 Февраля 2023

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

  7. Куча / Говнокод #28575

    +5

    1. 1
    2. 2
    Это очень забавно, скажу я Вам, установив очередной антивирус, втыкать в инонку в трее, представляя, как она защищает 
твою систему от несуществующих угроз.

    Задача любого антивирусника - ЛЮБОГО! - продержаться на компьютере как можно дольше чтобы он продлил лицензию ещё хоть пару раз. Лет 15-20 назад не иметь антивируса было вообще неприлично. Именно тогда вендоры научились наёбывать пользователей, внушив им, что системная защитная утилита, которой и интерфейс-то нахуй не нужен, должна быть напичкана свистоперделками и иметь приоритет Проводника. Внешний вид - половина успеха. И похуй, что кроме мигания значком в трее софтина в принципе ничего не делает.

    ...Тем более странно, что на фоне набитых скинами софтин паучок Данилова выглядит "голяком". Может, метод от противново?

    Кстати, почему все так текут от 360? Говно говном.

    Support, 28 Января 2023

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

  8. C++ / Говнокод #28571

    +4

    1. 1
    2. 2
    С++ признан опасным. Власти США призывают разработчиков отказаться от разработки на нем приложений.
https://dzen.ru/news/story/Vlasti_SSHA_trebuyut_razrabotchikov_otkazatsya_otispolzovaniya_yazyka_programmirovaniya_C--6bd1377f55599eb3e8b5f3b852e52b90?lang=ru&rubric=personal_feed&fan=1&stid=T5HyeXddnnEZJtv923hF&t=1674486417&persistent_id=1560561255&story=520422d0-c284-5803-bdc8-d030bb2c3dda&issue_tld=ru

    Молитесь.

    Support, 23 Января 2023

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

  9. Куча / Говнокод #28560

    0

    1. 1
    Приходил Страйко, разъебахал оффтопы.

    Support, 18 Января 2023

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

  10. Куча / Говнокод #28247

    −1

    1. 1
    -

    Основные технические характеристики

    ЛТИ-120 обладает температурным интервалом 160-350 градусов.
    Наибольшая активность вещества наблюдается при температуре от 250 до 300 градусов.
    Вещество не растворяется в воде, вследствие чего не смывается с поверхностей. Поскольку данный флюс считается нейтральным, то удалять его остатки после работы нет необходимости. При желании можно это сделать только с помощью ацетона или спирта. По отзывам некоторых мастеров, для этой цели также можно использовать водку.
    Флюс хорошо взаимодействует как с мягкими оловянно-свинцовыми, так и с серебряными припоями.
    Работая с данным паяльным флюсом, помещение проветривать необязательно.

    Конечно, блять, не надо проветривать. Лишние рты соскочат с ЖФ/ПФ.
    Откуда только берутся такие пинкертоны.

    Support, 26 Июня 2022

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

  11. Pascal / Говнокод #28215

    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
    // реализация интерфейса IArguments2 для самодельного скриптового движка, aka vbs to exe

unit Arguments;

interface

uses
  Windows, ComObj, ActiveX, Stub_TLB, SysUtils,WSHNamedArguments,WSHUnNamedArguments, CmdUtils;

type
  TIarguments=class(TAutoObject, IArguments2, IEnumVariant)
      FAArgs:array of WideString;
      FWSHNamedArguments:TIWSHNamedArguments;
      FWSHUnNamedArguments:TIWSHUnNamedArguments;
      function Item(Index: Integer): WideString; safecall;
    function Count: Integer; safecall;
    function Get_length: Integer; safecall;
    function _NewEnum: IUnknown; safecall;
    property length: Integer read Get_length;
        function Get_Named: IWSHNamedArguments; safecall;
    function Get_Unnamed: IWSHUnnamedArguments; safecall;
    procedure ShowUsage; safecall;
    property Named: IWSHNamedArguments read Get_Named;
    property Unnamed: IWSHUnnamedArguments read Get_Unnamed;
        function Next(celt: LongWord; var rgvar : OleVariant;
      out pceltFetched: LongWord): HResult; stdcall;
    function Skip(celt: LongWord): HResult; stdcall;
    function Reset: HResult; stdcall;
    function Clone(out Enum: IEnumVariant): HResult; stdcall;
    public
    constructor Create;
    end;

    implementation
    

    
uses ComServ;
    

    
var
    
    FIndex:Integer=0;
    

    
{ TIarguments }
    

    
function TIarguments._NewEnum: IUnknown;
    
begin
    
  Result:=self;
    
end;
    

    
function TIarguments.Count: Integer;
    
begin
    
  Result:=System.Length(FAArgs);
    
end;
    

    
function TIarguments.Get_length: Integer;
    
begin
    
   Result:=Count;
    
end;
    

    
function TIarguments.Item(Index: Integer): WideString;
    
begin
    
  if (Index >= System.Length(FAArgs)) then
    
  raise EOleSysError.Create('Range check error', HRESULT($800A0009),0)
    
  else
    
  Result:=FAArgs[Index]
    
end;
    

    
function TIarguments.Get_Named: IWSHNamedArguments;
    
begin
    
  Result:=FWSHNamedArguments;
    
end;
    

    
function TIarguments.Get_Unnamed: IWSHUnnamedArguments;
    
begin
    
  Result:=FWSHUnNamedArguments;
    
end;
    

    
procedure TIarguments.ShowUsage;
    
begin
    
  OleError(E_NOTIMPL);
    
end;
    

    
constructor TIarguments.Create;
    
var
    
  I,J, PCnt:Integer;
    
  S, CmdLine:string;
    
begin
    
  inherited Create;
    
  FIndex:=0;
    
  FWSHNamedArguments:=TIWSHNamedArguments.Create;
    
  FWSHUnNamedArguments:=TIWSHUnNamedArguments.Create;
    
  PCnt:=ParamCount;
    
  SetLength(FAArgs, PCnt);
    
  for I:=1 to PCnt do
    
  begin
    
    J:=I-1;
    
    FAArgs[J]:=ParamStr(I);
    
  end;
    

    
  //Parsing named args.
    

    
  CmdLine:='';
    
  S:=GetCommandLine;
    
  PCnt:=iParamCount(PChar(S));
    
  if PCnt > 1 then
    
  begin
    
    for I:=1 to PCnt-1 do
    
    begin
    
      CmdLine:=CmdLine+iParamStr(PChar(S), I);
    
      if I < PCnt-1 then
    
      CmdLine:=CmdLine+' ';
    
    end;
    
  end;

    Support, 09 Июня 2022

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