CALLING CHANCE

H゛動画

MML先頭 2000 文字だけ表示していますダウンロード全文を見る

INT TRACK_KEY = 0 ; //キー設定
INT EST=156PlayFrom.SysEx=1PlayFrom.CtrlChg=1PlayFrom.RPN_NRPN=1TrackName={"CALLING CHANCE"}Copyright={H゛}System.MeasureShift=3Tempo=1000Include(delay.h)ResetGS;
FUNCTION WIN(X1,X2,X3,XA,XB,X4,X5,X6,X7,X8,X9,XC){TR=X1;DL(0)CH=X2;@(X3,XA,XB)TrackKey=X4;P=X5;CHO=X6*10REV=X7*10v=(X8)q=(X9*10)M=(XC*10)}
FUNCTION DL(ti){Time(ti:1:0)}FUNCTION PAN(ER1,ER2){If(ER2==0){P.T(0,127,ER1)}If(ER2==1){P.T(127,0,ER1)}}FUNCTION GSRY(_D){INT _TCH=Channel;INT _CH;If(_TCH==10){_CH=$00;}Else{If(_TCH<10){_CH=_TCH;}Else{_CH=_TCH-1}}_CH=$10+_CH;SysEx=$F0,$41,(DeviceNumber),$42,$12,{$40,(_CH),$15,(_D)},$F7;}
FUNCTION HAM(STR SA){Sub{Key=12SA;Key=0}SA}FUNCTION HAM2(STR SA){Sub{Key=-12SA;Key=0}SA}FUNCTION HAM3(STR SA){Sub{Key=-12SA;Key=0}Sub{Key=12SA;Key=0}SA}FUNCTION REC(FF=127){EP.T(FF,0,!1^1^1^1^1^1)}FUNCTION REC2(FF=100){V.T(FF,0,!1^1^1^1^1^1)}FUNCTION IP(DW=1){DL(-2)GSRY(DW)r8}INT K=0DL=0Tempo=EST;
Function MD(Str S,Int Repeat, Int Delay){Int Temp_v=MML(v);Int Dly=Delay;Int Dec_v=Temp_v/(Repeat+2);Int J=Temp_v+35;J=J-(Dec_v*2);v(J);For(Int I=1;I<=Repeat;I++){Sub{r%(Dly)v(J)S}Dly=Dly+Delay;J=J-Dec_v;}v(Temp_v)S}
K=TRACK_KEY;
//-(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)---(TR,CH,@ ,2 ,3,K, P ,C,R, v ,q ,M)
WIN(01,01,012,00,0,K,064,0,0,127,09,0)WIN(07,07,039,00,0,K,084,0,0,110,09,0)WIN(13,13,119,00,0,0,___,0,0,127,10,0)
WIN(02,02,082,00,0,K,064,0,0,100,09,0)WIN(08,08,012,08,0,K,000,0,0,100,09,2)WIN(14,14,082,00,0,K,___,0,0,110,10,0)
WIN(03,03,082,00,0,K,054,0,0,100,10,0)WIN(09,09,012,08,0,K,127,0,0,100,09,2)WIN(15,15,003,00,0,K,080,0,0,120,10,0)
WIN(04,04,082,00,0,K,074,0,0,100,10,0)WIN(10,10,025,00,0,0,064,0,0,127,10,0)WIN(16,16,091,00,0,0,084,0,0,127,10,0)
WIN(05,05,039,01,0,K,044,0,0,110,09,0)WIN(11,11,025,00,0,0,064,0,0,127,09,0)//--Light source ver1.7--//
WIN(06,06,049,00,0,K,032,0,0,080,10,0)WIN(12,12,026,00,0,0,064,0,0,127,09,0)TR=10IP;TR=11IP=2TR=12IP;
INT HAZ=3INT BGN=19INT ME1=27INT ME2=35INT SB1=43INT

作者からのコメント

久しぶりにMicrosoft GS Wavetable SW Synthで戻ってきました！
テキスト音楽サクラよ永遠に！
さぁみんなで踊っていきましょう！
サクラで音楽の扉を開けよう！
音の世界へ飛び出そう！

作曲者: H゛ - NO.328.mml
ライセンス: 🌐パブリックドメイン↗商用利用 ○改変 ○改変も転載も自由
転載: 許可
推奨音源: Microsoft GS Wavetable SW Synth
ピコサクラ対応: 未対応
ピコサクラバージョン: 0.0.0
動画: ▶ YouTubeで見る
投稿日時: 2024-01-27 13:56
更新日時: 2024-01-27 13:56

お気に入り

ダウンロード数

272

タグ

ユーロビート

→この曲(id:2545)に問題がある場合こちらへ

感謝のコメント

korin2024/01/31

おー！凄いですね～(*^-^*)ノリノリです！
全てのトラックが重なり合って、とっても良いメロディーを醸し出してます！
最高です！！！midiでもここまですれば、最高の音を奏でる事が出来るんですね！
勉強になりました。

Reunion2024/02/01

再生すると、曲そのものだけでなく、ステータスウィンドが大騒ぎでした笑
サウンドエフェクトのクオリティが恐ろしく高くて、GSでもやろうと思えばここまでできるのかと痛感しました！
曲自体も緩急ついてて面白いし、職人技を堪能させていただきました。良曲ごちそうさまでしたｂ

H゛2024/02/05

＞korinさん
ノリノリになって頂いてありがたいです！
いつも出音の派手さで押し通す感じのが多いので、今回はハーモニーというか、重なり合った音を重視しました^^b
DAWじゃないMIDI感が売りですが、うまく行ったようで良かったです🎶

H゛2024/02/05

＞Reunionさん
職人技と言って頂けて感謝です！
ピッチかけっぱなしとか多いのでステータスウィンドウは大騒ぎかもですね笑
MSGSが1番長く続けてましたので、効果音やエフェクター風の音など1番馴染みがあります。。
展開ちょっと途中でキー変えたりしてみたので、うまく緩急付いてると嬉しいです^^;

rana2024/02/27

こんにちは。拝聴させていただきました。
MSGSってこんなにタイトなキックの音が出るんですね！もはや職人の域のように感じました。
もう長いことWindowsも触ってないですが、MSGS向けのmidiは今も欲しがる方いらっしゃるますよね。
まるでDAWで作り込んだかのような音色で脱帽でした。
ありがとうございました。また聞きにきますね。

H゛2024/03/01

＞ranaさん
MSGSで出してる音褒めて下さってありがとうございます！
海外勢などがまだMSGS作曲頑張ってるので、負けてられないなと思って作りました。。
タイトなキックは、EP.W(127,0,!6)で歯切れ良く作れて満足してます^^;
今後ともよろしくお願いします～m(__)m

Amege2024/03/18

始まりから掴まれます。相変わらず素敵ですね
音数が多いながらその一つ一つがきめ細かく聴きやすく、その全部が余すことなくカッコよくて、でも主旋律はどこか綺麗で。もはやちょっとした一つの世界ですね
銃声やプー音など効果音の使い方も面白くて聴き応えありました。ご馳走様でした

H゛2024/03/25

＞Amegeさん
素敵と言って頂けて感謝です！相変わらず同じ感じの曲ずっと続けてます♬
プー音もっと再現度高くしたかったんですが、なかなか周波数帯調べたら面倒になってしまってこんな感じになりました(;;
主旋律が複雑になりすぎないようにいつも調整してます♪感想ありがとうございました。。

Joker2024/06/15

久しぶりに覗いたらエッヂ君がいて安心しました。「H”」ってどうやって書くのかわからなかったから諦めました(笑)
変わらず見事な曲を作りますねぇ。

H゛2024/07/16

＞Jokerさん
ありがとうございます！またいつも曲掲示板に居るようになりたいです笑
「H゛」って僕もコピペして使ってます。。
今後も品質変わらず生産していけるよう頑張ります～♬

Dream★core2026/09/11

こんばんわ。曲を聴かせていただきました。
始まりから、とても格好いいですね。プープープーの電話？の再現がすごいです。
私も昔楽器が無かった頃、MSGSで曲を作っていましたが、音の迫力が違うというか、あのwindows初期シンセをこんなにも使いこなせるのがすごいです。

ところで、H゛さんって2000年代ごろ音楽の泉というサイトにユーロビートを大量に投稿していた人で間違いないですか？（別人だったらごめんなさい）

♪

この曲に「ありがとう」を伝えませんか？

ひとことの感想が、作った人にとって何よりの励みになります。
定型文のボタンもあるので、キーボードが苦手でも大丈夫です。

ログインしてコメントするはじめての方はこちら（無料登録）