标题神奇音乐程序

　　程序①产生太空音响效果。当本程序运行时，将产生类似科幻电影中的太空音响效果，令人仿佛置身于茫茫天际之中。
　　程序①清单如下：
　　/*space.c产生太空音响效果*/
　　#include"dos.h"
　　#include"bios.h"
　　#include"stdlib.h"
　　void main(void)
　　{
　　int freq;//设置频率变量
　　long i;//设置循环变量
　　do {//随机地取一个频率
　　do {
　　freq=rand();
　　} while (freq>5000);
　　sound(freq)；//延时
　　for (i=0;i<freq*t;i++);
　　} while (bioskey(1)==0)；//按任意键后即可退出本程序
　　nosound()；}程序
　　②产生激光爆炸的音响效果。当此程序运行时，可以听到仿佛宇宙人在互相用激光枪射击的声响。
　　程序②清单如下：
　　/*laser.c产生激光爆炸音响效果*/
　　#include"dos.h"
　　#include"bios.h"
　　void main(void)
　　{
　　int freq://设置频率变量
　　int i;//设置循环变量
　　while (bioskey(1)==0)
　　{//按任意键即可退出本程序//降调
　　for (freq=3000;freq>1000;freq-=50)
　　{sound (freq)；//延时
　　for (i=0;i<10000;i++);
　　}
　　nosound();
　　}
　　}两例程序在Turbo C2.0下调试通过。(安微　 吴雁翔)