https://ohigedokoro.hatenablog.jp/entry/20131011/1381418240

These are simple tools for Vim/GVim and Windows command. The Original version for UNIX/OS X is written to Software Design magazine October, 2013 by Daichi GOTO ([twitter:@daichigoto], [twitter:@BSDc_teweet]). Use with cat.exe. vbcat.vbs works like UNIX cat command only with pipe.
Vim/GVim を Windows で使うのに役立つシンプルなコマンドです。 Software Design 誌 2013年10月号の特集「Vim至上主義」第2章（後藤大地氏著）で紹介されている、UNIX/OS X 用のシェルスクリプトやエイリアスを Windows バッチファイルに移植したものです。 cat.exe が必要です。EXE ファイルを持ち込むことができない環境用に vbcat.vbs を作りました。パイプの機能のみ UNIX の cat コマンドのように動作します。
GitHub に最新版があります。

https://github.com/higedice/vimbuffer

bf.bat

@echo off
if NOT "%HOME%"=="" (
REM Windows XP
cat >"%HOME%\vimfiles\bf"
) else if NOT "%HOMEPATH%"=="" (
REM Windows 7/8
cat >"%HOMEPATH%\vimfiles\bf"
) else (
echo bf.bat error
)

bfcat.bat

@echo off
if NOT "%HOME%"=="" (
REM Windows XP
type "%HOME%\vimfiles\bf"
) else if NOT "%HOMEPATH%"=="" (
REM Windows 7/8
type "%HOMEPATH%\vimfiles\bf"
) else (
echo bfcat.bat error
)

_vimrc

imap <C-b> <ESC>:read ~/vimfiles/bf<CR>i
nmap <C-b> :read ~/vimfiles/bf<CR>
vmap <C-b> :w!~/vimfiles/bf<CR>

vbcat.vbs

Option Explicit

Dim strScriptHost

strScriptHost = LCase(Wscript.FullName) 

If Right(strScriptHost, 11) <> "cscript.exe" Then 
	WScript.Echo "Use with CScript.exe." & vbNewLine _
			& vbNewLine _
			& "Usage：" & vbNewLine _
			& "> cscript //NoLogo " & WScript.ScriptName
	WScript.Quit
End If

Dim StdIn, StdOut
Dim str

Set StdIn = WScript.StdIn
Set StdOut = WScript.StdOut

Do While Not StdIn.AtEndOfStream
     str = StdIn.ReadLine
     StdOut.WriteLine str
Loop

このブログの関連記事

[Vim 至上主義」Software Design 2013年10月号

作者:
出版社/メーカー: 技術評論社
発売日: 2013/09/18
メディア: 雑誌