各位matlab爱好者，在MATLAB编程的时，我们还想听听music，为什么不考虑用matlab来实现呢？一个MATLAB函数帮你解决所有问题。music.mfunction wmp=music(songname)%%输出： wmp——COM.wmplayer_ocx组件对象%%输入：songname——歌曲名称%%示例：%music('好心分手');%%停止播放：wmp.close 如果无WMP,自动存为ans。%%音量调节 wmp.setting.volume=10%@王小川_matlab 制作 http://weibo.com/hgsz2003/%@baby_wolf 制作 http://weibo.com/n/%E8%9C%80%E5%B1%B1%E6%8E%8C%E9%97%A8V clear wmpclear ansstr=dec2hex(unicode2native(songname));str=[repmat('%',size(str,1),1) str];str=reshape(str',1,[]);% str=songnamesong_url=['http://mp3.baidu.com/m?f=ms&rf=idx&tn=baidump3&ct=134217728&lf=&rn=&word=',str,'&lm=-1'];webfile_stream=urlread(song_url);%filelist=regexp(webfile_stream,'http://box\.zhangmen\.baidu\.com/m\?word=mp3.{1,300}target','match'); music_page_url=regexp(webfile_stream,'http://mp3\.baidu\.com/d\?song=.{1,400} target="_blank" onclick="return ','match'); music_page_url; if ~isempty(music_page_url) spc = strfind(music_page_url{1}, ' ') ; music_page_url{1}=[music_page_url{1}(1:spc-1) '%20'music_page_url{1}(spc+1:end)]; music_page=urlread(music_page_url{1}(1:end-47)); else %wmp=nan; disp(['没有找到与《',songname,'》相关的歌曲']); return; end filelist=regexp(music_page,'a id="downlink" href=".{1,200}" onclick','match');%22 ***** 1fileurl=['http://mp3.baidu.com' filelist{1}(23:end-9)]; % http...... " target close all; figure('visible','off'); disp(['作者：@王小川@matlab & @baby_wolf 新浪微博：http://weibo.com/hgsz2003/ ; http://weibo.com/n/%E8%9C%80%E5%B1%B1%E6%8E%8C%E9%97%A8V']) disp('歌曲连接成功'); disp(['歌曲下载链接：', music_page_url{1}(1:end-46),'' ]);%disp(music_page_url{1}(1:end-46)); clipboard('copy',fileurl); % fprintf('%s\n',song_url);% fprintf('%s\n',filelist{1}(1:end-8));% web=actxcontrol('shell.explorer.2',[0 0 400 400 ]);% web.Navigate(filelist{1}(1:end-8))% web(filelist{1}(1:end-8),'-browser');wmp=actxserver('wmplayer.ocx');wmp.url=fileurl;%wmp.setting.volume=10;disp(['当前的播放状态为：',wmp.status]);disp('停止播放请清除在变量空间清除COM.wmplayer_ocx，或者输入：名称.close');disp('如需要调整音量，请按照如下设置：名称.setting.volume=10'); end% end 清除暂时请用wmp.close 如果无WMP,自动存为ans，即为ans.close大家觉得这个cool吗？
2012-02-23 16:10
各位MATLABER，在MATLAB编程的同时，难道你还要重复打开QQMUSIC、百度音乐吗？一个MATLAB函数帮你解决所有问题。清除暂时请用wmp.close 如果无WMP,自动存为ans，即为
2012-12-18 15:37
Java+Mysql实现简单在线电影、音乐、图书等推荐系统（基于用户的协同过滤推荐算法）一、项目简介1、开发工具和实现技术MyEclipse10，jdk1.7，mysql5.5，tomcat7
2022-01-03 06:45
Nature：肠道内微生物合作方式的探究
2020-05-04 08:42
给随身听加装无线转发器，特别适用于学生。在同一个宿舍或相邻的几个宿舍，如果一个同学的随身听上加装了无线转发器，那么就有很多同学可以用收音机收听这个同学播放的音乐。如果几个同学的随身听加装了无线转发器。
2021-05-07 07:53
MP3、随身听一直保存在我的初、高中学习生涯中，那时候有事没事总喜欢戴个耳塞听自己喜欢的音乐，无论是开心也好，悲伤也好。如今，从事晶振行业的我现在想和大家一起来寻找MP3、随身
2014-03-06 15:09
基于NI myDAQ的设计，可以对播放音乐进行低频、中频、高频的选择处理
2016-10-15 14:59
一个简洁的音乐播放小程序
2012-11-21 15:15
使用labview制作的简易播放音乐功能软件，打开格式为wav格式的文件，可以动态观看声音波形和音乐喷泉，内附一首音乐波形文件 ：willing to die
2013-08-29 14:47
基于STM32的音乐喷泉文章目录基于STM32的音乐喷泉Introduction引言1、系统概述1.1、设计任务1.2、设计要求2、 方案设计2.1、芯片选择方案2.2、 系统概述：2.3、系统
2021-09-06 06:14
