[[2004/C7/メンバー紹介]]

猪木のテーマを流すプログラム

#define l_Mi   330
#define l_Fa   349
#define l_Sol  392
#define l_Sol_ 415
#define l_La   440
#define l_Si   494
#define Do     523
#define Do_    554
#define Re     587
#define Re_    662
#define Mi     659
#define Fa     698
#define Fa_    740
#define Sol    784
#define Sol_   831
#define La     880
#define Si     988 
#define h_Do   1047
#define A      50
#define A_     48
#define B      25
#define B_     23
#define C      17
#define C_     15
#define D      12
#define D_     10
#define E      150
#define E_     148






task music_inoki()

{



while(true)
{
PlayTone(Sol,E_); Wait(E);
PlayTone(l_Sol,A_); Wait(A);
PlayTone(l_Sol_,E_); Wait(E);

PlayTone(Sol,A_); Wait(A);
PlayTone(Fa_,E_); Wait(E);
PlayTone(l_La,A_); Wait(A);
PlayTone(l_Si,E_); Wait(E);
Wait(A);

PlayTone(Mi,E_); Wait(E);
PlayTone(l_Mi,A_); Wait(A);
PlayTone(l_Fa,E_); Wait(E);

PlayTone(Re,A_); Wait(A);
PlayTone(Do_,E_); Wait(E);
PlayTone(l_Mi,A_); Wait(A);
PlayTone(l_Fa,E_); Wait(E);
Wait(A);

}
}

『バックします』の音楽を流すプログラム

#define l_Mi   330
#define l_Fa   349
#define l_Sol  392
#define l_Sol_ 415
#define l_La   440
#define l_Si   494
#define Do     523
#define Do_    554
#define Re     587
#define Re_    662
#define Mi     659
#define Fa     698
#define Fa_    740
#define Sol    784
#define Sol_   831
#define La     880
#define Si     988 
#define h_Do   1047
#define A      50
#define A_     48
#define B      25
#define B_     23
#define C      17
#define C_     15
#define D      12
#define D_     10
#define E      150
#define E_     148






task music_back()

{



while(true)
{
PlayTone(Sol,15);Wait(30);
PlayTone(Re,15);Wait(20);
PlayTone(Re,15);Wait(20);
PlayTone(Re,15);Wait(20);
Wait(80);
PlayTone(Si,70); Wait(90);
PlayTone(Si,70); Wait(90);
PlayTone(Si,70); Wait(90);
PlayTone(Si,70); Wait(90);

Wait(100);
}
}

トップ   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS