WindowsTool のバックアップ(No.32)

[ トップ ] [ 新規 | 一覧 | 単語検索 | 最終更新 | ヘルプ ]

Windowsの便利なフリーソフトの紹介 †

↑

目次 †

Windowsの便利なフリーソフトの紹介
- 目次
- 紹介しているサイトのリンク
IPMessenger
紙Copy
- URL
Cygwin
- URL
- おすすめCygwinパッケージ
  - Archive
  - Editors
  - Interpreters
  - Libs
  - Web
  - X11
Magic Formation
- URL
- このランチャーのいいところ、
- おススメな設定
  - 方針
charu3
- 概要
- download
- URL
- 作者
  - Daily Portal
  - サイト
Noah
xyzzy
- 参考URL
- よく使う基本的な設定
- 設定例
- define-key - refwiki　キーマップのキーにコマンドを割り当てます。
  - 使用例：
- selection-start-end - refwiki セレクションの開始位置、終了位置を取得します。
  - 使用例:
- save-some-buffers - refwiki 開いているバッファを保存します。[C-x s]
- 外部プログラムの実行
- xmlをxyzzyで解析
- デフォルトの文字コードと改行コードを指定する。
- 秀丸風の選択範囲インデントアンインデント
SQL
- OSQLEdit
- SQL Developer
  - ダウンロード
Sakura Editor
- Zen Coding for Sakura Editor
- 選択範囲を外部プログラムで加工するサクラエディタ用JScriptマクロの雛形
- サクラエディタ: マクロで選択範囲の SQL文を整形する（要Ruby）
Winshot
Ruby
Perl
ポップアップアイコン
グラフィック系
- PAINT.NET
- SmoothDraw
- ArtRage
TORTOISESVN
http://www.uwsc.info
コマンドラインから使えるツール
- bmp2png & png2bmp
ツールを紹介しているサイトの紹介
HandySelector
Everything
FileNameCopy
- インストール
- URL
Registry Trash Keys Finder
- 公式サイト
- 日本語での説明
UWSE
- 解説ページ
- サンプルコード
- 正規表現とかCOMつかった方法のサンプル
- UWSC doIt tool
- UWSC 掲示板
- UWSC Wiki
未確認ページ

↑

紹介しているサイトのリンク †

http://www.ne.jp/asahi/hishidama/home/tool/index.html

↑

IPMessenger †

説明不要だよね

↑

紙Copy †

↑

URL †

http://www.kamilabo.jp/copi/index.html

↑

Cygwin †

↑

URL †

http://cygwin.com/

下記から直接インストールが可能です。

http://cygwin.com/setup.exe

↑

Magic Formation †

↑

URL †

Magic Formation

Formation:http://www.tokyodownstairs.com/ マウスカーソルで円を描いて呼び出すアプリケーション起動ランチャー

↑

このランチャーのいいところ、 †

円形で、視点の移動の関係かはわかりませんが見やすいです。
また、キーボードのみで、ランチャーを操作できる設定ができるので良いです。
追加はドラッグ＆ドロップで追加できます。下記の設定をした後でやりましょう。

↑

おススメな設定 †

キーボード起動を有効
ALTキー300ミリ秒以内に２回連打でランチャーを起動
キーボードの矢印キーのup,downは次ページ、前ページ
マウスジェスチャは鈍感にする
ショートカットは実リンクを登録

↑

方針 †

OS起動時にはランチャーのみをスタートアップに登録しておき、必要に応じてランチャー経由でアプリケーションを起動するようにすると、OSの起動時間が短縮されますし、メモリの使用量も抑えられるので、高速化に役立つと思います。

↑

charu3 †

↑

概要 †

高機能なクリップボード拡張ソフト

↑

download †

サイトが消えていたことがあったので、下記に圧縮したのを置いておきます。

Charu3.zip

選択範囲をコマンドラインの標準入力を受け付けるperlやrubyに渡すプラグイン

Charu3ExecEx.zip

↑

URL †

http://hp.vector.co.jp/authors/VA013280/

http://keijiweb.com/

↑

作者 †

松本圭司

↑

Daily Portal †

http://portal.nifty.com/writer/index.htm

↑

サイト †

http://keijiweb.com/

charu3はこちら

http://keijiweb.com/software.html

↑

Noah †

各種解凍DLL自動ダウンロード機能が便利

http://www.vector.co.jp/soft/win95/util/se106079.html

