荔园在线

荔园之美,在春之萌芽,在夏之绽放,在秋之收获,在冬之沉淀

[回到开始] [上一篇][下一篇]


发信人: scrcom (学会探索), 信区: Program
标  题: 聆听混沌的声音
发信站: 荔园晨风BBS站 (Mon Jun 30 14:38:03 2003), 站内信件



本世纪70年代初,美国普林斯顿大学的生态学家R·May在研究昆虫群体繁殖规律
时提出一个著名的模型: χ[n+1]=k*χ[n]*(1-χ[n])

为了体现这种复杂之中的无穷奥妙,下面这个用TC2.0编写的小程序用χ[n]大小
来控制PC喇叭的发音频率,设定不同的k值,我们就可以聆听到混沌的声音。


#include
  #include
  main(){
  int fMin=20,fMax=16000; /*fMin代表最低频率,fMax代表最高频率*/
  int fDis,i,j; /*fDis代表最高频率和最低频率之间的差值*/
  /*i,j用于循环记数*/
  float x=0.1,k; /*x代表x[n]的大小,设定其初始值为0.1,即x[0]=0.1*/
  fDis=fMax-fMin;
  for(j=1;;j++){
  printf("Please input The value of k(1-4.0)\n"); /*输入k值*/
  printf("If you want to quit,Please input:0\n"); /*如果k=0退出*/
  scanf("%f",&k);
  if (k==0) break;
  for(i=1;i<100;i++) /*去除开始的100个点*/
  x=k*x*(1-x);
  for (i=1;i<100;i++){
  x=k*x*(1-x); /*计算x的值*/
  sound(x*fDis+20); /*用x的值控制PC喇叭的发音频率*/
  delay(1000); }
  nosound(); }}
  执行上面的小程序时,k值就相当于一个“调音旋钮”。当将k值设定在1与3之间
时,喇叭里传出的只有一个音调,重复又烦人。当k值稍稍大于3时,便开始有了韵律:
so-mi-so-mi…。k值增加到3.449时,变成了so-fa-la-mi-so-fa-la-mi…,
再增加k值,韵律更加复杂,终于成了现代抽象派作曲家的音乐作品。但是韵律并不是
随着k值的增加无限地复杂下去。在k值增加到3.835时,音调又变成了mi-so-ti-mi
-so-ti…,再增加k值又迅速地变得更加复杂。
不停地改变k值,仔细聆听,会听到混沌中的无限奥妙。


--
不是风,是雪。

⌒╮下雪了 ╭⌒╮ ╭⌒╮~⌒╮
╭⌒╭⌒╮╭⌒╮~╭⌒╮ ~︶︶、︶︶
︶︶︶︶、︶~~ 、 ︶︶ 、  、、  、

※ 来源:·荔园晨风BBS站 bbs.szu.edu.cn·[FROM: 192.168.36.29]


[回到开始] [上一篇][下一篇]

荔园在线首页 友情链接:深圳大学 深大招生 荔园晨风BBS S-Term软件 网络书店