1. Pascal / Говнокод #4943

    +92

    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
    unit uncrt;
    
    interface
    
    procedure ClrScr;
    procedure Sound(Hz: Word);
    procedure NoSound;
    
    procedure TextColor(Color: Byte);
    procedure TextBackground(Color: Byte);
    
    var
      TextAttr: Byte; { Для особо продвинутых случаев }
    
    implementation
    
    procedure ClrScr;
    begin end;
    
    procedure Sound(Hz: Word);
    begin end;
    procedure NoSound;
    begin end;
    
    procedure TextColor(Color: Byte);
    begin end;
    procedure TextBackground(Color: Byte);
    begin end;
    
    end.

    Вас достала школота, раскрашивающая свои бибикающие программы?
    Вам поможет этот модуль!

    Запостил: TarasB, 16 Декабря 2010

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

    • И что? Где тут говнокод?
      Убого и уныло
      Ответить
      • Юмор в том, что вот так выглядит супер оружие от школоты.
        Ответить
        • Разве что юмор, но вряд ли говнокод
          Ответить
          • Вообще-то сюда не только говно постят, но и юмор. И юмор тут ценится больше, чем говно, ибо говно часто уныло.
            Ответить
            • Этот юмор, вообще-то, и заключается чаще всего в говне, хотя бывают и случае унылого говна
              Ответить
    • показать все, что скрытотарас - пидарас
      Ответить
      • а судя по твоим репликам - ты. причем, этот, как их называют - пассивный!
        Ответить
        • Медицина утверждает, что пидарасы бывают трех видов — пассивные, активные и актуальные. Первые два вида ведут себя так потому, что такова их природа, и к ним претензий ни у кого нет. А вот третий вид — это такие пидарасы, которые стали пидарасами, потому что прочли в журнале "Птюч", что это актуально в настоящий момент. И к ним претензии будут всегда.
          Ответить
          • а еще есть и такие: вроде бы ориентация стандартная, а все равно, пидоры-пидоры-пидоры! ))
            Ответить
          • Надо будет скопировать это утверждение. На многих форумах оно будет полезным аргументом.
            Ответить
          • есть пхпшники же еще
            Ответить
            • мм, но у этого текста есть продолжение, если чо :)
              Ответить
          • Виктор Олегович, перелогиньтесь!
            Ответить
      • Какая свежая рифма. Никогда о такой не слышал. У тебя очень оригинальный склад ума.
        Ответить
    • показать все, что скрытовъебал те минус
      Ответить
      • пытаешься за счет своей неудовлетворенности жизнью за счет других себе настроение повышать?
        Ответить
      • всадил те пинус
        Ответить
      • По своему поведению вы чуть менее ,чем полностью напоминаете малолетних пидорасов.
        Диагноз: Школьник обыкновенный.
        Ответить
        • дядя, давно выросли) копетанчек мой :*
          Ответить
    • а вы знаете, что в турбопаскале был баг?
      можно было написать implementation: integer;
      Ответить
      • и к чему это приводило? честно говоря, не очень понимаю смысл такой конструкции
        Ответить
        • это переменную назвали резервированным словом
          Ответить
          • какая то версия борландовских компилторов игнорила русские буквы и спецсимволы в теле программы :)
            не считала синтаксической ошибкой. и такая тема была :)
            Ответить
    • может проще со школотой вообще дел не иметь?)
      Ответить
      • Преподам не легче. И тем, кто помогает школоте проги писать - тоже.
        Ответить
    • Известный модуль. Если в программе написано Crt.Sound, то не поможет. Другое дело подменить Crt в TURBO.TPL своим модулем.
      Ответить
      • Минус полбала за каждый писк -- ещё лучше поможет.
        Ответить
      • можно просто выкинуть crt из библиотеки
        предложенная обманка это для продвинутых, но она не сработает, потому что они как минимум про bel знают (а worst-case -- умеют дудеть через порты)
        Ответить
        • Самое обидное, что bel даже в bat-файле работает: echo ^G
          А через порты... Надоел мне как-то стандартный keyb.com, и я HEX-редактором выгрыз из него обращения к заветным портам.

          Два варианта:
          1. Наговнокодить постпроцессор для exe, заменяющий обращения к портам дуделки NOPами.
          2. Вырвать дуделку (жестокий препод может вырвать дуделку студенту).

          P.S. Была ещё резидентная программа, затыкающая динамик через определённые промежутки. Прощай, многозадачность!
          Ответить
          • Гораздо проще вмешаться на аппаратном уровне и выдрать ненавистную пищалку из системника.
            Ответить
    • Тарас, а я правильно понимаю, что Вы преподаете паскаль в средней школе?
      Ответить
      • Опачки! Спалили препода! Школоло негодуэ!
        Ответить
      • Я? Не.
        Хотя можно халтурку взять... А чё, чем я хуже.
        Ответить
        • Через полгода-год сбежите.
          я проработал только полгода преподом в универе. Вел паскаль - основы, как общеобразовательный курс. Смысла в нем не вижу никакого, т.к. студенты были экономической специальности. 50% не понимала программирование в принципе - оно им не надо было.
          Ответить
          • нельзя же сравнивать, экономика -- а) гуммунитарная б) лженаука, поэтому отдача будет только натурой
            Ответить
            • я с экономистами дел много имел.
              не совсем гумманитарная,
              во многом - все логично (после того, как обяснят).
              но я ее сам не понимаю:(
              Пожелаю, чтоб повезело - попалось парочка заинтересованных учеников:)
              Ответить
              • а почему тогда крысис?
                Ответить
                • существует несколько мнений. основные:
                  1 это нормальная закономерная часть развития экономики. как-то можно предскавить чем-то вроде y = -|tgx|, ну там доработать напильником
                  2 это заговор!!!!!111одинодин
                  3 кто-то на бирже хорошо сыграл. но долго вычисляли, так что врядли
                  4 ну и вами предложенная
                  Ответить
        • к детям особый подход нужен!
          Ответить
    • хахаха
      Ответить

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