NEWS
2025/5/4(日 ) N88-BASICで波の合成 (3回目)(異なる振幅) を公開しました 2025/5/1(木) VL,NL,XL-BASIC ver～28x2 を公開しました
投稿
N88-BASICで波の合成 (3回目)
202 5 / 5 / 1 ( 木 ) N88-BASICで 波の合成 ( 3 回目 ) 振幅が違う互いに逆進行 (wave) ■ 前提 https://ulprojectmail.blogspot.com/2025/04/wave-1.html 波の合成 ( 1 回目 ) より ▼ 2波の合成式 y 1 = Asina, a = 2πf 1 (x/v 1 - t) y 2 = Bsinb, b = 2πf 2 (x/v 2 - t) α= (a+b)/2 , β= ( a-b ) /2 , C = { (A-B) sinβ} / { (A+B) cosβ} D = √ { (A-B) 2 + 2 2 ABcos 2 β } … 包絡線 (envelope) y 1 + y 2 = Asin a + Bsin b = D sin ( α + Tan -1 C ) ■ 動作 f 1 = f 2 , v 1 = v, v 2 = -vとして互いに逆方向の進行波として モノクロ 16ページに少しずつ時間が違う波を書き ページ切り替えで動いている様に見せています N88-BASICにはATN2(y, x)がないので サブルーチンを作っています ATN2( (A-B) sinβ, (A+B) cosβ)を計算する VL,NL,XL-BASICとdlg～.zip( wav 00 2 .bas)は このブログ (以下のリンク)から ダウンロードできます https://ulprojectmail.blogspot.com Readme.txtを読んで遊んで下さい
メモ (9回目)
2025/4/28(月) ビッグエンディアンの利点 機械の都合に慣れた人の設計ではなく 一般人が思う使いやすい設計の利点 ビッグエンディアンの最大の利点は 人間が日常で使っている書き方に合っていて わざわざ機械の都合やそれに慣れた人に 合わせなくても良く 百二十を 021と書くより120と書いた方が分かりやすい という事です 機械の都合に合わせるのが日常になった人に合った設計は 人間の都合に合わせてほしい一般人からすると使いにくい 最近のコンピュータ関連の製品の設計が 一般人から見て使いにくいものが 多くなっていっている気がします これは一部の技術者 (またはそれ的な思考の人) と一般人の常識のずれが大きいという事が 原因だと最近実感しました リトルエンディアンは 数値はリトルエンディアンだが 文字列はビッグエンディアンで混乱しますが ビッグエンディアンは数値も文字列も ビッグエンディアンなので分かりやすい と思っています 日付は 月 -日-年や日-月-年 (リトルエンディアン) などの順では文字列としてソートすると 日付順に並びませんが 年 -月-日 (ビッグエンディアン) にすると日付順に並ぶので便利だと思っていましたが この表記順は国際規格 (日付の表記ISO 8601)だと 最近知りました ビッグエンディアンの利点は 文字列としてソート出来る事 ビッグエンディアン リトルエンディアン 年 月 日 日 月 年 2024.05.03 01.02.2025 2025.02.01 ...
N88-BASICで波の合成 (2回目)
202 5 / 4 / 24 (木 ) N88-BASICで 波の合成 ( 2 回目 ) 定常波 (standing wave) ■ 前提 https://ulprojectmail.blogspot.com/2025/04/wave-1.html 波の合成 ( 1 回目 ) より ▼ 2波の合成式 y 1 = Asina, a = 2πf 1 (x/v 1 - t) y 2 = Bsinb, b = 2πf 2 (x/v 2 - t) α= (a+b)/2 , β= ( a-b ) /2 , C = { (A-B) sinβ} / { (A+B) cosβ} D = √ { (A-B) 2 + 2 2 ABcos 2 β } … 包絡線 (envelope) y 1 + y 2 = Asin a + Bsin b = D sin ( α + Tan -1 C ) ■ 動作 A = B, f 1 = f 2 , v 1 = v, v 2 = -vとして互いに逆方向の進行波として モノクロ 16ページに少しずつ時間が違う波を書き ページ切り替えで動いている様に見せています N88-BASICにはATN2(y, x)がないので サブルーチンを作っています ATN2( (A-B) sinβ, (A+B) cosβ)を計算する VL,NL,XL-BASICとdlg～.zip( wav 00 2 .bas)は このブログ (以下のリンク)から ダウンロードできます https://ulprojectmail.blogspot.com Readme.txtを読んで遊んで下さい
波の合成 (3回目)
202 5 / 4 / 20 ( 日 ) 波の合成 ( 3 回目 ) 定常波 ( standing wave) ■ 進行方向が逆の 2波の合成 ▼ 2波の合成式 y 1 = Asina, a = 2πf 1 (x/v 1 - t) y 2 = Bsinb, b = 2πf 2 (x/v 2 - t) α= (a+b)/2 , β= ( a-b ) /2 , C = { (A-B) sinβ} / { (A+B) cosβ} D = √ { (A-B) 2 + 2 2 ABcos 2 β } … 包絡線 (envelope) y 1 + y 2 = Asin a + Bsin b = D sin ( α + Tan -1 C ) ▼ 2波の定義 v 1 = v, v 2 = -vと置いて a = 2πf 1 ( x/v - t) b = 2πf 2 (-x/v - t) … 逆進行(同位相) とすると α= (a+b)/2 = π{( f 1 - f 2 )x/v - ( f 1 + f 2 )t} β= ( a-b ) /2 = π{( f 1 + f 2 )x/v - ( f 1 - f 2 )t} ▼ 振動数が同じ場合 α= (a+b)/2 = -2 π ft β= ( a-b ) /2 = 2π fx/v ▼ 定常波(振幅も同じ場合) C = (A- A ) sinβ / { (A+ A ) cosβ} = 0 D = √ { (A- A ) 2 + 2 2 A A cos 2 β } = 2Acosβ Asin a + A sin b = D sin{α + Tan -1 C } = 2 A cosβs...
N88-BASICで波の合成 (1回目)
202 5 / 4 / 16 ( 水 ) N88-BASICで 波の合成 ( 1 回目 ) うなり (beet wave) ■ 前提 https://ulprojectmail.blogspot.com/2025/04/wave-1.html 波の合成 (1 回目 ) より ▼ 2波の合成式 y 1 = Asina, a = 2πf 1 (x/v 1 - t) y 2 = Bsinb, b = 2πf 2 (x/v 2 - t) α= (a+b)/2 , β= ( a-b ) /2 , C = { (A-B) sinβ} / { (A+B) cosβ} D = √ { (A-B) 2 + 2 2 ABcos 2 β } … 包絡線 (envelope) y 1 + y 2 = Asin a + Bsin b = D sin ( α + Tan -1 C ) ■ 動作 v 1 = v 2 = vとして同方向の進行波として モノクロ 16ページに少しずつ時間が違う波を書き ページ切り替えで動いている様に見せています N88-BASICにはATN2(y, x)がないので サブルーチンを作っています ATN2( (A-B) sinβ, (A+B) cosβ)を計算する VL,NL,XL-BASICとdlg～.zip( wav 00 1 .bas)は このブログ (以下のリンク)から ダウンロードできます https://ulprojectmail.blogspot.com Readme.txtを読んで遊んで下さい
波の合成 (2回目)
202 5 / 4 / 12 ( 土 ) 波の合成 ( 2 回目 ) うなり ( beet wave) ■ 進行方向が同じ 2波の合成 ▼ 2波の合成式 y 1 = Asina, a = 2πf 1 (x/v 1 - t) y 2 = Bsinb, b = 2πf 2 (x/v 2 - t) α= (a+b)/2 , β= ( a-b ) /2 , C = { (A-B) sinβ} / { (A+B) cosβ} D = √ { (A-B) 2 + 2 2 ABcos 2 β } … 包絡線 (envelope) y 1 + y 2 = Asin a + Bsin b = D sin ( α + Tan -1 C ) ▼ 2波の定義 v 1 = v 2 = vと置いて a = 2πf 1 (x/v - t) b = 2πf 2 (x/v - t) とすると α= (a+b)/2 = π{( f 1 + f 2 )(x/v - t)} β= ( a-b ) /2 = π{( f 1 - f 2 )(x/v - t)} ▼ 振幅が同じ場合 C = { (A- A ) sinβ} / { (A+ A ) cosβ} = 0 D = √ { (A-B) 2 + 2 2 ABcos 2 β } = 2Acosβ Asin a + A sin b = D sin{α + Tan -1 C } = 2 Acosβsinα α= (a+b)/2 = π{( f 1 + f 2 )(x/v - t)} β= ( a-b ) /2 = π{( f 1 - f 2 )(x/v - t)} ■ 結果 ▼ 2波の定義...