20250304 0606 晨起預定五聲音階 Pentatonix javaTE to VB6TE之後又瞧見『台方』騷客台政府以台國家新聞社台中央社師習烏克蘭澤倫斯基燒客意圖自燒中華台海兩岸護中神業台積電＝：據信『中方』自『中華公權受損審判決書』事發前後以來已經！因故受騷訓燒痛有美加後發資歷！豈不知中國國家主席習近平此民主人大二會前「求是」政策執政守則首則＊＝：「放得活」又「管得住」早已經成既成政策執政案力＝＝因此可推想中國國家主席習近平也訴知人大執政內閣依中美稽核聯徵信用報告書案例據狀親自致川普親收『中方』台積電等政經貿『互競互利』國策之『以和為貴政經貿』國書

20250304 0606 晨起預定五聲音階 Pentatonix javaTE to VB6TE之後又瞧見『台方』騷客台政府以台國家新聞社台中央社師習烏克蘭澤倫斯基燒客意圖自燒中華台海兩岸護中神業台積電＝：據信『中方』自『中華公權受損審判決書』事發前後以來已經！因故受騷訓燒痛有美加後發資歷！豈不知中國國家主席習近平此民主人大二會前「求是」政策執政守則首則＊＝：「放得活」又「管得住」早已經成既成政策執政案力＝＝因此可推想中國國家主席習近平也訴知人大執政內閣依中美稽核聯徵信用報告書案例據狀親自致川普親收『中方』台積電等政經貿『互競互利』國策之『以和為貴政經貿』國書

20250304 0606 晨起預定五聲音階 Pentatonix javaTE to VB6TE之後

又瞧見『台方』騷客台政府以台國家新聞社台中央社師習烏克蘭澤倫斯基燒客意圖自燒中華台海兩岸護中神業台積電＝：

＝＝據信『中方』自『中華公權受損審判決書』事發前後以來已經！因故受騷訓燒痛有美加後發資歷！

豈不知中國國家主席習近平此民主人大二會前「求是」政策執政守則首則＊＝：「放得活」又「管得住」早已經成既成政策執政案力

＝＝因此可推想中國國家主席習近平

也訴知人大執政內閣依中美稽核聯徵信用報告書案例據狀

親自致川普親收

『中方』台積電等政經貿『互競互利』國策

之『以和為貴政經貿』國書

川普：中侵台將是災難若台灣有事台積電投資影響大 | 國際 | 中央社 CNA 20250304 0535

（中央社華盛頓3日綜合外電報導）美國總統川普今天表示，若中國侵略台灣「將是場災難」。台積電宣布對美國再投資1000億美元，川普強調，這讓美國在晶片產業享有優勢，「若台灣有事，這會有很大影響」。

川普今天在白宮宣布台積電將對美國再投資「至少」1000億美元，建造「最先進的」晶片生產設施。

他被記者問到，若中國試圖孤立台灣或拿下台灣，台積電新投資計畫是否可能將晶片對美國的衝擊降到最低。

川普回答說：「我不能說降到最低。顯然，那將會是一場災難。但是至少這（指台積電投資）會讓我們對這個非常非常重要生意擁有某種形勢，讓我們在美國擁有很大一部分。所以，若台灣有事，這會有很大影響。」

台積電董事長暨總裁魏哲家今天在白宮與川普會面後宣布這項投資計畫，台積電未來數年將在美國再建造5座晶圓廠。

川普表示，台積電將會「建造5座最尖端先進的生產設施」。（譯者：何宏儒）1140304

＊＊＊＊＊附註＝：from myVB6TnE Nodes＝＝：：

part of A VB6 TnEs =20250216=.java

～～～～～～

//==========================================================::

'TnE Pentatonix TnE

'五聲音階 Pentatonix javaTE to VB6TE

'以往Java測試播放過方式：部份已經再以VB6測試過

'＋＋

'TE 五聲音階 Pentatonix 長短聲音高低音階

'(tones---, Dms---, tones, Dms,,,,,)

'or

'(tones,,, Dms,,,,)

A 五聲音階＝宮、商、角（jué，ㄐㄩㄝˊ）、徵（zhǐ，ㄓˇ）、羽 vs 三谱对比表及频率 Nodes.java

三谱对比表及频率.csv

三谱对比表及频率index.csv

//==================================::

A 五聲音階＝宮、商、角（jué，ㄐㄩㄝˊ）、徵（zhǐ，ㄓˇ）、羽 vs 三谱对比表及频率 Nodes.java

//TnE20221125 1001

//================

//TnE //play xRandom only [五聲音階] 宮商角徵羽频率field //Freq Field //iFeqColumn

//=======================================================

TnE 五聲音階＝宮、商、角（jué，ㄐㄩㄝˊ）、徵（zhǐ，ㄓˇ）、羽

TnE 五聲音階＝（do）、（re）、（mi）、（sol）、（la）

TnE 五聲音階＝　　１　２　３　５　６

　　 宮　商　角　徵　羽

TnE 五聲音階＝　　C　 D　 E　 G A

　　 宮　商　角　徵　羽

度數nOctave=1~8：：音頻率＝前一度*2＝2nOctave次方== 2^n

' Public Function LetArray(ParamArray data()) As Variant

'TE20250303 1637

' Public Function LetArray(ParamArray data()) As Variant

'==>>

' Public Function printLetArray(ParamArray data()) As Variant

'== Public Function printLetArray(ParamArray data()) As Variant

'Pentatonix

'TnE 五聲音階＝宮、商、角（jue，ㄐㄩㄝˊ）、徵（zh?，ㄓˇ）、羽

'TnE 五聲音階＝（do）、（re）、（mi）、（sol）、（la）

