・打ち上げ花火マクロ v0.2 です。 PC98 または DOSV で動きます。
・起動すると一時ファイルを開いてその中で打ち上げ花火が上がります。
・[ESC] 又は 'Q' で終了します。

 VZマクロの部屋に置きました。下のリンクからもダウンロードできます。

 #txt:hanabi.def   v0.2  25-09-01

v0.2  2025-09-01  色反転修正 その他もろもろ。
v0.1  2025-08-30  キャラ色反転でとりあえず形は出来た。

　これを入れましょう！　Emmettさんです。
　さくっとこれが出せる、おいらもすごいぜ（汗笑）、くくくく。

        &Sm(pq..149,pc+292,46)          ;push all double user vars
        &Sm(pc+292,pq..149,46)          ;pop all double user vars

　待てよ、これ、どこに退避させてるんだ？　pq..149?

   EADC +---------------+  pq..149
        |tmpbuf4 256byte|  256 バイトのテンポラリ領域（ラインバッファの直後）
        |               |  &z 等のマクロ組込時以外は比較的自由に使用できる
　これは、えむしさん作だと思う。

@pq..149 @pn..-26 @tmpbuf4 
内部ワークエリア
　pq..149, pn..-26   tmpbuf4
　  256 バイトのテンポラリ領域（ラインバッファの直後）
　  &z 等のマクロ組込時以外は比較的自由に使用できる

　これは、saki..さん、オリジナルでしょう。

　借り物ばっかり。

>         &Sm(pq..149,pc+292,46)          ;push all double user vars
>         &Sm(pc+292,pq..149,46)          ;pop all double user vars

こんな技があるんですか。ビックリ！　これで逆順にポップ出来るとは。

> 　待てよ、これ、どこに退避させてるんだ？　pq..149?
>         |tmpbuf4 256byte|  256 バイトのテンポラリ領域（ラインバッファの直後）
>         |               |  &z 等のマクロ組込時以外は比較的自由に使用できる

えーと、他のマクロでこの領域を使っていたらそれを破壊してしまいますよね。
普通にプッシュポップしたほうが安全なのかな。あるいは自前バッファ？


＃　借り物の力で領域展開すると自滅する。特級呪物にうかつに触れるのは危険。

konnoさん

>他のマクロでこの領域を使っていたらそれを破壊してしまいますよね。
　ですね。もっとも、そのtmpbuf4 の使い方のほうが邪悪なんじゃないのかなぁ。（★）

>普通にプッシュポップしたほうが安全なのかな。
　安全ですね。３つか４つ（☆）の変数なら、これが一番じゃないですかね。

>あるいは自前バッファ？
　はい、僕、最初こう思ったのですよ。
　hanabi.def のように、花火あげて！　お終い、というマクロなら、tmpbuf4でも
いいのかも。（★）の可能性としては、どうなんだろう、そっちがいけないよぉ、
と、考えております。

>＃借り物の力で領域展開すると自滅する。特級呪物にうかつに触れるのは危険。
　Ｖｚマクロに関しては、借り物ばっかりな人生かも。

