[HOME]  [リストへもどる]  [全部表示]  [最新100]  [最新50]   [新着40] 
新着記事 30

8140Re^8: 盲点ではなく横転 投稿者:としき   2018/09/22(土) 18:13
参照先:http://toshiki.la.coocan.jp/
  8136 番 konno さんへのコメント

> ただ、周波数が下がってその結果落ちるというのがよくわからなかったり。
> 高負荷になるとタービンの回転が落ちるとかあるのかなぁ。

報道によると、周波数が下がったことを電圧の低下と同義と設定されている各種
自動装置があるらしい。で、私が先に述べたとおり、電圧の低下は過負荷であり、
そのままだと供給側(発電機)が壊れるから遮断した、というストーリーの模様。
私も、周波数でそのような検知をしていることは知りませんでした。
てっきり、電圧そのもので検知をしているものだと思っていました。

昔、戦時中だったか終戦直後だったかの電力事情がさらりと触れられていた文章
を読んだことがあるのですが、もっと直感的にわかりやすいものでした。確か、
夕方だか夜に近所の大工場が運転を止めると、その地域一帯、ちかちかと数回、
電球が瞬いたあとに明るくなる、というものでした。要は、急に大負荷が消えて
電圧が上がる、ということだったのだと思います。
それから、ほんの10年かそこら前ですが、東南アジアかアフリカのどこかの国、
あるいはインドあたりだったかもしれませんが、電力需給の悪い国の例で、電圧
が96ボルトくらいまで低下することはざらにあるけど停電するよりはマシ、と
いうような新聞か雑誌の記事を読んだ記憶もあります。


> こういう問題は早く改善してほしいですね。

改善するにはコストがかかります。
とりあえず、停電が起きてもいいように各個人が自らの手元に電池を蓄えておく
ためにコストをかける、というのが現実的なようです。
自助・共助・公助のうちの自助の部分を手厚くする、という形で。
一部の保守的な方々、特にアメリカ的キリスト教保守主義の方々に顕著ですが、
そういった人たちは自助と共助を過剰に重視して公助はあてにしないという傾向
があるようですので、自分で電池を購入するのは当然のようです。
一方、保守的ではない傾向の方々は公助を重視するわけなのですが、現状は公助
が十分ではないという現実があるわけで、やはり自腹を切って自分で電池を確保
しておくべきという結論になる。
なんだ、右も左もやるべきことは同じじゃないか。
ただ、かつてのニッポン社会主義的左翼の方々は公助を重視して民間企業の懐に
手を突っ込むくらい規制を強化することを主張されていたのですが、現在はその
ようなご意見を聞くことはめっきり少なくなりました。こういったところからも、
現在の左翼退潮の傾向をはっきりと見て取ることができます。

結論としては、カネをかけないと改善はできないよね、ということ。
そして、早く改善するためには余分にカネはかかるよね、ということ。
さらに、カネは天から降ってくることはないよね、ということ。
なかなか難しい問題のようです。


> 私はバッテリーの交換は基本お店でやってもらっているので

お店でやってもらったほうが、時計やらステレオやら、その他の設定が消えずに
済む可能性が高いですからね。それがごく普通だと思います。
でも、そう考えると、私は普通ではないな。
30年ほど前に初めて車を買ったときから、店で換えてもらったことって1回か
2回しかない。あとは全部、カー用品屋で新しいのを買って自分で換えた。
あと、店でやってもらっても、古いのはもって帰るといえば、きちんと貰えます。
建前は、店でやっていることは、あくまでも処分の代行。
古いものも一応は本人の私有財産なわけですから、逆に、持って帰ると主張する
客に渡さないのは横領なり強奪になるわけです。
ということで、実は私、車の定期点検とかでワイパーブレードが劣化して交換に
なるときは、古いのを貰うようにしています。それを何に使っているかというと、
自宅の窓ガラス掃除。これが便利がいいんですよ。柄をどうするかという問題が
発生することもありますが、それさえ解決できれば、これはお勧め。いやマジで。


> どこかに転がっている20年前のぶつは処分しないとなぁ。

多くのカー用品店やディーラーは、下取りというか、新規購入時でないと既存の
バッテリーは引き取ってくれません。有料で引き取ってくれる店もあるし、数は
少ないけど、無料で引き取ってくれる店もあるらしい。

私は2年ほど前、今の車に使っているバッテリーを自分で交換しました。
新しいのを購入したのは、野猿街道沿いのイエローハット。
そこの店では、頼めば店の工場で交換してくれますが、持って帰って自分で交換
することにしました。そのときに言われたのが、1個買ったのだから1個引き取
ります、ということ。ラッキー。
実は、それで引き取ってもらったのが、自宅で所在無げに転がっていた、セルが
1つか2つ死んでいたバッテリー。そして、その時まで車で元気に活躍していた
バッテリーは、現在、自宅のメインの予備電源として保管中。それまで3年半か
4年くらい使っていたバッテリーなんで、現在では製造からは6年ぐらい経って
いるはずですが、全く問題なく稼動しています。

余談ですが、定格というのを無視して、安全に電力を供給できるか、という観点
だけから言うと、鉛蓄電池の寿命って50年くらいあるのではないかなぁ。
私の経験ですが、2005年ごろにいくつかバッテリーを廃棄しているのですがね。
そのうちの2つは、私が保有していた期間は15年ほどですが、入手したときは
既に中古だったので、製造されてから何年経っていたかは不明。そんな正体不明
のバッテリーでも、フル充電後、1アンペア未満の電流であれば24時間近くは
連続給電できていましたから、単純計算で10AH以上はあったはず。
屋外で雨ざらしというのは論外として、屋内で保管してあれば、20年程度なら
まだ大丈夫ではないかなぁ。わからないけど。振動や衝撃というものについても、
軍用車は別として、民生用の4輪駆動のオフロードカーだってバッテリーは民生
用が搭載されているわけだから、そんなにヤワな訳はないだろうし。
単純に爆発の有無とか残存起電力とかだけを比べると、50年物の鉛蓄電池より
10年物、いや5年物のリチウムイオン電池のほうがよっぽど危ないと思う。
でも、私、20年前のノートパソコンが部屋の中にゴロゴロあるんだよなぁ。
当然、電池なんて入ったまま。考えてみれば、ずいぶん剣呑な話でござる。

    - No.8140 -   [コメント元:8136]     [リストへもどる ]
soft

81395fk_Open.def 投稿者:文太   2018/09/22(土) 12:28
  8138 番 文太 さんへのコメント

これでした

 もう、「ひつこい」ようなものですが。
 Fキーラベル書き換えがさくっとできたい場面とは、こんなのを使うときです。
 \vzdefディレクトリも、お掃除中。
 中身は前回作業のものがそのまま残っていたので、今、使えるものに書き換え
ました。

 ふっと、最後の5行を書き加えたたら、なんだ、やりたかったのは、こういうこと
だったじゃないか、と。
 ほんとにちゃんちゃん。整理はするものですねぇ。HDも頭の中も。汎用性・可搬性
とか、考えていたのが間違い。

=== 5fk_Open by B ===;
 5つのファンクションキー(F05, F098〜F12)でファイルオープン。
 F05は、このファイル自身(c:\def\5FK_OPN.DEF)
 5つまでのファイル、複数をファイルを行ったり来たり時の定型業務用。
 作業終了後、vz再起動のこと。ファンクラベル復活のため。
 Fキーラベルがそのままでよいなら、^KOあるいは、このマクロをマクロバッファ
から消すだけでよい。

* M
50 [F05] "f05"
		a="c:\def\5fk_opn.def ->1D5",		;here
>51
50 [F09] "f09"
		a="c:\def\exmenu.def ->BQF",		;menu
>51
50 [F10] "f10"
		a="c:\def\vzfl.def ->10DC",		;* Macro
>51
50 [F11] "f11"
		a="c:\def\vz.def ->11CD",		;* Macro
