c語(yǔ)言電子琴設(shè)計(jì)(編輯修改稿)
2025-07-26 17:55 本頁(yè)面
【文章內(nèi)容簡(jiǎn)介】 78,1322,1484,1665},{248,278,312,330,371,416,467},{495,556,624,661,742,833,935},{990,1112,1248,1322,1484,1665,1869},{131,147,165,175,196,221,248},{262,294,330,350,393,441,495},{525,589,661,700,786,882,990},{147,165,185,196,221,248,278},{294,330,371,393,441,495,556},{589,661,742,786,882,990,1112},{165,185,208,221,248,278,312},{330,371,416,441,495,556,624},{661,742,833,882,990,1112,1248},{175,196,221,234,262,294,330},{350,393,441,467,525,589,661},{700,786,882,935,1049,1178,1322},{196,221,248,262,294,330,371},{393,441,495,525,589,661,742},{786,882,990,1049,1178,1322,1484}}。mainmenu()。/** Select Tone **/printf( please select tone:\n)。seltone:printf( 1A。2B。3C。4D。5E。6F。7G。\n)。printf( or press 39。039。 to cancle.\n)。c=bioskey(0)。switch(c){case 39。139。:l=0。m=1。h=2。break。case 39。239。:l=3。m=4。h=5。break。case 39。339。:l=6。m=7。h=8。break。case 39。439。:l=9。m=10。h=11。break。case 39。539。:l=12。m=13。h=14。break。case 39。639。:l=15。m=16。h=17。break。case 39。739。:l=18。m=19。h=20。break。case 39。039。:mainmenu()。printf( What do you want to do?\n)。printf( Please select.\n)。goto exit。default:printf( Error Input!\n)。printf( Please select again!\n)。goto seltone。}/** Select Time **/printf( Please select time.\n)。seltime:printf( 1slow,2middle,3fast\n)。printf( or press 39。039。 to cancle.\n)。c=bioskey(0)。if(c==39。139。)time=350。else if(c==39。239。)time=else if(c==39。339。)time=150。else if(c==39。039。){mainmenu()。printf( What do you want to do?\n)。goto exit。}else{printf( Error select again!\n)。goto seltime。}/** Play **/printf( Start to play!(Prees 39。039。 to exit)\n)。c=bioskey(0)。while(1){c=bioskey(0)。switch(c){case 39。139。:sound(tone[m][0])。Delay(time)。nosound()。break。case 39。239。:sound(tone[m][1])。Delay(time)。nosound()。break。case 39。339。:sound(tone[m][2])。Delay(time)。nosound()。break。case 39。439。:sound(tone[m][3])。Delay(time)。nosound()。break。case 39。539。:sound(tone[m][4])。Delay(time)。nosound()。break。case 39。639。:sound(tone[m][5])。Delay(time)。nosound()。break。case 39。739。:sound(tone[m][6])。Delay(time)。nosound()。break。case 39。q39。:sound(tone[h][0])。Delay(time)。nosound()。break。case 39。w39。:sound(tone[h][1])。Delay(time)。nosound()。break。case 39。e39。:sound(tone[h][2])。Delay(time)。nosound()。break。case 39。r39。:sound(tone[h][3])。Delay(time)。nosound()。break。case 39。t39。:sound(tone[h][4])。Delay(time)。nosound()。break。case 39。y39。:sound(tone[h][5])。Delay(time)。nosound()。break。case 39。u39。:sound(tone[h][6])。Delay(time)。nosound()。break。case 39。a39。:sound(tone[l][0])。Delay(time)。nosound()。break。case 39。s39。:sound(tone[l][1])。Delay(time)。nosound()。break。case 39。d39。:sound(tone[l][2])。Delay(time)。nosound()。break。case 39。f39。:sound(tone[l][3])。Delay(time)。nosound()。break。case 39。g39。:
環(huán)評(píng)公示相關(guān)推薦
鄂ICP備17016276號(hào)-1