找回密码
 加入
搜索
查看: 2658|回复: 8

[AU3基础] [求助]AutoIT能否写出声音无缝播放?求代码,请高手赐教,谢谢。

  [复制链接]
发表于 2011-6-26 16:58:00 | 显示全部楼层 |阅读模式
#include <Sound.au3>

OnAutoItExitRegister("_Quit")

Global $sound = _SoundOpen("D:\下载目录\TEST.WAV")
;AdlibRegister("_SS", 500);_SoundLength($sound,2))

While 1
        ;_SoundPlay($sound, 0)
        SoundPlay ( "D:\下载目录\ADD.WAV" , 1 )
        ;Sleep(_SoundLength($sound,2))
WEnd
Exit

Func _Quit()
        ;AdlibUnRegister("_SS")
        _SoundClose($sound)
EndFunc


Func _SS()
        _SoundPlay($sound, 0)
EndFunc


用AU3自带命令和UDF函数连续播放都会有停顿,折腾了好久,依然没有达到效果,请高手赐教,重复无缝播放一个声音文件,AutoIT能不能写出无缝播放的代码?
发表于 2011-6-26 19:58:44 | 显示全部楼层
用 bass.dll 應該可以。
 楼主| 发表于 2011-6-26 21:49:59 | 显示全部楼层
去哪找?代码怎么写?
发表于 2011-6-26 22:29:26 | 显示全部楼层
去哪找?代码怎么写?
曼菲士 发表于 2011-6-26 21:49


http://www.autoitscript.com/foru ... nd-music-functions/
 楼主| 发表于 2011-6-27 14:56:27 | 显示全部楼层
本帖最后由 曼菲士 于 2011-6-27 14:57 编辑

看起来有点乱,没其它办法了?
这个Bass.DLL 有7MB左右,太大了。
发表于 2011-6-29 01:24:26 | 显示全部楼层
同问求解
发表于 2011-6-29 18:07:22 | 显示全部楼层
beep(1000,100000000)
 楼主| 发表于 2011-7-2 10:17:48 | 显示全部楼层
回复 7# gapkiller


    朋友。。。你是来搞笑的吧,这“B”声音不是我想要的效果呢
发表于 2011-7-2 15:38:08 | 显示全部楼层
beep(1000,100000000)
gapkiller 发表于 2011-6-29 18:07


牛哈。。
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-14 14:21 , Processed in 0.096523 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表