↑

xyzzy †

↑

参考URL †

http://d.hatena.ne.jp/himadatanode/20060930/p1

↑

よく使う基本的な設定 †

(load-library "Gates")

↑

設定例 †

;バッファのメニュー関係
;バッファのメニュー関係
(add-hook '*init-app-menus-hook*
         #'(lambda ()
             (let ((menu *buffer-bar-context-menu*))
               (add-menu-separator menu nil)
               (add-menu-item menu nil "これより右を閉じる(&R)"
							   'mybb-close-right-buffers)
               (add-menu-item menu nil "これより左を閉じる(&L)"
							   'mybb-close-left-buffers)
				(add-menu-item menu nil "これ以外を閉じる(&D)"
							   'mybb-close-other-buffers)
				(add-menu-item menu nil "全てコピー"
							   'copy-all-to-clipboard)
				(add-menu-item menu  nil "バイトコンパイル(&C)"
							   'my-buffer-menu-byte-compile-file
							   #'(lambda (&optional prog)
								   (unless
									    (and(get-buffer-file-name
											*buffer-bar-context-menu-buffer*)
										    (if prog (file-exist-p prog) t))
									  :disable))
 							   ))))


;; これ以外を閉じる
(defun mybb-close-other-buffers ()
 (interactive)
 (let ((buf0 *buffer-bar-context-menu-buffer*))
   (dolist (buffer (buffer-list))
     (unless (or (eq buffer buf0)
		  (string= (buffer-name buffer) "*scratch*"))
	(kill-buffer buffer)))))

;; これより右を閉じる(version 0.2.2.233 以降)
(defun mybb-close-right-buffers ()
 (interactive)
 (let ((buffer *buffer-bar-context-menu-buffer*)
	(buff (get-next-buffer (get-next-buffer :bottom nil t) nil t)))
   (let ((buf (get-next-buffer buffer nil t)) buf1)
     (while (not (equal buf buff))
	(setq buf1 buf)
	(setq buf (get-next-buffer buf nil t))
	(unless (string= (buffer-name buf1) "*scratch*")
	  (kill-buffer buf1))))
   (switch-to-buffer buffer)))

;; これより左を閉じる(version 0.2.2.233 以降)
(defun mybb-close-left-buffers ()
 (interactive)
 (let ((buffer *buffer-bar-context-menu-buffer*)
	(buff (get-next-buffer (get-next-buffer :top nil t) t t)))
   (let ((buf (get-next-buffer buffer t t)) buf1)
     (while (not (equal buf buff))
	(setq buf1 buf)
	(setq buf (get-next-buffer buf t t))
	(unless (string= (buffer-name buf1) "*scratch*")
	  (kill-buffer buf1))))
   (switch-to-buffer buffer)))

;; 全てクリップボードにコピー
(defun copy-all-to-clipboard ()
 (interactive)
 (copy-region-to-clipboard (point-min) (point-max)))

;;バイトコンパイルとか
(defun my-buffer-menu-byte-compile-file ()
 (interactive)
 (if (string= "l" (pathname-type (get-buffer-file-name)))
	  (byte-compile-file (get-buffer-file-name))))

↑

define-key - refwiki　キーマップのキーにコマンドを割り当てます。 †

参考URL

http://xyzzy.s53.xrea.com/reference/wiki.cgi?p=define-key

 KEYMAP  : キーマップ
 KEY     : 登録するキー
 COMMAND : 実行するコマンド

↑

使用例： †

 ;;; Ctrl-X fのキー割り当てを変える
 (define-key ctl-x-map #\f 'my-find-file)
 => t 
 ;;; Esc-f のキー割り当てを変える
 (define-key esc-map #\f 'my-find-file)
 => t
 ;;; Ctrl-C aのキー割り当てを変える
 (define-key spec-map #\a 'my-find-file)
 => t

↑

selection-start-end - refwiki セレクションの開始位置、終了位置を取得します。 †

参考URL

http://xyzzy.s53.xrea.com/reference/wiki.cgi?p=selection-start-end

セレクションが存在すれば、局所的にSTARTに開始位置、ENDに終了位置をセットされた環境を作り BODYを順次評価します。

↑

使用例: †

 ;;; セレクションに含まれる文字列を返します。
 (selection-start-end (start end)
   (buffer-substring start end))
 =>"foo"

↑

save-some-buffers - refwiki 開いているバッファを保存します。[C-x s] †

参考URL

http://xyzzy.s53.xrea.com/reference/wiki.cgi?p=selection-start-end

 VERBOSE : non-nilの場合保存するファイルごとにダイアログを表示して確認します。

http://xyzzy.s53.xrea.com/reference/wiki.cgi?p=save-some-buffers

↑

外部プログラムの実行 †

↑

pipe-command †

c-x @

外部プロセスを実行して結果をXYZZY取り込みメニューのコンソールプログラムの実行(&P)...

↑

launch-application †

c-x %

外部プロセスを投げるだけメニューのWindowsプログラムの実行(&W)...

↑

execute-subprocess †

c-x &

対話的に実行

↑

|lisp execute-shell-command †

↑

xmlをxyzzyで解析 †

http://seaoak.cocolog-nifty.com/read/2010/05/xyzzy-xml-5200.html

↑

デフォルトの文字コードと改行コードを指定する。 †

(setq *default-fileio-encoding* *encoding-utf8n*) (setq *default-eol-code* *eol-lf*)

↑

インクリメンタルサーチ †

(require "isearch")

↑

コンソールとして利用する例 †

gccなどのコンパイラをインストールしてPathを設定。

ソースを作成、読み込み: C-x C-f (or C-c C-f) **.c

コンパイル: C-x & gcc **.c -o **.exe

実行: C-x & **.exe

↑

辞書として †

"edict"、"gene95"を手に入れる。

解凍して出来た"edict"、"gene.txt"を適当なフォルダに移動する。

例: /xyzzy/dic/

/xyzzy/etc/から"gendec.exe"を用意したフォルダに持ってきて実行。

"xyzzydic"、"xyzzye2j"、"xyzzyidi"、"xyzzyj2e"、"xyzzyird"の５つのファイルが出来る。

ツール→共通設定→ディレクトリでファイルへのパスを通して終わり。

使い方１: 英和 C-c e 和英C-c j 読みC-c r

使い方２: 選択してツール→辞書

↑

秀丸風の選択範囲インデントアンインデント †

http://xyzzy.s53.xrea.com/wiki/index.php?tips%2F%BD%A8%B4%DD%C9%F7%A4%CE%C1%AA%C2%F2%C8%CF%B0%CF%A5%A4%A5%F3%A5%C7%A5%F3%A5%C8%A1%A6%A5%A2%A5%F3%A5%A4%A5%F3%A5%C7%A5%F3%A5%C8

(defun indent-selected-lines ()
 (interactive "*")
 (let ((start-line-number nil) (end-line-number nil) (do-indent-flag nil))
   (selection-start-end (start end)

     (goto-char start)
     (if (and (bolp) (> start end)) (backward-char 1))
     (setq start-line-number (current-line-number))

     (goto-char end)
     (if (and (bolp) (< start end)) (backward-char 1))
     (setq end-line-number (current-line-number))

     (if (> start-line-number end-line-number)
       (rotatef start-line-number end-line-number)
     )

     (if (/= (progn (goto-char start) (current-line-number)) (progn (goto-char end) (current-line-number)) ) 
       (progn 
         (setq do-indent-flag t)
         (shift-region start end)
         (goto-line start-line-number)
         (start-selection 1 t)
         (while (<= (current-line-number) end-line-number)
           (selection-next-virtual-line)
         )
       )
       (delete-region start end)
     )
   )

   (if (null do-indent-flag) (insert "\t"))
 )
)

(defun unindent-selected-lines ()
 (interactive "*")
 (let ((start-line-number nil) (end-line-number nil))
   (selection-start-end (start end)
     (goto-char start)
     (if (and (bolp) (> start end)) (backward-char 1))
     (setq start-line-number (current-line-number))

     (goto-char end)
     (if (and (bolp) (< start end)) (backward-char 1))
     (setq end-line-number (current-line-number))

     (if (> start-line-number end-line-number)
       (rotatef start-line-number end-line-number)
     )

     (unshift-region start end)

     (goto-line start-line-number)
     (start-selection 1 t)
     (while (<= (current-line-number) end-line-number)
        (selection-next-virtual-line)
     )
   )
 )
) 

;キー設定 
(global-set-key #\TAB 'indent-selected-lines)
(set-extended-key-translate-table exkey-S-tab #\F20)
(global-set-key #\F20 'unindent-selected-lines)

↑