探してみたら、こんなものがありました。

> 05665/05668 xxxxxxxx  Emmett           VZBUG(2) サイレントモード関連のバグ
> (15)   97/04/15 10:58

> ■　ＶＺバグ大全（２）：サイレントモード関連のバグ

> （Ａ）サイレントモードでの #k または #y の反復
> 　サイレントモードで、非ブロックモードでの行記憶またはカット（#k、#y）を連
>   続して実行すると、ある特定の点までくると、テキストスタックに格納される文
>   字列の最後が化けることがあります。


これは非ブロックモードの話なので、今回は違うかもしれませんが

> （Ｂ）サイレントモードでの #_
>   どうやらサイレントで実行された #_ は、特定の条件下でカーソル位置ポインタを
>   算出しまちがえるらしい。

> 　このトラブルは、 #_ 直後に #? などで最終行を一度表示してやれば回避するこ
>   とができます。これは #_ 直後でなければ駄目で、#38 のあとでは遅すぎます。
 
> 　　・サイレントでの #_ のあとには #? &s
> 　と習慣づけておくといいでしょう。


どうやらこれが関係ありそうです。
高橋版でもこのバグは潰しきれなかったような気がします。

 [ESC]I @I "I カーソル位置へ挿入" のマクロを

;	#b #_ (ct)?{ #> #m #x }
	#b #_ #? &s (ct)?{ #> #m #x }

このようにするか、&s を取ってしまうと、改善がみられました。

前回と同じ条件で実行して、ファイルサイズが一致するようになりました。
ただし、中身はおかしくなっているようです。
これはおそらく VTDOS の EMS がらみの不具合と思われます。

この実験で、榊原版VZだけは、ファイルサイズが小さくなりました。
ファイル挿入が途中で終わっているのか、それとも？


今まで実験に使用した生ログファイルは

 280,386 wf_log.cgi
 380,844 wf_log130407.cgi
 381,081 wf_log130408.cgi

このうちの 381k のファイルの途中に 380k のファイルを挿入していました。
挿入する 380k のファイルに問題があるのか確認のため、今度は
 280k のファイルの途中に 380k のファイルを挿入する実験をしました。

そうしたら、榊原版以外の VZ は正常に終了しました。
榊原版VZだけは、ファイルサイズが2バイト大きくなりました。
改行が1つよけいに入っていました。

この現象について、野ざらし言#4651 で、めざらさんの発言

> テキストスタックに複写する際に，テキストバッファサイズの境界付近に
> たまたまラインバッファサイズを超える長い行が存在した場合の振る舞い
> （結構レア？）に係ることかもしれないですね。「新発見」かも。

これが関係しているかもしれないと私も思いました。

ただ、MSDOS Player と DOSVAXJ3 では正常に動作しているのが謎なのです。
プラットフォームのメモリ管理とVZの相性で不具合が出ているのではないかと感じるのです。
VTDOSとXP（NTVDM）の共通点は、32ビットのメモリ管理で16ビットのVZを動かしているところ？

前回の書き込みで

> ただ、MSDOS Player と DOSVAXJ3 では正常に動作しているのが謎なのです。
> プラットフォームのメモリ管理とVZの相性で不具合が出ているのではないかと感じるのです。
> VTDOSとXP（NTVDM）の共通点は、32ビットのメモリ管理で16ビットのVZを動かしているところ？

このように書きましたが、32ビットのメモリ管理で、ふと思ったことがあります。
ちょっと前の記事ですが

#10145：MS-DOS Player 12/30版 　投稿者：konno 　 2021/12/31(金) 

> さっそく使ってみましたが、ia32版では、自作のアプリでエラーが出ます。
> 自作アプリとは、turbo basic の古いプログラムで、VGAでないと動きません。
> 
> 実は、今までの MS-DOS Player では、エラーが出て使えませんでした。
> 軟式さんの DOSVAXJ3 では使えていました。
> 
> ia32_x86	数字4桁の入力で、OE+2?? （??は数字によって変わる）エラーで止まる
> ia32_x64	数字4桁の入力で、OE+2?? （??は数字によって変わる）エラーで止まる


MS-DOS Player でも ia32版では16ビットのアプリでエラーが出ます。
なので、今は ia32版は使っていません。
VTDOS も、ia32 を使っているとしたら、ここに共通の問題があるのではないかと感じました。


#10157：turbo basic は VTDOSで動かない 　投稿者：konno 　 2022/01/15

> このプログラムを、VTDOS で動かしてみましたが、動きませんでした。
> エラーログを見てみると、ログが残っていました。
> 
> 2022-01-15 16:28:00 AISYO(17BA) 17CA:0EC8 'Out Byte 0043 34'
> 
> AX=2534 BX=0006 CX=0004 DX=1F10 SI=703A DI=7070 BP=17BA DS=17CA ES=0040 FLAGS=0046
> 
> CS:IP=17CA:0EC8
> 17CA:0EB8 2E F6 06 6E 34 40 75 13 50 E8 6D 27 B0 34 E6 43 
> 17CA:0EC8 EB 00 32 C0 E6 40 EB 00 E6 40 58 CF 50 FB 32 C0 
> 
> SS:SP=17CA:0072
> 17CA:0062 00 00 00 00 40 36 CA 17 46 00 CA 17 10 1F C4 0E 
> 17CA:0072 00 01 7B 03 CA 17 06 02 F6 01 CB 01 00 00 00 00 
> 
> 2022-01-15 16:28:00 AISYO(17BA) 17CA:0EDA 'Out Byte 0043 00'
> 
> AX=0100 BX=0006 CX=0004 DX=1F10 SI=703A DI=7070 BP=17BA DS=17CA ES=0040 FLAGS=0246
> 
> CS:IP=17CA:0EDA
> 17CA:0ECA 32 C0 E6 40 EB 00 E6 40 58 CF 50 FB 32 C0 E6 43 
> 17CA:0EDA FA EB 00 E4 40 8A E0 EB 00 E4 40 86 C4 F7 D8 40 
> 
> SS:SP=17CA:0072
> 17CA:0062 00 00 00 00 40 36 CA 17 46 00 CA 17 CA 17 BA 17 
> 17CA:0072 00 01 7E 03 CA 17 06 02 F6 01 CB 01 00 00 00 00 
> 
> 'Out Byte 0043 34'　と、'Out Byte 0043 00' の２つのエラーがあるみたいです。

このエラーが16ビットメモリ操作の裏技に由来するとしたら？
VZはメモリの裏技をバンバン使っているようですし。
 ia32 のメモリ管理は16ビットアプリの使用には問題があるとか？
メモリの自己書き換えなどを許さない仕様とか？

VTDOS では ia32 は使っていないというのであれば私の思い違いということで。m(__)m

野ざらし言#4654 に書きましたが、ここにも再掲します。

insfile.def を見てみると、ループ中に #B を使っていません。
としきさんが、#B が怪しいとにらんでいるのは正解かもと思い
製品版の [ESC]I マクロを修正してみました。


= esci.def =

製品版の [ESC]I マクロのバグ回避は、#B を使わないこと

*m


8  [ESC]I @I "I カーソル位置へ挿入"
	?. (mr==$80)?{ &m(36) . }
	&m("カーソル位置へファイルを読み込みます")
	n=wn, c=wc,
;	#R
	#R #m					;★ 直接ファイラーへ
:A	(s)?{ &c >A }
	(wc==c)? >Z
	mr=-1,
	&s
	#W &#T(n)
:B	#W &#T(c+1)
	#b #_ (ct)?{ #> #m #x }
;	#b #_ (ct|lh)?{ #> #m }		; #x は不要  T.Tanomura 94/01/05 15:48
:C
;	#y (mb)?{ #W #< #i (ek)?? #B #W >C }
	#y (mb)??>D				;★ ブロックでなければループを抜ける
	#W #< ek[+, #i ek], #W >C		;★ #B を使わない
:D	#C &#T(n)
	#< #i (ek)?? #B
	(wc>c)? >B
 	&d
:Z	&m("")

*


これで、今まで VTDOS153 で異常が出ていたファイルも正常に処理出来ました。
サイレントのままでも、試した全てのVZで問題なく動作しました。

結論として、#B にはバグがあるということですね。
そのバグは、VTDOS や NTVDM で出やすいようだというのが今の状況です。

Chrome の monospace フォントに関するバグを回避する方法を，下記のサイト様で学びまして，
https://silight.hatenablog.jp/entry/2015/07/02/214601
うちの掲示板で試してみていたのですが，ようやく反映を確認できました。

monospaceフォントが使われることの多い要素に以下のような指定をすると，反映されます。

tt, code, kbd, samp, pre, xmp, plaintext, listing {
    font-family: monospace, serif;
}

うちの掲示板では，念のため以下のように明示的なサイズ指定も加えました。
tt, code, kbd, samp, pre, xmp, plaintext, listing {
	font-family: monospace, serif;
	font-size: medium; 
} /* Chromeはmonospaceのみの指定だとサイズが小さくなる */

うちの掲示板では，preを指定したアーティクルの背景色（薄墨）をつけているので，
Chromeで見比べてみてください。

これにより，個々の掲示板のソースでいちいちサイズ指定する必要はなくなります。
としきさんの仰るように，固定サイズ指定をバッサリ削ると自然な表示になると思います。

副作用のない指定方法を公開している，しらいと様に感謝。


なお，過去のブラウザの初期設定では，pre 要素などで小さなフォントが使われるのがふつうで，
これまでは特に疑問を感じていなかったのですが，konno さんのおかげで〈きっかけ〉ができ，
ブラウザ間の違いを改善することができました。

以前から，code や kbd などを指定した要素の表示がよろしくなくて気にはなってましたが，
おいおい解決していきたいと思います。

ありがとうございました。

> Chrome の monospace フォントに関するバグを回避する方法を，下記のサイト様で学びまして，
> https://silight.hatenablog.jp/entry/2015/07/02/214601
> うちの掲示板で試してみていたのですが，ようやく反映を確認できました。

このサイトを覗いてみたら理屈が判りました。

-------------------------------------------------
等幅フォントも可変幅フォントと同じサイズで表示したい時は次のように指定します。

font-family: monospace, serif;
これはmonospaceフォントで表示できない文字はserifフォントで表示するという意味ですが、そうなることは稀です。そして、このように等幅フォントと可変幅フォントを混在させた場合、可変幅フォントのデフォルトサイズが優先されます。（つまり可変幅フォントならserif以外でも良いです。単純に一番短いserifを選んだだけなので。）
-------------------------------------------------

なるほど納得です。

> うちの掲示板では，念のため以下のように明示的なサイズ指定も加えました。
> tt, code, kbd, samp, pre, xmp, plaintext, listing {
> 	font-family: monospace, serif;
> 	font-size: medium; 
> } /* Chromeはmonospaceのみの指定だとサイズが小さくなる */

これを入れてみたら丁度良い見栄えになりました。

> これにより，個々の掲示板のソースでいちいちサイズ指定する必要はなくなります。
> としきさんの仰るように，固定サイズ指定をバッサリ削ると自然な表示になると思います。
> 
> 副作用のない指定方法を公開している，しらいと様に感謝。

掲示板の全面改修は直ぐにはできませんが、本当に感謝ですね。

> なお，過去のブラウザの初期設定では，pre 要素などで小さなフォントが使われるのがふつうで，
> これまでは特に疑問を感じていなかったのですが，konno さんのおかげで〈きっかけ〉ができ，
> ブラウザ間の違いを改善することができました。

ブラウザ間の違いをほぼ無くせるとはまるで魔法のようですね。
私が気になっていたのは、等幅フォントのMSゴシックが線が細くて見えにくい
文字が読みにくいと感じたからです。そうとう目が悪くなったようです。
なので、等幅フォントはメイリオに変えました。

> ざっくり見たところ、

ざっくりしすぎていました。
しっかり見たところ、どうやらそんな簡単な話ではなさそうな感じ。
板塀や野ざらし言でどうなっているかというと

単純な引用部
<q>&gt; ほげほげ </q>

リンクを包含する引用部
<q>&gt; ほげほげ <a href="xxx">#xxx</a>ふがふが</q>

という感じ。
でも、ここの掲示板では

単純な引用部
<font color="#804000">&gt; ほげほげ</font><br>

リンクを包含する引用部
<font color="#804000">&gt; ほげほげ</font><a href='xxx'>#xxx</a>ふがふが<br>

となっている。
これは一体なんだろう。
一瞬、リンクを作るルーチンのほうで余計なfontの閉じタグをつけてしまっている
のかとも思いましたが、もしそうなら<br>直前のfontの閉じタグが消えてしまって
いることの説明がつかない。
あ、わかった。
そしてこのバグ、板塀や野ざらし言にも一部残っている。
何が悪いかというと、引用処理と自動リンク処理の順番。
おそらく、ここの掲示板では以下のような処理が行われているのでしょう。

if ($autolink) { （略） } #自動リンク処理
if ($refcol) { #引用処理
    （略）
}

でも、板塀では、引用処理と自動リンク処理の順番が逆になっています。
つまり、引用処理が先、自動リンク処理があと。
で、まぁ、人のフリ見て、ではありませんが、板塀でそうなっているところは
ないよね、ということで確認したところ、残っているではありませんか、見事に。
どこかというと、検索処理のところと、ログ内全記事表示のところ。
特に検索処理のところは、野ざらしも板塀と同じでしょう。
ここはめざらさんにもチェックしていただいたほうがよろしいかと。

ということで、fontタグを q タグに変える、というのはやっていただいたほうが
ベターではありますが、konnoさん的にはもしかしたらアレかも。
でも、引用処理と自動リンク処理の順番を変えるのは、そんなに手間がかからない
上に絶大な効果をもたらしますから、ぜひともよろしく、ということで。

> いや，blockquote は使ってないですよね。関係はないです。

そうでした、掲示板では「＞」を使う慣習があるせいですかね。
おかげでニフティの会議室的な雰囲気が出せるのですが。

ところで、やっと修正が出来ました。＼(^^)／ ﾔｯﾀ-

q        { font-color:$refcol; } 

うちの環境ではこれだとうまくいかず、色々試行錯誤した結果

q        { color:$refcol; } 
q:before { content: no-open-quote; }
q:after  { content: no-close-quote; }

