2005/A5/学習ノート Hypodytes rubripinnis/MUSIC!/青春アミーゴ
をテンプレートにして作成
[
トップ
] [
新規
|
一覧
|
検索
|
最終更新
|
ヘルプ
|
ログイン
]
開始行:
***[[学習ノート Hypodytes rubripinnis>2005/A5/学習ノート Hypodytes rubripinnis]] [#ja9017cd]
***[[MUSIC!>2005/A5/学習ノート Hypodytes rubripinnis/MUSIC!]] [#p13211c9]
***課題5: [#sace3047]
''アクセス数:今日&counter(today); 総数&counter(all); 最終更新日:&lastmod;''
*青春アミーゴ(修二と彰)のプログラム [#e20a2b62]
作成者:Hypodytes rubripinnis
&size(30){☆[['''movie''':http://yakushi.shinshu-u.ac.jp/robotics/?plugin=attach&pcmd=open&file=%C0%C4%BD%D5%A5%A2%A5%DF%A1%BC%A5%B4.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%2F%C0%C4%BD%D5%A5%A2%A5%DF%A1%BC%A5%B4]]};
#comment
sub seishun() {
PlayTone(523, 38);
Wait(40);
PlayTone(587, 38);
Wait(40);
PlayTone(622, 38);
Wait(40);
PlayTone(587, 18);
Wait(20);
PlayTone(523, 38);
Wait(40);
PlayTone(466, 38);
Wait(40);
PlayTone(523, 38);
Wait(40);
PlayTone(466, 8);
Wait(10);
PlayTone(392, 28);
Wait(50);
PlayTone(523, 38);
Wait(40);
PlayTone(587, 38);
Wait(40);
PlayTone(622, 38);
Wait(40);
PlayTone(587, 18);
Wait(20);
PlayTone(523, 38);
Wait(40);
PlayTone(466, 38);
Wait(40);
PlayTone(622, 158);
Wait(180);
PlayTone(622, 23);
Wait(80);
PlayTone(415, 58);
Wait(60);
PlayTone(415, 18);
Wait(20);
PlayTone(370, 18);
Wait(20);
PlayTone(330, 18);
Wait(20);
PlayTone(330, 18);
Wait(20);
PlayTone(311, 18);
Wait(20);
PlayTone(330, 18);
Wait(20);
PlayTone(330, 18);
Wait(20);
PlayTone(415, 18);
Wait(20);
PlayTone(370, 38);
Wait(60);
PlayTone(370, 18);
Wait(20);
PlayTone(330, 18);
Wait(20);
PlayTone(370, 18);
Wait(20);
PlayTone(330, 18);
Wait(20);
PlayTone(370, 18);
Wait(20);
PlayTone(330, 18);
Wait(20);
PlayTone(370, 38);
Wait(40);
PlayTone(370, 38);
Wait(40);
PlayTone(330, 18);
Wait(20);
PlayTone(311, 38);
}
task play_music()
{seishun();}
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;''
*青春アミーゴ(修二と彰)のプログラム [#e20a2b62]
作成者:Hypodytes rubripinnis
&size(30){☆[['''movie''':http://yakushi.shinshu-u.ac.jp/robotics/?plugin=attach&pcmd=open&file=%C0%C4%BD%D5%A5%A2%A5%DF%A1%BC%A5%B4.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%2F%C0%C4%BD%D5%A5%A2%A5%DF%A1%BC%A5%B4]]};
#comment
sub seishun() {
PlayTone(523, 38);
Wait(40);
PlayTone(587, 38);
Wait(40);
PlayTone(622, 38);
Wait(40);
PlayTone(587, 18);
Wait(20);
PlayTone(523, 38);
Wait(40);
PlayTone(466, 38);
Wait(40);
PlayTone(523, 38);
Wait(40);
PlayTone(466, 8);
Wait(10);
PlayTone(392, 28);
Wait(50);
PlayTone(523, 38);
Wait(40);
PlayTone(587, 38);
Wait(40);
PlayTone(622, 38);
Wait(40);
PlayTone(587, 18);
Wait(20);
PlayTone(523, 38);
Wait(40);
PlayTone(466, 38);
Wait(40);
PlayTone(622, 158);
Wait(180);
PlayTone(622, 23);
Wait(80);
PlayTone(415, 58);
Wait(60);
PlayTone(415, 18);
Wait(20);
PlayTone(370, 18);
Wait(20);
PlayTone(330, 18);
Wait(20);
PlayTone(330, 18);
Wait(20);
PlayTone(311, 18);
Wait(20);
PlayTone(330, 18);
Wait(20);
PlayTone(330, 18);
Wait(20);
PlayTone(415, 18);
Wait(20);
PlayTone(370, 38);
Wait(60);
PlayTone(370, 18);
Wait(20);
PlayTone(330, 18);
Wait(20);
PlayTone(370, 18);
Wait(20);
PlayTone(330, 18);
Wait(20);
PlayTone(370, 18);
Wait(20);
PlayTone(330, 18);
Wait(20);
PlayTone(370, 38);
Wait(40);
PlayTone(370, 38);
Wait(40);
PlayTone(330, 18);
Wait(20);
PlayTone(311, 38);
}
task play_music()
{seishun();}
task main()
{start play_music;}
ページ名: