======== vzfl.def (v1.6) ========

* S システムメニュー

5	"",13,11
	"W *.*"
	"S .STK"
	"Q ."
	"C .h .c"
	"I .inc .asm"
	"E .exe .com"
	"D .doc .txt"
	"T <Text>"
	"B <Binary>"
	"A <Archive>"
	"H <Hidden>"

6	"",16,7 "F ファイル名" "E 拡張子" "N 新しい順" "O 古い順" "L 大きい順" 	"S 小さい順" "D ディレクトリ"

7	"",14,6	"C 比較の実行" "E 存在" "N 新しい" "O 古い" "L 大きい" "S 小さい"
8	"",13,14
	"C コピー	Copy %1 %2"
	"D 削除		Del "
	"P LHA圧縮	%!%^Lha a %2%F %@3"
        "U LHA解凍	%!%^Lha x %1 %2%G%\"
	"V LHA表示	%!Lha l "
	"Ish here	%!%^Ish %1 /ss /m %:"
;	"Restore ish	%!%^Ish %1 "
	"R ish解凍	%!%^ish %1 /q /m %2%G%\"
	"A 比較(Asc)	Fca %1 %2"
	"B 比較(Bin)	Fcb %1 %2"
	"L 画像表示	LXP %1"
	"T テスト	Dir "
	"X 実行		%1 %2"
	"E ｺﾏﾝﾄﾞﾗｲﾝ",	#H
	"K キー一覧	%!%^Vzkeys %* %G

9	"",0,10
	"com"
	"exe"
	"BAT"
	"lzh %!%^MIEL "
	"LZH Lha x "
	"gif %!LXP %1 %^ "
	"pcx %!LXP %1 %^ "
	"bdf %!Bupdate -v "
	"BDF %!Bupdate -o "

11	"VZPATH",20,0

12	"属性の変更",11,5 "Read only" "Hidden" "System" "Archive" "OK"

13	"",15,10
	"C コピー	%!%^Zcopy %[/s] %@1 %2%G"
	"I 増分コピー	%!%^Zcopy %[/s /i] %@1 %2%G"
	"M 移動		%!%^Zcopy %[/s] /m %@1 %2%G"
	"D 削除"	,#D
	"R 名前の変更"	,#R
	"A 属性の変更"	,#A
	"K ﾃﾞｨﾚｸﾄﾘ作成"	,#K
	"N 新規ﾌｧｲﾙ作成",#N
	"W WGREP検索	%!WGREP -t -h $"%G$" %*"
	"F FILMTN	%!%^FILMTN"

* M マクロ

1 "!Filer"
	(r)??.
	(r==':'||r=='L')? r='D',
	r[, &Fm(r) (r>=0)? {
		 sp+=2, (r)>?{ #F #L #M #P #S #V #W #+ #> #< #O #E }
	}
	r], (r)>!{
;	L	#L	;Drive
;	M	#M	;Mask
;	P	#P	;Path
;	S	#S	;Sort
;	V	#V	;View
;	W	#W	;Window
;	A	#+	;All
;	T	#>	;Trcd
;	R	#<	;Retcd
;	O	#O	;cOmpare
;	E	#E	;Exec menu
;	F	#F	;File menu
;		#!	;Exec command
	X	>X	;eXec
	H	#H	;sHell
;		#-	;cancel
;		#*	;*.*
;		#/	;root
	@	#Q	;vzpath
;	A	#A	;attribute
;	D	#D	;delete
	R	#R	;rename
	K	#K	;makedir
	N	#N	;new file
;	C	>C	;Copy
	Q	>Q	;Qview
	G	>G	;flex_W.def
	I	>01	;Index
	J	>02	;Jump
	}.
:Q	&e("#]") #]					;★
	&Zs("Qview") (r)?? &z("Qview") (rr)??. >*	;★
:G	&e("#]") #]
	&Zs("flex_W") (r)?? &z("flex_W") (rr)??. >*	;★

:C	pm="Zcopy %@ %2", #!
:X	pm="%1 %2", #!

1:	&e("#]") #]				;呪縛解放
	&m("Index:<A>-<Z>") &b(5)		;メッセージガイド
	&p (r>='A'&&r<='Z')??.			;アルファベット入力を待つ
	&Sp(pr,"%c*",r)				;マスク文字をprにセットし
	pf[,pf=pr,#P #e #m pf],			;マスク変更を実行

2:	&e("#]")#]				;呪縛解放
	!01 (r<0) ?.				;メニュー呼びだし
	(pm.1-'.')?{pf[,pf=pr,#P }		;
	  ?{ #H #[ (s)?? #O }			;
	&?("%s",pm+2) #m ?? pf],		;
* P						;
1	"Jump",24,11
	"V E:\VZ\DEF"
	"J E:\VZ\実験室"
	"F F:\VZ\DEF"
	"D E:\DOC\VZ\DEF"
	"@ D:\DATA\DBFS"
	"L D:\DATA\LOG"
	"M D:\DATA\MEMO"
	"H D:\DATA\HTML"
	"P E:\AIR\UL"
	"Z E:\書庫"
	"K E:\PKLOG"

* E その他

4 	File  Drive  Mask  Path  Sort  View  Window  All  ToCD  RetCD  Compare  Exec
*
;======== End of vzfl.def ========