2005/A5/学習ノート Hypodytes rubripinnis/MUSIC!/GLAMOROUS SKY
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
|
ログイン
]
開始行:
***[[学習ノート Hypodytes rubripinnis>2005/A5/学習ノート Hypodytes rubripinnis]] [#ja9017cd]
***[[MUSIC!>2005/A5/学習ノート Hypodytes rubripinnis/MUSIC!]] [#p13211c9]
***課題5: [#sace3047]
''アクセス数:今日&counter(today); 総数&counter(all); 最終更新日:&lastmod;''
*GLAMOROUS SKY(NANA starring MIKA NAKASHIMA)のプログラム [#e20a2b62]
作成者:Hypodytes rubripinnis
&size(30){☆[['''movie''':http://yakushi.shinshu-u.ac.jp/robotics/?plugin=attach&pcmd=open&file=GLAMOLOUS%20SKY.wmv&refer=2005%2FA5%2F%B3%D8%BD%AC%A5%CE%A1%BC%A5%C8%20Hypodytes%20rubripinnis%2F%A3%CD%A3%D5%A3%D3%A3%C9%A3%C3%A1%AA%2FGLAMOROUS%20SKY]]};
#comment
sub glamoroussky() {
PlayTone(554, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 38);
Wait(80);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 38);
Wait(40);
PlayTone(740, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(554, 18);
Wait(20);
PlayTone(554, 158);
Wait(150);
PlayTone(494, 38);
Wait(40);
PlayTone(659, 118);
Wait(120);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 58);
Wait(100);
PlayTone(622, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(740, 58);
Wait(60);
PlayTone(622, 78);
Wait(150);
PlayTone(494, 18);
Wait(20);
PlayTone(659, 58);
Wait(60);
PlayTone(659, 38);
Wait(40);
PlayTone(740, 38);
Wait(40);
PlayTone(659, 58);
Wait(60);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 18);
Wait(20);
PlayTone(659, 78);
Wait(150);
PlayTone(494, 38);
Wait(40);
PlayTone(659, 118);
Wait(120);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 58);
Wait(100);
PlayTone(622, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(740, 58);
Wait(60);
PlayTone(622, 78);
Wait(150);
PlayTone(554, 18);
Wait(20);
PlayTone(659, 38);
Wait(40);
PlayTone(554, 18);
Wait(20);
PlayTone(494, 58);
Wait(150);
PlayTone(554, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 38);
Wait(80);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 38);
Wait(40);
PlayTone(740, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(554, 18);
Wait(20);
PlayTone(554, 158);
Wait(150);
PlayTone(494, 38);
Wait(40);
PlayTone(659, 118);
Wait(120);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 58);
Wait(100);
PlayTone(622, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(740, 58);
Wait(60);
PlayTone(622, 78);
Wait(150);
PlayTone(494, 18);
Wait(20);
PlayTone(659, 58);
Wait(60);
PlayTone(659, 38);
Wait(40);
PlayTone(740, 38);
Wait(40);
PlayTone(659, 58);
Wait(60);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 18);
Wait(20);
PlayTone(659, 78);
Wait(150);
PlayTone(494, 38);
Wait(40);
PlayTone(659, 118);
Wait(120);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 58);
Wait(100);
PlayTone(622, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(740, 58);
Wait(60);
PlayTone(622, 78);
Wait(150);
PlayTone(554, 18);
Wait(20);
PlayTone(659, 38);
Wait(40);
PlayTone(554, 18);
Wait(20);
PlayTone(494, 58);
Wait(150);
PlayTone(659, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 58);
Wait(100);
PlayTone(659, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 58);
Wait(100);
PlayTone(659, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 58);
Wait(60);
PlayTone(622, 18);
Wait(20);
PlayTone(740, 58);
Wait(60);
PlayTone(659, 18);
Wait(20);
PlayTone(622, 38);
Wait(40);
PlayTone(554, 38);
Wait(60);
PlayTone(622, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 58);
Wait(100);
PlayTone(659, 38);
Wait(40);
PlayTone(659, 18);
Wait(20);
PlayTone(622, 58);
Wait(60);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 38);
Wait(40);
PlayTone(622, 38);
Wait(40);
PlayTone(659, 98);
Wait(260);
PlayTone(659, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 58);
Wait(100);
PlayTone(659, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 58);
Wait(100);
PlayTone(659, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 58);
Wait(60);
PlayTone(622, 18);
Wait(20);
PlayTone(740, 58);
Wait(60);
PlayTone(659, 18);
Wait(20);
PlayTone(622, 38);
Wait(40);
PlayTone(554, 38);
Wait(300);
PlayTone(494, 38);
Wait(40);
PlayTone(659, 118);
Wait(120);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 58);
Wait(100);
PlayTone(622, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(740, 58);
Wait(60);
PlayTone(622, 78);
Wait(150);
PlayTone(494, 18);
Wait(20);
PlayTone(659, 58);
Wait(60);
PlayTone(659, 38);
Wait(40);
PlayTone(740, 38);
Wait(40);
PlayTone(659, 58);
Wait(60);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 18);
Wait(20);
PlayTone(659, 78);
Wait(150);
PlayTone(494, 38);
Wait(40);
PlayTone(659, 118);
Wait(120);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 58);
Wait(100);
PlayTone(622, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(740, 58);
Wait(60);
PlayTone(622, 78);
Wait(150);
PlayTone(494, 38);
Wait(40);
PlayTone(659, 118);
Wait(120);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 58);
Wait(100);
PlayTone(622, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(740, 58);
Wait(60);
PlayTone(622, 78);
Wait(150);
PlayTone(494, 18);
Wait(20);
PlayTone(659, 58);
Wait(60);
PlayTone(659, 38);
Wait(40);
PlayTone(740, 38);
Wait(40);
PlayTone(659, 58);
Wait(60);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 18);
Wait(20);
PlayTone(659, 78);
Wait(150);
PlayTone(494, 38);
Wait(40);
PlayTone(659, 118);
Wait(120);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 58);
Wait(100);
PlayTone(622, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(740, 58);
Wait(60);
PlayTone(622, 78);
Wait(150);
PlayTone(554, 18);
Wait(20);
PlayTone(659, 38);
Wait(40);
PlayTone(554, 18);
Wait(20);
PlayTone(494, 58);
Wait(60);
}
task play_music()
{glamoroussky();}
task main()
{start play_music;}
終了行:
***[[学習ノート Hypodytes rubripinnis>2005/A5/学習ノート Hypodytes rubripinnis]] [#ja9017cd]
***[[MUSIC!>2005/A5/学習ノート Hypodytes rubripinnis/MUSIC!]] [#p13211c9]
***課題5: [#sace3047]
''アクセス数:今日&counter(today); 総数&counter(all); 最終更新日:&lastmod;''
*GLAMOROUS SKY(NANA starring MIKA NAKASHIMA)のプログラム [#e20a2b62]
作成者:Hypodytes rubripinnis
&size(30){☆[['''movie''':http://yakushi.shinshu-u.ac.jp/robotics/?plugin=attach&pcmd=open&file=GLAMOLOUS%20SKY.wmv&refer=2005%2FA5%2F%B3%D8%BD%AC%A5%CE%A1%BC%A5%C8%20Hypodytes%20rubripinnis%2F%A3%CD%A3%D5%A3%D3%A3%C9%A3%C3%A1%AA%2FGLAMOROUS%20SKY]]};
#comment
sub glamoroussky() {
PlayTone(554, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 38);
Wait(80);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 38);
Wait(40);
PlayTone(740, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(554, 18);
Wait(20);
PlayTone(554, 158);
Wait(150);
PlayTone(494, 38);
Wait(40);
PlayTone(659, 118);
Wait(120);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 58);
Wait(100);
PlayTone(622, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(740, 58);
Wait(60);
PlayTone(622, 78);
Wait(150);
PlayTone(494, 18);
Wait(20);
PlayTone(659, 58);
Wait(60);
PlayTone(659, 38);
Wait(40);
PlayTone(740, 38);
Wait(40);
PlayTone(659, 58);
Wait(60);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 18);
Wait(20);
PlayTone(659, 78);
Wait(150);
PlayTone(494, 38);
Wait(40);
PlayTone(659, 118);
Wait(120);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 58);
Wait(100);
PlayTone(622, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(740, 58);
Wait(60);
PlayTone(622, 78);
Wait(150);
PlayTone(554, 18);
Wait(20);
PlayTone(659, 38);
Wait(40);
PlayTone(554, 18);
Wait(20);
PlayTone(494, 58);
Wait(150);
PlayTone(554, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 38);
Wait(80);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 38);
Wait(40);
PlayTone(740, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(554, 18);
Wait(20);
PlayTone(554, 158);
Wait(150);
PlayTone(494, 38);
Wait(40);
PlayTone(659, 118);
Wait(120);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 58);
Wait(100);
PlayTone(622, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(740, 58);
Wait(60);
PlayTone(622, 78);
Wait(150);
PlayTone(494, 18);
Wait(20);
PlayTone(659, 58);
Wait(60);
PlayTone(659, 38);
Wait(40);
PlayTone(740, 38);
Wait(40);
PlayTone(659, 58);
Wait(60);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 18);
Wait(20);
PlayTone(659, 78);
Wait(150);
PlayTone(494, 38);
Wait(40);
PlayTone(659, 118);
Wait(120);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 58);
Wait(100);
PlayTone(622, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(740, 58);
Wait(60);
PlayTone(622, 78);
Wait(150);
PlayTone(554, 18);
Wait(20);
PlayTone(659, 38);
Wait(40);
PlayTone(554, 18);
Wait(20);
PlayTone(494, 58);
Wait(150);
PlayTone(659, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 58);
Wait(100);
PlayTone(659, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 58);
Wait(100);
PlayTone(659, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 58);
Wait(60);
PlayTone(622, 18);
Wait(20);
PlayTone(740, 58);
Wait(60);
PlayTone(659, 18);
Wait(20);
PlayTone(622, 38);
Wait(40);
PlayTone(554, 38);
Wait(60);
PlayTone(622, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 58);
Wait(100);
PlayTone(659, 38);
Wait(40);
PlayTone(659, 18);
Wait(20);
PlayTone(622, 58);
Wait(60);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 38);
Wait(40);
PlayTone(622, 38);
Wait(40);
PlayTone(659, 98);
Wait(260);
PlayTone(659, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 58);
Wait(100);
PlayTone(659, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 58);
Wait(100);
PlayTone(659, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 58);
Wait(60);
PlayTone(622, 18);
Wait(20);
PlayTone(740, 58);
Wait(60);
PlayTone(659, 18);
Wait(20);
PlayTone(622, 38);
Wait(40);
PlayTone(554, 38);
Wait(300);
PlayTone(494, 38);
Wait(40);
PlayTone(659, 118);
Wait(120);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 58);
Wait(100);
PlayTone(622, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(740, 58);
Wait(60);
PlayTone(622, 78);
Wait(150);
PlayTone(494, 18);
Wait(20);
PlayTone(659, 58);
Wait(60);
PlayTone(659, 38);
Wait(40);
PlayTone(740, 38);
Wait(40);
PlayTone(659, 58);
Wait(60);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 18);
Wait(20);
PlayTone(659, 78);
Wait(150);
PlayTone(494, 38);
Wait(40);
PlayTone(659, 118);
Wait(120);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 58);
Wait(100);
PlayTone(622, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(740, 58);
Wait(60);
PlayTone(622, 78);
Wait(150);
PlayTone(494, 38);
Wait(40);
PlayTone(659, 118);
Wait(120);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 58);
Wait(100);
PlayTone(622, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(740, 58);
Wait(60);
PlayTone(622, 78);
Wait(150);
PlayTone(494, 18);
Wait(20);
PlayTone(659, 58);
Wait(60);
PlayTone(659, 38);
Wait(40);
PlayTone(740, 38);
Wait(40);
PlayTone(659, 58);
Wait(60);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 38);
Wait(40);
PlayTone(622, 18);
Wait(20);
PlayTone(659, 18);
Wait(20);
PlayTone(659, 78);
Wait(150);
PlayTone(494, 38);
Wait(40);
PlayTone(659, 118);
Wait(120);
PlayTone(622, 18);
Wait(20);
PlayTone(554, 18);
Wait(20);
PlayTone(622, 58);
Wait(100);
PlayTone(622, 38);
Wait(40);
PlayTone(831, 38);
Wait(40);
PlayTone(740, 58);
Wait(60);
PlayTone(622, 78);
Wait(150);
PlayTone(554, 18);
Wait(20);
PlayTone(659, 38);
Wait(40);
PlayTone(554, 18);
Wait(20);
PlayTone(494, 58);
Wait(60);
}
task play_music()
{glamoroussky();}
task main()
{start play_music;}
ページ名: