當前位置:首頁 > 芯聞號 > 充電吧
[導讀]Atitit jfugue?midi make tour attilx sumup目錄1.1. Jyepu prob not support ,gazi nonge map trans支持簡譜解決方案

Atitit jfugue?midi make tour attilx sumup

目錄

1.1. Jyepu prob not support ,gazi nonge map trans支持簡譜解決方案 1

1.2. Tone len problem??note 音符?音長 1

1.3. Jyepai spltor prob ,,mosi not need ??jyepu hto d just for readd 節(jié)拍分隔符問題 1

1.4. 保存為mid文件 1

1.5. 分析mid文件為txt 4

?

1.1.?Jyepu prob not support ,gazi nonge map trans支持簡譜解決方案1.2.?Tone len problem??note 音符?音長

A5h ??,,must mid has 5.beir ingore

?

1.3.?Jyepai spltor prob ,,mosi not need ??jyepu hto d just for readd 節(jié)拍分隔符問題

?

1.4.?保存為mid文件

?

package?midtool;

?

import?java.io.File;

import?java.io.IOException;

import?java.util.HashMap;

import?java.util.List;

import?java.util.Map;

?

import?org.jfugue.midi.MidiFileManager;

import?org.jfugue.pattern.Pattern;

import?org.jfugue.player.Player;

import?org.staccato.ReplacementMapPreprocessor;

import?org.staccato.maps.SolfegeReplacementMap;

?

import?com.attilax.collection.listBuilder;

import?com.attilax.util.timestampUtil;

import?com.google.common.base.Joiner;

import?com.google.common.collect.Lists;

?

public?class?SolfegeReplacementMapDemo?{

public?static?void?main(String[]?args)?throws?IOException?{


?Map?rules?=?new?HashMap()?{{

??????????put("1",?"c");

??????????put("2",?"d");

??????????put("3",?"e");

??????????put("4",?"f");

??????????put("5",?"g");

??????????put("6",?"a");

??????????put("7",?"b"??);

??????????put("H",?"H"??);

?????????

????}};

????

????

//ReplacementMapPreprocessor rmp?= ReplacementMapPreprocessor.getInstance();

//rmp.setReplacementMap(rules).setRequireAngleBrackets(false);

//Player player = new Player();

//player.play(new Pattern("do re mi?fa?so la?ti?do")); // This will play "C D E F G A B"


?

// This next example brings back the brackets so durations can be added

//rmp.setRequireAngleBrackets(true);

//player.play(new Pattern("



Pattern?Pattern1?=?new?Pattern();???

String?s="1155665- ?4433221- ?5544332- ???5544332- ????1155665- ???4433221-";// ?5544332 ???5544332 ????1155665 ???4433221

listBuilder?listBuilder?=?strService.$(s).replace(" ???aaa","\|").toList().trimElement();

List?li=processToneLen(listBuilder.liObj,rules);

//String s2=listBuilder.join(" ").build();

String?joinSpaceAfted?=?Joiner.on(" ").join(li);

System.out.println(joinSpaceAfted);

Pattern1.add(joinSpaceAfted);??

File?file?=?new?File(?timestampUtil.join("c:\0log\atifirstmid@tmstmp@.mid").asTimeStamp_millsec_filenameencode()?);

new?MidiFileManager().savePatternToMidi(Pattern1,?file);

System.out.println("--");

}

?

private?static?List?processToneLen(List?liObj,?Map?rules)?{

?List?li=Lists.newArrayList();

String?lasttone;

for?(Object?object?:?liObj)?{

String?tone=(String)?object.toString().trim();

if(tone.trim().length()==0)

continue;

if(!tone.equals("-")?)

{

String?trueTone=(String)?rules.get(tone);

li.add(trueTone);continue;

}


if(tone.equals("-")?)

{

int?indexlast?=?li.size()-1;

String?li_lasttone=(String)?li.get(indexlast);

String?newtone=li_lasttone+"5H";

li.remove(indexlast);

li.add(newtone);

continue;

}

}


?

return?li;

}

}

?

1.5.?分析mid文件為txt

?

?

Player player = new Player();

//兩只老虎Pattern pattern1 = new Pattern("I[40] C5q D5q E5q C5q");

//跑得快Pattern pattern2 = new Pattern("E5q F5q G5h");

//一只沒有眼睛Pattern pattern3 = new Pattern("G5i A5i G5i F5i E5q C5q");

