VZEditor/VZ157/BLOCK.DEF
Yoshihiko Hyodo 6f06b9514a first commit
2024-11-18 22:21:26 +09:00

74 lines
1.2 KiB
Plaintext
Raw Blame History

This file contains invisible Unicode characters

This file contains invisible Unicode characters that are indistinguishable to humans but may be processed differently by a computer. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

======== block.def (v1.57) ========
;
;【組み込み方法】
;
;・ A>vz +block ...
;・ vz.def: * E その他 1 block
;
;
;【矩形ブロックの操作方法】
;
;・ ^KB :矩形ブロックモード
;・ ^Y,^KK,^J :矩形ブロックの削除/記憶/挿入
;
;※ 矩形ブロックの複写(^KCはできません。
;※ 複数行のまたがる行内では正常に動作しません。
* M マクロ
59 [ESC]K "【矩形ブロック】 [ESC]K"
!01
60 ^KB "矩形ブロックモード"
?. #b (mb)?{ mb=4, xb=lx, }
61 ^Y [F08] "矩形ブロック削除"
m-, >01
62 ^KK \[F08] "矩形ブロック記憶"
m+, >01
1:
?. (mb != 4)?{ cc=0, (m)? #k ? #y . }
&s
xx=-1, (lx > xb)? xx=lx,
n=ln, #b #B (ln < n)?{ n=ln, #B }
cc=0,
:A (ln <= n)? >Z #e
&x(xb) #b
(xx < 0)? #> ? &x(xx)
(m)? #k ? #y
cc++, >A
:Z &d
63 ^J [F09] "矩形ブロック挿入"
?. (cc)??{ #i . }
xx=lx,
ei[, ek[, ei-, ek-,
&s
:A (ct <= 1)?{ #> &#68(xx) #> }
#i #x (r)?{ #> #m }
(cc--)? >A
ek], ei],
&d
65 [ESC]] "行末のSPACE・TABの削除"
?. (mb)??.
&s
n=ln, #b #B (ln > n)?{ n=ln, #B }
:A (ln >= n)? >Z
#>
(lx)?{
#s (ct == 2)?{ #d #16 }
}
#x >A
:Z &d
* P メニュー
1 "",34,3,22
&61 &65
"TAB→SPACE変換 ",Eu
*
======== End of block.def ========