>51
50 [F12] "f12"
		a="c:\def\vz.def ->BCB",		;* Func label
>51
51 ""
	&s mx[+, #O &?("%s",a) #m mx], &d

	f=pq..100,			;func key label ptr
	&00
	&Sm(f,r,61) pn.4-, .

00:	(3+$)."$
	ファイル$(0)窓換$(0)文換$(0)窓割$(0)5 fk$(0)FOPN$(0)$
	  $(0)tagJ$(0)exmn$(0)vzfl$(0)VzMc$(0)VzFn$(0)$
	$(d)$

*

    - No.8139 -   [コメント元:8138]     [リストへもどる ]
pre

8138Re^2: としきさんのヒント 投稿者:文太   2018/09/22(土) 02:18
  8137 番 konno さんへのコメント    コメント数 1

 通じてよかった。うん、あの正規表現+αは解説しないとまず意味不明だろうと思ったので。
誰にとっても。
 けっこう前の、めざらさんのところで「%%」エスケープのときから、メタ文字のエスケープ
って、いつでもメンドウなんだよな、と思っていて、ygrepはとりわけそうで、それで、
あれがうまく通ったとき、けっこう嬉しくて。

>> 15132/15136 ********  和生             RE:RE^4:Q:VZファイラーのカスタマイズ
>> (15)   99/12/21 20:13  15120へのコメント
>80 [F07] "" >?{         ;(s)>?
 僕は、この記事はまだ見てないのですが、僕にとっての注目ポイントはここです。
 [F07]。
 ファイラマクロに、ちゃんとFキー使ってる!

 ファンクションキーをファイラで使う。これがこの件の、最初からのトピックでした。
 これが当たり前だったから、和生は高橋さんにファイラでのFキーラベルをお願いし、
高橋さんも、あっさり了解した、ということだったんですね(そのときのやり取りは、もっと
高度みたいでしたが)。

 もちろん、その前に、ファイラと関係なく、Fキーラベルの書き換えという、もっと
切実な課題が僕にはあったのですが。ファイラマクロとは関係がないけど。そんなの書き換え
ないもの。

    - No.8138 -   [コメント元:8137]     [リストへもどる ]
pre

8137Re: としきさんのヒント 投稿者:konno   2018/09/22(土) 01:47
  8133 番 文太 さんへのコメント    コメント数 1

> Ygrep "\.[ ]*\.[ ]*\*[ ]*\}[ ]*\.[ ]*\*" c:\tk\vzlog\dc
>  こんなこと、してみて。
>  としきさんがくれたヒントを解くコツ。今、見つけたんですけどね。

まったく意味が分からないままやってみました。

VTDOS|>Ygrep -r -t  "\.[ ]*\.[ ]*\*[ ]*\}[ ]*\.[ ]*\*"
dc13_995.log 23343:》8 [F02] "" >?{ #W .. * }. *		;ex_retcd
dc13_995.log 23738:》》8 [F02] "" >?{ #W .. * }. *		;ex_retcd
dc15_968.log 81969:8 [F06] "" >?{ #46 .. * }. *            ;mark block / to mark file
dc15_968.log 82529:  標準キーアサインなら最初は [F06]"" ?>{#F..*}.* でしょうか??
dc15_968.log 83876:| 8 [F06] "" >?{ #46 .. * }. *            ;mark block / to mark file
dc15_968.log 84233:》 標準キーアサインなら最初は [F06]"" ?>{#F..*}.* でしょうか??
dc15_988.log 58323:8 [F06] "" >?{ #46 .. * }. *            ;mark block / to mark file
dc15_997.log 21769:8 [F02] "" >?{ #W .. * }. *             ;ex_retcd

こんなん出ました。
ログを読んでやっと言いたいことがわかりました。


>  先回りの解説。
> >?{#Y .. * }. *
>  これがカンマ(,)なら意味が分かったのですが、ピリオドは分からない。今でも。

私は、>?{  }  が今でもよくわかっていなかったりして。
これは、>?{s1の時 s2の時 s3の時} ということでいいんですかね。

おお、ピッタリな記事を見つけました。

> 15132/15136 ********  和生             RE:RE^4:Q:VZファイラーのカスタマイズ
> (15)   99/12/21 20:13  15120へのコメント

80 [F07] "" >?{         ;(s)>?
               #56      ;s==0 編集モードなら置換
               .        ;s==1
               .        ;s==2
               >f       ;s==3 ファイラーなら :f へ
               }.

これで、 .. の謎もばっちりですね。和生さんに感謝です。


> ..*}.*
> \.\.\*\}\.\*				;エスケープしまくり。
> \.[ ]*\.[ ]*\*[ ]*\}[ ]*\.[ ]*\*	;スペースは0個か1個(2個もあり得るが)

なるほど。私は正規表現がn苦手なので、CODEX.DEFの複数ワード検索です。

>  で、おお、ファイラ用マクロの登録方法の定番だった。達人たちのあいだで、だけど。
>  当時、ファイラにファンクラベルなんて、なかったはずだけど。達人にラベルなんて
> 要らない。
>  凡人の僕は、要る。

私もラベルが無いと無理なので、お仲間ですね。(^^;


    - No.8137 -   [コメント元:8133]     [リストへもどる ]
pre

8136Re^7: 盲点ではなく横転 投稿者:konno   2018/09/21(金) 23:32
  8132 番 としき さんへのコメント    コメント数 1

> ただ、大電流を流すときほど電圧が下がりますから、電流値が少ないときは結構
> 粘るはずです。例えば、ルータとモデムにしか電源を供給しない、というような
> 場合は、割と何時間も供給可能だと思います。あるいは、それこそ、スマホとか
> の充電用と割り切る、とか。

大電流を流すと電圧が下がるというところで、北海道地震の大規模停電を
思い出しました。
ただ、周波数が下がってその結果落ちるというのがよくわからなかったり。
高負荷になるとタービンの回転が落ちるとかあるのかなぁ。
こういう問題は早く改善してほしいですね。

> そして、旧のバッテリーは災害対策用品として自宅で保管、ですね。
> ま、年に1回くらいは、きちんと補充電してあげましょう。

私はバッテリーの交換は基本お店でやってもらっているので
今は持っていないんですよね。
どこかに転がっている20年前のぶつは処分しないとなぁ。


    - No.8136 -   [コメント元:8132]     [リストへもどる ]
soft

8135Re^2: 貴方の窓辺に世界時計を 投稿者:konno   2018/09/21(金) 22:29
  8129 番 文太 さんへのコメント

>  試す時間は今はないのですが、楽しい記事! \(゚ロ\)(/ロ゚)/

喜んでもらえたようでうれしいです。(^_^)
でも、顔文字は笑ってないような。(^^;

>  バミューダトライアングルなんですよねぇ。確か(見てないけど)、昼夜ルーチン
> は誰が作ってくれた、こっちは上村さんのアイディアとかコメントがあるんです
> よね。

バミューダトライアングルって、岩礁とかなんですかね。
何名かのマクロ作家の名前が見えるので、皆さんの英知の結晶なんですね。
超絶難しくて、何をやっているのか全然読めません。
でも、まだまだ続きますよ。

    - No.8135 -   [コメント元:8129]     [リストへもどる ]
soft

8134Re^7: Fキー見直し活用 投稿者:konno   2018/09/21(金) 22:08
  8128 番 文太 さんへのコメント

>  ただ今、キーアサの大改革中。慣れ親しんでいた
> はずのキーアサなんだけど、忘れてるのばっかなんだもの。

私もマクロキーの変更始めています。
IMEをONにしたままにすることが増えたのですが、F10 や、^F10 は
IMEに取られてしまうので、タグジャンプは、@F10 にしていました。
試してみると、F12 はそのまま使えたので、F12 に割り当てました。

>  と5バイトに統一したのです。でも、「ファイル」の項も「窓換」の項も、1バイト
> 無駄になってるじゃないですか。ファイラ行を入れてさらに圧迫するなら、せめて
> 4バイト統一にしよう、というだけのことです。

ファイラでFキーを使わないなら、ファイラ行の記述自体を省略でいいのでは。
4バイト統一にして、後で5バイト必要になったりは無いですか。(^^;

>  モバが変則的なのは、基本、Fキーは10個だけなのに、中身がDOSVだから、
> ラベルだけ12個あり、[F12]は[AP切替]という特殊キーで機能するけど、[F11]は
> ラベルだけあり、キー自体が存在しないということでした。

オアポケ3も同じだったような。改造版で10個にしたような気が。
ラベル変更だけで、マクロキーが使えたかは確認してないですが。


    - No.8134 -   [コメント元:8128]     [リストへもどる ]
soft

8133としきさんのヒント 投稿者:文太   2018/09/21(金) 15:20
  8125 番 konno さんへのコメント    コメント数 1

konnoさん

Ygrep "\.[ ]*\.[ ]*\*[ ]*\}[ ]*\.[ ]*\*" c:\tk\vzlog\dc
 こんなこと、してみて。
 としきさんがくれたヒントを解くコツ。今、見つけたんですけどね。

 先回りの解説。

>?{#Y .. * }. *
 これがカンマ(,)なら意味が分かったのですが、ピリオドは分からない。今でも。
 でも、m.gannさんがやっているのだから、ループカウンタ界隈で意味があるのだろうと
勝手に納得。
 で、分からないから、どうグレップするか、どうygrepするか、と思案した。

 .. * }. *
 がキー。じゃ、特殊文字を全部エスケープして( "}" はygrepの特殊文字だったと思う)
スペースはあってもなくてもいいとしてみよう。

..*}.*
\.\.\*\}\.\*				;エスケープしまくり。
\.[ ]*\.[ ]*\*[ ]*\}[ ]*\.[ ]*\*	;スペースは0個か1個(2個もあり得るが)

 で、おお、ファイラ用マクロの登録方法の定番だった。達人たちのあいだで、だけど。
 当時、ファイラにファンクラベルなんて、なかったはずだけど。達人にラベルなんて
要らない。
 凡人の僕は、要る。


    - No.8133 -   [コメント元:8125]     [リストへもどる ]
pre

8132Re^6: 盲点ではなく横転 投稿者:としき   2018/09/21(金) 02:08
参照先:http://toshiki.la.coocan.jp/
  8122 番 konno さんへのコメント    コメント数 1

> うーむ、まだ生きているバッテリが遺棄されていたら危険なことになって
> いたかもしれないので、危険を未然に防いだことにもなるでしょうか。

おっと、そういう見方もありますね。確かに、それは盲点でした。

> 電圧は正常でも負荷をかけるとストンと落ちることがありますよね。

開放電圧と負荷電圧というやつですね。
テスターの電圧モードだと開放電圧だから値が高くなるけど、電池測定モードは
負荷電圧だから渋めの値が出る、というのはよく聞きます。ただ、死んだセルが
あれば、開放電圧でも8ボルトとか10ボルトくらいに落ちます。実際、かつて
そういうバッテリーを持っていたこともあります。
さすがに、今はもうそういうのは処分しました。
ただ、大電流を流すときほど電圧が下がりますから、電流値が少ないときは結構
粘るはずです。例えば、ルータとモデムにしか電源を供給しない、というような
場合は、割と何時間も供給可能だと思います。あるいは、それこそ、スマホとか
の充電用と割り切る、とか。

> 車やバイクのバッテリーは早めに替えた方が安心ですね。

そして、旧のバッテリーは災害対策用品として自宅で保管、ですね。
ま、年に1回くらいは、きちんと補充電してあげましょう。

    - No.8132 -   [コメント元:8122]     [リストへもどる ]
soft

8131Re^6: ちょっと急いで 投稿者:文太   2018/09/21(金) 02:04
  8130 番 としき さんへのコメント

 こんな風にするのが、正しい使い方だということです。
 一般的に正しいだけで、これがとしきさんにとって、有用かどうかは、
申し訳ないけれど、分かりません。
 記憶力が確かなうちは、こういう姑息な手段に訴えないほうがいいような
気もしています。

--- from vz.def ---
* F ファンクションキー表示

"","","","","","","","","","","",""	;normal
"","","","","","","","","","","",""	;shift
"","","","","","","","","","","",""	;ctrl	ここまでの4行については
"","","","","","","","","","","",""	;alt	分かりません。個人情報?
						;-----------------------
"","","","LFN","","","","","","","",""	;filer


    - No.8131 -   [コメント元:8130]     [リストへもどる ]
pre

8130Re^5: ちょっと急いで 投稿者:としき   2018/09/21(金) 01:03
参照先:http://toshiki.la.coocan.jp/
  8124 番 文太 さんへのコメント    コメント数 1

>  としきさんが、ファイラキーラベルの正しい使い方を教えてくれました!

ん?
明示的にお教えした記憶は全くないんですが。
いつのことでしょうか。
私の頭の中の錆とりのためにも、ご教示いただけると幸いです。

    - No.8130 -   [コメント元:8124]     [リストへもどる ]
soft

8129Re: 貴方の窓辺に世界時計を 投稿者:文太   2018/09/20(木) 23:06
  8127 番 konno さんへのコメント    コメント数 1

>それを記念して、古の世界時計を特集しようと思います。
 試す時間は今はないのですが、楽しい記事! \(゚ロ\)(/ロ゚)/
 あれっていいですよねぇ、本当の名作。game.defは楽しめないのだけど(ヘタ
だから)、wrldtime.defはいいですよねぇ。
 今、動かしても、きっと速すぎて和めないでしょう。そのカスタマイズ必須。
 バミューダトライアングルなんですよねぇ。確か(見てないけど)、昼夜ルーチン
は誰が作ってくれた、こっちは上村さんのアイディアとかコメントがあるんです
よね。

    - No.8129 -   [コメント元:8127]     [リストへもどる ]
soft

8128Re^6: Fキー見直し活用 投稿者:文太   2018/09/20(木) 22:59
  8125 番 konno さんへのコメント    コメント数 1

>色々カスタマイズしたくなりました。
 なっちゃうんですよねぇ。ただ今、キーアサの大改革中。慣れ親しんでいた
はずのキーアサなんだけど、忘れてるのばっかなんだもの。えい、見えるところ
におけ、と。#if 98だけでなく、98用マクロも要らないだろう、などなど。
 「終わりなきロールプレイングゲーム」なのだそうです。(c) y.mikome。
 もっとも、今回の僕の作戦は、あくまで臨時の場面のための対策です。です
から、メンドウサが勝つ、というのも十分ありえます。

>>  1マス・5バイトから4バイトへ変更! ひぇぇぇ。
>何でしょう? うちは5バイトにしてます。

 せこい話です。fkylabel.defを作ろうと思ったときに、最初にしなくちゃいけない
のは、vz.defのあそこの整理(当然* Macroの本物のキーアサも)で、形を整えるため、
マクロを簡単にするため、

[Nml]$(0)[F02]$(0)[F03]$(0)[F04]$(0)[F05]$(0)[F06]$(0)$		;入れ替え用
[F07]$(0)[F08]$(0)[F09]$(0)[F10]$(0)[F11]$(0)[F12]$(0)$

ファイル $(0)窓換 $(0)文換 $(0)窓割 $(0)改行 $(0)   $(0)$	;本物の写し
     $(0) タグ $(0)   $(0)   $(0)   $(0)   $(0)$

 と5バイトに統一したのです。でも、「ファイル」の項も「窓換」の項も、1バイト
無駄になってるじゃないですか。ファイラ行を入れてさらに圧迫するなら、せめて
4バイト統一にしよう、というだけのことです。
 もちろん、そんなマクロのことを気にしなければ、そもそも統一なんてしなくて
いいのですが。あるいはマクロ内データを正確に維持できる自信があれば、、、。
 復活させたファイラ行は、まだ、
"","","","","","","","","","","",""
 これでも+12バイト。

>もしかしてPC98とかオアポケ3がらみとか?
 いえ、どっちも持ってませんよ。
 モバが変則的なのは、基本、Fキーは10個だけなのに、中身がDOSVだから、
ラベルだけ12個あり、[F12]は[AP切替]という特殊キーで機能するけど、[F11]は
ラベルだけあり、キー自体が存在しないということでした。
 発見したのか、昔は分かっていたのかさえ、分からない事態でした。


    - No.8128 -   [コメント元:8125]     [リストへもどる ]
pre

8127貴方の窓辺に世界時計を 投稿者:konno   2018/09/20(木) 22:49
   コメント数 1

ここ、タマ猫ハウスが移転して、新たに猫缶ワールド・・・じゃなくて、
タマ猫・ワールド・空間、というゴロの良いURLにリニューアルしてから
もう2周年になります。(^_^)

それを記念して、古の世界時計を特集しようと思います。
世界時計マクロといえば、めざら資源の軟体補完計画の中にあります。

WRLDTIME.DEF 0.3 「世界時計」v0.3 1991/11/09 00014 種市百器 
1991年にはもう登場していたのですね。

最新版はこれです。
WRLDTIME.DEF 0.7 世界時計 v0.7 1997/08/07 672 種市百器 
マクロ冒頭は
====WRLDTIME.DEF Ver0.7  by Momoki TANEICHI, Sep. 8, 1994
ファイル日付も1994/9/8になっています。
VTDOS環境でもそのまま動く、古の名作です。

そのまま動きますが、速すぎるので、スピード調整します。
マクロの71行目を、私のノートPCのVTDOS+CKWV環境の場合

	a=48,				;スピード調整(0:fast)
	↓
	a=6800,				;スピード調整(0:fast)

このくらいで、約1秒間隔で回ります。
数字キーでもスピード調整できるので、3〜6キーの当りがよろしいかと。
[ESC]キーでメニューが出て、"Night Zone"を選べば、昼夜を楽しめます。

80*25行版と80*30行版があるので、窓を合わせてもいいですが
VTXT画面でもそのまま動きます。
余白部分は昼夜の色に染まりますが、それもまた愛嬌ということで。


さて、色々な環境で、約1秒間隔で回るように動作させてみた結果です。

;------ 調整値 --------- 倍率 - CPU使用率 --- 使用メモリ- 環境 ---------
;	a=48,		;  1				OLD DOS
;	a=12000,	;250	29%〜33%	5.7M	VTDOS DESKTOP
;	a=7000,		;146	49%〜51%	5.7M	VTDOS
	a=6800,		;142	49%〜55%	8.5M	VTDOS+CKWV
;	a=2200,		; 46	49%〜51%	38.4M	MS-DOS Player
;	a=2100,		; 44	0.5%〜3.3%	8.2M	NP2
;	a=200,		;  4	0%〜0.9%	9.1M	NP2NT
;-----------------------------------------------------------------------

CPUコアが複数あるため、実質100%のフル稼働状態になっています。
調整値のバラツキは、各エミュレータのタイマーのタイミング等によると
思われます。

驚くべきは、NP2 の CPU使用率が非常に低いことです。
特に、NP2NT (NT系対応?)は、0%〜0.9%と、異常な低さですね。
この版は実際に動作が遅いので、486CPUエミュレーションの影響か?


なお、NP2やPC98系で動作させるときは、マクロの修正が必要です。

・98でアトラスが正常に表示されない場合は
  ;★新JIS罫線の表示
  の行を有効にして下さい。

とコメントがありますが、これだけでは世界地図が表示されません。
マクロ中に複数の Dg-, があるので、検索して全てコメントに
すればいいでしょう。
 
VTDOS窓で10P程度の小さいフォントで80*30窓を作って常時表示させれば
ちょっとした窓辺のアクセサリーになります。
CPU2コア程度だと実用にならないので、その時はNP2がいいですね。(^_^)

こんな素晴らしいマクロを公開してくれた種市百器様に感謝です。


    - No.8127 -             [リストへもどる ]
pre

8126Re^4: ちょっと急いで 投稿者:文太   2018/09/20(木) 22:35
  8121 番 としき さんへのコメント

 ありがとうございます。呼び出したみたいで。
 でも、どんぴしゃの回答でした。質問あるいは問題は、「高橋版以降、5本目
のFキーラベル(ファイラ用)が使えるのですが、どう使いましょう?」でした。

 なるほど、編集画面とファイラと同じキーアサインのものを、vz[fl].def  で
分岐させて、2種類のマクロを使えば、ファイラでのFキーラベルが、意味を持つ
というわけですね。

>ファイラー用マクロって、VZFL.DEFに入っているものの事でしょうか。

 これはどっちでも。ファイラで使われるマクロという意味です。釈迦説ですが
(要らない情報、忘れたい情報)、vzfl.defはふつうインクルードされてvz.def
の後ろに来るので、vzfl.def のほうが後優先で呼ばれることになりそうですね。
キーがバッティングしてなければ、そのマクロだって、vz.defに入っていても
問題ないと思いますよ。

8 [F04] "" >?{ #Y .. * }. *
	lf~, #V (fv==5)?#V

 機能は一目瞭然です。ただ、この米米が。でも、ピリオドが }の外に出てい
る意味は分からない。そのほうが安全なのかなぁ? この形、前にも見たことある…。
 *はコメント機能です。1つ目の*に飛ぶと、次の*まで読み飛ばすというか、
飛ぶ。うまいことやってます。ラベルが1つ省略できるというのがメリット。

>もはや忘却のかなたですが、全天候型、とかいうやつでしょうかね。

 正確に言うと、「全天候」ではないです。編集モードとファイラモードの2つ
の場面でのみ別々に機能する。他では何もしない。「.」がその意味。

tomo, 94/10/9, <nifty:FGALPK/MES/13/1983>
89 ^\ "必ずコマンドライン"
        (s)>?{#E #m * #H #[ }>^ *

 こういうのが全天候。どのモードにいても機能するから。ここでは、どっから
でもコマンドラインモードに行くよ、ということ。が、またしても米米クラブ。
 4回ぐらい釈迦説したみたい。
 因みに、米米は榊原さんが発見したやり方です。使い方も開拓した。

 でも、ありがとうございます。おっきなヒントでした。おかげさまで、Fキー
ラベルが5行に戻りました。さて、何を入れる?
 入れたいマクロが2つしかないぞ。ファイラのマクロって難しいんですよねぇ。
exmenuから外すか? あんまり意味ないなぁ。いくらか、マクロバッファの節約、
になりそうもないけどなぁ。
 キーアサ忘却病が進行していてですね、見て分かるものは、どんどん活用しよ
うよ、という感じなの。甘やかすと、脳がますます働かなくなる、というジレンマ
はあるのですが。

    - No.8126 -   [コメント元:8121]     [リストへもどる ]
pre

8125Re^5: Fキー見直し活用 投稿者:konno   2018/09/20(木) 21:09
  8124 番 文太 さんへのコメント    コメント数 2

>  そのとき、^QEとか、Fn+↑ とかがすごく億劫なんですよ。Fキーは遠い
> のですが、まだまし、と、それらカーソル移動やページ送りのコマンドを
> F05-F12に割り当ててしまうのです。

なるほど、私も検索で、^QR とか特定のキーをよく使うので考えてみます。
F10〜F12 はほとんど使っていないので、それらを裏に回してみようかな。
記号出力系などはメニューを出して一覧できた方がいいですね。
色々カスタマイズしたくなりました。

>  としきさんが、ファイラキーラベルの正しい使い方を教えてくれました!
>  1マス・5バイトから4バイトへ変更! ひぇぇぇ。

何でしょう? うちは5バイトにしてます。
もしかしてPC98とかオアポケ3がらみとか?

    - No.8125 -   [コメント元:8124]     [リストへもどる ]
soft

8124Re^4: ちょっと急いで 投稿者:文太   2018/09/20(木) 02:31
  8123 番 konno さんへのコメント    コメント数 2

>なるほど、私もキー一発でやりたいことはいくつかありますが、手間と
>必要性を天秤に掛けると、メンドウサが勝ってしまいますね。

 ここだけ、簡単に。
 僕はノートを、けっこう使います。DOSだったり、MEだったりしますが。
Win7のいちおうのメインマシン(デスクトップ)は、ね?!
 そのとき、^QEとか、Fn+↑ とかがすごく億劫なんですよ。Fキーは遠い
のですが、まだまし、と、それらカーソル移動やページ送りのコマンドを
F05-F12に割り当ててしまうのです。
 でも、そういうふざけたモードのときは、紙に機能を書いてFキーの上
に貼ったりしませんから、げ、間違えた、を連発してしまうのです。

 検索しまくりのときは、^QFさえ(僕は^Fです)億劫で、F12にシフト
します。病気っぽい気するし、賢くない? という気もしています。
 ワンキーは楽ですよ。ホームポジションから外れますが、まあ、そう
いうときは、まったりやってますから、いいんです。

 としきさんが、ファイラキーラベルの正しい使い方を教えてくれました!
 1マス・5バイトから4バイトへ変更! ひぇぇぇ。

    - No.8124 -   [コメント元:8123]     [リストへもどる ]
soft

8123Re^3: ちょっと急いで 投稿者:konno   2018/09/20(木) 00:51
  8120 番 文太 さんへのコメント    コメント数 1

> >ファンクションキーを書き換えるマクロは他の人もやっていたと思いますが
>  はい、mikomeさんとか、他にも。ただ、僕の必要と違ったんですね。
>  ワーク暗黒時代のことでした。mikomeさん、すごく面白がってました。
>  ねこさんは途中で挫折して、NEC98用の(たぶん)fkey.exeかなんかに頼って
> ました。

そういえば、私もその辺の過去ログを読んで試したことがあります。
結局その時は使えなかったような。
今はワーク情報があって、簡単安全に出来るようになりましたね。
過去ログは先人の知恵の結晶ですね。もう感謝感謝です。

>  ちょっと前に書きましたけど、2ストロークキーさえ面倒、Fキー一発にしたい、
> そんな小マクロが8つあったりするのです。それらを駆使しないと仕事が進まない。
> そんな場面です。

なるほど、私もキー一発でやりたいことはいくつかありますが、手間と
必要性を天秤に掛けると、メンドウサが勝ってしまいますね。

>  そんな使い捨てマクロを8つ(たとえば)、連打しまくる、そんな方法しかない場合、
> Fキーに割り当てる。でも、どれがどれだったか分からなくなるから、サクっと、
> Fキーラベルを書き換えたいな、と。
>  そのとき、もともとアサインされていた常用マクロは、後マクロ優先で、眠ってて
> くれるわけです。

いいですね、私も使ってみたくなってきました。
何か思いついたらその時は、参考にさせてもらいます。

>  ところで、ファイラーのFキーラベル、有用な使い方ってありますか?
>  僕には思いつけなくて、封印しています。
>  (これやばいかもしれないけど)としきさんは、大昔、編集場面とのキー共通を恐れずに、
> ファイラー用マクロを、どうやらFキーに割り当てていたそうです。試しにやってみた
> だけかもしれませんが。

私もファイラーのFキーは仕込んであります。でも全然使って無いなぁ。

>  知っていると思いますが、ファイラー用ファンクラベルは、wanamaさんのリクエストで、
> 高橋さんが入れました。情報を見せられる余地が余計にあるというのは、悪くないことなの
> でしょうけれど、僕には今のところ使い道が、、、。

ええ、この逸話は過去ログにしっかり残ってますから。
それでファイラー用ファンクラベルも拡張できたわけですが、使い道がいまいち
無いですねぇ。

    - No.8123 -   [コメント元:8120]     [リストへもどる ]
soft

8122Re^5: 盲点ではなく横転 投稿者:konno   2018/09/20(木) 00:09
  8119 番 としき さんへのコメント    コメント数 1

> 数日前。
> 草むらに放置されていたバッテリーをゲットしました。

うーむ、まだ生きているバッテリが遺棄されていたら危険なことになって
いたかもしれないので、危険を未然に防いだことにもなるでしょうか。

> ざっと水洗いしてよくふき取り、電圧を測ったら13.5V。
> 死んでるセルはない模様。ラッキー。

電圧は正常でも負荷をかけるとストンと落ちることがありますよね。
以前、出先で車のバッテリーが突然あがってエンジンが掛からなくなり
焦ったことがあります。
その時は幸い近くに車の修理工場があって、助けてもらいました。
車やバイクのバッテリーは早めに替えた方が安心ですね。

    - No.8122 -   [コメント元:8119]     [リストへもどる ]
soft

8121Re^3: ちょっと急いで 投稿者:としき   2018/09/19(水) 02:08
参照先:http://toshiki.la.coocan.jp/
  8120 番 文太 さんへのコメント    コメント数 1

>  (これやばいかもしれないけど)としきさんは、大昔、編集場面とのキー共通を恐れずに、
> ファイラー用マクロを、どうやらFキーに割り当てていたそうです。試しにやってみた
> だけかもしれませんが。

ファイラー用マクロって、VZFL.DEFに入っているものの事でしょうか。
そういう意味であれば、今でも3つくらい、ファンクションキーにアサインされています。
ただ、[F02] と [F03] は #if 98 でくくられているので、実質的には #if tVZ で
くくられている [F04] のみですね。
ちなみに、こんな感じ。

#if tVZ
8 [F04] "" >?{ #Y .. * }. *		;
	lf~, #V (fv==5)?#V
#endif

もはや忘却のかなたですが、全天候型、とかいうやつでしょうかね。
[F02] と [F03] も、最初の条件分岐は似たような形になっていますから。

    - No.8121 -   [コメント元:8120]     [リストへもどる ]
pre

8120Re^2: ちょっと急いで 投稿者:文太   2018/09/19(水) 00:57
  8118 番 konno さんへのコメント    コメント数 2

>私の環境はまさにこうなっているので、試した後はVTDOS再起動しました。
 ああ、よかった。怒、怒、怒 とかなってたら、タイヘン、でした。m(__)m

>>  他人のマクロを読んでから動かす人は、めったにいないとも思いますので。
>まさにそのとおりで、私はとにかくすぐに動かしてみる派なんですよね。
 ですよね。最初にもさらりとは書いたつもりだったのですが、、、。m(__)m
 お手数をお掛けしました。

>事前に危険性を書いてもらえるのはありがたいですね。
 事前であったらよかったのですが、、、。m(__)m

>>  2、3日中ぐらいに、環境一致を容易にするマクロを書きます。誰も要らないで
>> しょうけどね。これも自分のためなんですよね、すいません。m(__)m
 これはもう上げないことにしました。
 真面目に色んな環境を考えたら、たまらん、ということに気づきました。
 すげえ、つまんないマクロだし。そして、ちゃんと動かすの大変。
 はい、古いデモ・ヴァージョンで試し、すぐさま再起動していただき、本当に
ありがとうございました。

>ファンクションキーを書き換えるマクロは他の人もやっていたと思いますが
 はい、mikomeさんとか、他にも。ただ、僕の必要と違ったんですね。
 ワーク暗黒時代のことでした。mikomeさん、すごく面白がってました。
 ねこさんは途中で挫折して、NEC98用の(たぶん)fkey.exeかなんかに頼って
ました。

>そういう必要と言うか、場面が思い浮かびません。
 ちょっと前に書きましたけど、2ストロークキーさえ面倒、Fキー一発にしたい、
そんな小マクロが8つあったりするのです。それらを駆使しないと仕事が進まない。
そんな場面です。
 僕には、たとえば、e-textを作る場面とかがそうです。たとえば明日、というか今日。

 そんな使い捨てマクロを8つ(たとえば)、連打しまくる、そんな方法しかない場合、
Fキーに割り当てる。でも、どれがどれだったか分からなくなるから、サクっと、
Fキーラベルを書き換えたいな、と。
 そのとき、もともとアサインされていた常用マクロは、後マクロ優先で、眠ってて
くれるわけです。

 ないでしょうね、こんな需要も場面。

 funkie.defのときも、ちょっと触れてました。そんな繋がりでこちらに上げました
(funkieはラベルを消す、これはラベルを書き換える。そんな繋がり)。ちょっと
個人的環境に依存しすぎるマクロなので、これは、この辺で打ち止めにしておきますね。
 あのキーワード2つで、簡単に書き換えられるよ、というだけのお話でした。

 ところで、ファイラーのFキーラベル、有用な使い方ってありますか?
 僕には思いつけなくて、封印しています。
 (これやばいかもしれないけど)としきさんは、大昔、編集場面とのキー共通を恐れずに、
ファイラー用マクロを、どうやらFキーに割り当てていたそうです。試しにやってみた
だけかもしれませんが。
 知っていると思いますが、ファイラー用ファンクラベルは、wanamaさんのリクエストで、
高橋さんが入れました。情報を見せられる余地が余計にあるというのは、悪くないことなの
でしょうけれど、僕には今のところ使い道が、、、。


    - No.8120 -   [コメント元:8118]     [リストへもどる ]
pre

8119Re^4: 盲点ではなく横転 投稿者:としき   2018/09/18(火) 23:12
参照先:http://toshiki.la.coocan.jp/
  8101 番 としき さんへのコメント    コメント数 1

とりあえず、自分のところにつけてみます。

> そのバッテリー。
> 先にも書きましたが、古くなった自動車用をそのまま再使用、というのが手間が
> なくて楽です。でも、もしかしたらとんでもなくコストパフォーマンスよく入手

数日前。
草むらに放置されていたバッテリーをゲットしました。
55B24。古河製。
場所は市内某所、自宅から車で約10分ほどの某街道沿い、駐車場の隅あたり。
街道からは塀で影になっている場所。
大体、2回くらい雨に当たった程度に汚れていた。
夜陰に乗じてその駐車場に乗り付けて確保。
ざっと水洗いしてよくふき取り、電圧を測ったら13.5V。
死んでるセルはない模様。ラッキー。
横倒しになっていたので、いささか不安だったのですが、動けば正義。
もちろん、爆発したら自己責任。ただし、その確率は非常に低いと踏んでいます。
当然ながら、定格どおりの容量なんて出ないでしょう。それでも10〜20AHくらい
はあるのではないかなぁ。とりあえず、コストあたりの容量で言えばほぼ無限大。
なにせ、分母はゼロですから。

    - No.8119 -   [コメント元:8101]     [リストへもどる ]
soft

8118Re: ちょっと急いで 投稿者:konno   2018/09/18(火) 20:49
  8116 番 文太 さんへのコメント    コメント数 1

> === fkylabel.def (v.1.01) ===

試してみました。書き換わりますね。ばっちりです。

>  検証不足、研究不足ですが、Fキーラベルのあたりは、Vz起動時に、
> 「さすがVz」と言いたくなるほど、ケチくさく最適化されていると思います。
> なので、自分の環境とそのマクロを完全に一致させないと、キーラベル以降に入っ
> ている「内部マクロバッファ」(vz.defじゃん)を壊すと思う。

私の環境はまさにこうなっているので、試した後はVTDOS再起動しました。

>  というわけで、「しゃーない、文太のために動かしてやる?」という親切心に
> 仇でお返しすることになっちゃやばいと、すぐこれを書きました。
>  他人のマクロを読んでから動かす人は、めったにいないとも思いますので。

まさにそのとおりで、私はとにかくすぐに動かしてみる派なんですよね。
事前に危険性を書いてもらえるのはありがたいですね。

>  2、3日中ぐらいに、環境一致を容易にするマクロを書きます。誰も要らないで
> しょうけどね。これも自分のためなんですよね、すいません。m(__)m

ファンクションキーを書き換えるマクロは他の人もやっていたと思いますが
そういう必要と言うか、場面が思い浮かびません。
例えるなら、多段メニューマクロ的な使い方でしょうか。


    - No.8118 -   [コメント元:8116]     [リストへもどる ]
soft

8117fkylabel.def (v.1.50) 投稿者:文太   2018/09/18(火) 20:34
  8116 番 文太 さんへのコメント

 はいいい、安全になりました。でも、たぶん、皆さまのところでは動かなく
なりました。
 カスタマイズのポイントは、vz.defのFキーラベルのところと、マクロ内の
ダミーラベル(?)を、バイトワイズに(バイト的に)、完全に同じにすること
です。
 僕は、もう全部1マス5バイトにしてしまったので、下のと同一バイトなわけ
です。
 見れば分かるとおり、全体長と12個のラベルで構成される1行を(後者は4回)
チェックしています。

 戻すほうはですね、たぶん、現実的には戻れないと思います。仕様的にそれで
いいよ、と思ってます。だって、例によって、マクロバッファからこのマクロが
消えたら、自前に保存しても、もう取り返せないわけで。
 というわけで、運がよければ取り戻せるよ、とか、この生意気マクロは申します。
(注)

 前のは、なんとプッシュしたまま終わっておりましたぁ。ああああ。すいません。

 こうサクサクいったときはバグがあるのでしょう。バグ発見にご協力いただけ
れば、これ幸いです。

(注)皆さん、これにあまり愚痴とかこぼしませんね。ずっと30年近くにわたり、
という意味で。どうしてもデータ保存したけりゃ、ファイルに書き出せ、という
ことなのでしょうけど、誰も不満を口にしたことがないような気がする。当たり前
すぎて愚痴るほうが馬鹿げてる? 僕は不満たらたらなんですが。
 なんか、やっぱりsyoさんは偉い、とかよく思います。1kbuf.comをどんどん使い
たくなる。でも、複雑すぎるんだよねぇ、手続きが。EMSよりも確実。だって、
マクロの中だと、ハンドルの情報も消えちゃうわけで。
 ま、Vzの俊敏さ快速さ小ささetcとの、トレードオフなんですよね。
 データ書き出し処理も含め、瞬時に仕事を終える、これがVzマクロの宿命。
仕事はやり遂げたのだから、いつあっち世界へ行ってもいい、、、。
 でなけりゃ、モードかなんかにして、ずっとその中にいろ、あるいはインクルード。
ふぅ。


=== fkylabel.def (v.1.50) ===
#if 0
 ^^ write in new labels,  ^\ write (get) back the original labels
				if you are lucky!
#endif

* M
50 ^^ "fkeyin"

	f=pq..100,			;func key label ptr
					; <f>
	;--- get buffer for org data
	&00 a=r,			;<a> new labels
	&01 b=r,			;<b> for org data (jimae)

	;--- check org label & new label (length overall)
	di=f, cx=295,			;org label length
	&08				;srch '0ffh'
	pr.0=di-f,			;<o> len overall of org labels
	b..150=o=di-f,			;save <o> in jimae buffer's tail
					;little out the way
	di=a, cx=295,
	&08				;new label length
	pa.0=di-a,

	;--- compare them
	(pr.0==pa.0)?? { &m("lengths overall of 2 labels do NOT match!") .}


	;--- check each line (4 lines in all)
	;--> in pr.0-3, pa.0-3, data will be stored
	 				;<fy> 0: new labels, 1: org l
	p=a, fy-, &10			;new
	p=f, fy+, &10			;org (to be saved & restored)


	;--- buffer check: Is 4 new func line length same as org?
	i-,
	(4) {(pr.i==pa.i)?? >z, i++, }

	;--- save org 4 label lines	;<f> fkey label ptr
	&Sm(b,f,o)			;<o> len of org
					;<b> jimae
	;--- now exec!  Rewrite func lines ---
	&Sm(f,a,o) pn.4-, .		;<a> new items
					; pn.4, fkeymode

:z	&m("4 lines one set. Difference!") .


51 ^\ "fkeyback"

	f=pq..100,			;func key label ptr
	&01 b=r,
	o=b..150,
	(o==0)?? { &Sm(f,b,o) pn.4-, &m("lucky?") . }

	&m("Coffee break! Fkeyin gone once, so restart Vz to get THEM back!") .



	;* ===== * =====   LOCAL MACROS (& data & buffer)   ===== * ===== * 


08:	&i("$(B0,FF,F2,AE,C3)")		;length to 'ffh'

10:	;--- measure the lengths of each label line & save them 
	;<-- di (ofs) (p), cx (max srch length)	;in <pa> <pr>
	;--> di (ofs), l (length)

	i-,
  :a	(i==4)? .
	di=p, cx=74, 			;74, when cx==73, 
	&i("$(B0,0D,F2,AE,C3)")		; '0dh' is supposed to be found
	(fy)? pa.i=di-p, ? pr.i=di-p,	;length to '0dh'
	p+=(di-p),
	i++, >a


00:	(3+$)."$	;N,S,C,A
	[Nml]$(0)[F02]$(0)[F03]$(0)[F04]$(0)[F05]$(0)[F06]$(0)$
	[F07]$(0)[F08]$(0)[F09]$(0)[F10]$(0)[F11]$(0)[F12]$(0)$
	$(d)$
	[Sft]$(0)[F02]$(0)[F03]$(0)[F04]$(0)[F05]$(0)[F06]$(0)$
	[F07]$(0)[F08]$(0)[F09]$(0)[F10]$(0)[F11]$(0)[F12]$(0)$
	$(d)$
	[Ctl]$(0)[f02]$(0)[f03]$(0)[f04]$(0)[f05]$(0)[f06]$(0)$
	[f07]$(0)[f08]$(0)[f09]$(0)[f10]$(0)[f11]$(0)[f12]$(0)$
	$(d)$
	[Alt]$(0)[f02]$(0)[f03]$(0)[f04]$(0)[f05]$(0)[f06]$(0)$
	[f07]$(0)[f08]$(0)[f09]$(0)[f10]$(0)[f11]$(0)[f12]$(0)$
	$(0D,FF)"

01:    (3+$)."$[304]

*

--- len of label line, each (0dh) & overall (0ffh) ---
	mov	al,0dh (0ffh)
repne	scasb
	ret
------------------------------------------------------

    - No.8117 -   [コメント元:8116]     [リストへもどる ]
pre

8116ちょっと急いで 投稿者:文太   2018/09/18(火) 15:01
  8115 番 文太 さんへのコメント    コメント数 2

 さらりと書いておきます。
 このマクロはこのままで、エラーチェックをクリアして動いてしまうはずです。
 ただ、それは、01のほうが、僕のvz.def
* F ファンクションキー表示
 と同一になっているからで、00とも合致しているからです。僕のところでは、
事故は起こらない。(そういう風に設計されています)。
 皆さまのところでも、所期の目的は達せられるでしょう。あくまでデモとして。
「あ、書き変わった」「あ、戻った、けど、これ文太のラベルじゃねーか」と。
ただ、不要にVz作業を続行しないでください。不要も何も、続行しちゃダメです。
きっと、Vzのお腹の中を壊していますから。
 ファイラの表示が乱れるどころでなく、ほんとに。
 検証不足、研究不足ですが、Fキーラベルのあたりは、Vz起動時に、
「さすがVz」と言いたくなるほど、ケチくさく最適化されていると思います。
なので、自分の環境とそのマクロを完全に一致させないと、キーラベル以降に入っ
ている「内部マクロバッファ」(vz.defじゃん)を壊すと思う。
see
http://mezala.la.coocan.jp/vz/workshop/mtool.html#csegmap

 というわけで、「しゃーない、文太のために動かしてやる?」という親切心に
仇でお返しすることになっちゃやばいと、すぐこれを書きました。
 他人のマクロを読んでから動かす人は、めったにいないとも思いますので。

 読みきって、自分の環境と合わせられる人は、どうぞ。
 2、3日中ぐらいに、環境一致を容易にするマクロを書きます。誰も要らないで
しょうけどね。これも自分のためなんですよね、すいません。m(__)m


    - No.8116 -   [コメント元:8115]     [リストへもどる ]
pre

8115fkylabel.def (v.1.01) 投稿者:文太   2018/09/18(火) 02:37
  8114 番 文太 さんへのコメント    コメント数 1

 動くと思います。少しましでしょうか。
 面倒くさい方は、こちらでお試しください。

=== fkylabel.def (v.1.01) ===
* M
50 ^^ "fkeyin"

	i-, fy-,			;<fy> 0: new, 1: old (org)
	&00 p=a=r,      &10 i-,		;new
	&01 p=b=r, fy+, &10		;old (back)

;	--- buffer check: Is 4 new func labels' length same as old?
	i-,
	(4) {(pr.i==pa.i)?? >z, i++, }

	n=a, >05

:z	&m("error") .

51 ^\ "fkeyout"
	n=b, >05

05 ""	pq..100[=n, pn.4-, . 		;pq..100, fkeytbl
					;pn.4, fkeymode

10:
  :a	(i==4)? .
	cx=74, di=p,	;74, when cx==73, '0dh' is supposed to be found
	&i("$(B0,0D,F2,AE,C3)")		;length to '0dh' or find '0dh'
	l=di-p,
	(fy)? pa.i=l, ? pr.i=l,
	p+=l,
	i++, >a


00:	(3+$)."$	;N,S,C,A
	[Nml]$(0)[F02]$(0)[F03]$(0)[F04]$(0)[F05]$(0)[F06]$(0)$
	[F07]$(0)[F08]$(0)[F09]$(0)[F10]$(0)[F11]$(0)[F12]$(0)$
	$(d)$
	[Sft]$(0)[F02]$(0)[F03]$(0)[F04]$(0)[F05]$(0)[F06]$(0)$
	[F07]$(0)[F08]$(0)[F09]$(0)[F10]$(0)[F11]$(0)[F12]$(0)$
	$(d)$
	[Ctl]$(0)[f02]$(0)[f03]$(0)[f04]$(0)[f05]$(0)[f06]$(0)$
	[f07]$(0)[f08]$(0)[f09]$(0)[f10]$(0)[f11]$(0)[f12]$(0)$
	$(d)$
	[Alt]$(0)[f02]$(0)[f03]$(0)[f04]$(0)[f05]$(0)[f06]$(0)$
	[f07]$(0)[f08]$(0)[f09]$(0)[f10]$(0)[f11]$(0)[f12]$(0)$
	$(0D,FF)"

01:    (3+$)."$
	ファイル $(0)窓換 $(0)文換 $(0)窓割 $(0)改行 $(0)   $(0)$
	   $(0) タグ $(0)   $(0)   $(0)   $(0)   $(0)$
	$(d)$
	   $(0)   $(0)比較 $(0)窓動 $(0)複写 $(0)英熟 $(0)$
	複写2$(0)D_SPC$(0)ペースト$(0)KMAC $(0)RBLK $(0)STKHP$(0)$
	$(d)$
	bmama$(0)^222 $(0)^333 $(0)^444 $(0)^555 $(0)^666 $(0)$
	^777 $(0)^888 $(0)^999 $(0)^000 $(0)isrch$(0)STKHP$(0)$
	$(d)$
	Hyo  $(0)Kei  $(0)     $(0) cp  $(0)It!M $(0)It!J $(0)$
	FOPN $(0)     $(0)PROJT$(0)@000 $(0)@Csr $(0)T_AWK$(0)$
	$(0D,FF)"

*

    - No.8115 -   [コメント元:8114]     [リストへもどる ]
pre

8114Re: fkylabel.def (v.1.00) 投稿者:文太   2018/09/18(火) 02:10
  8113 番 文太 さんへのコメント    コメント数 1

0,4	+4
1,5
2,6
3,7

	;--- もともとの設計が間違っている、たぶん
	;--- こんなの、ぜんぜん読みやすくない
	m-,
	(4) { (pr.m==pr.(m+4))?? >z m++,}

	;--- まだ、こっちがまし。
	(pr.0==pr.4)?? >z
	(pr.1==pr.5)?? >z
	(pr.2==pr.6)?? >z
	(pr.3==pr.7)?? >z

 誰か、教えてください。
 8個だから、ビット演算! << ダメです。どうか、他の方法を。


    - No.8114 -   [コメント元:8113]     [リストへもどる ]
pre

8113fkylabel.def (v.1.00) 投稿者:文太   2018/09/18(火) 01:36
   コメント数 1

 ふう、で、できました。これは、どうしてだか、疲れていたのだか、時間、かかりました。
 で、で、で、できました。
 ファンクションキーラベルの書き換えマクロです。
 僕は、うおおお、と機械になって働かなくてはならないとき、ファンクションキーを多用
します。使い捨てマクロを量産して、使いまくって作業します。
 ノートでも、Fnキーとか押したくないので、すぐFキーに逃げます。

 で、すぐ、どのFキーが、どの機能だか分からなくなる。いえ、本当は、紙に書いて、
Fキーのすぐ上に軽く貼ってました。
 それで、いつか、Fキーラベルの書き換えをやってやろうと思っていたのです。
 まだ、プロトタイプですが、できたようです。

 たぶん、守らなければいけなりルールは(少なくともここでは)、ラベルの文字長は、
1キー=5バイトに統一すること。空白もちゃんと埋めること。全半スペースで。
 このマクロバッファ(たぶん)の無駄遣いがないと、このやり方ではいけません。
"""""""""" etc みたいにして、ファンクキーラベル表示無効にしていると、マクロ
バッファがお得になるみたいですが(ほんと?)、こういうのには、まったく対応して
いません。
 ぜんぜんインテリジェントではない、ということです。でも、これが欲しかった。

 しかしねぇ、このprを使っての、確認、もう少しなんとかならないものでしょうか?
 buffer (key label buffer) check のところ、なんとかならないのでしょうか?
 何か思いつかれましたら、アドバイス頂ければ幸いです。
 4バイトずつを、照合してるだけなんですけどね。

 01: のラベルは、ただいま整理中の僕のものです。デモとしては使えると思います。
 「なんだよ! 怒」となったら、すいません、vz の再起動をお願いします。

 震災対策報告は、そのうちです。ついに、太陽光パネル(50W)が届きました。
 新品バッテリー各種も届きました。システム完成まで、地震が来ないことをひたすら
祈っています。


=== fkylabel.def (v.1.00) ===
* M
50 ^^ "fkeyin"

	i=c-,
	&00 di=p=b=r, &10 i-,
	&01 di=p=a=r, &10

;	--- buffer check: is 4 org func label length same as new?
	(pr.0==pr.4)?? >z
	(pr.1==pr.5)?? >z
	(pr.2==pr.6)?? >z
	(pr.3==pr.7)?? >z

	n=b, >05

:z	&m("error") .

51 ^\ "fkeyout"
	n=a, >05

05 ""	pq..100[=n, pn.4-, . 		;pq..100, fkeytbl
					;pn.4, fkeymode

10:
  :a	(i==4)? .
	cx=75, di=p,
	&i("$(B0,0D,F2,AE,C3)")		;length to '0dh'
	l=di-p,				;or find '0dh'
	pr.c=l,
	p+=l,
	i++, c++, >a


00:	(3+$)."$	;N,S,C,A
	[Nml]$(0)[F02]$(0)[F03]$(0)[F04]$(0)[F05]$(0)[F06]$(0)$
	[F07]$(0)[F08]$(0)[F09]$(0)[F10]$(0)[F11]$(0)[F12]$(0)$
	$(d)$
	[Sft]$(0)[F02]$(0)[F03]$(0)[F04]$(0)[F05]$(0)[F06]$(0)$
	[F07]$(0)[F08]$(0)[F09]$(0)[F10]$(0)[F11]$(0)[F12]$(0)$
	$(d)$
	[Ctl]$(0)[f02]$(0)[f03]$(0)[f04]$(0)[f05]$(0)[f06]$(0)$
	[f07]$(0)[f08]$(0)[f09]$(0)[f10]$(0)[f11]$(0)[f12]$(0)$
	$(d)$
	[Alt]$(0)[f02]$(0)[f03]$(0)[f04]$(0)[f05]$(0)[f06]$(0)$
	[f07]$(0)[f08]$(0)[f09]$(0)[f10]$(0)[f11]$(0)[f12]$(0)$
	$(0D,FF)"

01:    (3+$)."$
	ファイル $(0)窓換 $(0)文換 $(0)窓割 $(0)改行 $(0)   $(0)$
	   $(0) タグ $(0)   $(0)   $(0)   $(0)   $(0)$
	$(d)$
	   $(0)   $(0)比較 $(0)窓動 $(0)複写 $(0)英熟 $(0)$
	複写2$(0)D_SPC$(0)ペースト$(0)KMAC $(0)RBLK $(0)STKHP$(0)$
	$(d)$
	bmama$(0)^222 $(0)^333 $(0)^444 $(0)^555 $(0)^666 $(0)$
	^777 $(0)^888 $(0)^999 $(0)^000 $(0)isrch$(0)STKHP$(0)$
	$(d)$
	Hyo  $(0)Kei  $(0)     $(0) cp  $(0)It!M $(0)It!J $(0)$
	FOPN $(0)     $(0)PROJT$(0)@000 $(0)@Csr $(0)T_AWK$(0)$
	$(0D,FF)"

*
	mov	al,0dh
repne	scasb
	ret


    - No.8113 -             [リストへもどる ]
pre

8112Re^8: 散歩もいいですね(^^; 投稿者:konno   2018/09/14(金) 21:15
  8110 番 としき さんへのコメント

> でも、目的によっては、バイクとか自転車では不向きなこともあるはず。
> 例えば、避難経路の確認、とかね。
> あるいは、夜間の危険箇所をチェックしたい、なんてことだと、昼間では意味が
> ないと思う。

なるほど、盲点は沢山あるものですね。
うちの周りは昼間見ても街灯がないところが多いので、夜は真っ暗な所が
多いと思われます。
懐中電灯はいつでもどこでも持ち出せるようにしておかないとですね。

余談ですが、以前裏通りを歩いていたら、こんなところに居酒屋がある。
ということがありました。
地元の人が常連になっているからやっていけてるんでしょうけど、裏路地の
何も無い所に店を出すのは勇気がいるだろうなとは思いました。
腕に自信がないと出店しようとか思わないですよね。

    - No.8112 -   [コメント元:8110]     [リストへもどる ]
soft

8111Re^8: 散歩もいいですね(^^; 投稿者:konno   2018/09/14(金) 21:03
  8109 番 10♯ さんへのコメント

> 身体を動かす事って多分年取れば取るほど面倒くさくなってきて絶対やらなくなるので、
> もし、思うとこががあるならすぐやったほうがいいと思いますよ。

そ、そうですね。(^^;
私はセカンドライフのテーマの一つに健康を考えています。
健康維持の方法として散歩は手軽にできる全身運動だと思いますので。
まずは、散歩をやるぞ、という決意を表明するところから始めようかと。

よ〜し、散歩やるぞ、散歩やるぞ、散歩やるzzz


    - No.8111 -   [コメント元:8109]     [リストへもどる ]
soft