学習ノート Hypodytes rubripinnis

MUSIC!

課題5:

アクセス数:今日1 総数&counter([total|today|yesterday]);   最終更新日:2006-01-08 (日) 00:29:04

さくら(ケツメイシ)のプログラム

作成者:Hypodytes rubripinnis

movie


sub sakura() {
		PlayTone(523, 8);
		Wait(20);
		PlayTone(523, 18);
		Wait(20);
		PlayTone(554, 18);
		Wait(20);
		PlayTone(622, 38);
		Wait(40);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(554, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 38);
		Wait(60);
		PlayTone(523, 18);
		Wait(20);
		PlayTone(523, 18);
		Wait(20);
		PlayTone(523, 18);
		Wait(20);
		PlayTone(523, 18);
		Wait(20);
		PlayTone(415, 18);
		Wait(20);
		PlayTone(523, 18);
		Wait(20);
		PlayTone(554, 18);
		Wait(20);
		PlayTone(622, 30);
		Wait(40);
		PlayTone(554, 13);
		Wait(20);
		PlayTone(554, 18);
		Wait(20);
		PlayTone(523, 18);
		Wait(20);
		PlayTone(523, 28);
		Wait(40);
		PlayTone(392, 10);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(784, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(554, 18);
		Wait(20);
		PlayTone(523, 18);
		Wait(20);
		PlayTone(554, 45);
		Wait(60);
		PlayTone(784, 38);
		Wait(40);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 38);
		Wait(140);
		PlayTone(523, 13);
		Wait(20);
		PlayTone(523, 18);
		Wait(20);
		PlayTone(554, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(554, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 38);
		Wait(60);
		PlayTone(523, 18);
		Wait(20);
		PlayTone(523, 18);
		Wait(20);
		PlayTone(523, 18);
		Wait(20);
		PlayTone(523, 18);
		Wait(20);
		PlayTone(415, 18);
		Wait(20);
		PlayTone(523, 18);
		Wait(20);
		PlayTone(554, 18);
		Wait(20);
		PlayTone(622, 30);
		Wait(40);
		PlayTone(554, 13);
		Wait(20);
		PlayTone(554, 18);
		Wait(20);
		PlayTone(523, 18);
		Wait(20);
		PlayTone(523, 28);
		Wait(40);
		PlayTone(392, 13);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(784, 18);
		Wait(60);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 38);
		Wait(40);
		PlayTone(554, 18);
		Wait(20);
		PlayTone(523, 18);
		Wait(20);
		PlayTone(554, 45);
		Wait(60);
		PlayTone(784, 38);
		Wait(40);
		PlayTone(622, 18);
		Wait(20);
		PlayTone(622, 38);
		Wait(140);
		PlayTone(415, 18);
		Wait(20);
		PlayTone(698, 18);
		Wait(20);
		PlayTone(622, 38);
		Wait(40);
		PlayTone(523, 31);
		Wait(80);
		PlayTone(415, 18);
		Wait(20);
		PlayTone(698, 18);
		Wait(20);
		PlayTone(622, 38);
		Wait(40);
		PlayTone(523, 31);
		Wait(80);
		PlayTone(415, 18);
		Wait(20);
		PlayTone(698, 18);
		Wait(20);
		PlayTone(622, 38);
		Wait(40);
		PlayTone(523, 31);
		Wait(80);
		PlayTone(415, 18);
		Wait(20);
		PlayTone(698, 18);
		Wait(20);
		PlayTone(622, 38);
		Wait(40);
		PlayTone(523, 31);
		Wait(80);
		PlayTone(415, 18);
		Wait(20);
		PlayTone(698, 18);
		Wait(20);
		PlayTone(622, 38);
		Wait(40);
		PlayTone(523, 31);
		Wait(80);
		PlayTone(415, 18);
		Wait(20);
		PlayTone(698, 18);
		Wait(20);
		PlayTone(622, 38);
		Wait(40);
		PlayTone(523, 31);
		Wait(80);
		PlayTone(415, 18);
		Wait(20);
		PlayTone(698, 18);
		Wait(20);
		PlayTone(622, 38);
		Wait(40);
		PlayTone(523, 31);
		Wait(33);
}

task play_music()
     {sakura();}

task main()
     {start play_music;}

添付ファイル: fileさくら.wmv 50件 [詳細]

トップ   編集 凍結 差分 バックアップ 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2006-01-08 (日) 00:29:04