MATLAB代做  | MATLAB代写  | MATLAB有偿编程
首 页
当前位置:MATLAB代做|MATLAB代写|MATLAB有偿编程matlab源码参考源码matlab方面
基于matlab编程动态模拟程序例子小电风扇源码程序        [↓跳到下载地址]
官方主页:源码共享网站:www.buycode.cn

联系方式:客服QQ:1747812398 买代码源码软件站,欢迎咨询

运行环境:Win9X/2000/XP/2003/

源码语言:简体中文

源码类型:源码程序 - 参考源码 - matlab方面

推荐星级:

更新时间:2016-04-07 21:41:31

源码简介

clear
speed = 100;
t = 0;
Y_a = 4;
Y_b = 4;
Y_c = 4;
y0 = figure;
axis equal;
axis off
axis([-6 6 -10 6])
title('可调速电风扇','fontsize',15);
grid off;
[x1,y1,z1]=sphere(30); %产生球体坐标
x=5*x1;
y=5*y1;
z=5*z1;
shading interp;
hold on;
mesh(x,y,z),colormap(hot); %画风扇框架
hold on;
hidden off;
hold on;
fill([-3,-1,1,3],[-8.5,-5,-5,-8.5],[0.5,0.5,0.5]); %画一个多边形
text(-0.6,-6,'谷速 ','color','k'); %多边形里的文字
text(-1.2,-7,'软件 ','color','k'); %多边形里的文字
hold on
ax = Y_a * cos(2 * pi * t);
ay = Y_a * sin(2 * pi * t); %计算初始三个叶片的横坐标和纵坐标
bx = Y_b * cos(2 * pi * t - 2 * pi/3);
by = Y_b * sin(2 * pi * t - 2 * pi/3);
cx = Y_c * cos(2 * pi * t + 2 * pi/3);
cy = Y_c * sin(2 * pi * t + 2 * pi/3);
y_line_a = line([0 ax],[0 ay],'EraseMode','xor','Color','r','linestyle','-','linewidth',20); %画出三个叶片
y_line_b = line([0 bx],[0 by],'EraseMode','xor','Color','b','linestyle','-','linewidth',20);
y_line_c = line([0 cx],[0 cy],'EraseMode','xor','Color','g','linestyle','-','linewidth',20);
k=1;

%b1为停止按钮
b1=uicontrol('parent',y0,...
    'units','points',...
    'tag','b2',...
    'style','pushbutton',...
    'string','停止',...
    'backgroundcolor',[0.75 0.75 0.75],...
    'position',[280 10 50 20],...
    'callback','k=0;');

%b2为关闭按钮
b2=uicontrol('parent',y0,...
    'units','points',...
    'tag','b3',...
    'style','pushbutton',...
    'string','关闭',...
    'backgroundcolor',[0.75 0.75 0.75],...
    'position',[350 10 50 20],...
    'callback',[...
    'k=1;,',...
    'close']);

%s1为调速框条
s1=uicontrol('parent',y0,...
    'units','points',...
    'tag','s1',...
    'style','slider',...
    'value',1*speed,...
    'max',100,...
    'min',30,...
    'backgroundcolor',[0.75 0.75 0.75],...
    'position',[30 10 190 20],...
    'callback',[...
    'm=get(gcbo,''value'');,',...
    'speed = m/1;']);

%t1为上面的文字说明
t1=uicontrol('parent',y0,...
    'units','points',...
    'tag','t',...
    'style','text',...
    'fontsize',15,...
    'string','风速 请点击滑动条空白处',...
    'backgroundcolor',[0.75 0.75 0.75],...
    'position',[30 30 190 20]);

while 1 %让风扇转起来的循环
    if k==0
        break
    end
    t = t + 1/speed;
    ax = Y_a * cos(2 * pi * t);
    ay = Y_a * sin(2 * pi * t);
    bx = Y_b * cos(2 * pi * t - 2 * pi/3);
    by = Y_b * sin(2 * pi * t - 2 * pi/3);
    cx = Y_c * cos(2 * pi * t + 2 * pi/3);
    cy = Y_c * sin(2 * pi * t + 2 * pi/3);
    drawnow;
    set(y_line_a,'XData',[0 ax],'YData',[0 ay]);
    set(y_line_b,'XData',[0 bx],'YData',[0 by]);
    set(y_line_c,'XData',[0 cx],'YData',[0 cy]);
end


提 示:本站所有源码只提供浏览,需要定制的朋友可以联系在线客服!
注意:价格根据项目的难易程度来定价格业务咨询

基于matlab编程动态模拟程序例子小电风扇源码程序 --下载地址

注意:为避免不必要的误会,本站项目里的源码只公开部分需要的联系在线客服

本站长期招聘程序代写高手,欢迎加入华南地区matlab团队

想创业却没有经验的人

无论你是否有过网上开店的经验,都可以随时联系在线客服,建立自己独立的网站
想开网店却不知道如何入手

淘宝创业成本低而且风险小,如果想开淘宝店的朋友可以联系在线客服。
想兼职创业,却不擅长交际与服务的人

在家创业月入5000元。网站程序+百套群发工具+网赚资料+域名+空间+本站终身代理资格,这样你网赚的条件全具备了。每天3小时管理、推广、收钱。
缺乏能快速赢利型产品的人

导入多种最新流行营销软件+网赚教程,让入驻者轻松加盟、复制有效成交技巧、快速赚钱。

源码评论评论内容只代表网友观点,与本站立场无关!

   评论摘要(共 0 条,得分 0 分,平均 0 分) 查看完整评论

浏览说明

* 本站所有源码全部公开,随时随地浏览!
* MATLAB软件如用于商业用途,请购买正版!
* 如果您发现下载链接错误,请点击报告错误谢谢!
* 站内提供的所有软件包含破解及注册码均是由网上搜集,若侵犯了你的版权利益,敬请来信通知我们!
Copyright © 2008-2014 www.buycode.cn. All Rights Reserved.
页面执行时间:234.37500 毫秒