Presentation is loading. Please wait.

Presentation is loading. Please wait.

電子音樂 通訊系 B09622048 楊穎穆.

Similar presentations


Presentation on theme: "電子音樂 通訊系 B09622048 楊穎穆."— Presentation transcript:

1 電子音樂 通訊系 B 楊穎穆

2 ※用電腦IO Port,掃描顯示法及迴圈技巧產生一首電子音樂。 1、流程圖 2、頻率表 3、程式 4、實驗結果 5、資料來源 6、結束
簡介 ※用電腦IO Port,掃描顯示法及迴圈技巧產生一首電子音樂。 1、流程圖 2、頻率表 3、程式 4、實驗結果 5、資料來源 6、結束

3 流程圖 main P10=~p10 P10=1 delay(50000/t[i]) no i=0 a++ i<42 delay(x)
yes a=0 X-- >=0 no a<b[i]*t[i]*0.55 yes return

4 頻率表 Do:262hz Re:294hz Mi:330hz Fa:349hz So:392hz La:440hz Si:494hz

5 程式 #include <reg52.h> #define Do 262 #define Re 294
#define Mi 330 #define Fa 349 #define So 392 #define La 440 #define SI 494 sbit P10=P1^0; int code tow[]={S,M,M,F,R,R,D,R,M,F,S,S,S,S,M,M,F,R,R,D,M,S,S,D}; int code beat[ ]={1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1}; int delay (int); int main (void) {

6 int i,a; P10=1; while(1){ for(i=0;i<=46;i++) { for(a=0;a<=tow[i]*0.25*beat[i];a++) P10=~P10; delay(100000/tow[i]); } int delay (int x) while(x--); return 0;

7 實驗結果 小蜜蜂

8 ※主要的資料都來至王志湖老師上課所教的內容。
資料來源 ※主要的資料都來至王志湖老師上課所教的內容。

9 END


Download ppt "電子音樂 通訊系 B09622048 楊穎穆."

Similar presentations


Ads by Google