yuuichi_yokoi

yuuichi_yokoi

最近の記事

Emacs: diredでファイルをリネームするときの省力化

Rキー押下したときにカーソル下にあるファイル名をkill-ringへ保存する。 (defun file-path-leaf (orgfname) (if (string-match "/\\([^/]+\\)$" orgfname) (substring orgfname (match-beginning 1) (match-end 1)) orgfname))(defun dired-do-rename-with-fname (oldfunc &opti

    • Emacsビルド方法(Windows)まとめ

      msys2をインストール 以下のパッケージをpacmanでインストール bash gcc mingw-w64-x86_64-toolchain make autoconf mingw-w64-x86_64-make mingw-w64-x86_64-libxml2 mingw-w64-x86_64-gnutls mingw-w64-x86_64-xpm-nox mingw-w64-x86_64-jansson mingw-w64-x86_64-kglobalaccel-qt5

      • EmacsのDiredで起動するアプリケーションの関連付け(advice-addが使える環境のみ)

        advice-addで比較的簡単に設定できるので参考までに公開。 diredの一覧で[ENTER]キーを押すとアプリケーション起動。 関連付け対象外のファイルは通常通り。 コードは以下の通り。本体はdired-open-file-by-app。 ※case-fnはユーティリティ。 ※2024/6/5: ファイル名に~などが入っているとエラーになる場合の対処(encode-coding-string)を入れました。 ※2024/6/6: EXEファイルの起動部分の不具合修正。

        • Dolphin用「零 ~眞紅の蝶~」をプレイ可能にするDualSenseコントローラ設定

          DolphinでWiiコントローラーをつながなくてもDualSenseコントローラーでプレイ可能になったので設定を公開する。 Dolphin Emulator\Config\Profiles\Wiimote直下に入れる設定ファイル。 設定したのは以下の通り。他の機能は未設定。他のWindows用のゲーム用多機能コントローラなら設定可能と思う。 全般⇒十字ボタン:十字キーボタン 全般⇒ボタン:A、Bボタン⇒X、〇。1、2ボタン:□、△。+、ーボタン:三、山 拡張コントローラ⇒

          スキャナで取り込んだ画像のリサイズ用スクリプト(GIMP用)

          キャノンのスキャナで画像を取り込んだ時に、画像にフィルターかけてリサイズをするのが面倒なので、スクリプトにした。 200DPIを超えるDPIで取り込んだ後で、扱いやすいように200DPIに変更することを想定しています。 200DPIに変更する(画像にノイズが乗っていない場合に使う)↓ ガウスフィルタで画像のノイズを軽減した後に200DPIに変更する↓ ガウスフィルタで画像のノイズを軽減するだけ↓

          スキャナで取り込んだ画像のリサイズ用スクリプト(GIMP用)

          Windowsアプリのウィンドウを最大化するアプリ(汎用)(2023/3/12)

          今のところ、ウマ娘とブルリフ燦で使用可能。 Windowsアプリのウィンドウを最大化するアプリです。 ウマ娘専用だったアプリを汎用に作り直しました。 起動すると以下のようなウィンドウが出ます。 「Update」ボタンを押すと「Application」プルダウンにアプリ名が出てきます。 対象のアプリを選んでから「Start」ボタンを押すと、 そのアプリを最前面へ移動してウィンドウの最大化を行います。 「Left」「Center」「Right」ボタンを押すとウィンドウの位

          Windowsアプリのウィンドウを最大化するアプリ(汎用)(2023/3/12)

          Emacs設定ファイル

          個人用。

          Emacs設定ファイル

          ウマ娘アプリのWindowを最大化するアプリ(UmamusumeMax)(updated 2022/12/25)

          DMM版ウマ娘アプリのウィンドウを最大化するアプリです。 起動後にStartボタンを押すと動作を開始します。 ウマ娘アプリのウィンドウを操作するために管理者権限が必要です。 ポップアップが出てきたら許可してください。 アプリのウィンドウの位置はLeft/Center/Rightボタンで変更できます。 Leftボタン:画面の左端へ移動 Centerボタン:画面の中央へ移動 Rightボタン:画面の右端へ移動 アプリ側が横画面に切り替わった場合は自動で追随し、横画面でフルスクリー

          ウマ娘アプリのWindowを最大化するアプリ(UmamusumeMax)(updated 2022/12/25)

          Emacs Lisp で switch~case的なやつ

          switch~case的なのが無くて不便なのでLispマクロで作ってみました。 作ったのは10年位前かな(。´・ω・)? どうやって作ったのかも思い出せないので質問されると困る(´・ω・) (defmacro case-fn (expr fn &rest clauses) "Eval EXPR and choose among clauses on that value.Each clause looks like (KEYLIST BODY...). EXPR is

          Emacs Lisp で switch~case的なやつ

          echo server on Emacs

          エコーサーバーをEmacs Lispで作ったやつ。 それだけなので特に面白くもないです。 HTTPDのひな型くらいにはなるかな(。´・ω・)? ;;; -*- lexical-binding: t -*-;;;; mode funtions(defvar echo-server-mode-map nil)(defvar echo-server-process nil)(if echo-server-mode-map nil (setf echo-server-mod

          echo server on Emacs

          Emacsでシリアル通信(serial-monitor-mode)

          組み込み機器をシリアルケーブルで繋いでモニターする時とかに使えそうなので公開しておきます。作ったのは15年前くらい。 ;;;; serial-monitor-mode;;(defvar serial-monitor-mode-map nil)(defvar serial-monitor-process nil)(if serial-monitor-mode-map nil (setf serial-monitor-mode-map (make-sparse-keym

          Emacsでシリアル通信(serial-monitor-mode)

          Emacsをタッチスクリーン端末でドキュメントビューアとして使う設定(PDF,EPUB,画像)

          Doc-View , Nov , Image に対応。 PDF,EPUBに対応したので大抵のNo DRM文書は見れる。 画像にも対応したので自炊で書籍を電子化したやつも大丈夫だろう。 以下のようにDoc-View,Nov,Imageのモードフックを設定 (defun touch-scroll-by-click-event (fn-scroll-down ddown fn-scroll-up dup fn-scroll-right dright fn-scroll-left

          Emacsをタッチスクリーン端末でドキュメントビューアとして使う設定(PDF,EPUB,画像)

          反差別ムーブの起源は(。´・ω・)?

          現在話題になっている「全国フェミニスト議員連盟によるVtuberへの侮辱行為」ですが、「全国フェミニスト議員連盟」は有志による署名や地方議員による質問に対して何ら見解を示していません。 恐らく、全国フェミニスト議員連盟側は 「自分たち正義側がなぜ非難されなければならないのか(。´・ω・)?  自分たちは正義なのだから批判している方が悪だ。  回答などする必要はない。黙っていても世間は味方してくれるはずだ!  キリッ(・ω・)」 などど開き直っているのではないかと思っていま

          反差別ムーブの起源は(。´・ω・)?

          ヤバい「全国フェミニスト議員連盟」と反差別

          最近フェミニスト界隈がヤバいことになっています。 特にやばいのが「全国フェミニスト議員連盟」で、議員の権力を利用し、かつ「普通のフェミニスト」の笠を着て、過激なフェミニストの主張を通そうとして活動を続けているようです。 過激な活動をするのであれば、ちゃんと「全国過激フェミニスト議員連盟」とでも名乗るべきです。 一般のフェミニストに失礼だと思います。 上記で触れた過激なフェミニストの言動を「Twitter上で」見てみましたが、反差別を謳っている左翼団体の方々と非常に似た言動を

          ヤバい「全国フェミニスト議員連盟」と反差別

          作業時間計算用メジャーモード(timesheet-mode.el)

          以下のように設定(cl , holidays , japanese-holidays が必要です)。 timesheet-setting-alistに会社ごとの設定を入れます。 ※複数の会社の作業時間に対応。 ※Emacs 27.1で動作確認。 (require 'timesheet-mode)(add-to-list 'timesheet-setting-alist '(sample1 ;; 某A社用設定。社名をシンボルで入れる。 ((start-time "9

          作業時間計算用メジャーモード(timesheet-mode.el)

          PowerShellの戻り値の癖が強い

          PowerShellのコードを書き始めたときに躓きやすいポイントについて ・関数の戻り値を複数返せる 最初にはまりそうな点。評価した値は全て戻り値として返る。 その点を理解していないと、戻り値を変数へ入れると想定と異なる値が返ることがあってはまる。 以下のような関数を書くとどうなるか。 function abc{ 1 # 整数 "abc" # 文字列 0.123 # 浮動小数点数} 上記の実行結果は以下のようになります。配列として値が全部返ります(・ω・)

          PowerShellの戻り値の癖が強い