如何用PC的喇叭來發出一段音樂? (1分)

  • 主题发起人 主题发起人 -_-;
  • 开始时间 开始时间
可以用汇编,直接控制喇叭发声,也可以控制频率来播放音乐
 
把频率和对应的延时放到一个二维数组里,然后用windows api里的beep放就行了
 
我晕,有好用的喇叭不用,却用那个只会发出“嘀嘀”的声音的喇叭


就像楼上说的用beep吧
 
naughtboy,给个例子,OK?
 
api sndplaysound
 
我想这一分非我莫属了。
beep;
// 不行

还是用
windows.beep(122,233);
// 改变这两个参数你将会得到不同的音长及频率
 
begin

windows.Beep(111,100);
windows.Beep(222,100);
windows.Beep(333,100);
windows.Beep(444,100);
windows.Beep(555,100);
windows.Beep(666,100);
windows.Beep(777,100);
windows.Beep(888,100);
windows.Beep(999,100);
windows.Beep(1110,100);
windows.Beep(1221,100);
windows.Beep(1332,100);
end;


这个效果如何?
 
呵呵,偶说得好像不太对,你可以先在type里定义
TNote = record
frequency, lasttime: integer;
end;

TVector = array[0..1000] of TNote;

然后在const里直接用vecSong: TVector = ((frequency:119,lasttime:200),...)
最后直接循环放就行了

 
既然linuxer这么想要这1分,就送你了~``
 
覺得我的答案對你真的有用,這一分我才收得安心呀!否則我會心裡不安的。
 

Similar threads

D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
875
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
I
回复
0
查看
621
import
I
后退
顶部