微信公众号 
图码生活

每天发布有五花八门的文章,各种有趣的知识等,期待您的订阅与参与
电脑报 1992-2001 十年文章全集
电脑报 1992-2001 十年文章全集
包含从 1992 年 - 2001 年间,两万余篇期刊文章,查询最少输入两个字符
随便看看
读取中
读取中
标题神奇的声音程序
栏目软件大世界
作者刘友生
发布1997-01-01
  三声爆竹,接着响起了电话铃声,随着三声警报声,救护车风驰电掣驶过。照样输入下面的程序,并运行,你会体会到声音语句的神奇魔力,如果在游戏中使用,效果一定不错。该程序用QBASIC编写,在多种机型上调试通过。  
  爆竹声
  FOR K=1 TO 3
  FOR i=2805 TO 1360 STEP -30  
  SOUND i,.6
  NEXT i
  NEXT K
  '电话铃声
  FOR i=1 TO 15
  SOUND 1200,2:SOUND 300,1
  FOR K=1 TO 2500:NEXT
  NEXT  
  警报声
  CLS
  FOR K=1 TO 3
  FOR i=1 TO 5  
  SOUND 900,2  
  NEXT i  
  FOR i=1 TO 5
  SOUND 540,2  
  NEXT
  NEXT K
  救护车声
  FOR j=1 TO 3  
  FOR i=560 TO 1905 STEP 30
  SOUND i,.5  
  NEXT i  
  FOR i=1905 TO 560 STEP -30
  SOUND i,.8  
  NEXT i
  NEXT j