1. Haskell / Говнокод #28529

    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
    ;; Sound.
(xbindkey '(Alt F7) "amixer set Master 1%-")
(xbindkey '(Alt F8) "amixer set Master 1%+")

(define muted 0)
(run-command "amixer set Master 3%")

(xbindkey-function '(Alt F6)
                   (lambda()
                     (cond ((equal? muted 0)
                            (run-command "amixer set Master 0%")
                            (set! muted 1)
                            )
                           (else (begin
                                   (run-command "amixer set Master 3%")
                                   (set! muted 0)
                                   ))
;; какой багор
                           )))

    Линукс-загадка!

    Запостил: JloJle4Ka, 30 Декабря 2022

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

    • ava JloJle4Ka 30.12.2022 17:25 # 0

      Отгадаете на каком языке написан сей код? А его назначение сможете распознать?
      Ответить

      • ava guest6 30.12.2022 17:31 # +1

        это ты набайндил себе на емакса на лиспе какую-то хуйню для упрпвления звуком
        Ответить

        • ava guest6 30.12.2022 17:59 # +1

          а нет
          я пизду

          емакс непричем

          это у тебя винду менеджер на лиспе

          Икс-манда или как-то так
          Ответить

      • ava Gorbatokaloedov 30.12.2022 17:44 # +1

        Приведи реальные примеры языков, кроме Лиспа, на которых программа заканчивается на «)))».
        Ответить

      • ava Desktop 30.12.2022 18:04 # +1

        GNU Guile
        Ответить

    • ava Soul_re@ver 30.12.2022 17:38 # 0

      Какая-то прыщепрограмма для создания глобальных хоткеев?
      Ответить

      • ava JloJle4Ka 30.12.2022 18:00 # 0

        Уже ближе к правде, я бы даже сказал, очень близко
        Ответить

        • ava guest6 30.12.2022 18:02 # +1

          xbindkey?
          Ответить

          • ava JloJle4Ka 30.12.2022 18:06 # +1

            Ты победил! Там конфиг можно на "Scheme" писать. Чуть выше этой хуиты была аналогичная переключалка раскладок, но пришлось её переписать на setxkbmap, т.к. вылезли пердолинги в процессе эксплуатации
            Ответить

            • ava guest6 30.12.2022 18:08 # 0

              Я читал про xbindkey но особло не пользовался

              В древности поведение клавиш меняли через xmodmap. Это было примерно так же удобно, как вручную править sendmail.cf

              Потом завезли xkb, и стало много проше
              Ответить

              • ava JloJle4Ka 30.12.2022 18:55 # 0

                > xmodmap

                Я через эту штуку "Insert" переназначил "Multi_key" aka compose-клавишу, довольно удобно!
                Ответить

                • ava guest6 30.12.2022 18:56 # 0

                  Если твои иксы выпущены после 1998-го года, то советую попробовать xkb
                  https://www.x.org/releases/X11R7.5/doc/input/XKB-Config.html
                  Ответить

    • ava PaKa6y 30.12.2022 17:48 # 0

      Это хипстерские звуки для ЕИРЦ?
      Ответить

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