これでうまくいきました。
下の2行が無いと、「」で囲われてしまいますね。(^^;
ありがとうございました。

MS-DOS Player が更新されていました。8月15日の版です。
http://takeda-toshiya.my.coocan.jp/msdos/index.html

更新内容を張り付けます。
-----------------------------------------

2022/8/15
BEEP音を連続して発声したとき、再生が止まらないように修正しました。
waveOut系APIでダブルバッファで再生するようにしています。
ウインドウプロシージャでなく、関数指定でコールバックを受け取れたんですね（苦笑）

NP21/WのI386コアについて、FPUタイプをSOFTFLOATからDOSBOX2に変更しました。
またDOSBOXのFPU_ST80()について、NaN/INFのケースを考慮して修正しました。

-----------------------------------------

実は以前の版の ia32版では、自作のアプリでエラーが出て使えませんでした。
今回 ia32版を試してみたら、問題なく動作しました

前々回の版(21-12-30)は
ia32_x86	数字4桁の入力で、OE+2?? （??は数字によって変わる）エラーで止まる
ia32_x64	数字4桁の入力で、OE+2?? （??は数字によって変わる）エラーで止まる

今回の版(22-8-15)は
ia32_x86	問題なし
ia32_x64	問題なし

この問題は過去記事のツリー
#10145：MS-DOS Player 12/30版 　投稿者：konno 　 2021/12/31
に書いていますが、作者の武田さんにメールでご報告していました。
直してくださったんですね、ありがとうございます。

DOSBOXは古いPCゲームを動作させるところから始まったように思います。
古いコンパイラの癖のあるコードにも対応していそうですね。

武田様、ありがとうございました。

TRA_TAG.DEF k06 を更新しました。

寅次氏の多機能タグジャンプマクロ Tra_TAG.def v16 をちょっと改造した物です。

改変内容
・2022-08-24  k06 バッファ溢れ対策とタグジャンプ失敗の要因を改善
・2018-12-24  k05  cd を ct に変更、各種改行に対応<br>
・2018-12-04  k04  バッファ溢れ不具合対策 コンソールのみ<br>
・2018-10-04  k03  ディレクトリ＆LFN不具合対応  <br>


今回の改変は、一つはバッファ溢れ対策です。
マクロ冒頭での処理

	(wn==0)??>l			;コンソールの時バッファ溢れ対策
	(wa..19-wa..18 <500)?>l		;行の長さ500以内ならスルー
	&s #< i0,
:x	#x i=i+we,(i < 500)?>x		;カーソルを500超えるまで進める
	#e #d #m #e &d #<		;500以内で改行挿入
:l


注目はここです。

	(wa..19-wa..18 <500)?>l		;行の長さ500以内ならスルー

1行の長さが、wa..19-wa..18　でわかるんですね。
これは色々応用できそうです。
STKHLP で知りました。先人の方々に感謝。m(__)m


もう一つは、タグジャンプ失敗の要因の改善です。
179行目

		(r==2)?{	;open
;			>O		;★★k06 タグジャンプ失敗はここ？
	#O &?("%s ->%s",f,pa+1) #m .	;★★k06 これに差し替えたらOKに


これは私の環境だけかもしれませんが、これに変更したら失敗がほぼ無くなりました。


Ｖｚマクロの部屋にあります。
http://tamaneko.world.coocan.jp/vzmac.htm

konnoさん

　さくっと入れ替えさせていただきました。

=== Tra_TAG.def v16 ===
;			 V16k06	konno改	 2022-08-24

　僕のvzdefディレクトリには、Tra_TAG2.def というのがあって、vz.defには
それが登録されていました。

=== Tra_TAG.def v16 ===
; V16k02		2018-10-04 konno

　miyata.shd ですね！　知らなかった。

　タグジャンプ失敗は、どうだろう？　あったような気もしますが、原因が
他にもあったように思い、とらじマクロが原因だとは思わなかったですね。
　もちろん、真の原因はいまとなっては知りようもありませんが。

　怠惰など色々ありますが、深い意味はありません。が、僕の使っている版は、
1.60t03k k07t01
　です。いろんなマシンで違う版のvz.comを使うのは厄介なので。
　問題の出ていないところは弄らない主義。

　昨晩申し上げましたとおり、DANNY版でなされたように見えるマクロキーの増設
ですが、現在使用中の上の版でも効きました。やりい！

　ただ、[ALT] + @ だけ効かないようです。はっきり分かっていれば（僕はすぐ
忘れるだろうけど）、別にどうしても、というわけではないです。
　万が一、それも効くようにしてやる、ということでしたら、お願いいたします。

　[ALT] + 3/4/5 とか、[ALT] + [/]とかは、ナイスですね。^ _ って、微妙な
キーですね。^^ とか ^K^ とかは、むちゃんこよく使うキーなのに。
　_は、キーボードマクロの書き出しできたっけ？　ほぼ使ってないですね。

　「半／全」を [F00] は、ちょっとやりすぎかなぁ、という感想を持ちました。
　ちょっと、くらっとします。

　＆ｊについては、うーん、良く分からない。調子よくないときはあります。
　それより、ckwv自身ではなかろうか、というＩＭＥの奇妙な振る舞い。しかし、
もう慣れてしまいました。なんかのキーに触れると（おそらく）、ＩＭＥの
モードが変わったり、キャプロックが入ったり……。


=== Macrotmp by B ===; 1.60t03k k07t01 でのテスト
* M
50 ^^ "Macrotmp"

50 [F11] ""		;本来のと被ります。問題ではありません。
	&m("[ALT]+1") .

51 [F12] ""		;本来のと被ります。問題ではありません。
	&m("[ALT]+2") .

52 [F13] ""
	&m("[ALT]+3") .

53 [F14] ""
	&m("[ALT]+4") .

54 [F15] ""
	&m("[ALT]+5") .

; ====================
; Vzk08Q9　07-06-19
; DOS/V版のマクロ起動キーをちょっとだけ拡張

55 @[ ""		;効きます！
	&m("@[") .

56 @@ ""		;【これだけ効きませんが？】
	&m("@@") .

57 @] ""		;効きます！
	&m("@]") .

58 @_ ""		;効きます！
	&m("@_") .

59 @^ ""		;効きます！
	&m("@^") .

*

> 　僕のvzdefディレクトリには、Tra_TAG2.def というのがあって、vz.defには
> それが登録されていました。
> === Tra_TAG.def v16 ===
> ; V16k02		2018-10-04 konno

うげ、履歴を見ると既に載っていませんね。

;2018-12-24  k05  cd を ct に変更、各種改行に対応
;2018-12-04  k04  バッファ溢れ不具合対策 コンソールのみ
;2018-10-04  k03  ディレクトリ＆LFN不具合対応  

同じ日に、k03 を揚げているし。(^^;

#8207：TRA_TAG 改 V02 　投稿者：konno 　 2018/10/05(金) を読むと
> ということで、V02 を、#test66 にUPしました。
> ・ロング行番号対応
> ・ディレクトリ対応
> ・LFN対応
> ・LZH非対応 (^^;

どうやら k03 は v02 としてテスト板#test66 にUPしてあるみたいですね。(^^;
ということで履歴は修正しました。


> 　miyata.shd ですね！　知らなかった。

そうです。これも偶然の産物でした。
実は冒頭のバッファ溢れ不具合対策はその後外していて、そのままUPのはずだったのです。
最近グレップ＆タグジャンプの後に不具合が多発していて
23日にUP準備中に冒頭のコメントを見て、やっぱり入れとくかと思い直したのです。
その時に、その下の行

	#] #? (r)?. wa..19.2-,		;行を lfb に取り込む

これが目に入って、wa..19.2-, ってなんじゃらほい、とSTKHLPを見たら

> 　wa..19,wb..19     ラインバッファ末尾                    
> 　・ラインバッファ終端ポインタ。                          
> 　※wa..19: 行がラインバッファにある時の行末のアドレス。  
> 　          これに改行コードがつく。                      
> 　  wa..19.2-: 行末の改行コード（0D0Ah）の直後をヌルに。  
> 　                    (PK/14/10497 / DC/15/06167/m.gann)  
> 　※wa..19-wa..18 で改行を含まない行の長さを求められる。  
> 　                    (PK/14/10520 / DC/15/03593/wanama)  

wa..19-wa..18 は 和生さんの情報だったんですね、本当に先人の方々に感謝です。
行の長さを求めるのは大変なので、もっと宣伝してほしかったですね。(^^;
最近野ざらし言で、行の長さを求めるsyoさんのマクロが話題になっていましたが
これを知っていればもっと簡単にできたのになぁ、と思いました。

例えば、としきさんのログデータ 0007.cg の1行目で
インスタント窓に wa..19-wa..18 を入れてエンターすると 3970 と出ます。
1行の長さが 3970bytesあるのが簡単にわかります。
カーソルは行内のどこにあってもいいようです。
 
このバッファ溢れ対策を入れたらVZの動作不具合は出なくなったようです。(^^;
根本的にはバッファを取り込む部分を直すべきなんですが。(^^;;
この対策無しでとしきさんのログデータ 0007.cg の1行目後方の文字列を
検索＆タグジャンプすると、私の環境では一発でVTDOSが落ちます。


> 　タグジャンプ失敗は、どうだろう？　あったような気もしますが、原因が
> 他にもあったように思い、とらじマクロが原因だとは思わなかったですね。
> 　もちろん、真の原因はいまとなっては知りようもありませんが。

今問題が無いならいいんですが、私の改造物はバグだらけなので、少しづつ直していきます。
m(__)m

======== vz.def ========

* C コマンドキー

00 ^Q ^K [ESC] ^O ^I ^N	;２ストロークキー（最大６個）
01	^[		;redo cmd
02	^_		;KBM; (^- @dosv)
======== vz.def ========

　いやあ、キーボードマクロ、最近使わないから……。でも「^-」って、
vz.defで見たことあるぞ、とか思いまして。

　そうか、^- でも ^_ でも、効くんですね。＠Ｖｚ 1.60t03k k07t01.
でも、@_ はＯＫで、@- はＮＧ。両方ＯＫなほうが……。同じキーね、という
ことで。ムリならムリで。僕は、そこまで強欲ではありません。


　テスト完全版（半ば再掲）

=== Macrotmp by B ===; 1.60t03k k07t01 でのテスト
* M

30 ^Q_ ""	(ks&1)? { &m("^Q\_").} ? { &m("^Q_"). }		;OK

30 ^K_ ""	(ks&1)? { &m("^K\_").} ? { &m("^K_"). }		;OK

30 [ESC]_ ""	(ks&1)? { &m("[ESC]\_").} ? { &m("[ESC]_"). }	;OK

30 ^O_ ""	(ks&1)? { &m("^O\_").} ? { &m("^O_"). }		;OK

30 ^I_ ""	(ks&1)? { &m("^I\_").} ? { &m("^I_"). }		;OK

30 ^N_ ""	(ks&1)? { &m("^N\_").} ? { &m("^N_"). }		;alt + shift + 5 と同じ？
	;バグっているのか暴走してるのか仕様なのか。同じキーコード？　あるいはマクロバッファに
	;いたから偶然？？？
	;別に大した問題ではありません。めざらさんが詳細に書かれていたとおり、
        ;２ストロークの最後の字はいろいろあるんですよね。
	;ただ、ドックにきっちり書いたほうが良いように思います。昨日の自分は今日の他人なので。

50 [F13] ""			;type in [ALT]+3
	&m("[ALT]+3") .

51 \[F13] ""
	&m("shift+[ALT]+3") .	;OK

52 [F14] ""
	&m("[ALT]+4") .

53 \[F14] ""
	&m("shift+[ALT]+4") .	;OK

54 [F15] ""
	&m("[ALT]+5") .

55 \[F15] ""
	&m("shift+[ALT]+5") .	;OK

; ====================
; Vzk08Q9　07-06-19
; DOS/V版のマクロ起動キーをちょっとだけ拡張

56 @[ ""
	(ks&1)? >> ? { &m("@[") . }	;shift OK!
00:		&m("shift+@[") .

;56 @@ ""		;【これだけ効きません？】
;	&m("@@") .

57 @] ""
	(ks&1)? >> ? { &m("@]") . }	;shift OK!
00:		&m("shift+@]") .

58 @_ ""		;効きます！
	(ks&1)? >> ? { &m("@_") . }	;shift OK!
00:		&m("shift+@_]") .

59 @^ ""
	(ks&1)? >> ? { &m("@^") . }	;shift OK!
00:		&m("shift+@^]") .

*

; 下はカスタマイズエラー。
63 @- ""
	(ks&1)? >> ? { &m("@-") . }	;shift OK?
00:		&m("shift+@-") .

これは両方効くのにね。
02	^_		;KBM; (^- @dosv)

konnoさん

　どうぞごゆっくりでどうぞ。別にまったく何も急いでいるわけではないし、
現状でも、おお、これだけキーが増えた（増えているのを知らなかっただけですが）
と喜んでおりますので。
　ちょっと僕もよく分からなくなった点があるので、簡単にまとめを試みてみますね。


◆【ファンクションキー】--- [F11][F12]を除く
ALT + 3,4,5 で、[F13][F14][F15]が機能する。シフトも効く。
　６個増設


◆【２字目のキー】--- [, ], ^, _, @    with [ALT] & [SHIFT] など

完全：　@[, @], @^			シフトも効く。
　６個増設


◆だいたいＯＫ：　_

　だいたい普通のキーのように振舞う。
　^Q, ^K, [ESC] + other 2 (２ストークキー)のあと、シフトも効く。
　ただし、６つ目の２ストロークキーの後だと不可。
　5x2 = １０個増設

　@_, ^_ も効く。シフトもＯＫ．
　４個増設

　ただし、
KBM 登録 の ^_ (vz.def内表記) は ^-, ^_ の両方のキーインで可。
KBM PRINT の ^K_ (vz.def内表記。操作は^K + SHIFT _) は、 
　^K_ と ^K\_ の両方のキーインで可（＠うちのvz.defで）
　^K- とか ^K\- とか、効かない。

　※たぶん（汗）、 ^- というキーインがそもそも不気味だったのだ、ろ、う。
　　キーボードマクロの使い方を思い出すのに苦労しました。
　　マクロのキーとして（コマンドのキーとして）、「-」っていうのを忘れて
　　しまう、というのが実際的なのかもしれませんね。

　たぶん、２６個ぐらい（？）、キーが増設されたのかな？


--- vz.def ---
01 ^[			;redo cmd
50 ^]	"Pair"		&88
--------------
　そう設定していたのか。忘れていた。redo、しないなぁ。違うマクロが走って
びっくりしました。

--- vz.def ---
50 ^N] "BSYMBO"		&88
50 ^N[ "BSYMBO2"	&88
50 ^N@ "ML_LIST"	&88
--------------
　しょっちゅう使うのも、ぜんぜんそうでないのもありますねぇ。


◆完全にダメ：[ALT] + @
　別にこだわりませんが。


　あまり「まとめ」になってないような……。

=== Macrotmp by B ===; 1.60t03k k07t01 でのテスト

* M

30 ^@ ""	(ks&1)? { &m("^\@").} ? { &m("^@"). }		;OK
30 @@ ""	(ks&1)? { &m("@\@").} ? { &m("@@"). }		; shift のみ効く

30 ^Q@ ""	(ks&1)? { &m("^Q\@").} ? { &m("^Q@"). }		; shift が効かない
30 ^K@ ""	(ks&1)? { &m("^K\@").} ? { &m("^K@"). }		; shift が効かない
30 [ESC]@ ""	(ks&1)? { &m("[ESC]\@").} ? { &m("[ESC]@"). }	; shift が効かない
30 ^I@ ""	(ks&1)? { &m("^I\@").} ? { &m("^I@"). }		; shift が効かない
30 ^O@ ""	(ks&1)? { &m("^O\@").} ? { &m("^O@"). }		; shift が効かない
30 ^N@ ""	(ks&1)? { &m("^N\@").} ? { &m("^N@"). }		; shift が効かない

*

　「@」を自分が自作マクロのキーにアサインしていた（ほとんど使ってない）
というのに驚き、それってマクロキーとして有効なの？　と思って上の実験をしました。
　c.mos オリジナルでも、こうなるんでしたっけ？
　めざらさんのあの力作をもう一度（何回読んだのだろう？　そして何回理解に失敗
したのか？）読んできます。

　（以下、修正しています）

　さくっと調べてきました。めざらさんの美しいまとめと考察を読み、asciiの並び順を
みて、c.mos オリジナル、vz.com + vzibmj.com で実験。

http://mezala.la.coocan.jp/vz/extcmd/cmd00.html
より

上＼下 +0　 +1　 +2　 +3　 +4　 +5　 +6　 +7　 +8　 +9　 +A　 +B　 +C　 +D　 +E　 +F
40h:　　@　　A　　B　　C　　D　　E　　F　　G　　H　　I　　J　　K　　L　　M　　N　　O
50h:　　P　　Q　　R　　S　　T　　U　　V　　W　　X　　Y　　Z　　[　　\　　]　　^　　_

　@ が普通に使えてよさそうに思えますよね、確かに。素人の甘い空想かな？
　ＮＥＣ９８も絡んでいたのかな？　ＩＢＭでは使えますが、ＮＥＣではダメです、みたいなの
がそこらじゅうにあるのは、作者もユーザも大変だし（妄想）。


=== Macrotmp by B ===; c.mos オリジナルでのテスト
* M

30 ^@ ""	(ks&1)? { &m("^\@").} ? { &m("^@"). }		;^2, OK
30 @@ ""	(ks&1)? { &m("@\@").} ? { &m("@@"). }		;NG

30 ^Q@ ""	(ks&1)? { &m("^Q\@").} ? { &m("^Q@"). }		; shift が効かない
30 ^K@ ""	(ks&1)? { &m("^K\@").} ? { &m("^K@"). }		; shift が効かない
30 [ESC]@ ""	(ks&1)? { &m("[ESC]\@").} ? { &m("[ESC]@"). }	; shift が効かない

30 ^I@ ""	(ks&1)? { &m("^I\@").} ? { &m("^I@"). }		;プレフィクスキー
30 ^O@ ""	(ks&1)? { &m("^O\@").} ? { &m("^O@"). }		;を増やしてないので。
30 ^N@ ""	(ks&1)? { &m("^N\@").} ? { &m("^N@"). }		;結果は同じと予想される
								;^N で暴走するのかな？
*

　どうですかねぇ？　今のままでも、僕はいいかなぁ。何か制約があって「@」が
マクロキーになると上のようなことが起こるのでしょう。起こらないなら、c.mosさんが
そのままにしたとは思えないし。
　「@」は、あんまりマクロキーとして使わないほうがいいよ、使うなら上の制約をちゃんと
覚えておくんだよ、とか。

=== Macrotmp by B ===; 1.60t03k k07t01 でのテスト
* M

30 ^\ ""	(ks&1)? { &m("^\\").} ? { &m("^\"). }		;OK
30 @\ ""	(ks&1)? { &m("@\\").} ? { &m("@\"). }		;NG

30 ^Q\ ""	(ks&1)? { &m("^Q\\").} ? { &m("^Q\"). }		; shift 効かない
30 ^K\ ""	(ks&1)? { &m("^K\\").} ? { &m("^K\"). }		; shift 効かない
30 [ESC]\ ""	(ks&1)? { &m("[ESC]\\").} ? { &m("[ESC]\"). }	; shift 効かない
30 ^I\ ""	(ks&1)? { &m("^I\\").} ? { &m("^I\"). }		; shift 効かない
30 ^O\ ""	(ks&1)? { &m("^O\\").} ? { &m("^O\"). }		; shift 効かない
30 ^N\ ""	(ks&1)? { &m("^N\\").} ? { &m("^N\"). }		; shift 効かない
*

　しつこいですが。気になったら……。僕はもっぱら「＾＾」ですが、「＾￥」も
お試しマクロのキーとしてポピュラーですよね。
　＠も￥も同じ、というのは、分かりやすくていいですね。￥はちょっと遠いけど。

　こうなると、＠も￥も、シフトは効かないけど、postfix key として、
使えるキーのような気がしてくる。

追記：これ、ぜったい過去ログにあるネタでしょうね。調べないけど。

　＠　〔　￥　〕　＾　＿

　これらのキーを、２ストロークキーのあと部分の postfix key として使うとき、
シフト分岐はできない。＾Ｑ＠　のような場合。

　２ストロークではない、＾＠　（ = [CTRL]+@ ）のように使うときのみ、シフト分岐
ができる。

　これ、最初っからの仕様ですね。
　使ってるのもあるのにねぇ……。
　昔、自分で調べたことがあるのかもしれない、という気がしてきました。

　＿　については、konnoさんが、ごにょごにょしていますね。

　出発点に戻ります。
　僕は、現状で、まったく困っていませんし、現状のままでまったく構いませんからね。

--- konnoさん wrote: ---
　　 ALT + [
　　 ALT + @
　　 ALT + ]
　　 ALT + _ (入力キーは ALT + - ）<--- ◆ ALT + _  もＯＫ
　　 ALT + ^

=== Macrotmp by B ===; 1.60t03k k07t01 でのテスト

* M

30 @[ ""	(ks&1)? { &m("@\[").} ? { &m("@["). }	; shift, OK, too
30 @@ ""	(ks&1)? { &m("@\@").} ? { &m("@@"). }	; 　IME ON/OFF トグル★
30 @] ""	(ks&1)? { &m("@\]").} ? { &m("@]"). }	; shift, OK, too
30 @_ ""	(ks&1)? { &m("@\_").} ? { &m("@_"). }	; shift, OK, too  ★★
30 @^ ""	(ks&1)? { &m("@\^").} ? { &m("@^"). }	; shift, OK, too

*
　★MS-IMEの設定は、「個人設定」で、だいたいATOK的になってるはずですが、設定欄に
ALT + @ 
　で、IME ON/OFF のような設定はないようです。

　★★ただし、@-, @_ の両方ＯＫ

　以下は、DOS/V版 vz.com の話です。NEC９８は、一部該当しません。

　「_」が普通のマクロキーになったこと。有効です。もともとc.mos オリジナル
vz.comでも有効でしたが、シフトを一緒に押さないといけなかったので、ちょっと
使えないキーでした。konno Vzでは、シフト不要。

　前提：僕はプレフィクスキーを６つ指定しています。最後が＾Ｎ。[NFER]は
使っていません。
　結論をいえば、＾Ｋ以外、最後のプレフィクス以外、つまりこの２つを除く
４つのプレフィクスで、ふつうに使える。シフト併用可です。８つのマクロ
キーの増強と言ってよいか。
　ただ、オリジナルのキーアサイン、^_, ^-, ^K_ （キーボードマクロ関係）に
こだわると少々、話が面倒になります。またしても、結論：キーボードマクロは
ふつうに守れ。よって、上の３つ（^_, ^-, ^K_）はママのこと。

　８つのキー追加です。
　（僕の場合、^Q_, ^I_, ^O_, [ESC]_ の４つｘ２）
　　--- 元々シフト併用（のみ）で使えたのだから、の引き算はなし。そういう
　　　　使い方をしていなかったので。

　なお、＠＠について純ＤＯＳ、konno版で試しました。ＯＫです。ただ、
いろいろごちゃごちゃするので、[ALT]+@ は使わなくてよいよ、という判断でした。

=== Macrotmp by B ===;
* M
; --- @@ on DOS (not Win or VTDOS, perhaps without MS-IME)

50 @@ "" 
	(ks&1) ? { &m("@\@") .} ? { &m("@@") .}	;DOS OK
; 無理して使うことはない


; --- how about '_' ?

50 @_ "" 	(ks&1) ? { &m("") .} ? { &m("") .}	;NG
50 ^_ "" 	(ks&1) ? { &m("") .} ? { &m("") .}	;NG (1) Don't use. ^- (KBM)
; 無理して使うことはない

50 ^Q_ "" 	(ks&1) ? { &m("^Q\_") .} ? { &m("^Q_") .}	;shift OK (2)
50 ^K_ "" 	(ks&1) ? { &m("^K\_") .} ? { &m("^K_") .}	;shift OK (3)
; 無理して使うことはない

50 ^I_ "" 	(ks&1) ? { &m("^I\_") .} ? { &m("^I_") .}	;shift OK
50 ^O_ "" 	(ks&1) ? { &m("^O\_") .} ? { &m("^O_") .}	;shift OK
50 ^N_ "" 	(ks&1) ? { &m("^N\_") .} ? { &m("^N_") .}	;NG (6th prefix)
50 [ESC]_ "" 	(ks&1) ? { &m("[ESC]\_") .} ? { &m("[ESC]_") .}	;shift OK

*
(00) In the original vz.com by c.mos, '_' is usable as a macro key, but keying 
in of shift was necessary.  So the shift branch was impossible.
(0) '_' is not equal to '-' .  '-' is NOT usable as a Vz macro key (in def 
files) as above with an exception, notably for KBM (^- = typing in).
(1) So do NOT use this '^_' in your macro.
(2) shift OK means "non-shift & shift," both OK.
(3) ^K_ is for PRINT KBM. On konno Vz, shift for _ is not necessary.
(4) For registering KBM, '^-' & '^_' are both applicable.

　ったく、まったく。

　^A	これのプレフィクスキーは、＾
　^QA	これのプレフィクスキーは、＾Ｑ

　では、Ａは何と呼ぶ？　ポストフィクスはおかしい。Ａという基本キーの前に（プレ）
置かれる（フィクス）キーが、プレフィクスキーなので。Ａがポストフィクスだと「それ」
の前、「それ」の後の、「それ」自体がなくなってしまう。

　Ａは
　基本キー　　か
　起動キー　　か
　マクロキー　か
　ベースキー　か
　本物キー　　か　

かな。文脈で伝わればいいのだけど、「２字目」と呼んだり「postfix」と呼んだりした
ので、頭の整理をしました。
　このような機会がまたあったならば、「起動キー」「起動本物キー」「基本キー」ぐらいで
（忘れなければ）行きたいと思います。

（^@ = ^2, 修正しました）

　理論的（？）厳密さを求めておらず、僕個人にとっての「まだこれらは使えるぞ」
という覚書なので、参考程度にしておいてください。
　何か間違っていたら、教えてちょ。


--- my vz.def -----------------------------------------
00	^Q ^K [ESC] ^O ^I ^N	;２ストロークキー（最大６個）
-------------------------------------------------------


◆ファンクションキー [ALT] + 3,4,5　（konnoさんによる拡張）

　@[F13], @\[F13], @[F14], @\[F14], @[F15], @\[F15]


◆[ALT]＋記号系拡張、シフト可能　（konnoさんによる拡張）

　@[, @\[, @], @\], @^, @\^, @_, @\_    ;(ks&1)による分岐必要
	;@ means [ALT],   @@ NG on VTDOS(Win7), but on DOS/WinME, OK

◆シフト併用可能の記号キー系（１ストローク）--- 増減なし

^@	;OK, type in '^2'
^[	;#01, redo cmd
^\	;for temp macro
^]	;pair.def
^^	;for temp macro
^_	;= ^-  =regist KBM


◆シフト併用不可の記号キー系（２ストローク）
　（なかなか使えないキーたちではあります）

　^Q@, ^K@, ^I@, ^O@, ^N@, [ESC]@ 	;^N@ used by bunta

　     ^K[, ^I[, ^O[, ^N[		;^Q[ used, [ESC][ = [ESC][ESC]

　^Q\, ^K\, ^I\, ^O\, ^N\, [ESC]\

　     ^K], ^I], ^O], ^N], [ESC]]	;^Q] used

　^Q^,      ^I^, ^O^, ^N^, [ESC]^	;^K^ (#41 recustomize)


◆シフト併用可の記号キー系（２ストローク）（「_」の普通キー可は konnoさん拡張）

　^Q_,      ^I_, ^O_,      [ESC]_<-(*) 	; ^K_ (print KBM), ^N_ (NG, 6th prefix)
					; (*) _ のみ shift 可

　ちらと「めざら資源」
http://mezala.la.coocan.jp/vz/extcmd/cmd00.html
　をまた見てしまいまして。

　^@　は使えます。シフトも可です。（修正しました。マクロが間違ってました）

=== Macrotmp by B ===; 1.60t03k k07t01 でのテスト
* M
							;押すキー
30 ^@  ""  (ks&1)? { &m("^\@").} ? { &m("^@"). }	;^2
30 ^^  ""  (ks&1)? { &m("^\^").} ? { &m("^^"). }	;^6
30 ^_  ""  (ks&1)? { &m("^\_").} ? { &m("^_"). }	;^-

*

　＾２ぐらい覚えなさい。老化予防です。シフトも使えんだよ。
　めざら資源、怖いです。

このマクロ関連か原因は特定できてないんですが、不具合現象がありまして。
[F07] の置き換えの動作がおかしいときがあったのです。
それで

> 	(wn==0)??>l			;コンソールの時バッファ溢れ対策
> 	(wa..19-wa..18 <500)?>l		;行の長さ500以内ならスルー
> 	&s #< i0,
> :x	#x i=i+we,(i < 500)?>x		;カーソルを500超えるまで進める
> 	#e #d #m #e &d #<		;500以内で改行挿入

この 500 を 330 にしてみました。

	(wa..19-wa..18 <330)?>l		;行の長さ330以内ならスルー
	&s #< i0,
:x	#x i=i+we,(i < 330)?>x		;カーソルを330超えるまで進める
	#e #d #m #e &d #<		;330以内で改行挿入

UPマクロは差し替えました。
落とされた方はこれに差し替えてください。m(__)m

夏休み第２弾を満喫しています。
例年だと、８月最初の週末前後と８月最後の週末前後に夏休みをとっているんですが、
今年は諸般の事情で、お盆明け直後が夏休み第１弾。第１弾と第２弾の間が短いので、
つなげてしまえという声もありましたが、そこは無視。
ということで、現在、アルコール汚染真っ只中。

さて。

> 　^A	これのプレフィクスキーは、＾

これにはいささかの違和感あり。
なぜというに、プレフィクスキーを押したのち、キーボードから完全に手を離して
から次のキーを押したときに機能するかという点において

> 　^QA	これのプレフィクスキーは、＾Ｑ

こちらの場合と違いがあるような気がする。
あ、いや、この辺、もしかして環境によって違うのかも。
なんか、OSのユーザー補助だか何だかで違いがあるような気もするし。

>> 　^A	これのプレフィクスキーは、＾
>これにはいささかの違和感あり。

　ま、発想は分かります。整理を試みただけです。公式に決まっているのなら、教えて
くださると嬉しいです。

　＾＠　と　＾Ｑ＠　の　＠に注目するとき、それを何て呼べばいいの？　
という疑問です。

としきさん

　別に誰が何と呼ぼうと、ではあるのですが。

◆シフト併用不可の記号キー系（２ストローク）
　（なかなか使えないキーたちではあります）

　^Q@, ^K@, ^I@, ^O@, ^N@, [ESC]@ 	;^N@ used by bunta

　なんてのを眺めていたら、そうキーアサインを決めるとき、プレフィクスは
システムの制限で、その後の本当の文字、命名法で悩んだりするんだよな、と
思いました。
　上のキーが、たとえば、「なかなか使えないキー」なのは、＠ってのが、
何も連想されない、連想させないからです。記号キー一般がそう。
　シリーズで使うしか、ないのかなぁ？

　そういう意味では、^Q[, ^Q] (c.mos original)って、すげえ、とか
思ってしまいました。ほとんど使わないのだけど。

　で、本物（本体）キー、なんて呼びましょうか。欲しいのは結論、つまり、
名前です。

　独り言です。

　[ESC]@、これを見ていたら、あれ、これ、「エスカルゴ」じゃなかったっけ？
でも、エスカルゴって何？　見た目どおりのネーミングだけど。
　で、僕のvzdefディクレトリを　

>ygrep -r0 -% "[ESC]@" *.def	;再帰なし、正規表現 OFF

　したけどヒットしない。過去ログ経由で、vzmacro.shdへ。^@ = ^2　も
使ってんじゃん。(*)僕は、@P のキーアサ　＝　インスタント。P って、
色々微妙ですよね、詳細は覚えてないのだけど。
　不思議とこれ、忘れないな。
(*)きっと違います。ＮＥＣ９８では、きっとそのまま通ったのです。

　＠　というのもアルファベットの前で（こういうのが当たり前に頭に入っている
人たちなんだよなぁ）、特殊ですね。学びました。

------------------------------------------------------
@&11 @マクロ文の実行" 
標準組込マクロ
　&11 [ESC]@ \[F12]  マクロ文の実行 ◆
（略）
　  FGALPK MES 14 #6103 の m.gann 氏の拡張版
  #11 [ESC]@ ^@ "" ;Instant (237) by m.gann ◆
  #    (s%3)?. r[,
  #    &g("Instant:",20)
  #    (s%3)?#[ (r+1)?{ r][, &e(pw)
  #    p[32+pr, (i[16){ p.i--=49-(r&1<<(15-i))!, }    ;eggchi
  #    &m("%s: %d %u %xh %16s '%c' $"%16s$"",pw,r,r,r,p,r,r[)
  #    (ks&1>s&&mr-$80)?{ &s #< &?("%s",pu+bu) #m } r],i],p],
  #    (ks&17-16)?&d } (pw.0-',')?r], ?sp+=2,   ;(0])
  #    (r)
------------------------------------------------------
　◆c.mosさんのアサインとm.gannさんのアサイン。通じてる。
　　m.gannさんって、（c.mosさんもだけど）、１文字１文字に意味あるんです
よね。

 m.gann さんの Instant.def を改造しました。軟体にあるものです。
前回、#8472　2018/10/31(水) で揚げた改造の第２版です。

きっかけは、kVZの公開版のチェック中にインスタントマクロで
パスのポインタ表示が出ないことがあったからです。げげ！
使用中の私家版やその他のVZではキチンと表示出来たので、バグかと焦りました。
wa+146		フルパスのファイル名
nm		★編集テキストの相対パス名
これらが表示されないので、ポインタズレが起きているのかと焦りました。
よく見ると、ポインタの下位バイトが $0a などの時に表示されないようです。

	&m("%s: %d %u %xh %16s '%c' $"%16s$"",pw,w=r,r,r,p,r,r)	

原因は、'%c' で 下位バイトが $0a だとその後を表示しないためでした。
そこで、今回はこの表示順を入れ替えました。
kVZの公開版は、私の環境ではちょうど $0a になるんですよね。(^^;
ついでに、コメント3か所を取ると、$20以下の時だけ入れ替えます。
そういえばちょうど、#10281 でエスカルゴの話題が出ていますね。(^^;


======= Instant.def ======= by m.gann

・[ESC]@、いわゆるエスカルゴの拡張版です。
・全モード（s=0-3）で実行可能です。（DOS/Vの編集
  モード以外で実行するにはキー ^@ の変更が必要）
・２進数表示も行います。
・[CTRL]+M で入力した場合は &d を実行しません。
・編集モードかつ [CTRL]+[SHIFT]+M で入力した場合は
  結果をテキストへも出力します。
・"文字列" 混じりのマクロ文も実行可能です。
・メッセージを伴う場合は１秒間程度待機します。
・全ての変数は保存されます。
・変数 r の変更はできません。

;  konno改造履歴
;  2022/08/27  k02  パスなどの文字列表示を改善
;  2018/10/31  k01  スタックの数値をメニュータイトルに表示

* Macro

11 [ESC]@ ^[F01] ""	;Instant (326)
	r[, ss-, mx+,
	r=sp-pu,			;★スタックの数値の変化を
	&g("Instant: $r ",32) 		;★メニュータイトルで表示
	mx-, (s&&s<3)?{ #< #x } (r+1)?{
	&v(pn.-15=pa.0-) &Sh(pa,pw) r=pa-1,
:R	(2){ &SF(r+1,'"') (r)?,?{} } ?{ r.0-, >R }
	r][, &e(pa) :p (s>3)?{ &c >p } (pn.-15)?&w(120) ;60)★2秒表示
	p[32+pa, (i[16){ p.i--=49-(r&1<<(15-i))!, }	;eggchi
;	i=r,i=i<<8,i=i>>8,(i<$20)?>b			;rの下位バイトが$20以下？
	&m("%s: %d %u %xh %16s $"%24s$" '%c'",pw,w=r,r,r,p,r,r)
;	>e						;文字列を優先表示
;:b	&m("%s: %d %u %xh %16s '%c' $"%16s$"",pw,w=r,r,r,p,r,r)	;通常表示
:e	(ks&1>s&&mr-$80)?{ &s #< &?("%s",pu+bu) #m } i], p],
#if 98
	(ks&17-16)?&d
#else
;	(ks&5-4)?&d
#endif
	} (r])

*
======= end of instant.def =========

> 　[ALT]@
> 　これは、少なくとも、k07t01 においては有効です。ただし、網羅的な
> 試験はしていませんが、僕の vtdos@win7 ではダメでした。
> 　純ＤＯＳ　および　WinME　では通ります。

なんと！　使えていたんですか(@.@)
結局私は拡張キーを止めてなかったんですね。
ソースを確認していませんでした。(^^;;

VTDOS では、[ALT]@ が使えないのか、試験してみました。
#10275 のマクロ
30 ^@  ""  (ks&1)? { &m("^\@").} ? { &m("^@"). }	;^2
これをちょっと変えて
	↓
30 @@  ""  f=ks&15, (f)?{ &m("@\@  %d",f).} ? { &m("@@  %d",f). }

これを実行すると、確かに [ALT]@ は、IMEのON/OFF になりますね。
CMD窓で、[ALT]@ を押しても IMEのON/OFF になりました。
[ALT]@ は、システムで IME の起動キーとして取られているようです。

ところが、[Shift]+[ALT]@ だと、マクロが起動して
 @\@  11
と表示されました。

Ks の数値は、IBM版 は       
  +1 :R[Shift]
  +3 :L[Shift]
  +4 : [Ctrl] 
  +8 : [Alt]  
こうなっているので、[Shift]+[ALT] が押されていると認識しているようです。
 11 という数値は、右[Shift]でも左[Shift]でも同じでした。

また、[Ctrl]+[ALT]@ でも、マクロが起動して
 @@  12
と表示されました。
これは、[Ctrl]+[ALT] が押されていると認識していると思われます。

いずれにしても、[ALT]@ の起動キーがWin7 以降は使えないようなので
実用としては使えないですね。

konnoさん

　たしかに、下をうちでも確認しました。

[ALT]@			;NG on VTDOS (Win7)
[Shift]+[ALT]@		;OK
[Ctrl]+[ALT]@		;OK

　とはいえ、仰るとおり、[ALT]@が駄目なとき、下の２つを使えと言われても
かなり大変そうですね。純ＤＯＳ、WinMEでも、うーん、だけど。
　いちおうメモって、空きキーリストに入れておきます。

野ざらし言#5053 に書いた記事ですが転載します。


[ESC]I のバグがVZ1.57a で出ないので、ソースを見比べていました。
そうしたら、気になる箇所があったので、Vn のマーカーを入れてみました。

 text.asm 1.57a 1484行目

seekb_x:
	pushf
	add	ax,[bp].ttop		; ##1.5
	popf
	call	qclose


text.asm 1.6k07t01 1884行目

seekb_x:
	pushf
	add	ax,[bp].ttop		; ##1.5
	cmp	ax,[bp].tend
_if ae
	mov	ax,[bp].tend
	dec	ax
	mov	byte ptr [bp].atrtxt1,1 ;★; Vnマーカー追加
_endif
	popf
	call	qclose


VTDOSの結果は、Bl2048 では NG で、Vn0 反応なし
念のため、Bl8192 を試したら NG で、Vn1 反応あり

おお、と思ってここのルーチンを 1.5 と同じにしてみたら
なんと、VZ1.6では Bl8192 は全て NG だったのが OK になりました！！
MS-DOS Player や DOSVAXJ3 では、Bl1024〜Bl8192 OK
VTDOS では、Bl4096〜Bl8192 OK

ただし、Bl1024*3 だけは、1.57a を含む全てのVZ、環境で誤動作します。
正常時に比べてファイルサイズが大きくなるし、VZが壊れる可能性も。
VTDOS では 'REP MOVSW 命令ラップアラウンド' エラーでVZが落ちます。
これは別のバグ発見か？

現在色々検証中です。

＃　シン・ゴジラのエネルギー源を突き止めたくらいに興奮しました！！

検証用にWinMEノートが使えないか、腐海をあさって見ました。
ほとんどのノートPCは液晶が駄目になっていましたが Libretto が起動できました。
仕様は下記のサイトから
https://dynabook.com/pc/catalog/libretto/010507l1/spec.htm

> Libretto L1/060TNCMモデル
> Transmeta Crusoe プロセッサ　TM5600 600MHz
> メモリ 	標準/最大 	128MB／256MB（PC100対応、SDRAMうち16MBはシステムで使用）
> 内部ディスプレイ 	10型FLサイドライト付き低温ポリシリコンワイドTFT液晶（※1）1,280×600ドット：1,677万色
> ハードディスク	 	10GB（Ultra ATA対応　全領域がFAT32で設定（Cドライブ1パーティションで設定）。
> 外形寸法(突起部含まず) 	268mm(幅)×167.2mm(奥行)×20.5(最薄部)/29.3mm(高さ)
> 質量 	約1.1Kg（バッテリパック装着時）

さらに、Wikipediaから
> Libretto L1
>     2001年5月18日発売。技術の粋を集めた旧シリーズとは異なり「実用的で低価格なモバイルノート」を標榜。
>     当時としては珍しい「ワイドSXGA」横1280ドット×縦600ドットの10インチ低温ポリシリコンTFT液晶を採用。
>     Windows XPの発売を控えていた事もありWindows Meをプリインストールした。

IBMのWin2000ノートが液晶の四隅が滲んでいるのに、Libretto は綺麗なままです。
最初はハードディスクが回らなかったので、叩いたら回るようになりました。
ファンの音が煩くて使わなくなっていたんですが、まだまだ使えそうです。


さて、本題ですが、検証の結果は、MS-DOS PlayerやDOSVAXJ3 と同じでした。
以上。(^^;

最近 CODEX.DEF を使おうと起動したら、メインメニューは出るが
検索抽出のメニューで終了してしまいます。
え、なんで〜　(;_;)

最近の改造VZが原因かと、VZT でやっても駄目でした。
CODEX のマニュアルが見当たらなくてめざら資源の軟体のお世話に。(^^;
 CODEX.DEF v3.0 ユーザーズ・マニュアル によると

>    (B) Bu の値は 256

そういえば最近 VZ.DEF のオプションを変えて、Bu64 にしていました。
忘れないようにオプションの所にコメント入れて、これで安心と思ったら
変わりません。(;_;)

変更前の VZ.DEF と比較したら、Bm も 13000 から 12000 にしていて
これが怪しいと思って戻したら、動くようになりました。
最近は vrensave.def でまめにバックアップしていたので助かった〜
子メニューでコケるのは、マクロバッファが足りないからなんですね。
結構ギリギリでやってたんだなぁ。

私にとって必須のマクロは沢山あって、日々お世話になっています。
これらのマクロが動かなくなったら途方に暮れるしかないのです。
マクロ作者の皆様には、日々感謝です。m(__)m

そういえば、非常駐VZ のコマンドラインで [Enter] で COMMAND.COM を呼び出せたよなぁ
と思ってやってみたら
 
Microsoft(R) MS-DOS(R) Version 6.20
            (C)Copyright Microsoft Corp 1981-1993.

こういう表示が出ます。VZは正常に動いているようです。
ここで、さらに command.com を呼び出してみようとしました。

VTDOS|C:\VZ>command vmap
COMMAND.COMのパスは絶対パスで与えられなければなりません.
つまり, ドライブ文字とそれに続く \ から始める必要があります.
例： C:\FDOS

COMMAND.COMは現在以下のパスを想定しています.
C:\VZ\VMAP
ファイル 'C:\VZ\VMAP' を開くことができません.

FreeCom version 0.82 pl 3 [Mar 13 2013 16:40:42]


こうなりました。あれれれ？
このメッセージは、FreeCom の command.com が出しているんですよね？
そういえば MS-DOS Player の更新時に、実行ファイルのPATHに変更していました。
#10300 で書きましたが

> MSDOS.EXE と同じところに置いて指定して見ましたが VZ常駐起動はしないようです。

よく考えたら、command.com も実行ファイルの一つでしたね。
私は command.com を色々切り替えてテストすることが多いので、実行ファイルのPATHに置いたら駄目ですね。
今回の現象は、私のポカミスが原因だったようです。

お騒がせして申し訳ありませんでした。m(__)m

c.mosさんが1.6でルーチンを追加したからには何か意味があるはずです。
結果的にバグが出たのはルーチンが不完全だったのかも。
私にはまったくわからないですが、ADD 命令でオーバーフローの可能性は考えられます。
その対策の追加ルーチンだとしたら、違和感を感じますね。

普通は ADC とか、JC で分岐させるのにそれをしない理由はわかりませんが
とりあえず JNC 追加で1.6のルーチンを復活させてみました。

Vn のマーカーも入れましたが、NGファイルのテストでも Vn に引っ掛かりません。
なので、オーバーフローしたらマクロトレース状態で止まるルーチンも追加しました。

seekb_x:
	pushf
	add	ax,[bp].ttop		; ##1.57
	jnc	seekb_9			;##k 220923 Bl8192対策？
	add	byte ptr [bp].atrtxt1,1 ;★;; オーバーフローなら Vn1+
	cmp	ax,[bp].tend		;##1.6 ttopとtendアドレスを比較
_if ae					;　ttopが上だったら
	mov	ax,[bp].tend		;　ax(ttop)にtendを代入
	dec	ax			;　アドレスを一つずらす
	add	byte ptr [bp].atrtxt1,10 ;★;; 1.6の修正ルーチン実行で Vn10+
_endif					;
	push	ax				;★トレースONルーチン
	mov	al,1				;
	xchg	cs:stopf,al			;トレースモードに
	pop	ax				;
seekb_9:				;
	popf
	call	qclose
	popm	<di,si,cx,bx>
	ret
seektext endp


この状態でVZを普通に使ってみて様子をみています。
今のところ引っ掛かりませんがね。

ちなみに、このルーチンを公開版 VZk07t01 に追加すると常駐で動かないの。(;_;)
私の私家版常用環境では動くのに。(^^;
やれやれ、どうしたものか。

konnoさん

>えーと、タイトルの意味がよくわからないですが、一万件突破記念ということで
>いいですか。(^^;

　はい、それでいいです。わりと何となくそういう方向に話がいっただけでなんです、
ごめんなさい。

　かいつまんで経緯を。
　何かの偶然で、ローカルにあったSiさん掲示板のログをみたのです。うーん、
テキスト処理系で、その場で気になったことを自分で調べて結果を報告するという
スタイルなので、Siさんのところにあれを書いたかなぁ、みたく。

　そうしたら、konnoさんが、あのようなことを書かれていて。

　でも（大昔のkonnoさんに向かって、ほぼタイムマシン）、将来の我々、ちゃんと
Ｖｚしてるみたいですよ、とか伝えたくなった、というわけです。

　で、ふと調べたら、偶然、おお、１万件突破してるじゃないですか！　となっていた。

　いつもいつもお世話になっています。そして、konnoさんのちゃらんぽらんとも言える
姿勢が、僕にゆとりと余裕を、いつも感じさせてくれています。
　ほんと、いいですよ、これ、konnoさん。失礼、ごめんなさい。

　あと（最低）５年は、がんばりましょう！

私の VZ1.5 は、1.57a だと思っていたら、1.57 でした。なんてこったい。(;_;)
それで、野ざらし言#5071 で VZ1.57 → VZ1.57a の差分が欲しいと言ってみたら
shadowさんから VZ1.57 → VZ1.57a の差分を頂いたので実行してみました。

結果的には 1.57a に出来たのですが、色々紆余曲折がありました。
VTDOS や MSDOS player や DOSVAXJ3 で実行すると 日付が今の時間になってしまいます。
これらのエミュレータではシステムの制限なのか、DOSの日付操作が効かないようです。

そこで、WinMEのDOS窓でやり直したら、キチンと日付が設定されました。
差分実行手順も複雑なので、Win10(32ビット版)のDOS窓でもう一度やり直してみました。
どうやら DOS窓では日付設定は効いているようです。
それでは手順を追ってみます。


頂いた VZ157A.LZH の中身は

VZ157A   DOC      3007 02-20-92   1:57a
VZAX     BDF      6641 02-20-92   1:57a
VZDOSV   BDF     13824 02-20-92   1:57a
VZJ31    BDF     13233 02-20-92   1:57a
VZSRC    BDF     13578 02-20-92   1:57a
VZUS     BDF      6478 02-20-92   1:57a
　　　　　　　　　　　　　　　　　　　↑
（Win10 のDos窓非常駐VZ で DIR すると上の所が a/p になります。am/pm か）


まず AX という新規フォルダを作って VZIBM のフォルダの内容をコピーします。
上の 差分ファイルもコピーします。VZ実行ファイルは
VZIBM    COM     46226 01-08-92   1:57a
この日付とサイズであることを確認しておきます。
同様に DOSV フォルダを作って AX フォルダと同じようにコピーします。

ファイラーで AX フォルダをカレントにして VZAX.BDF を Enter すると、
設定されていれば bupdate -v VZAX.BDF を実行します。-v は 展開予定の表示です。

bupdate -v VZAX.BDF
BUPDATE 1.28 Copyright (c) 1992 Vector Design, TNT Technology Corp.
  File Name      Date     Time    Source Size   Revision Size of BDF
-------------- -------- -------- -------------- -------- -----------
vzibm.com      92/01/08 01:57:04    46226bytes  -------- 
            -> 92/02/20 01:57:06    46262bytes  --------   6641bytes  

実行前の日付とサイズが合っていることを確認したら -o オプションにして実行します。

bupdate -o VZAX.BDF
BUPDATE 1.28 Copyright (c) 1992 Vector Design, TNT Technology Corp.
vzibm.com -> new vzibm.com
100% done
new vzibm.com created

これで、VZAX.COMが出来ました。

VZIBM    COM     46226 01-08-92   1:57a
　　　　　　　↓
VZIBM    COM     46262 02-20-92   1:57a


次に DOSV フォルダをカレントにして AX フォルダと同じように VZDOSV.BDF を Enter します。

bupdate -v VZDOSV.BDF
BUPDATE 1.28 Copyright (c) 1992 Vector Design, TNT Technology Corp.
  File Name      Date     Time    Source Size   Revision Size of BDF
-------------- -------- -------- -------------- -------- -----------
vzibm.com      92/01/08 01:57:04    47012bytes  -------- 
            -> 92/02/20 01:57:06    47062bytes  --------   6900bytes  
vzibmj.com     92/01/08 01:57:04    47276bytes  -------- 
            -> 92/02/20 01:57:06    47326bytes  --------   6924bytes  

あれえ？　実行前のファイルの日付とサイズが合っていない！
ソースの更新は、VZSRC.BDF で出来たので、アセンブルして同じサイズの実行ファイルは出来ました。
だけど、製品版と全く同じではないので、何とかならないかと思ったら
VZ1.57 のフォルダの中に、こんなものがありました。

UPDATEV  BAT       472 07-09-08  11:12a
UPDATEV  DOC      1807 05-07-92   1:57a
VZIBM    BDF     10950 05-07-92   1:57a
VZIBMDEF BDF      4082 05-07-92   1:57a
VZIBMJ   BDF      7385 05-07-92   1:57a

これは一度試してうまくいかないと思って放置していたものです。
UPDATEV.DOC を見てみると

-----------------------------------------------
　この圧縮ファイルには、ＶZエディタ Ver1.57a（92-2-20:ＡＸ版）からＤＯＳ／Ｖ版
を作成するための差分ファイルが含まれています。

※　ＤＯＳ／Ｖ版のみお持ちの方は、アップデートできません。
※　ＤＯＳ／Ｖ製品版に含まれるＰＳ／５５版、ＵＳ版は、アップデートできません。


■ アップデートの方法

　圧縮ファイルを解凍したカレントディレクトリへ、Ver1.57aの「IBM」ディレクトリ
の全ファイルをコピーしてください。
　「updatev<ﾘﾀｰﾝ>」で、カレントディレクトリに以下のＤＯＳ／Ｖ版を作成します。

	VZ       BAT      691  91-12-16    1:57
	DOSV     DOC    24809  92-02-20    1:57
	VZIBM    COM    47062  92-02-20    1:57
	VZIBM    DEF    11950  92-01-08    1:57
	VZIBMJ   COM    47326  92-02-20    1:57
	VZIBMJ   DEF    13663  92-01-08    1:57
	VZSEL    COM      210  92-01-08    1:57
	PALET    DEF      621  91-06-01    1:56

※ DOSV.DOCは、ＤＯＳ／Ｖ製品版に含まれるREADE.DOCファイルです。
-----------------------------------------------

こ、これは・・・
もしかして、差分を当てた VZAX版 を対象にした差分なのか？

bupdate -v VZIBM.BDF
BUPDATE 1.28 Copyright (c) 1992 Vector Design, TNT Technology Corp.
  File Name      Date     Time    Source Size   Revision Size of BDF
-------------- -------- -------- -------------- -------- -----------
vzibm.com      92/02/20 01:57:06    46262bytes  -------- 
            -> 92/02/20 01:57:06    47062bytes  --------  10950bytes  

おお、さっき作った VZAX版で合っていそう。
VZIBM    COM     46262 02-20-92   1:57a

さらに
bupdate -v VZIBMJ.BDF
BUPDATE 1.28 Copyright (c) 1992 Vector Design, TNT Technology Corp.
  File Name      Date     Time    Source Size   Revision Size of BDF
-------------- -------- -------- -------------- -------- -----------
vzibmj.com     92/02/20 01:57:06    47062bytes  -------- 
            -> 92/02/20 01:57:06    47326bytes  --------   7385bytes  

おお、これは BAT で一連の実行ファイルを作成できそうです。
ついでに
bupdate -v VZIBMDEF.BDF
BUPDATE 1.28 Copyright (c) 1992 Vector Design, TNT Technology Corp.
  File Name      Date     Time    Source Size   Revision Size of BDF
-------------- -------- -------- -------------- -------- -----------
vzibm.def      92/01/08 01:57:04    11764bytes  -------- 
            -> 92/01/08 01:57:04    11950bytes  --------   2248bytes  
vzibmj.def     92/02/20 01:57:06    13675bytes  -------- 
            -> 92/01/08 01:57:04    13663bytes  --------   1834bytes  


これで作れると確信して、UPDATEV.BAT を実行

VZAX     DEF     13675 01-08-92   1:57a
VZIBM    COM     46262 02-20-92   1:57a
VZIBM    DEF     11764 01-08-92   1:57a
VZIBM    COM     47062 02-20-92   1:57a
VZIBM    DEF     11950 01-08-92   1:57a
VZIBMJ   COM     47326 02-20-92   1:57a
VZIBMJ   DEF     13675 01-08-92   1:57a

これらのファイルが無事出来ました。
やれやれ。

野ざらし言#5085 での発言ですが

> MIXかNIFの過去ログを検索したら「VZ天国」に差分が付いていたそうです。
> 腐海の入り口近くに「VZ天国」を見つけました。
> 5インチフロッピーは当時使えていたのでそこから差分を当てたと思います。
> でもその当時のものは引っ越しなどで大半失われているんですよね。
> コピーした3.5FDがもしあったとしても読めなくなっているだろうなぁ。

VZ天国の巻末を読むと、3.5FD が2枚付いていると書かれていました。
もしかしたらその時のFDが残っているかも！　と思い急遽第参事難局探検隊結成！
腐海にダイブして探すこと数分、VZ天国の FD2 を発見しました！！

この日のために USBFDD を３台(計648\)買ってあるもんね。(^^;
もう30年経つのに、ちゃんと読めました。

さて、VZ というフォルダにVZ1.57aの差分ファイルがありました。
中身は以下の通り


 PRINTF  .ASM     706  91-12-16  1:57 
 VMAP    .ASM   21552  91-12-16  2:01 
 VZSEL   .ASM    1697  92-01-08  1:57 
 UPDATE  .BAT    1479  92-05-07  1:57 
 UPDATEA .BAT     801  92-05-07  1:57 
 VZ      .BDF   23862  92-05-07  1:57 
 VZAX    .BDF    9751  92-05-07  1:57 
 VZAXA   .BDF    8412  92-05-07  1:57 
 VZAXDEF .BDF   10884  92-05-07  1:57 
 VZDEF   .BDF   18660  92-05-07  1:57 
 VZJ31   .BDF   10613  92-05-07  1:57 
 VZJ31A  .BDF   13233  92-05-07  1:57 
 VZJ31DEF.BDF    5276  92-05-07  1:57 
 VZJ31L  .BDF   10193  92-05-07  1:57 
 VZL     .BDF   10323  92-05-07  1:57 
 VZSRC   .BDF  110520  92-05-07  1:57 
 VZSRCA  .BDF   13578  92-05-07  1:57 
 FROLL   .COM    1429  92-01-08  1:01 
 VZSEL   .COM     210  92-01-08  1:57 
 MOREMAC .DEF     842  92-01-08  1:57 
 MOREMAC .DOC    3393  92-01-08  1:57 
 UPDATE  .DOC    7087  92-05-07  1:57 
 VZ157   .DOC   15588  92-05-07  1:57 
 BLOCK   .INC    1460  91-12-16  1:57 
 SPRINTF .INC    4127  91-12-16  1:57 

手持ちの BDF ファイルはここから持ってきていたようです。
update.doc を見ると

> 　この圧縮ファイルには、ＶZエディタ Ver1.56 または Ver1.57 のマスターディスク
> を、Ver1.57a にアップデートするためのファイルが含まれています。

こう書かれています。
つまり、これらの BDF があれば、1.56以上から 1.57a にＶｅｒＵＰ出来るということです。
ＶＺのパワーユーザならVZ天国を持っているでしょうが、希望があればメールで送りますよ。

最初 VZの部屋にUPしようかと思いましたが、さすがに公開は不味いかと思い直しました。
FD2 は見つけたけど FD1 は見つからない。(;_;)

Bl3072 では 3700bytes を超えるところで改行が入っていました。
ソースに改行を挿入するところがあるはずだと当たりをつけて
「,LF」で検索すると、それらしいところが TEXT.ASM にありました。

fread	proc
中略 410行目
	cmp	si,di
	jne	read3
	mov	byte ptr [si-1],LF
  _break
read3:	cmp	byte ptr [si-1],LF
_until e
	clz
	ret
read9:	stz
read_x:	ret


ここの
	mov	byte ptr [si-1],LF
があやしいと思い、色々試したところ 

	cmp	si,di
	jne	read3
	stc					;★##k 221011 キャリーをセット
	jmps	read9x				;★ ゼロフラグをクリアしてリターン
;	mov	byte ptr [si-1],LF		;★ Bl3072 の時 3700bytesで強制改行（実行しない）
  _break
read3:	cmp	byte ptr [si-1],LF
_until e
read9x:	clz					;★ ゼロフラグをクリアしてリターン
	ret
read9:	stz
read_x:	ret


このように変更したら、Bl3072 で改行文字化けが無くなりました。
大穴と思っていたところが塞がったのです。
もちろんこの変更で他の所に穴が開いた可能性もあります。
しばらく Bl3072 で運用してみようと思います。


あと、CORE.ASM の 276行目

endlin	proc
	pushm	<cx,di,es>
	movseg	es,ds
	mov	di,si
;	mov	cx,-1			;★ VTDOS でラップアラウンドエラーの原因？
	mov	cx,3000h		;★##k 221009 ラインバッファ＋アルファ
	mov	al,LF
  repne	scasb

このようにしたら、Bl3072 で起きていた VTDOS でのラップアラウンドエラーが無くなりました。
ここが原因だったのでしょうか？


これで Bl8192 と Bl3072 の蟲の居所がわかりましたが
まだ他にもポインタズレという蟲が残っているようです。

 0007.CGI (170335bytes) を後ろから削っていって
 66882bytes にしたテストファイル
 66882.CGI (66882bytes) に
 0007.CG (132553bytes) を挿入するテストでは
ポインタズレによる行の入れ替えが起こっています。
今回の修正で、他のVZよりは改善したようですが。


＃　深淵の大穴は無限に続くのか？

間違った情報を揚げてしまいました。m(__)m


> これで Bl8192 と Bl3072 の蟲の居所がわかりましたが
> まだ他にもポインタズレという蟲が残っているようです。
> 
>  0007.CGI (170335bytes) を後ろから削っていって
>  66882bytes にしたテストファイル
>  66882.CGI (66882bytes) に
>  0007.CG (132553bytes) を挿入するテストでは
> ポインタズレによる行の入れ替えが起こっています。

このテストファイル、作成時点で間違えて行が入れ替わっていました。(>_<)
ズレて蟲が湧いていたのは私の頭でした。(;_;)
このテストファイルのことは忘れてください。m(__)m

結論を言うと、ポインタズレも無くなっていました。
[ESC]i 関連のバグは全て無くなったように見えます。

> あと、CORE.ASM の 276行目
> 
> endlin	proc
> 	pushm	<cx,di,es>
> 	movseg	es,ds
> 	mov	di,si
> ;	mov	cx,-1			;★ VTDOS でラップアラウンドエラーの原因？
> 	mov	cx,3000h		;★##k 221009 ラインバッファ＋アルファ
> 	mov	al,LF
>   repne	scasb
> 
> このようにしたら、Bl3072 で起きていた VTDOS でのラップアラウンドエラーが無くなりました。

このルーチンも元に戻しても問題無くなりました。
バグのせいでエラーになっていたようです。（VTDOSのチェック凄い！）
他の環境ではたまたま問題が顕在化しなかったのかもしれませんね。
このルーチンは他からも呼ばれているので、3000h とかは危ないかもしれません。

ということで、あとは運用試験で問題が出ないか様子を見るだけとなりました。


＃ このまま問題が出ませんように（祈）

----- wiki からの引用です -----
『機動戦士ガンダム』（宇宙世紀）シリーズ
宇宙世紀（Universal Century, 略はU.C.）を舞台にした作品。
1970年代
    機動戦士ガンダム
        テレビシリーズ 富野喜幸 【全43話】 1979年?1980年
        映画　「機動戦士ガンダム」 富野喜幸 1981年

（以下、永遠に続く。スクロールが終わらない……）
-------------------------------

　まいりました。『ガンダム』って、日本のアニメ（？）史に残る超有名、
超長大作品だったんですね。
　バンダイは（角川も？）、これで食ってきたのか。『地球少女　アルジュナ』
ってのを「環境」の時間に見せました。「いやぁ、バンダイの番組で、これ、
ほんとにＴＶ放送されたんだよ。こんな内容、小学生、中学生に分かるわけないよねぇ。
『マクロス』とかゆうのが売れて、河森さんは好き勝手をやらせてもらえたらしいよ、
ぜんぜん知らないんだけどさ」云々。

　たいへん遅くなりました。上は５日前ぐらいに書いたと思う……。
　差分あて、まだ、やってません！
　疲労の絶頂は昨日ぐらいだったもようです。１０時間寝た！
　でも、まだだるい……。

#10303 で

> ちなみに、このルーチンを公開版 VZk07t01 に追加すると常駐で動かないの。(;_;)
> 私の私家版常用環境では動くのに。(^^;

と書いていましたが、弄りすぎて原型がわからなくなっていたので
元に戻そうとしましたが戻せない。(>_<)
バイナリの比較で一致するまで散々苦労しました。
やっぱり公開版のフォルダは保存しておかないとなぁ、と。（何回目だ）

やっと元に戻ったので、Bl3072対応の修正だけしてみましたが効果なし。
Bl8192対応の修正もして、こちらは直ったのですが、Bl3072 は駄目です。

ラップアラウンドエラーが、MEMO.asm の memmove のルーチンの934行目
	rep	movsw				;VTDOS ERR
で出ているので、そこを読んでいる所を片っ端から調べました。
そうしたら、やっとわかりました。

OPEN.ASM 2139行目の
add_logtbl	proc
　　　　中略　2177行目
		sub	cx,si
		jc	addlog9			;★ ##k 221014 Bl3072 対策2
		call	memmove			;※ ここの rep movsw でエラーになる
		add	di,cx
		lea	si,[bp].path
	_endif
		call	strcpy
		inc	di
		mov	si,di
		mov	ax,[bp].lnumb
		call	set_logtbl
		clr	al
		stosb
addlog9:	popm	<es,ds>
		ret
add_logtbl	endp

このように、memmove の直前に キャリー分岐を入れたら直りました。＼(^^)／ ﾔｯﾀ-
常用している私家版では先の2か所の修正だけで直ったので、謎が残りますが。

色々試してみて問題ないようならテスト版としてアップしようと思います。

　すいません、超簡単に。

vz.inc  12,992  1992-02-20  01:57	;Dos6
vz.inc  12,991  2022-10-17  21:24	;win7

　なぜ１バイト違うのかは謎ですが、たしかにvtdos @ win7では、
タイムスタンプがver up時刻になりますね。
　なお解凍時、ＤＯＳでもフォルダは解凍日・時間にタイムスタンプ
は変更されてしまうようでした。個々のファイルのタイムスタンプは
もちろん保持される。Winでもフォルダ日時時刻は更新。

> vz.inc  12,992  1992-02-20  01:57	;Dos6
> vz.inc  12,991  2022-10-17  21:24	;win7
> 
> 　なぜ１バイト違うのかは謎ですが、たしかにvtdos @ win7では、
> タイムスタンプがver up時刻になりますね。

もしかして、EOFコードを削除しているとか、それならファイルが現在時刻となりますね。
でも、touch が使えなくなったのは別の理由でしょう。
わざと使えないようにしてしまったとか、まさかね。


＃ MSの中にバイトテロがいたりして、1バイトの攻防とか

　めざらさんの掲示板に嫌われているようなので、あれに繋がる経験談を
こちらで。
　単発発言です。まだまだ、疲れがぬけません。歳だぁ。嫌だぁ。
　とにかく。

　ラインバッファが壊れるとファイルが壊れます。僕も経験しました。
ＥＭＳとかテンポラリーファイルとかも絡んでいるだろうファイルの壊れ方でした。
詳細は意味がないので省略しますが、行の連結をして１行を長くしていたのですね。
filter.def + xtr.exeで。そうしたら、、、

>cgrep "End of"

---------------------[End of Page 64]--------------------

save
---------------------[End of Page 77]--------------------
---------------------[End of Page 78]--------------------
---------------------[End of Page 79]--------------------
---------------------[End of Page 80]--------------------
---------------------[End of Page 81]--------------------
---------------------[End of Page 82]--------------------

cut
---------------------[End of Page 126]--------------------
---------------------[End of Page 127]--------------------
---------------------[End of Page 128]--------------------

cut
---------------------[End of Page 62]--------------------
---------------------[End of Page 63]--------------------

　こんな具合。
　作業前に、この作業はすんだと確認してから作業を再スタート。
で、あれ、何かいま？！　そういえばさっき？！　と思って調べて
みると、上の状態。

　上は兆候。そんなに都合よくページ単位で壊れたのでは、もちろん
ないです。

　うん、etextをジャスティフィケーションが嫌だから、画面がもったい
ないからと、パラグラフ単位で行連結するのは止めることにしました。
　前回、こんなこと起こらなかったもの。

　なお、etextを作った、作ろうとしているのは、以下。
　いい本ですよ。

jeff.txt      808,019  2022-09-30  22:09
 Jeff Duntemann, _Assembly Language: Step-by-Step_. 1992.

insidepc.txt  617,730  2022-11-02  10:36
 Peter Norton, _Inside the IBM PC_. 1983.

　もういちいち謝りませんが、すいません、英語の本です。
etext作りが楽です。
　壊れたの、どうしよう？

　としきさんに刺激を受けたので（大昔）、あっちのほうがいいのかもしれませんが、
ちょっとメモ的に。

　パスカルの本を眺めています。古い人たちは、Ｃでなくパスカルをやるものだ
ったみたいだからです。ジェフさんもそう、ノートンさんもそう。お二方の本、
両方、サンプルにアセンブラだけでなく、Basic と Pascal のコードが載っている。
　（Undocumented DOS -- Ｃも入る --, MS-DOS Encyclopedia -- Ｃ多数になる --。）

　で、ノートンさんが、もうちょっとアセンブラをきちんとやりたいなら
（つまりＣＰＵを知りたければ）、この本だよ、と薦めていた本があり、それを開いて
みました。

　Stephen P. Morse, _The 8086/8088 Primer_, 2nd ed., 1982.

　これ、 初版は 1980 で、初代ＩＢＭマシンが 1981 のはずですから（つまり
MS-DOS 以前）、8086 っぽいのが登場してすぐ書かれた名著（とされている）。
古典。

　で、その２版では、パスカルを扱う章が追加されている。
　パスカルのソースが出てきて、ほとんど英語だよね、眺めれば何をどうやって
るのか分かるよね、で、マシン語はどう？　読めないよね、とか書いてあります。

　そこで、お題。
　問題が解決されるべきレベルで書かれる「高級言語」＝パスカル
　（真の意味で）問題が解決される、ＣＰＵのレベルで書かれる「低級言語」＝アセンブラ

　「ＣＰＵの動きに集中するより（アセンブラ）、問題解決の方法に（パスカル）
注意を払ったほうが有利な場合も多い」などなど。

　パスカルの教科書の多くに、「問題解決」という表現がいっぱい出てきます。
　へぇ、そういう分類があるんだ、と。

　今でもそうなんでしょうか？　Windows プログラミングには、とうぶん関心を
向けないと思うけど。Delphi 7.0 for Win98 or laterは手に入れましたよ　＞としきさん

　テキスト処理なんて、問題解決そのもじゃないか、とか思いました。

c:\c>dir | sort

2022/10/19  01:26               363 delspc.def
2022/10/20  11:49               333 keyw_cpy.def
2022/10/21  21:37               743 addzspc.def
2022/10/22  13:18               379 vwx_strl.def
2022/10/22  20:24               683 2strsrch.def
2022/10/22  20:26               142 999.def
2022/10/22  20:28               142 ln_fin.def
2022/10/22  20:28             1,980 catg_fix.def
2022/10/22  20:29             3,413 altkey_t.def
2022/10/22  20:35             1,208 repl.def
2022/10/22  20:39               955 ren_repl.def
2022/10/22  22:27             1,138 keyp.def
2022/10/28  15:00               105 delallcr.def
2022/10/28  17:20               153 tabs.def
2022/10/28  18:23               370 tabs2.def
2022/10/28  23:24               342 etxtrf.def
2022/10/29  01:43               764 alpha.def
2022/10/29  01:57               739 ren_srch.org
2022/10/29  10:46               200 srch_do.def
2022/10/29  10:59               266 2repl.def
2022/10/29  11:23               220 srch_do2.def
2022/10/29  11:48               193 cnd_sch1.def
2022/10/29  13:40               704 ren_srch.def
2022/10/29  13:42               785 rn_schid.def
2022/10/31  01:04               159 delln_d.def
2022/10/31  21:43               283 2repl2.def
2022/10/31  22:44               199 srch_do3.def
2022/10/31  23:05               811 array2.def
2022/10/31  23:06               209 srch_do4.def
2022/10/31  23:33             2,860 g_story.txt
2022/10/31  23:36               636 array3.def
2022/10/31  23:40               665 arr_srch.def
2022/11/01  01:59               199 srch_do5.def
2022/11/01  02:13               131 srch_do6.def
2022/11/01  12:52               232 hyphn1.def
2022/11/01  14:16               147 hyphn0.def

　問題解決用Ｖｚマクロ一覧（すべて使い捨て）。
　同じ日に何本もマクロを書いている。ストレスの絶頂で現実逃避をしています。

#test.awk
{ if (maxlen < length) 
	maxlen=length 
	}
END { print maxlen }

C:\>jgawk -f test.awk c:\0etxt\insidepc.txt
1572

　ラインバッファ絡みではなかったのかなぁ？
　でも、無理に行を長くはいたしません。

　ふつうに当たり前のことです。

　etext処理のおいて。

INSIDE THE IBM PC
　というページごとにつく「ページヘッダ」が邪魔なので一括削除しました。
　160個ぐらいかな。
　が、いつものことなのですが、こんな異型もありました。etextの宿命。

INSIDE THE
IBM PC

　いくつもあるのか？　も、もしかして、Ｖｚで「INSIDE THE\nIBM PC」で
ヒットする？
　ヒットしました！

　ほぼやったことなかったと思う。２０年くらい前、正規表現にまだまだ不慣れ
だったころ、やったかもしれなかったけど。


　sedならこうなる。

/^INSIDE/{
	N	# sedするなら使えなくちゃ損なＮコマンド（input Next line）
	d
#	s/INSIDE THE\nIBM PC/INSIDE THE IBM PC/		#１行にして残す場合
	}
# 実は甘々

cgrep, ygrep, wgrepで、改行ばさみパターンの検索はあるのですが、それぞれに
クセがあります。sedが逆に楽

　もっと初歩として、
>cgrep -A1 "^INSIDE"	;A = after
　で調べられます。

＃ここまでＶｚやＤＯＳツールにはまった人は、一生そこから出られません。
＃でも、今でも、シアワセです。


　あ、関係ないことも書いてしまいますが、＃Ｇでページングモードが変わるって
知ってました？　先日、発見して、驚きました。当たり前すぎるのでしょうけど、
miyata.shdにもありませんでした。

#G #F #e #m #c
　とかしてました。
#G #c
　で十分だったのです。

　さあ、中間テストだ！

>私もこの辺は、わりと基本に忠実なプログラミングをしていましたね。
>昔、大学生のころ、８ビットアセンブラをハンドアセンブルしていた時代。BASIC
>でロジックを組んで、それをアセンブラに落とす、ということをしていました。

　ここ、構造化ってことを言ってますよね。たぶん、おそらく。
　パスカルが偉かったのは、「構造化」を可能にしたってことですよね。

　僕にとって、現在、「基本に忠実なプログラミング」って、ラインエディタです。
edlinとか、使ったことないのだけど。

……
(ln==655)?.
　これも割と最近の発見でした。

……
655q	# sed version

　プログラミングっぽくないでしょうか？　
　結果がでれば問題は解決されるのです。


----- たとえばこんなの -----
目次のページ情報の桁をそろえる。
;Introduction  				viii 
;   A Maze to Think About		x 

:a
	(ln==158)? .
	#> #a
	&#V(65)			;エライ！
	#> #d
>a
----------------------------

かなりどうでもいいことです。

> 産報という会社のだしていた「ソフトウェア科学」という雑誌の別冊、という体裁な

この会社と雑誌が気になったので、調べて見ました。
きちんと調べるのなら国会図書館ですが、ネットでざっくり、で十分。
結果。
産報出版という、後継の会社が存在していました。
現在は、溶接関係の本や雑誌を出しているようです。
会社概要のページ（ttps://www.sanpo-pub.co.jp/about/）によると

1948年11月　「溶接ニュース」（週刊）を創刊。これをもって創業とする。
　　　　　　なお、発行は社団法人溶接学会から行われた。
1962年04月　株式会社産報と改称。
1985年05月　旧産報の事業整備のため溶接出版部門が分離独立し産報出版株式会社を
　　　　　　設立、現在に至る。

だそうで。
なるほど、祖業回帰に当たって、現在はコンピュータ関係は扱っていない、と。
ん〜、そちらのほうは一体どうなったんだろう。ちょっと気になる。
さらに検索を重ねると、引っかかってきたのがツイッター。
ttps://twitter.com/akakit/status/1111251040370716673
おや、こちらだと雑誌名は「ソフトウェア」となっている。でも

> 後ろのほうのページの広告によると、別冊ではなく本体のほうの「ソフトウェア科学」
> のキャッチフレーズは「ユーザーのためのコンピュータ専門誌」だそうな。

キャッチフレーズは同じ。
どうやら、雑誌名が「ソフトウェア」から「ソフトウェア科学」に変わったらしい。
さらに追いかけてみたら　ttps://acaddb.com/books/articles/5651069　より

> 巻次・年月次
> 　　2巻5号 (1970.5)-6巻8号 (1974.8) = 通巻9号 (1970.5)-通巻68号 (1974.8)
> 雑誌変遷 ID 00151400
>   ソフトウェア = Software ID AN00285688
>     産報 [編] 産報
>    通号表示併記: <1巻2号 (1969.11)>-2巻4号 (1970.4) = <通巻2号 (1969.11)>-通巻8号 (1970.4)
>     産報 1969-1970

なるほど、最初の８冊だけ「科学」がなかったのね。
ところで、上記「別冊」の後ろページに掲載されている本体の広告は1970年6月号。
ほほう、改題されて２号目、なのか。
また、廃刊はオイルショックのころ。あまり売れなかったということなんでしょう。
大型コンピュータのユーザ向けの雑誌のようですし。
ついでなので、1980年前後、いわゆるマイコンブームを牽引した大手誌の創刊を調べて
みたところ

工学社　　　Ｉ／Ｏ　　　　1976年10月創刊
アスキー　　月刊アスキー　1977年6月創刊
電波新聞社　月刊マイコン　1977年8月創刊
廣済堂　　　ＲＡＭ　　　　1978年2月創刊

ということでした。「ソフトウェア科学」も、あと数年がんばって、さらに路線変更
していたら、という気もしなくもない。


さて、産報。
こちらのほうも、もうちょっと検索をしていたら見つけたのが以下。

ttps://daihanrei.com/l/%E6%9D%B1%E4%BA%AC%E5%9C%B0%E6%96%B9%E8%A3%81%E5%88%A4%E6%89%80%20%E6%98%AD%E5%92%8C%EF%BC%95%EF%BC%94%E5%B9%B4%EF%BC%88%E3%83%AF%EF%BC%89%EF%BC%96%EF%BC%96%EF%BC%96%EF%BC%92%E5%8F%B7%20%E5%88%A4%E6%B1%BA

なんか、有名漫画家の本名が原告の中にある。
原告筆頭の方の名前は知らなかったけど、別の有名漫画家のお兄さんということで、
Wikipediaにも名前が載るくらいの大物。
これが確定判決かどうかはわからないけど、この判決が昭和54年、つまり1979年。
ということは、裁判の期間を考えると、1975年前後から、この産報という会社、いろいろと
手を出していた模様。多角化経営というヤツでしょう。でも、それがうまく行かなくて
1985年に事業整備ということになったのではないか、と推測できてしまいます。
大ハズレかもしれませんけどね。



あぁ、一体私は何を調べているのやら。
時間のムダとはいわないけど、ちょっと好奇心の方向がアレすぎるような気がする。

英語のまんまで、ごめんなさい、読んでくだされ。がんばれ！

   Personal Computer Computer Language Series
   Pascal Compiler
   Copyright International Business Machines Corporation 1981
   First Edition (August 1981)

from the above, below

Pascal, a relatively modern language, has benefited 
from many earlier languages (such as ALGOL) 
and is forming the basis of several new ones.

IBM has added several goals to this list:

IBM Personal Computer Pascal is designed to be 
a systems implementation language, especially 
suitable for writing compilers, interpreters, 
operating systems, and so on.

　２点ほど、接点があったので。
　IBM 初号機（1981）には、Pascalが付いてきたみたいで、ALGOLが先祖、
そしてコンパイラが作れるようにと IBMは、オリジナル・パスカルからいくらか
拡張をした、とありますね。
　この拡張というのが何なのか分からなかったのですが。

　ただ、僕が何となく思っているのは、basicコンパイラ（BCってたしか
ＭＳの製品でなかったかなぁ？）と、Basic -> Asmに翻訳して、アセンブル
するのとは、ちょっと違うのじゃないかな、ということ。

　何となくアセンブルすると、すごく速くなりそう。ここが、ぼくが
BASMを面白いかな、と思った点。

>BASM!  The BASIC to 286 Assembly Language Translator (c) 1998

　というように、Basicが流行っていたときのものではないですね。
　Power Basicって何なのか（商品っぽい）調べておきます。
　Basicが方言まみれで収拾つかなくなってしまった、という話は聞いて
います。方言だらけなんでしょうね。

　でも僕が面白がる部分は……。所詮、テキスト処理ツール部分と
あとメモリとちょっとシステム寄りな部分だけでしょうから。

　親父さんは、COBOLも勉強したんだぁ。昔の人は偉いですよねぇ。
　Miyataさんが、「仕事はCOBOL、つまんない」とか言ってませんでしたっけ？
　ここから僕が思うのは、やっぱエディタはエディタで、「言語」で
プログラムする前に、いろんな工夫があるんだろうな、ということ。

　僕は、残りの人生をかけて、基本的に、これをやりたい。
　１　Ｖｚを極める。
　２　Ｖｚの存在意義を実証する＝プログラミングする。道具は使って
　　　なんぼよ。

　まだまだ疲れてるけど、イエイ！

　ふとこんなののことを思い出しました。
　コメントもオリジナルです。「$」の使い方が教育的ですね。
　FGALAPだと思います。

======== cplate.def (v1.00) ========
;127/376   NBH01153  BANT-iT           c.mos氏のＣ言語テンプレート・マクロ
;(12)   91/04/18 01:23
  
* M マクロ
  
50 [CR] "{..}"
        ?.
;       (fe<4||fe>5)?.                  ; 拡張子の判定
        #s (cd!='{') #d ?{ #m . }
        #m '}' #n #21
  
51 \[TAB] "Ｃテンプレート"
        ?.
;       (fe<4||fe>5)?.
        #s c=cd, #d
        &f(c,"iewfscrd") (r<0)? .
        p=$, p.8=c, >i                  ; こういう手もあるわけやね
:i      "f ()" #s .
:e      "lse" .
:w      "hile ()" #s .
:f      "or ()" #s .
:s      "witch ()" #s .
:c      "ase:" .
:r      "eturn" .
:d      "o {" #m "} while();" #n #21 .
  
*
======== End of cplate.def ========

>機械翻訳を使わず、辞書だけでがんばった。
　がんばりました〜！！！　(^^)/~~~~

>Wikipediaにもありますが、もともとPascalでPascalコンパイラというのは書ける
>わけで、これはほかの言語のコンパイラを書くことができるようにしたい、という
>意味なのかなぁ。
　そういう意味なのではないですかねぇ。

> 　この拡張というのが何なのか分からなかったのですが。

APPENDIX E. PASCAL STANDARD AND IBM FEATURES

Summary of IBM Pascal Features
This list summarizes the extensions added to Standard Pascal.

Syntactic and Pragmatic
Metalanguage 
Metacommands:	;これらはコンパイラへの擬似命令。
$BRAVE
$DEBUG
$ENTRY

　どどどどど。５ページくらい。読む気にならない。
　読んでも大半わからないだろう。


>言葉のニュアンスが違う、というのはわかります。
>でも、コンパイラというのは多くの場合、マシン語を直接出力します。
>一方、アセンブラというのは、原義としては、マシン語と１対１の変換機。
>なので、「Basic -> Asmに翻訳」というのがマクロ構文をビシバシ使っている
>ものに対する翻訳であれば高級なプリプロセッサだと思いますが、単にマシン語
>に翻訳するだけであれば、それはコンパイラに他ならない。

　ふーん。コンパイラよりアセンブラのほうがもっとマシンよりなのかと思って
ましたけど、そうとも限らない、と。ふーん、です。

>あとは、BASMという言語そのものがどういったものか、という点も知りたい。

　どうしても本気で知りたいなら、basm最終版を落としてもらって、basm.txtを
読んでもらうしかないですが、僕がなんとなく理解できたのは、
　・配列に制限がある
　・複文（？）＝関数の返り値が関数の入力になるようなのはダメ＝単文２つに分けよ。
　・.comモデル用ソース生成で、relocatableなのは作れない。コンパイル時にメモリ
　　配置が固まるものに限る。
ぐらいでしょうか。

　いっぱい足りないものがあるのかもしれませんが、概略としてはこんな感じ
みたいです。↓


"BASM supports the following statements and functions:"
Say 07,07,"DIR$        HEX$         OPEN           CLS            REPLACE"
Say 07,08,"SHELL       ASC          CLOSE          PRINT          SWAP"
Say 07,09,"TIME$       ABS          KILL           INPUT          DELAY"
Say 07,10,"DATE$       BIN2DEC      CHDIR          POS            ASM"
Say 07,11,"COMMAND$    GETKEY       MKDIR          CSRLIN         BEEP"
Say 07,12,"CURDIR$     INSTR        RMDIR          LOCATE         DIM"
Say 07,13,"UCASE$      VAL          NAME           COLOR          ARRAY SORT"
Say 07,14,"LCASE$      LEN          PRINT#         FRAME          ARRAY INSERT"
Say 07,15,"MID$        SGN          INPUT#         GETSCREEN      ARRAY DELETE"
Say 07,16,"TRIM$       EOF          LINE INPUT#    PUTSCREEN      SCAN"
Say 07,17,"LTRIM$      ERR          EOF            CHANGEATTR     MOD"
Say 07,18,"RTRIM$      AND          DIR$           VIDEOCARD      INCR"
Say 07,19,"EXTRACT$    OR           CURDIR$        DEF SEG        DECR"
Say 07,20,"REMOVE$     XOR          GET$           PEEK           SHL"
Say 07,21,"REPEAT$     NOT          PUT$           POKE           SHR"
Say 07,22,"SPACE$      TICKS        LEFT$          RIGHT$"
END SUB


SUB Display3
ReFrame
Say 13,05,"BASM supports a rich set of control and loop constructs
Say 07,07,"DO  - EXIT LOOP  -  LOOP
Say 07,08,"FOR - NEXT - STEP - EXIT FOR
Say 07,09,"IF  - THEN - ELSE - END IF
Say 07,10,"SUB - EXIT SUB - END SUB
Say 07,11,"GOTO  labelname
Say 07,12,"GOSUB labelname
Say 07,13,"RETURN
Say 07,14,"FUNCTION - EXIT FUNCTION - END FUNCTION
Say 07,15,"CALL  subname [parameters]       { CALL is optional }
Say 07,16,"SELECT - CASE - END SELECT
Say 07,17,"WHILE -EXIT WHILE- WEND
Say 07,18,"END  [optional DOS Errorlevel value]
END SUB

　じゅうぶん立派な気がする。GOTO、悪くないと思うけどなぁ。


>極端なことを言うと、アセンブラのレジスタの数しか変数が使えない、なんて仕様
>のBASICなら機械語に変換するのもたやすいかもしれない、みたいな感じで。

　なかなか受けましたが、そのようなことは書いてなかったと思う。

keep instructions short, 
use the registers, 
use string instructions,

　というのが、速いコードを書く鉄則だそうです。気にしないけど。変数、大好き。
　当たり前のことがさらりと書いてあっただけなのですが、引用元は、Zen of Asm Lang
です。知ってる？　怖いよ、タイトルからして。同じ著者の別の本のタイトルは、
Black Bookです。こ、怖いです。５年先にすら読もうとする可能性はかなり低い。
　もちろん、アサム本です。

VTDOS のエラーは #i のルーチンで起こっているように見えます。
今回はその中からエラー回避でき、テストデータで問題が出ない箇所を見つけました。

MEMO.ASM 855行目あたり

txtmov1	proc
	push	es
	movseg	es,ds
	mov	cx,[bp].tend
	sub	cx,si
	jc	txtm19			;★##k 221108 VTDOSエラー回避
	call	memmove			;VTDOS err?
	add	cx,di
	mov	[bp].tend,cx		; update tend
txtm19:	pop	es			;
	ret
txtmov1	endp

この★印を追加することで Bl1024*3 でもエラーで落ちなくなりました。
Bl1024*3 の時は内容が壊れますが、この追加があれば他の修正がいらないようです。
非常駐だと Bl1024*3 でも正常処理されます。謎です。違いは何なのだろう。

完全ではありませんがこれと Bl8192 の修正をしたテスト版VZを揚げてみようと思います。

konnoさま（さま付けかよ）

　お疲れ様です。

>完全ではありませんがこれと Bl8192 の修正をしたテスト版VZを揚げてみようと思います。

　テスト版を是非。ただ、ベースになった版も明記ください。じゃないと長期にわたって
使用し、バグ、出る？　出ない？　とはできないからです。
　もっとも安定したヴァージョンをベースにしてくれると嬉しいです。それは、どの版？

--- my vz.def ---
Bl8192			;line buf (256..(Bt*1024/8))
-----------------

　これは、日本語を使う身としては、さすがに譲れませんから。日常業務において。

　テストだけしてみて欲しいというのであれば、曖昧でもいいですから、こういう場合はどう？
と指示してくださると嬉しいです。しばらくテスターになる気持ち（ほい？）はありますよ。

> 　テスト版を是非。ただ、ベースになった版も明記ください。じゃないと長期にわたって
> 使用し、バグ、出る？　出ない？　とはできないからです。
> 　もっとも安定したヴァージョンをベースにしてくれると嬉しいです。それは、どの版？

ベースは VZK07T01 です。過去記事で
#10257：Re^2: すれ違いと待ち伏せ 　投稿者：文太 　 2022/08/24(水) 

> 　僕は、Vzk k07t01 という版を使っているようです。うーん、このキー増強とか
> だけ、k07t01 に入れたいな、とか思っています。

こう書かれていたので、VZK07T01 が良いのかなと思いました。
それで確認のためにVZの部屋を見てみたら、げげ、VZK07T01.LZH が公開停止になっている！！
検索してみると
#8590： VZk07t01 公開停止 ＆ VZk07t 公開版の差し替え 投稿者： konno 　 2018/11/16(金)

> #8369 で公開したVZk07T1 (2018/10/17) は、バグが有ったので、公開停止しました。
> 使用されている人はすぐに使用中止願います。
> 代わりに、VZk07t 公開版の pc ズレ修正・差し替え版をアップしました。
> こちらは問題ないと思います。

こう書いていました。その理由は #8591 で

> DOSモバでSORT.DEF（高橋版）を試してみました。
> VZO、VZT、は問題なく動作しました。が
> VZK07t1 は、起動BATで常駐した時は、異常になります。
> 
> 調べてみたら、アセンブルでポカミスしていました。
> この版はすぐに公開停止しましたが、使用している人はすぐ使用中止願います。
> ご迷惑おかけして申し訳ありません。

ということなんですが、どうも文太さんとshadowさんは、K07T01 をお使いのようで。
#08611 の文太さんの書き込みでは

> 2018/10/17  19:11            62,184 vz.com	(k07t01)	;最新−１（前の版）

この日付とサイズの版が良いということですよね。
私はこのころ話がすれ違っているのに気が付いていなかったようです。
こちらの方が問題ないということであれば、再公開しようと思います。
ソースも公開すれば違いとか確認できますね。

> 　テストだけしてみて欲しいというのであれば、曖昧でもいいですから、こういう場合はどう？
> と指示してくださると嬉しいです。しばらくテスターになる気持ち（ほい？）はありますよ。

ファイルが壊れる可能性はありますが、テストしていただいて問題点がわかればうれしいです。
よろしくお願いいたします。

> > 　この拡張というのが何なのか分からなかったのですが。

> APPENDIX E. PASCAL STANDARD AND IBM FEATURES
> Metalanguage 
> Metacommands:	;これらはコンパイラへの擬似命令。

なるほど、これは私の感覚では、確かに正統な拡張と言う感じです。

> 　どうしても本気で知りたいなら、basm最終版を落としてもらって、basm.txtを
> 読んでもらうしかないですが、僕がなんとなく理解できたのは、

そこそこ興味はそそられるので、落としてしまうかも。
とりあえず、ネットをさまよって、英語で書かれたいくつかのサイトをざっくり
読んでみたのですがね。関係者が書いたのか善意の第三者が書いたのかわからない
ページで、compilingという単語を見かけました。なので、これって実は、ただの
BASICコンパイラなのではないか、と思いました。
とはいえ、今の所はまだ、表面をなぞっただけ、という自覚はある。
私の知りたいところとしては、ごく簡単なもの、例えば hello world を表示する
だけとかでいいので、完璧に動作するソースリストと、それの変換結果がどうなる
か、というのを見たい。なぜかいまだにBASM用のソースリストにお目にかかれて
いない。

> 　いっぱい足りないものがあるのかもしれませんが、概略としてはこんな感じ
> みたいです。↓

これをみるに、なかなかできの良いBASICコンパイラではないか、という思いが
ますます強くなります。


> 　ふーん。コンパイラよりアセンブラのほうがもっとマシンよりなのかと思って
> ましたけど、そうとも限らない、と。ふーん、です。

ここだけ、ちょっと長くなるけど、解説。
私の感覚が古い、とか、かつてはそうだったけど今は違う、という部分は多々ある
かと思います。でも、もしBASMが２０世紀末にリリースされたのであれば、私の
感覚も大ハズレではないと思う。

まず機械語というのはビットの羅列。そして人間には、どのコードが何をするか
なんてことを覚えるのはなかなか難しい。そこで記憶用の、いわゆるニーモニック
というのが開発された。最初はまさに、それぞれのコードの挙動の記憶用。のはず。
なお、ニーモニックという言葉の由来とか原義とかは、たぶん英語の専門家にお尋ね
いただいたほうがいいでしょう。
そして、ニーモニックを使ってコンピュータの挙動全体を書き下ろすようになった。
すると次に、それをそのまま機械語に変換できるとうれしい。
ということで、ニーモニックを機械語に変換するのがアセンブラ。
その後、アセンブラには擬似命令だのマクロ機能だのが追加されて、構造化構文
までサポートされるようになりました。
とはいえ、基本的にニーモニックと機械語は１対１。
そうではなく、変数に定数を代入する、というようなロジックでプログラムを書く
のが高級言語。最初のころのFORTRANとかCOBOLとか。そして、そのプログラムを
複数の機械語に変換する、というのがコンパイラ。
また、コンパイラも、ターゲットのマシンの機械語にコンパイルする、いわゆる
普通のコンパイラのほかにも、仮想的なマシンの機械語にコンパイルするという
種類のものが昔からありました。有名なところでは、JavaはJVMという仮想マシン
をターゲットにコンパイルされることが多く、WindowsやLinuxではそれぞれ自分
の環境で動くJVMを用意しています。古くは、PASCALでp-codeコンパイラという
ものがありました。これは pseudo code というものを出力するコンパイラで、
別途 p-codeを解釈するインタプリタを実際の各マシンで用意するという形に
なっていました。
これら伝統的なアセンブラやコンパイラのほかに、トランスレータというのかな、
別の言語処理系があります。つまり、ある言語を別の言語に変換する、というもの。
最初にBASMの話を聞いたとき、私はこれだと思ったんですよ。つまり、BASICの
ソースをバリバリの機械語にいきなり変換するのならコンパイラだけど、例えば
マクロを使いまくったアセンブラのソースに変換するのであれば、それはコンパイラ
でもアセンブラでもないよね、ということ。
これの有名なものにratforという言語があります。rational FORTRANということで、
構造化されたPascalっぽい構文のratforで書かれたプログラムをトラディショナルな
FORTRANに変換してくれるのです。ratforが最初に紹介されたときは、これはFORTRAN
の前処理、すなわちプリプロセッサであるという言い方をしていましたが、今では
プリプロセッサというのは単なる置き換え程度のみ行うものをさすようになっていて、
ratforのように構文解析して全く異なったものを出力するものに対しては使わない
用語となっているようです。

ということで、BASMの入力と出力がどうなっているか、ということに興味津々。
とはいえ、今日はもう寝る。

https://www.bcxbasiccoders.com/

　このページの一番下に
Download BASM286 Here!
　というのがあります。僕はさっき落として、

------- demo01.bas -------  
cls
input "What is your name? ",a$
cls
do
  print "Hello there ";a$
  incr a
  if a=23 then
    exit loop
  end if
loop
-------------------------
 
　というのをdemo01.asmに変換したつもりなのだけど、
としきさんの質問にさらさら答えられるほど、basmにもbasicにも
asmにも通じていないことが（予想どおり）判明したので、リンク
だけ貼っておきます。

　そんなに長く話が続くような気はしていませんが、壮大な
スレッド（ツリー）が得意でないので、いちおう新規ツリーを
立てておきます。

　"Hello, world"より少し複雑だけど、"Hello there Bunta"と
23回 print してくれるプログラムですよね。
　（ここにはアセンブラもqbasicもない。そうだ、vtdosでusモード
ってどうやるのかも知らないんだ。コードページをいじるの？）

basm.$$$    6,868  2022-11-11  10:05
demo01.asm  4,235  2022-11-11  10:05

　これらの関係は何？
　あの見栄えでは、そのままアセンブルできないような……。
　簡略化なんとか、なのかな？

　すいません、とりあえずの最初の一歩の問題への解答は以下のとおり。

BASM converts a BASIC-like language to 80286 Assembly Language Source Code   
which easily compiles using such widely available public domain tools as the 
Arrowsoft Assembler and the Freelink linker. 

Basic-like language（BASM言語＝一般に出回ったBasicの弱力化版だろう）を
Asm Source Codeにコンバート。

BASM is a powerful 80286 assembly code generator.  Use it to create stand
alone programs using your assembler and linker. Or use the code to help
optimize routines in your favorite high level programming language.

"80286 assembly code generator"

　なぜ、アセンブルしてしまわないのか？　そこまで持っていかないのか？
　optimizeできるから、なのでしょうかね？　あるいは、高級言語のインライン・アセンブラ
の部分をBasicで書けるよ、なのかな。

　コンパイルとアセンブルの違い（と僕が思っていたこと）。
　.asmにしてアセンブルすると、.basをコンパイルするより、〈一般に〉速いものが
できあがる。
　しかし、これは「最適化」できるかによりけりで、〈一般に〉にそうとは限らない。
たぶん、大して変わらない。
　こんな風に理解しています。

　僕にとっては、どんなアセンブラ・ソースになるのか見えて楽しい、ぐらいですかね。

　ＴＳＲの骨組みは、全部アサム・コードです。あれに必要部分（？）をBasic言語で
つけ加えれば、常駐ソフトができてしまう！　のかな？　といったところです。
　どんなＴＳＲが欲しいのか、あったら嬉しいのか、分かってませんが。
　ただ僕には、（ぜんぜん原理が違うのは分かってますが）stkhelpがほとんどそんな風に
見えています。原理的に常駐ソフトに似てるものがあるとすれば、それはＶｚモード型マクロ
なのでしょうが、たぶん。

　あと１点。としきさん、割とマクロ、マクロ（アセンブラの）と書かれていて、そう翻訳
されると想像するのが「順当」なのかな、と思っていましたが、プロシージャです。もっと単位が
上というか大きい？　たぶん、そのほうが、BASM作者にとって楽なのかな？
　はい、関数は、ルーチンは、当然、多くの、複数のマシン語命令群に翻訳されているようでした。

CLS
　だって、マシン語で書けばvideo関係のbiosコールかな、などなど、大変です。

　エスペラントなどなど（仮想化）は、うーん、深いですねぇ。
　ただこのラインは本筋から大きくずれたかな、という気はしています。


　じつを言うと、僕が最初にみたBASMと、最終版は違うので、もうちょい地道に自分の辿ってきた道
と道具を再検証したいと思っています。あのbasm.exe + α（シェア1ウェア時代）が、見つからない
のです。

　あった！

c:\>tosfind /nbasm*.*		; 時間かかった！　５分
				; でも使い方や環境によりけりですが、僕は、tosfindの
				; バグに一度も出会ってないです。多謝。

from basm.doc

------------------------------------------------------------------------------------
BASM!  The BASIC to 80286 Assembly Language Compiler ShareWare
BASM translates a BASIC-like language to 80286 assembly language source.    
  The assembly language that BASM produces was designed and tested to compile 
  without modification using Borland's Turbo Assembler versions 1.01 & 3.2    
  and Microsoft's Macro Assembler version 4.00.                               
                        Try BASM free for 30 days...                          
      If you like it, please send $25.00 cash, check or money order to:       
------------------------------------------------------------------------------------

　そうなの？　あれで、tasmで通るんだ。
　作者作成の .bas と .asm が直接比較できるファイル群が、ここにはありました。

としきさん、無理してお付き合いする必要なんて、まったくありませんからね。


　ほぼ意味がないし、これ、ish部屋に貼るのか？　と思ったのは以下。
　断片です。
　意味なく長いのを貼って、ごめんなさい　＞konnoさん

---------------------------------------------
     Call Cls
;
;input "What is your name? " a$ 
;
     Mov  SI,Offset $tring_01
     Call PrintStr

<cut>
---------------------------------------------


---------------------------------------------
     PrintStr Proc Near
     Call Len
     Push AX
     Mov  CX,AX
     Cmp  CX,0
     Jle  PS_3
     Mov  BX,$Attr
     Mov  AX,$Ycur
     Mov  DI,$Xcur
     Push DS
     Push ES
     Dec  AX
     Dec  DI
     Cmp  DI,0
     Jg   PS_1
     Xor  DI,DI
PS_1:
     Mov  DX,80
     Mul  DX
     Add  DI,AX
     Shl  DI,1
     Mov  AX,0B000H
     Mov  ES,AX
     Mov  AH,0FH
     Int  10H
     Cmp  AL,07H
     Je   PS_2
     Mov  AX,0B800H
     Mov  ES,AX
PS_2:
     Cld
     Movsb
     Mov  ES:[DI],BL
     Inc  DI
     Loop PS_2
     Pop  ES
     Pop  DS
PS_3:
     Pop  AX
     Add  $Xcur,AX
     Ret
     PrintStr Endp
---------------------------------------------

　こんくらい長くなるし、このプロシージャ、別のプロシージャをcallしてるから、
１対１対応でアセンブルされる、本物のソースはもっと長くなりますね。

だんだんわかってきました。
私の知りたかった一番の核心は

> from basm.doc

> BASM translates a BASIC-like language to 80286 assembly language source.    

ということで、やはり作者的には、コンパイラというよりトランスレータという扱い
のようですね。これで私の頭の中はかなりすっきり。した気がする。してないかも。
もしかすると、スッキリしていない頭でいろいろとあげつらった文章のせいで、逆に
文太さんを困惑させているような。

> 　あるいは、高級言語のインライン・アセンブラ
> の部分をBasicで書けるよ、なのかな。

これは大きいかもしれない。
例えば、私の手がけたポケ３用のEMSドライバ、関谷さんの作られた200LX用の古い
バージョンの移植です。そしてこのドライバは、使用頻度の高いファンクション
しかサポートしていない。そこで、歯抜けの部分のファンクションを自力で作りたい
という思いはあって。そしてポケ３のCPUは80286。

> 　コンパイルとアセンブルの違い（と僕が思っていたこと）。
> 　.asmにしてアセンブルすると、.basをコンパイルするより、〈一般に〉速いものが
> できあがる。
> 　しかし、これは「最適化」できるかによりけりで、〈一般に〉にそうとは限らない。
> たぶん、大して変わらない。
> 　こんな風に理解しています。

理論的には「大して変わらない」かもしれない。
でも、世の中のコンパイラで、そんなにきちんと最適化できるものは少ない、という
現実もあって。
例えば、DOS3とかDOS5の時代、Turbo CとかQuick Cに比べるとLSI C-86は圧倒的に
最適化レベルが高かった、といわれています。それでも、LSI Cの出力を、手作業で
さらに最適化するような人々もいたらしい。ただ、その時代の職人の手仕事なんて
ほとんど伝説の域に達しているわけで、はたしてどこまで本当なのやら。

一応、多くのコンパイラは、その最終出力は実行ファイルです。
ただ、中間段階として、アセンブラソースをつくるものもあります。
LSI C-86はアセンブラソースを作ります。Delphiは作らないような気がする。
また、LSI C-86は同梱の専用アセンブラ用のソースを経由しますので、いろいろな
記述が、一般的なMASMやTASMと異なり、かなり癖がありました。当然、それらとの
互換性は皆無。とはいえ、ニーモニックは同一ですから、その部分だけを手作業で
MASMで移植、なんてことはよくやられていたようです。

> 　としきさん、割とマクロ、マクロ（アセンブラの）と書かれていて、そう翻訳
> されると想像するのが「順当」なのかな、と思っていましたが、プロシージャです。

なるほど、ここも私がわかっていなくて想像していた部分でした。
例えば、分岐やループの構文。
最近のアセンブラならマクロで構築するじゃないですか。
なので、BASICをアセンブラに変換する場合、変換結果はマクロかな、と思っていた
のです。

> 　エスペラントなどなど（仮想化）は、うーん、深いですねぇ。
> 　ただこのラインは本筋から大きくずれたかな、という気はしています。

ずれまくりましたね。私のほうに誤解がありました。
ということで、以下、余談。
現在、一般に、CPUのvirtualizationというと、CPUで実行するソフトウェアの話。
ご存知だと思いますが、世の中にはシミュレーションゲームってありますよね。
アレって、仮想の世界で遊ぶソフトウェア。
同様に、CPUで、自分自身とか、全く別のCPUをソフトウェアとして動かす、という
ある意味で大技なのが、CPUのvirtualization。
ここで、「全く別のCPU」と言っていますが、たとえばこれ、現実には存在しない
架空のCPUであってもかまわない。その場合、当然、そのCPUで動く機械語は架空の
機械語になるわけです。つまり、現実とは距離を置いた言語。この意味で、まるで
人間の会話における自然言語に対する人工言語であるエスペラントのようだ、と
私は考えたわけです。

> 			; でも使い方や環境によりけりですが、僕は、tosfindの
> 			; バグに一度も出会ってないです。多謝。

私のほうが文太さんよりもtosfindの使用頻度が低いせいもあるのでしょう、私も
一度もバグに出会っていません。
ただ、ソースも公開されていますから、その気になればバグ取りできる人も多いと
思います。こういうところもオープンソースのいいところ。つまり、作者は逃げて
しまえるのですから。

としきさん

　今日は、ここだけで失礼します。

>> 　としきさん、割とマクロ、マクロ（アセンブラの）と書かれていて、
>なるほど、ここも私がわかっていなくて想像していた部分でした。
>例えば、分岐やループの構文。

　なるほどぉ。いえ、としきさんが正解です、というか半々。マクロでは
ないが、プロシージャでもない。

　制御フローのことがすぐに頭に浮かぶんですね。この前の変数の話（メモリの
アドレス）とも似て、やはりとしきさんのほうが僕より、なんだろう、プログラミング
上、あるいはＣＰＵとプログラムの関係上、正しい想像力をお持ちです、たぶん。
当たり前だけど。
　その方向で考えているのだろう、と僕には想像ができなかった、ということです。
　文脈を想像力で埋めることができなかった、という意味。

　で、マクロでなくプロシージャでもなく（後者でフローを作れるのか？）　
ベタなラベルジャンプ（最終的にはこれしかないから）が正解でした。

DoLoop_01:
;
;print "Hello there " a$ 		;これだけの命令が
;
     Mov  SI,Offset $tring_03		;ループなしでも
     Call PrintStr			;これだけのプロシージャ
     Call SetCursor			;を必要とする
     
     Mov  SI,Offset A$			;やるなら、高級言語だろう
     Call PrintStr			;あるいは
     Call SetCursor			;Ｖｚマクロ。
     					;この感慨が面白くて
     Call DoCrLf			;BASMに興味を持ちました
;
;incr a 
;
     Inc  A
;
;if a = 23 then 
;
     Cmp  A,23
     Je   $+5
     Jmp  _EndIf_01
;
;exit loop 
;
     Jmp DoLoop_01A
;
;end if 
;
_EndIf_01:
;
;loop 
;
     Jmp DoLoop_01

DoLoop_01A:


>最近のアセンブラならマクロで構築するじゃないですか。
　僕は、最近のことはまったく知らないのですが、そうなのですか？
　c.mos流のあれをみて、そしてその原理をEmmettさんに教わって（＠過去ログ）
最初にあれを考えた人（注）は何て頭がいいのだろう、と思いました。
　Ｃみたいな顔してるくせして、実はラベルを中で自動生成していた。

　ちなみに、上のようなプロシージャだらけの書き方を（この例はあまりよくない
かもしれないけど。たぶん他のやり方は醜すぎるから）、Jeff先生は強く強く
推奨していて（構造化）、「どうだ、アセンブラがパスカルみたいだろう」と
書かれていて、笑いました。
　まあね、と。
　で、僕は、よし、パスカルをやろう、と決心したという次第。その後、
１ミリも前進していないけど。

　JVM、たまたま出会いました。別発言で。

（注）とはいっても、〈マクロ〉アセンブラに内蔵されてると言ってもいいような
仕組みだから、アセンブラ作者自身でしょうね。MASMのドキュメントとかに書かれてる
のかなぁ？　「こんな使い方をすると賢いですよ」とか。

としきさん、

　深く悩んではいないと思うけど、「こいつに何を言って意味があるんだ？」とか
悩まないでくださいね。
　以下で解決しました。

「最初に学ぶべき構造化プログラミング、大きな問題を分割して解決」
https://active.nikkeibp.co.jp/atclact/active/17/060100293/060800002/

　パスカルはやるけど、そんなに大きなプログラムを書く予定はないので、Ｖｚマクロの
経験の延長でやれるところまでやる。
　完全にスパゲったら、「やり直しだぁ、２６回目」みたいにやります。

　アセンブラは、やっぱり、どれだけcallばっかりで効率悪くても（気にしません）、
短く刻んでプロシージャにする（もぐらさんからの教訓）＝アセンブラをパスカルにせよ
の家訓のもと、がんばります。

　何をやっていたかは明かしませんが、以下のような「集中すれば１０分だよ」なマクロを
書いていて、ふと考えました。「構造化」をググれ、と。
　そして、この程度なら「順次」でよろし、という結論を得ました。

　「古典」。別発言であげますね。

i-,

#k #i			; duplicate line
#> #d			; next line

(cd=='\')? #g  ? >z		; delete regex header
(cd=='x')? #g  ? >z
(cd==' ')? #g  ? >z

:a
(-1){ (cd=='\') #d ?{} } 
(cd=='(')?  { i++, #h#g "\1" } ? >a


:b

:z	.

としきさん

　おそらく、捨てたくても持ってないものは捨てられない、という現実。
　しかし、台湾の出版社から出たと思しい _Software Tools_ が
見つかりました。（謎）

    CONTENTS

Preface
Introduction 				1
1. Getting Started 			7
2. Filters 				35
3. Files 				67
4. Sorting 				105
5. Text Patterns 			135
6. Editing 				163
7. Formatting 				219
8. Macro Processing 			251
9. A Ratfor-Fortran Translator 		285

　おお、そう、いい感じ。読めるか分からない、というか、読めない！　
難しすぎ！　つまんないからたまにはギャグぐらい入れて、という罰当たり
なことになりそうな気もしますが、そのうちに、とりあえず字を追ってみます。
多謝。m(__)m


>訳書の場合、まえがき、目次、序論、１章、という順番で並んでいます。
　たぶん同じです。こういう「偉い」本のばあい、チャラチャラした商業出版と
違い、訳者も出版社も、怖くてそういじれません。翻訳権取得時につくられる
契約書にその旨書いてあるばあいも多いです。「改変しないこと。原著のまま
訳出のこと」と。
　１章は「はじめに」ぐらい？　僕でも「さあ、始めてみよう」とは訳せないと
思う。格式みたいなものの演出。

#10417
>訳書で言うところの序論（"Introduction"）の
>最初の５パラグラフほどを読んでいただくと、その先を読みすすめるべきか判断
>できると思います。

　構造化、という文脈で、この本が出てきたのでしたっけ？　たぶん、もう５パラグラフ
読んだと思うけど（最後までできるものなら読み通したいとの判断）、僕との会話で
としきさんが何に引っかかったのか（思い出したか）知りたいので、もう一度読んで
みます。
「序論」後半は、先の各章の簡単な紹介ですよね。
　ただ、元がｐｄｆで上下さかさま（ＯＣＲで化け化け化け化け）のページが「序論」
に入っていたみたいなので、ちょっと１ページごとのe-text作りになりそう。

　具象的個々別々の問題への抽象的解法を見出す。

　僕が日常的にやっている作業より高度なテキスト処理の話だと思うけど、プログラミング
環境を整えるプログラムの作成について、が全体のテーマですよね。
　grep使って、statementだけ取り出す、とか。
　grepの作り方、という話でしょうけど。


冒頭５パラグラフ。
------------------------------------------------------------------------------
	INTRODUCTION

We are going to discuss two things in this book -- how to write programs 
that make good tools, and how to program well in the process. 

What do we mean by a tool? Suppose you have a 5000-line Pascal program 
and you need to find all references to the variable time, to make sure it can 
safely be changed from type integer to type real. How would you do it? 

One possibility is to get a listing and mark it up with a red pencil. But it 
doesn't take much imagination to see what's wrong with red-penciling a hundred 
pages of computer paper. It's mindless and boring busy-work, with lots of 
opportunities for error. And even after you've found all instances of time, you 
still can't do much, because the red marks aren't machine readable. 

Another approach is to write a simple program to find lines containing the 
identifier time. This is an improvement, for such a program is faster and more 
accurate than doing the job by hand. The trouble is that the program is so specialized 
that it will be used once by its author, then tucked away and forgotten. 
No one else will benefit from the effort that went into writing it, and something 
very much like it will have to be reinvented for each new application. 

Finding time's in a Pascal program is a special case of a general problem, 
finding patterns in text. Whoever wanted references to time today will want 
references to some other variable tomorrow, readln and writeln calls the 
day after, and next week an entirely different pattern in some unrelated text. 
Red penciling never ends. The way to cope with the general problem is to provide 
a general purpose pattern finder that will look for a specified pattern and 
print all the lines where it occurs. Then anyone can say 

	find pattern 

and the job is done. find is a tool: it uses the machine; it solves a general 
problem, not a special case; and it's so easy to use that people will use it instead 
of building their own. 
------------------------------------------------------------------------------

　おお、ちゃんとパスカル用になっている。が、内容は同じと言ってよいでしょう。
　ただ、ここまで一般的（抽象的）な問題を解決するツールを僕が開発するとは思えない
ですけどね。grep/sed/awkの使い方を十分マスターすれば良いような気がする。
まだまだ十分でないから。
　逆に、

2022/11/06  18:58    369 srch_do1.def
2022/10/29  11:23    220 srch_do2.def
2022/10/31  22:44    199 srch_do3.def
2022/10/31  23:06    209 srch_do4.def
2022/11/01  01:59    199 srch_do5.def
2022/11/01  02:13    131 srch_do6.def
2022/11/18  11:42    176 srch_do7.def
2022/11/06  18:25    321 srch_do8.def
2022/11/14  01:08    126 srch_do9.def
2022/11/16  00:15    298 srch_doa.def
2022/11/17  17:25    321 srch_dob.def
2022/11/18  11:48    240 srch_doc.def

　これらにちゃんと名前をつけて、管理せい！　という感じですかね。
　あ、これ、もぐら流。中身の変更箇所がちょっとずつ違うだけ。
　これらに一般解はないです。問題のほうが"special case"だから。個別だから
偉いツール群。

　それでも、いい本っぽいと思っています。何かが得られるよう精進したいです。
　ありがとうございます。
　なお、パスカル版の翻訳はないみたいでした。


　蛇足。Pascal版 Intro pp.1-2。ページまたぎ部分。


All of them have been run without change on a variety of machines and Pascal 
compilers. 
				;A
---------------------[End of Page 1]---------------------
				;B
The second concern of this book is how to write good programs.

　このページ区切りフッタあたりに色々なノイズが入ります。Aの箇所にページとか
Bの箇所に"Introduction", "CHAPTER 1", "INSIDE THE IBM PC" (see #10359) とか。
それも壊れて化けたりもして。スペースや改行が入ったりもする。それらをＶｚマクロ
やsedで掃除しています。

　点検は、
>cgrep -A2 -B2 "End of "	;After & Before

　find pattern に同じ。

> オリジナルのvz.defにBlだけ8192に変更したものを読んで起動し、0007.cgiを開いた
> ところで0007.cgを挿入して、無事に正常挿入。うれしい！

テストデータを対象にバグを回避しているだけなので他で問題が出ると思います。
テスト版はマクロの読み込み関連でバグがあるようですのでご注意ください。

> ということで、これから確認したい項目。
> 80桁未満で桁折しても状況が発生しそう、ということから、例えば、以前、文太さん
> に提供していただいたニフティのログを使って、ファイルサイズを0007.*と同じに
> したものを作って状況がどうなるか。

検証はよろしくお願いします。m(__)m

> Blとかのバッファの開始ポイントのアドレスをVzのマクロで取得するには、どう
> すればよろしいのでしょうか？
> あまり関係はないとは思いますが、今回のテスト版で、もし以前の版と大幅に変化
> しているかどうか確認できれば、と思いまして。

BLの相対アドレス情報などは、めざらさんが出してくれたので（ありがとうございます）
VTDOS環境での絶対アドレスは

vzk07t01 　vzk07t02 test
D192	pq..148		lbuf		8192
F192	pq..149		tmpbuf4		256

スタック領域なので、コードの修正分サイズが増えても変わりませんね。
常駐／非常駐とも同じです。
同じマクロ環境で、高橋版は
vzt 
CFFE	pq..148		lbuf		8192
EFFE	pq..149		tmpbuf4		256

この差は、#if 文でマクロの構成が違うからかなぁ。
オリジナルVZとマクロでは

vzo
777C	pq..148		lbuf		2048
7F7C	pq..149		tmpbuf4		256

BLは変えてるかもですが、だいぶ余裕がありますね。
このラインバッファのサイズで挙動が変わるのは、メモリ転送ルーチンで
ラインバッファを一時バッファとして使っているのが関係しているのかなぁ？

　地獄の仕事場から息継ぎのため、一瞬だけ、浮上してみます。
　すいません、疲れてます。完全なる雑巾状態。そういうときは、こういう無意味な
読書をするにかぎるのです。

    Readers who are sensitive to questions of efficiency may wonder if it is 
economical to use two programs when one would serve. The answer depends 
on the true costs involved, which are often not properly estimated. Most people 
who talk about "efficiency" are concerned primarily with how much machine 
resources are used in the final run or in hands-off production, not with how 
much "people" and machine time is consumed in all the compilations, debugging 
and other false starts that prepare for the final run. Throughout this book 
we consistently take the view that people cost a great deal more than machines,
and that the disparity will increase in the future. Therefore the most important 
consideration is that people get their jobs done with a minimum of fuss and 
bother. 

---------------------[End of Page 82]---------------------

　効率の問題に敏感な読者は、1 つのプログラムで事足りるのに、2 つのプログラム
を使うのは経済的なのだろうかと思うかもしれない。その答えは、しばしば正しく
見積もられていない真のコストに依存する。「効率」について語る人の多くは、
最終的な実行やハンズオフ生産でどれだけの機械資源が使われるかに主眼を置いて
おり、最終実行の準備のためのコンパイル、デバッグ、その他の誤ったスタートで
どれだけの「人」と機械時間が消費されるかには関心がない。本書では、一貫して
「人は機械よりもコストが高い」「その格差は今後ますます広がる」という見解を
とっている。したがって、最も重要なことは、人が最小限の手間で仕事を成し遂げる
ことである。（DeepL による翻訳。立派！　トーンだけ改変）

　（ハンズオフ生産だけでしょう、意味不明なのは。消費も変か。最後のところは
　　やるね、と思いました。しかし手を入れたくもなる、が、「人」はコストが高い
　　のです）

　さすがです、カーニハン先生。ごもっとも！

C:\C>dir /L /B |sort
2repl.def	
2repl2.def	
2strsrch.def	
999.def		
addzspc.def	
alpha.def	
altkey_t.def	
arr_srch.def	
array2.def	
array3.def	
blk0.def	
bothmov.def	
catg_fix.def	
cnd_sch1.def	
com_box.def	
 (以下50行略。うひょひょひょひょ。下品な笑い)

　さすがにこれだけパスカルのコードを読むと、けっこう単語を覚えるものですが、
やっぱりＶｚマクロが僕にとって最高の高級言語だ、という確信も強くなりますね。
　仕事するするＶｚマクロ。いえ、本業じゃありません。

> 常用環境の場合は、なにかがFFFFhを超えてしまいそうだし

pq..149 は、tmpbuf4 で、ソースでは使われていないようです。
緩衝領域として２５６バイト設定しているのは、プッシュポップのスタックが後ろから積まれるからかも。
そうだとすれば、この領域を使うのは危険ですね。
pq..149 が、FF00h を超えていたらバッファを減らさないと危険ということでしょうか。

げげ、私知らないで私家常用版で使ってしまっていました。(>_<)
見直さなくては。(^^;;

> test版の時は8000hをまたいでいるし。
あ、そうか、ラインバッファが8000hをまたぐバグってこれを言っていたんですね。

うちのオリジナルVZとマクロでは
vzo
777C	pq..148		lbuf		2048
7F7C	pq..149		tmpbuf4		256

テスト版vzとオリジナルマクロでは
7822	pq..148		lbuf		2048
8022	pq..149		tmpbuf4		256

この環境で、8000h をまたぐバグが出るかどうか確認すればいいのか。
ん？ 高橋版で直っていたかしらん？ ちょっと過去ログの海に潜ってみます。

今、野ざらし言#5226 あたりで、としきさんのmore.com の話題が出ています。
VTDOSでのとしきさんのmore.com の問題は
#6641 2015/08/21 あたりからの話題で
#6648： Re: としきさんのmore.com 投稿者： konno 　 2015/08/24
ここでMASMでアセンブルしてみたけどVTDOSでは使えなかったのでした。

今回、行数がゼロになっているのでは？ という指摘でもう一度挑戦しました。
としきさんのソースの28行目を

GOOD_VER:
;
;MACHINE CHECK
;
		MOV	BYTE PTR DS:[FLAG98],0
		PUSH	DS
		JMP	IBM			;★ ここで機種チェック IBM にジャンプ
		XOR	AX,AX

このように追加したら、VTDOSで正常に動きました。＼(^^)／ ﾔｯﾀ-
どこで躓いているのかは他の方に調べてもらいたいと思います。(^^;

＃　ああ、年が変わってしまった・・・