***[[学習ノート 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;} &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