//真奇怪Pattern pattern4 = new Pattern("C5q G4q C5h");

// Put all of the patters together to form the songPattern song = new Pattern();song.add(pattern1, 2);

// Adds 'pattern1' to 'song' twicesong.add(pattern2, 2); // Adds 'pattern2' to 'song' twicesong.add(pattern3, 2);

// Adds 'pattern3' to 'song' twicesong.add(pattern4, 2);

?// Adds 'pattern4' to 'song' twice

// Play the song!player.play(song);

本站聲明: 本文章由作者或相關機構授權發(fā)布,目的在于傳遞更多信息,并不代表本站贊同其觀點,本站亦不保證或承諾內(nèi)容真實性等。需要轉(zhuǎn)載請聯(lián)系該專欄作者,如若文章內(nèi)容侵犯您的權益,請及時聯(lián)系本站刪除。
換一批
延伸閱讀

9月2日消息,不造車的華為或?qū)⒋呱龈蟮莫毥谦F公司,隨著阿維塔和賽力斯的入局,華為引望愈發(fā)顯得引人矚目。

關鍵字: 阿維塔 塞力斯 華為

加利福尼亞州圣克拉拉縣2024年8月30日 /美通社/ -- 數(shù)字化轉(zhuǎn)型技術解決方案公司Trianz今天宣布,該公司與Amazon Web Services (AWS)簽訂了...

關鍵字: AWS AN BSP 數(shù)字化

倫敦2024年8月29日 /美通社/ -- 英國汽車技術公司SODA.Auto推出其旗艦產(chǎn)品SODA V,這是全球首款涵蓋汽車工程師從創(chuàng)意到認證的所有需求的工具,可用于創(chuàng)建軟件定義汽車。 SODA V工具的開發(fā)耗時1.5...

關鍵字: 汽車 人工智能 智能驅(qū)動 BSP

北京2024年8月28日 /美通社/ -- 越來越多用戶希望企業(yè)業(yè)務能7×24不間斷運行,同時企業(yè)卻面臨越來越多業(yè)務中斷的風險,如企業(yè)系統(tǒng)復雜性的增加,頻繁的功能更新和發(fā)布等。如何確保業(yè)務連續(xù)性,提升韌性,成...

關鍵字: 亞馬遜 解密 控制平面 BSP

8月30日消息,據(jù)媒體報道,騰訊和網(wǎng)易近期正在縮減他們對日本游戲市場的投資。

關鍵字: 騰訊 編碼器 CPU

8月28日消息,今天上午,2024中國國際大數(shù)據(jù)產(chǎn)業(yè)博覽會開幕式在貴陽舉行,華為董事、質(zhì)量流程IT總裁陶景文發(fā)表了演講。

關鍵字: 華為 12nm EDA 半導體

8月28日消息,在2024中國國際大數(shù)據(jù)產(chǎn)業(yè)博覽會上,華為常務董事、華為云CEO張平安發(fā)表演講稱,數(shù)字世界的話語權最終是由生態(tài)的繁榮決定的。

關鍵字: 華為 12nm 手機 衛(wèi)星通信

要點: 有效應對環(huán)境變化,經(jīng)營業(yè)績穩(wěn)中有升 落實提質(zhì)增效舉措,毛利潤率延續(xù)升勢 戰(zhàn)略布局成效顯著,戰(zhàn)新業(yè)務引領增長 以科技創(chuàng)新為引領,提升企業(yè)核心競爭力 堅持高質(zhì)量發(fā)展策略,塑強核心競爭優(yōu)勢...

關鍵字: 通信 BSP 電信運營商 數(shù)字經(jīng)濟

北京2024年8月27日 /美通社/ -- 8月21日,由中央廣播電視總臺與中國電影電視技術學會聯(lián)合牽頭組建的NVI技術創(chuàng)新聯(lián)盟在BIRTV2024超高清全產(chǎn)業(yè)鏈發(fā)展研討會上宣布正式成立。 活動現(xiàn)場 NVI技術創(chuàng)新聯(lián)...

關鍵字: VI 傳輸協(xié)議 音頻 BSP

北京2024年8月27日 /美通社/ -- 在8月23日舉辦的2024年長三角生態(tài)綠色一體化發(fā)展示范區(qū)聯(lián)合招商會上,軟通動力信息技術(集團)股份有限公司(以下簡稱"軟通動力")與長三角投資(上海)有限...

關鍵字: BSP 信息技術
關閉
關閉