mirror of
https://github.com/NishiOwO/VZEditor.git
synced 2025-04-21 16:44:40 +00:00
424 lines
12 KiB
Plaintext
424 lines
12 KiB
Plaintext
==============================================================================
|
||
ＶZ Editor Version 1.56 Copyright (C) 1989 by c.mos
|
||
ＭＡＣＲＯ．ＤＯＣ
|
||
==============================================================================
|
||
|
||
このドキュメントには、ＶＺのマクロを使用する際のいつくかの留意点、および数種類の追加マクロが記載されています。
|
||
|
||
|
||
|
||
目 次
|
||
-----------------------------------------
|
||
１．マクロを組み込む際の注意
|
||
２．追加マクロ集
|
||
-----------------------------------------
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
|
||
-----------------------------------------
|
||
１．マクロを組み込む際の注意
|
||
-----------------------------------------
|
||
|
||
■ ＶＺ．ＤＥＦにマクロを追加していった場合
|
||
vz.defの「* M マクロ」の項に、使用するマクロをどんどん加えていくと、そのうち
|
||
|
||
メモリが足りません
|
||
|
||
というエラーメッセージが表示されて、起動できなくなります。これは、vz.defの
|
||
ファイルサイズが大きくなりすぎて、コードセグメント（６４ＫＢ）内の空きエリアに
|
||
読み込めなくなってしまったためです。この場合は、vz.defの不用なコメントを削って
|
||
ファイルサイズを小さくするか、マクロをいくつかのファイルに分け、「* E その他」
|
||
の１番にファイル名を記述して、読み込むようにしてください。
|
||
|
||
また、同じような状況で、エラーとはならずに起動するが、メニューの一部が欠けて
|
||
しまう等の不具合が発生する場合があります。こんな時は、マクロ定義部の適当な箇所
|
||
に、
|
||
* M マクロ
|
||
|
||
という１行を挿入してみて下さい。
|
||
※この項は、readme.doc「５．使用上の注意事項」にも記述されています。
|
||
|
||
■ １つの大きなマクロを^K^で組み込む場合
|
||
１つの大きなマクロ（数字で始まる行から次の数字の行までのサイズ）を、^K^で
|
||
組み込むと、
|
||
|
||
ラインバッファがいっぱいです
|
||
|
||
というエラーメッセージが表示されて、組み込めない事があります。この様な場合は、
|
||
組み込めるようになるまで、「オプションBl」の値を増やしてください。
|
||
|
||
|
||
|
||
|
||
|
||
-----------------------------------------
|
||
２．追加マクロ集
|
||
-----------------------------------------
|
||
|
||
|
||
■ ワンキーセーブ
|
||
|
||
テキストが修正されていたらセーブします。[F10]等に割り当てておくと便利です。
|
||
---------------------------------------------------------------------
|
||
50 ^\ "ワンキーセーブ"
|
||
?. (mr==1)?{ #S #m }
|
||
---------------------------------------------------------------------
|
||
|
||
|
||
■ テキスト切り替え
|
||
|
||
編集テキストをワンキーで順次切り替えます。全画面の時は全テキストで、分割時
|
||
は、反対側のウィンドウを現テキスト以外のもので切り替えます。
|
||
---------------------------------------------------------------------
|
||
50 ^\ "テキスト切り替え"
|
||
?.
|
||
(wt)??{ &#T(wn+1) .}
|
||
(wc<3)?.
|
||
m=wn, #W n=wn+1,
|
||
(n==m)? n++,
|
||
(n>wc)? n=1,
|
||
(n==m)? n++,
|
||
&#T(n) #W
|
||
---------------------------------------------------------------------
|
||
|
||
|
||
■ 全角括弧の入力
|
||
|
||
カーソル位置に全角括弧のペアを入力します。続けてマクロキーを押すと、
|
||
複数の括弧が選択できます。
|
||
---------------------------------------------------------------------
|
||
50 ^\ "全角括弧入力"
|
||
?.
|
||
p="「」『』（）【】《》",
|
||
&f(cd,p) n=r,
|
||
mi-,
|
||
(n>=0)?{
|
||
(n&1)?{ #s n--, }
|
||
(n<8)? p+=n*2+4, ; 8 = 括弧の種類*2-2
|
||
mi+,
|
||
}
|
||
&?("%4s",p) mi-, #s
|
||
---------------------------------------------------------------------
|
||
【注意事項】
|
||
・括弧の数を変える時は、コメントにあるように(n<8)の数値も変更して下さい。
|
||
|
||
|
||
■ 文字コード表示
|
||
|
||
カーソル位置の文字コードを、シフトＪＩＳ、ＪＩＳ、ＪＩＳ区点コードの３種類
|
||
で表示します。
|
||
---------------------------------------------------------------------
|
||
25 ^KJ "文字コード表示"
|
||
?. ep+,
|
||
:A (s)??{
|
||
ax=cd,
|
||
(ax<0)?{
|
||
&i("$(3C,80,14,61,72,02,2C,A2,D0,D4,05,21,1F,80,E4,7F,C3)")
|
||
a=(ax>>8-$20)*100+ax&$FF-32,
|
||
&m("文字コード: ｼﾌﾄJIS:%4xh JIS:%4xh ｸﾃﾝ:%04d",cd,ax,a)
|
||
}?{
|
||
&m("文字コード: %02xh",ax)
|
||
}
|
||
}
|
||
&p (r!=#[)?{ &o(r) >A } ; [ESC]で終了
|
||
&m("") ep-,
|
||
---------------------------------------------------------------------
|
||
|
||
|
||
■ 表示行削除
|
||
|
||
ＶＺで１行削除（^Y）を実行すると、改行から改行までの論理行が削除されます。
|
||
これを画面上の１行（表示行）単位にするのが次のマクロです。
|
||
---------------------------------------------------------------------
|
||
50 ^\ "表示行削除"
|
||
?. (mb)?{ #y .}
|
||
&s &x(0) #x #b #e mb=2, #y &d ek-,
|
||
---------------------------------------------------------------------
|
||
【注意事項】
|
||
・削除を行なうと、カーソルは常に画面の左端に移動します。
|
||
・ブロックペースト後のカーソル位置オプション「Ek」はリセットされます。
|
||
・カーソルが最下行にある時は、画面が１行スクロールします。
|
||
・マクロの実行キーを ^Y にする事もできます。この時、矩形ブロックマクロ
|
||
（block.def）も組み込んでいる場合は、次の部分を変更して下さい。
|
||
-----------------------------------------
|
||
62 ^KK \[F08] "矩形ブロック記憶"
|
||
m+, >01
|
||
1:
|
||
?. (mb != 4)?{ (m)? #k ? #y . }
|
||
↓ ~~
|
||
?. (mb != 4)?{ (m)? #k ? >50 . } ; 表示行削除のマクロ番号
|
||
-----------------------------------------
|
||
|
||
|
||
■ ＣＯＢＯＬ用ＴＡＢ
|
||
|
||
ＴＡＢキーで、７，１２，６３カラムまでスペースを挿入します。
|
||
---------------------------------------------------------------------
|
||
50 [TAB] "COBOL"
|
||
?.
|
||
(lx<6)?{ (6-lx){' '} . }
|
||
(lx<11)?{ (11-lx){' '} .}
|
||
(lx<62)?{ (62-lx){' '} .}
|
||
---------------------------------------------------------------------
|
||
|
||
|
||
■ 桁対応上書きモード
|
||
|
||
上書きモード（オーバーライト・モード）を、文字の大きさ単位で行なうように
|
||
します。マクロを実行すると、画面下に 《桁対応》 と表示され、桁対応上書きモード
|
||
となります。再度実行すると、画面下に 《文字対応》 と表示され、通常の文字対応
|
||
モードに戻ります。上書きモード／挿入モードは[INS]で切り換えて下さい。
|
||
---------------------------------------------------------------------
|
||
50 ^\ "桁対応上書きモード"
|
||
?.
|
||
(mm)?{ mm-, &m("文字対応") / }
|
||
mm+, &m("桁対応")
|
||
:A &p c=r, (s)? >N
|
||
(c>=$100)? >N
|
||
(mi && ct>1)? >B
|
||
:N &o(c) >A
|
||
:B &s
|
||
(cd==9)? >T ; TAB
|
||
k=ck,
|
||
&o(c)
|
||
(c>=$20 && k)?{ mi-, ' ' #s mi+, >C } ; 全角←半角
|
||
(c<$20 && k==0)?{ ; 半角←全角
|
||
(cd==9 && lx%ht)? >C
|
||
(ck)?{ ' ' #s >C }
|
||
(ct>1)? #g
|
||
}
|
||
:C #? >A
|
||
:T x=lx,
|
||
mi-, &o(c) mi+,
|
||
(x/ht!=lx/ht)?{ (lx%ht+1){ #g } }
|
||
>C
|
||
---------------------------------------------------------------------
|
||
|
||
|
||
■ タイムスタンプ
|
||
|
||
カーソル位置に、各種フォーマットで日付・時刻を入力します。お好きなフォーマッ
|
||
トを残して、それ以外の行は先頭に「;」を入れてコメントにして下さい。
|
||
（日付：D1,D2,D3、曜日：W1,W2、時刻：T1,T2）
|
||
---------------------------------------------------------------------
|
||
50 ^\ "タイムスタンプ"
|
||
ax=$2A00, &i($21)
|
||
y=cx, m=dx>>8, d=dx&31, a=ax&7,
|
||
ax=$2C00, &i($21)
|
||
h=cx>>8, i=cx&63, j=dx>>8,
|
||
|
||
y-=1900, ; 1990->90
|
||
&?("%d/%02d/%02d ",y,m,d) ; D1: 90/12/01
|
||
p="JanFebMarAprMayJunJulAugSepOctNovDec"+m*3-3, ; D2:
|
||
&?("%d.%3s.'%d ",d,p,y) ; D2: 1.Nov.'90
|
||
p="SunMonTueWedThuFriSat"+a*3, ; W1:
|
||
&?("(%3s) ",p) ; W1: (Sat)
|
||
n='０', ; D3:
|
||
&?("９%c年%c%c月%c%c日 ", n+y%10,
|
||
(n+m/10)*(m>9), n+m%10,
|
||
(n+d/10)*(d>9), n+d%10
|
||
) ; D3: ９０年１２月１日
|
||
p="日月火水木金土"+a*2, ; W2:
|
||
&?("(%2s) ",p) ; W2: (土)
|
||
&?("%02d:%02d:%02d ",h,i,j) ; T1: 12:34:56
|
||
&?("%d:%02d %c.m. ",h%12,i,'a'+(h/12)*15) ; T2: 12:34 p.m.
|
||
---------------------------------------------------------------------
|
||
【注意事項】
|
||
・D3フォーマットは、ＶＺのVer1.56以降でないと使用できません。というのは、
|
||
このマクロでは%cに渡す値がゼロの時は、何も出力しない必要があるのですが、
|
||
Ver1.55以前では、マクロの実行時エラーとなってしまうためです。
|
||
|
||
|
||
■ 指定桁折／連結
|
||
|
||
tool.defの「指定桁折」マクロに、以下の機能を追加したものです。
|
||
・ブロックモードでは、ブロック内のみ処理。
|
||
・「桁折位置」でゼロを入力すると、改行を削除してベタ書きに戻す。
|
||
・禁則処理をする／しないの指定。（２ヵ所の「;」を削除）
|
||
・画面表示を抑止して、代りに処理中の行の行番号を表示。
|
||
---------------------------------------------------------------------
|
||
71 [ESC]Y "指定桁折／連結"
|
||
?. (yy)?? yy=70,
|
||
&g("桁折位置($yy),0=連結")
|
||
(r==-1)?.
|
||
(r>=0)? yy=r,
|
||
b="‘“（〔［｛〈《「『【([{｢",
|
||
e="’”）〕］｝〉》」』】、。，．？！!),.?]}｣",
|
||
f=" 。．？】", ; 連結する場合の行末文字
|
||
; (yy)?{ &a("禁則処理をします")
|
||
; (r<0)?. (r)?? b=e="", }
|
||
mi[, ei[, mi-, ei+, #M &s
|
||
(mb)?{ p=cp, #B (cp>p)?{ p=cp, #B } }
|
||
:A &k (r==$1B)? >Z ; [ESC]が押されたら中断
|
||
(mb)?{ (cp>=p)? >Z }
|
||
&m("Line:%d",ln)
|
||
(yy)?? >D
|
||
&x(yy)
|
||
(ct)?? >Z
|
||
(ct<2)? { #x >A }
|
||
:B #s &f(cd,b) (r>=0)? >B
|
||
:C #d &f(cd,e) (r>=0)? >C
|
||
(ct>1)?{ #m p+=2, }? #d >A
|
||
|
||
:D (ct)?? >Z
|
||
(ck)??{ #x >A }
|
||
:E #> #s &f(cd,f) (r>=0)?{ #d #d >D }
|
||
#d #g (ct<3)?{ #m >D } p-=2, >A
|
||
|
||
:Z (mb)? #b
|
||
ei], mi], #U &d
|
||
---------------------------------------------------------------------
|
||
【注意事項】
|
||
・半角文字で始まる行は、連結しません。
|
||
・桁折した文章を別の桁数で折り直したい場合は、いったん連結してから、再度桁折り
|
||
して下さい。
|
||
・テキストバッファのサイズ（６４ＫＢ）を越えるような大きなテキストでブロック
|
||
指定すると、正常にブロック範囲を処理できない場合があります。
|
||
|
||
|
||
■ アウトラインプロセッサ
|
||
|
||
＃、＃＃で始まる見出し行を元に、アウトラインファイル（ＯＬ）を作成し、
|
||
以下の操作が可能です。
|
||
・見出し行の抽出（ＯＬの作成）
|
||
・見出し行から本文へのジャンプ（ＯＬジャンプ）
|
||
・見出し行のカット＆ペーストを本文へ反映（ＯＬカット＆ペースト）
|
||
|
||
【ＯＬの作成】
|
||
・＃または＃＃を含む行（見出し行）を抽出し、ＯＬファイルを開きます。
|
||
・ＯＬファイル上でもう１度このマクロを実行すると、＃＃を含む小見出しを
|
||
取り除き、＃の大見出しだけにします。これ以降は何も起こりません。
|
||
・ＯＬファイルは、[ESC]Cでクローズします。
|
||
※テキストの１行目には見出しを書かないで下さい。
|
||
|
||
【ＯＬジャンプ】
|
||
・ＯＬファイル上で[CR]を押すと、元ファイルのその行へジャンプします。
|
||
※^KWで元のテキストとＯＬファイルが切り替わる状態にしておいて下さい。
|
||
※すでに[CR]キーが、別のマクロに割り当てられている場合は、空いている別の
|
||
キーを割り当てて下さい。
|
||
|
||
【ＯＬカット＆ペースト】
|
||
・ＯＬファイル上の見出し行を削除し、かつ元のテキストのその部分も削除
|
||
します。トグルになっており、もう１度実行すると、今度はカーソルのある
|
||
見出し行の上に、カットした見出しと元テキストをペーストします。
|
||
---------------------------------------------------------------------
|
||
50 [ESC]V "ＯＬの作成"
|
||
?.
|
||
&s
|
||
(mr==254)? >C
|
||
wt[, &#Y(0)
|
||
#N "outline" #m #67
|
||
#F '＃' #m ; ＃：大見出し
|
||
#W #^ #<
|
||
:A #c (r)??{ #k #W #i #x #W #> >A }
|
||
#U #W r], &#Y(r) >Z
|
||
|
||
:C #^ #<
|
||
#F "＃＃" #m ; ＃＃：小見出し
|
||
:D #c (r)??{ #y #e #> >D }
|
||
:Z #^ #< #@ &d
|
||
|
||
51 [CR] "ＯＬジャンプ"
|
||
?.
|
||
(mr!=254)?{ #m. }
|
||
&01 #@ &d
|
||
|
||
52 [ESC]Z "ＯＬカット＆ペースト"
|
||
?.
|
||
(mr!=254)? .
|
||
&s
|
||
(fa)?{ &01 #i #W #i fa-, >Z }
|
||
&01 #b #W #y &01 #y #W fa+,
|
||
:Z #@ &d
|
||
|
||
01: (ct)?{ #> #b #< #G #W #c (r)? #r . }
|
||
#W #_
|
||
---------------------------------------------------------------------
|
||
|
||
《元ファイルの例》
|
||
-----------------------------------------
|
||
（※ 先頭行には、見出しを書かない）
|
||
＃１ ＶＺの過去
|
||
ＶＺの過去はくらかった。
|
||
＃＃１．１ マニアックなＥＺ
|
||
ダイヤモンドキーなんか大きらいだぁ。
|
||
＃＃１．２ オタッキーなマクロ。
|
||
そういえばＲＥＸと呼んでいた頃もあったなぁ。
|
||
＃＃１．３ バグとの死闘
|
||
バグの需要と供給。
|
||
|
||
＃２ ＶＺの現在
|
||
ＶＺの現在はなお混沌。
|
||
＃＃２．１ 永遠のバグ
|
||
どうして取っても取っても無くならないの？
|
||
＃＃２．２ サポートとは
|
||
ユーザーは、生かさず、殺さず。
|
||
|
||
＃３ ＶＺの未来
|
||
ＶＺに未来はあるか？
|
||
＃＃３．１ 正規表現
|
||
そんなむずかしいの、わかんなーい。
|
||
＃＃３．２ マウス対応
|
||
Turboにゃ負けられん。でもサイズが・・。
|
||
＃＃３．３ Ｗｉｎｄｏｗｓへ
|
||
でも、所詮９８じゃ、まともに動かんでしょう。
|
||
|
||
＃４ 付録
|
||
-----------------------------------------
|
||
|
||
《ＯＬの作成（１回目）》
|
||
-----------------------------------------
|
||
＃１ ＶＺの過去
|
||
＃＃１．１ マニアックなＥＺ
|
||
＃＃１．２ オタッキーなマクロ。
|
||
＃＃１．３ バグとの死闘
|
||
＃２ ＶＺの現在
|
||
＃＃２．１ 永遠のバグ
|
||
＃＃２．２ サポートとは
|
||
＃３ ＶＺの未来
|
||
＃＃３．１ 正規表現
|
||
＃＃３．２ マウス対応
|
||
＃＃３．３ Ｗｉｎｄｏｗｓへ
|
||
＃４ 付録
|
||
-----------------------------------------
|
||
|
||
《ＯＬの作成（２回目）》
|
||
-----------------------------------------
|
||
＃１ ＶＺの過去
|
||
＃２ ＶＺの現在
|
||
＃３ ＶＺの未来
|
||
＃４ 付録
|
||
-----------------------------------------
|
||
|
||
|
||
■ コンパイルとタグジャンプ
|
||
|
||
編集テキストをコンパイル（tcc）します。エラーが生じたら、ただちにconsole
|
||
ファイルを開きます。ここで、もう一度このマクロキーを押すと、エラー行をサーチ
|
||
して、該当ファイルにタグジャンプします。
|
||
---------------------------------------------------------------------
|
||
50 ^\ "コンパイル・タグジャンプ"
|
||
?.
|
||
(wn)?? >A
|
||
#S #m
|
||
#E "tcc " #P #m
|
||
(r)?{ #95 #U #< } .
|
||
:A #60 (r)?{ #x (r)?. >A }
|
||
#x a=wn, #O #e
|
||
#a #s (cd!='-')?{ #[ >A } ; 行番号がない場合はスキップ
|
||
#m (s)?{ #[ #[ >A }
|
||
---------------------------------------------------------------------
|
||
|
||
|
||
|
||
|
||
==============================================================================
|
||
End of macro.doc
|
||
==============================================================================
|
||
|