学習ノート Hypodytes rubripinnis†

↑

ＭＵＳＩＣ！†

↑

課題５：†

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

↑

青春アミーゴ（修二と彰）のプログラム†

作成者:Hypodytes rubripinnis

☆ｍｏｖｉｅ


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;}
添付ファイル: file青春アミーゴ.wmv 99件 [詳細]
トップ   編集 凍結 差分 履歴 添付 複製 名前変更 リロード   新規 一覧 検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2006-01-08 (日) 00:29:37