'TnE 五聲音階＝　　１　２　３　５　６

'　　 宮　商　角　徵　羽

'TnE 五聲音階＝　　C　 D　 E　 G A

'　　 宮　商　角　徵　羽

Dim PentatonixC1() As String

Dim PentatonixC2() As String

Dim PentatonixDoReMi() As String

Dim Pentatonix12356() As Integer

Dim PentatonixCDEGA() As String

PentatonixC1 =LetArray("宮","商","角（jué=ㄐㄩㄝˊ）","徵（zhǐ=ㄓˇ）","羽")

PentatonixC2 = LetArray("宮", "商","角", "徵", "羽")

PentatonixDoReMi = LetArray("do, "re","mi", "sol", "la")

Pentatonix12356 = LetArray(１,　２,　３,　５,　６)

PentatonixCDEGA = LetArray("C", "D","E", "G", "A")

'度數 nOctave0 = 1 3 5 8 10

' 16.35 18.35 20.60 24.50 27.50

'五聲音階

' * zhuyin[ㄨˇㄕㄥㄧㄣㄐㄧㄝ]

' * pinyin[wushengyinjie]

' *[Music] a pentatonic scale

Dim nOctavePa() As Integer

nOctavePa = LetArray(1, 3, 5, 8, 10)

//==================================::

csvFileLineReadPrintout()

Read File =三谱对比表及频率index.csv Get OctavesTable[101][5]

Read File =三谱对比表及频率index.csv Get OctavesTable[101][10]

iR 0 = 編號国际谱男唱谱女唱谱 频率 Octave MIDI 自然音 DoReMe 數字譜

iR 0 = 編號国际谱男唱谱女唱谱 频率 Octave MIDI

iR 1 = 1 C0 C1 C2 16.35 C 1

iR 2 = 2 C#0/Db0 #C1 #C2 17.32

iR 3 = 3 D0 D1 D2 18.35 D 3

iR 4 = 4 D#0/Eb0 #D1 #D2 19.45

iR 5 = 5 E0 E1 E2 20.6 E 5

iR 6 = 6 F0 F1 F2 21.83

iR 7 = 7 F#0/Gb0 #F1 #F2 23.12

iR 8 = 8 G0 G1 G2 24.5 G 8

iR 9 = 9 G#0/Ab0 #G1 #G2 25.96

iR 10 = 10 A0 A1 A2 27.5 A 10

iR 11 = 11 A#0/Bb0 #A1 #A2 29.14

iR 12 = 12 B0 B1 B2 30.87

iR 13 = 13 C1 C C1 32.7

//==================================::

'Pentatonix

'TnE 五聲音階＝宮、商、角（jue，ㄐㄩㄝˊ）、徵（zh?，ㄓˇ）、羽

'TnE 五聲音階＝（do）、（re）、（mi）、（sol）、（la）

'TnE 五聲音階＝　　１　２　３　５　６

'　　 宮　商　角　徵　羽

'TnE 五聲音階＝　　C　 D　 E　 G A

'　　 宮　商　角　徵　羽

Dim Pentatonix() As String

Pentatonix = LetArray("宮", "商", "角", "徵", "羽")

'度數nOctave0 = 1 3 5 8 10

' 16.35 18.35 20.60 24.50 27.50

'五聲音階

' * zhuyin[ㄨˇㄕㄥㄧㄣㄐㄧㄝ]

' * pinyin[wushengyinjie]

' *[Music] a pentatonic scale

Dim nOctavePa() As Integer

nOctavePa = LetArray(1, 3, 5, 8, 10)

'TE 五聲音階 Pentatonix 長短聲音高低音階

'(tones---, Dms---, tones, Dms,,,,,)

'or

'(tones,,, Dms,,,,)

'TE (tones---, Dms---, tones, Dms,,,,,)

Dim mnOctaveTE1() As Integer

mnOctaveTE1=LetArray

(１,２,３,５,６,

500,500,500,500,500,

１,２,３,５,６,

250,500,780, 1000,1500,

１,２,３,５,６,

250,250,250, 1000,1000,

~~~~~

)

'or

'(tones,,, Dms,,,,)

Dim mnOctaveTE2() As Integer

mnOctaveTE2=LetArray

(１,２,３,５,６,

500,500,500,500,500,

250,500,780, 1000,1500,

250,250,250, 1000,1000,

~~~~~

)

==========================================================

～～～～～～

五聲音階＝：

VVVIP=五聲音階 | Learning Music (Beta)

什麼是「五聲音階」？（Pentatonic Scale） - NiceChord Wiki

五聲音階 Pentatonix - YouTube

中國五聲音階 - 維基百科，自由的百科全書

吉他教學#01 - 怎樣才能把音階練熟 ? 正確的方式&步驟從五聲音階開始 !!! - YouTube

五聲音階 Pentatonix / 哈利路亞 Hallelujah (HD中字MV) - YouTube

五聲音階 Pentatonix - 想像 Imagine 中文字幕 MV - YouTube

20231203 0952 123自由自在日週日＝蕭薔上佛堂做禮拜沒？＝點播王菲歌唱心經+哈利路亞五聲音階Hallelujah Pentatonix互護蕭薔欣賞雲淡風輕SJJC Google Blog

Pentatonix ＝＝：：

[OFFICIAL VIDEO] Amazing Grace - Pentatonix - YouTube

合輯 -「[OFFICIAL VIDEO] Hallelujah - Pentatonix」 YouTube[OFFICIAL VIDEO] Hallelujah - Pentatonix - YouTube

搜尋此網誌

程志忠雲淡風輕SJJC

留言

張貼留言

這個網誌中的熱門文章