神奇音乐程序 安微 吴雁翔 1996-12-27 程序①产生太空音响效果。当本程序运行时,将产生类似科幻电影中的太空音响效果,令人仿佛置身于茫茫天际之中。 程序①清单如下: /*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;i1000;freq-=50) {sound (freq);∥延时 for (i=0;i<10000;i++); } nosound(); } }两例程序在Turbo C2.0下调试通过。(安微 吴雁翔)