　どうでもいいことですが、このＶｚで（＠ＶＴＤＯＳ）「メモリーが足りません」
エラーが出ました。なんと、このＶｚ、ＥＭＳを封印していた！
　しばらくそう意識して運用してみます。なくても、この程度なら、使えるのか？
　落ちないわけだ。


	aa[,bb[,cc[,dd[,		;bright
	jj[,xx[,yy[,ww[,
　してあるじゃん！

　（☆）関連。m(__)m
　さらにどうでもいいこと。いくつ２文字変数使ってる？　というのの
検索に、こんなのを使いました。検索文字列です。\x \([a-z]\)\1
　うん、機械を使ってる喜び。
　さらに余談：最初はもちろん、ko'nn'o がヒットしました。

> 　hanabi.def v0.2, 25-09-01　を動かしましたよ。
> 　お見事、お見事。かわいい。音はなかったけど（あは）。

お試しいただき嬉しいです。スクリーンセーバーみたいでいいでしょう。
音は何とかしたいのですが、ビープ音ではねぇ。

> 　スピードは１分間に４０発くらい。ときどき（３発に１発ぐらい）、
> たぶん要らない横線か横ボックスが花火の上（上部あるいは上方）に
> でますね。あれは意図的なものですか？

う、キャラ消しに全置換してるのでその窓がチラチラしてるのかも。
チカチカするのが派手で良いかと思ったけど、調整してみます。

> 　あと、２文字変数（aa, cc, dd など）は保護されてますかね？
> 　ぱっと見、されてないみたいだぞ（困んないけど）と思いましたが。

え？　大体保護していると思いますが、抜けがあるかもしれません。
確認してみます。

> 　[ESC]の反応が悪い気がしました。タイミングありますか？
> Ｑで終わりましたが。＠VTDOS

これはやりかたが悪いかもしれません。見直してみます。

> 　いえ、得意の合体技（パーツリサイクル）とはいえ、ほんと、すごい。
> 　Ｖｚマクロでこんなことができるんだ。

実をいうと paint.def で楕円を描くルーチンをコピペしたまではいいのですが
これから多重の円を描いて消してとか、どうすればいいかわからなくて暫く
挫折していました。 OTL
色付けも bright.def を思いついても全く理解が出来なくて。   o....TL
なので最初のVERは色反転のままなのです。(;_;)

> 　真剣に読むなら、どの部分をＶｚマクロが、どの部分がマシン語、という
> 区別くらい分かるようになりたい。

現在は色分けが６までなのでマシン語を読み解きたいと思っています。

> 　今日は、ほんとにインゲンの種まきをする。この暑いなか土をいじる。
> 熱中症に気をつけないと。

レスが続いていたのでどうやら無事だったようで。m(__)m

・打ち上げ花火マクロ v0.3 です。 PC98 または DOSV で動きます。
・起動すると一時ファイルを開いてその中で打ち上げ花火が上がります。
・[ESC] 又は 'Q' で終了します。

 VZマクロの部屋に置きました。下のリンクからもダウンロードできます。

 #txt:hanabi3.def   v0.3  25-09-03

v0.3  2025-09-03  窓チラチラ、[ESC]反応修正、ビープON。
v0.2  2025-09-01  色反転修正 その他もろもろ。
v0.1  2025-08-30  キャラ色反転でとりあえず形は出来た。

konnoさん

　うーん、僕の環境だと（僕のせい）、音が出ない。ベープを消してるのだっけ？
おれ？
　窓チラ、解消されてます。
　[ESC]は、何かタイミングがありそう。僕は何度か押すと止まるのですが。
　うーん、関係ないと思うけど、僕は、[ESC][ESC]が、

----- my vz.def -----
50 [ESC][ "QuikOpen"	&88	;[ESC][ESC]
---------------------
　となっています。もちろん、このマクロが起動したりはしませんけれど。

　ぜったい無理。でも、現実の花火大会では、数発同時連射して、ドン、ドン、ドン
と鳴ります。無理だと思うけど、Basicあたりで、よりリアルな hababi.basを。
　通じてると思いますけど、hanabi.defは、完全にシリアル（シークエンシャル）
です。１発目が爆発するまで２発目は出ない。１，２，３と打って、ドン、ドン、ドン
と来るのがリアルです。

　ご無理なさらずに。いつかの野望のために。
　おお、ついに待望の雨だ！　サトイモが喜ぶ。

konnoさん

=== Macrotmp by B ===;
* M
50 ^^ "Macrotmp"
&b(60)			;あれ？　鳴りますね。
*

--- from hanabi3.def -------
	(o==2)?{&b(2) &w(1)}	;やっぱあるよね
	(o==3)?{&b(1) &w(1)}
-----------------------------

　[ESC]の件ですが、たとえば上のテストをする。＾￥で、hanabi.def起動。
すると、[ESC]　１回では止まらない。２回か３回かで止まる。止まった後、
ふたたび、＾￥で起動。[ESC]　１回で止まる。以下、同。最初だけまずい
感じでした。

　＆ｋと＆ｐについて、少しだけ復習しました。
　mikomeさんの「モード型マクロの作法」、しっかりめざらさんの「軟体」
にありました。いやぁ、深い深い。

　じつは、#12463 で、「だってぇぇ、暑すぎなんだもん！」と書いたとき、
『エヴァ』かアスカが頭にありました。「軟体補完計画」って『エヴァ』がらみ
なの？　ＴＶシリーズ全２６話、久々にとおして見ちゃった。

　なかなかにシュールなリンク。

konnoさん、バラバラとすいません。

	&62						;bright
	(o==2)?{&b(10) &w(4)}
	(o==3)?{&b(6) &w(4)}
;	(o==2)?{&b(2) &w(1)}
;	(o==3)?{&b(1) &w(1)}
	&w(1)

　音を長くすればよかっただけのことでした。
　でも、臆面もなく、無礼極まりないまま、破廉恥にも、正直に感想を述べさせて
いただくと、これ、ショボイ！　あはははは。おほほほほ。
　Basicへ行こう！　Vzマクロ的には、音はないほうが良いと思います。
　スクリーンセイバーに音は要らない。

・打ち上げ花火マクロ v0.5 です。 PC98 または DOSV で動きます。
・起動すると一時ファイルを開いてその中で打ち上げ花火が上がります。
・[ESC] 又は 'Q' で終了します。

v0.5 2025-09-09 hh で調速、花火大小左右振分け、12行まで対応。
v0.4　 2025-09-06　花火が消える前に次の打ち上げ出来た。色反転等色々。
v0.31　2025-09-05　花火が消える時に色が抜けていたのを改善。
v0.3　 2025-09-03　窓チラチラ、[ESC]反応修正、ビープ音。
v0.2　 2025-09-01　色反転修正 その他もろもろ。
v0.1　 2025-08-30　キャラ色反転でとりあえず形は出来た。

#txt:hanabi5.def 　v0.5　連続打ち上げ版　 25-09-09


ウエイト変数 hh を変更して速度調整が出来ます。

ウエイト変数 hh と１分間当たりの打ち上げ回数（例）
hh     VTDOS    NP2   DOSVAXJ3  MsdosPlayer
------------------------------------------
0       53      57      61      35
1       34      50      37      32
2       30      38      35      27
3       26      34      30      24
4       20      28      24      20
5       20      25      24      19
10      12      15      14      12
20      8       9       8       8

推奨hh  1       2       1       0
１分間当たりの打ち上げ回数が 30〜40くらいが適切だとした場合

行数12行,桁数40桁まで対応しました。ポケットPCでもお楽しみください。(^_^)