MATLAB代做  | MATLAB代写  | MATLAB有偿编程
首 页
当前位置:MATLAB代做|MATLAB代写|MATLAB有偿编程matlab源码基础应用
电路演示程序        [↓跳到下载地址]
官方主页:源码共享网站:www.buycode.cn

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

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

源码语言:简体中文

源码类型:破解软件 - 基础应用

推荐星级:

更新时间:2088-07-29 16:30:27

源码简介

figure('name','基本电路的模拟');
axis([-3,12,0,10]);%建立坐标系
hold on  %保持当前图形的所有特性
axis('off'); %关闭所有轴标注和控制
%下面是画电池的过程
fill([-1.5,-1.5,1.5,1.5],[1,5,5,1],[0.5,1,1]);%确定坐标轴范围并填充
fill([-0.5,-0.5,0.5,0.5],[5,5.5,5.5,5],[0,0,0]); %确定坐标轴范围并填充
text(-0.5,1.5,'负极');%在坐标上标注说明文字
text(-0.5,3,'电池'); %在坐标上标注说明文字
text(-0.5,4.5,'正极'); %在坐标上标注说明文字
%下面是画导电线路的过程
plot([0;0],[5.5;6.7],'color','r','linestyle','-','linewidth',4);%绘制二维图形线竖实心红色
plot([0;4],[6.7;6.7],'color','r','linestyle','-','linewidth',4); %绘制二维图形线  实心红色为导线
a=line([4;5],[6.7;7.7],'color','b','linestyle','-','linewidth',4,'erasemode','xor');%画开关蓝色
plot([5.2;9.2],[6.7;6.7],'color','r','linestyle','-','linewidth',4);%绘制图导线为红色
plot([9.2;9.2],[6.7;3.7],'color','r','linestyle','-','linewidth',4);% 绘制图导线竖线为红线
plot([9.2;9.7],[3.7;3.7],'color','r','linestyle','-','linewidth',4); % 绘制图导线横线为红色
plot([0;0],[1;0],'color','r','linestyle','-','linewidth',4);%如上画红色竖线
plot([0;10],[0;0],'color','r','linestyle','-','linewidth',4);%如上画横线
plot([10;10],[0;3],'color','r','linestyle','-','linewidth',4);%画竖线
%下面是画灯泡的过程
fill([9.8,10.2,9.7,10.3],[3,3,3.3,3.3],[0 0 0]);%确定填充范围
plot([9.7,9.7],[3.3,4.3],'color','b','linestyle','-','linewidth',0.5);%绘制灯泡外形线为蓝色
plot([10.3,10.3],[3.3,4.45],'color','b','linestyle','-','linewidth',0.5); %绘制灯泡外形线为蓝色
%以下为绘圆
x=9.7:pi/50:10.3;%绘圆
plot(x,4.3+0.1*sin(40*pi*(x-9.7)),'color','b','linestyle','-','linewidth',0.5); %绘圆
t=0:pi/60:2*pi; %绘圆
plot(10+0.7*cos(t),4.3+0.6*sin(t),'color','b'); %绘圆
%下面是箭头及注释的显示
text(4.5,10,'电流运动方向'); %在坐标上标注说明文字
line([4.5;6.6],[9.4;9.4],'color','r','linestyle','-','linewidth',4,'erasemode','xor');%绘制箭头横线
line(6.7,9.4,'color','b','linestyle','>','erasemode','xor','markersize',10);% %绘制箭头三角形
pause(1);
%下面是开关闭合的过程
t=0;
y=7.7;
while y>6.7 %电路总循环控制开关动作条件
    x=4+sqrt(2)*cos(pi/4*(1-t));
    y=6.7+sqrt(2)*sin(pi/4*(1-t));
    set(a,'xdata',[4;x],'ydata',[6.7;y]);
    drawnow;
    t=t+0.1;
end
%下面是开关闭合后模拟大致电流流向的过程
pause(1);
light=line(10,4.3,'color','y','marker','.','markersize',40,'erasemode','xor');%画灯丝发出的光:黄色
%画电流的各部分
h=line([1;1],[5.2;5.6],'color','r','linestyle','-','linewidth',4,'erasemode','xor');
g=line(1,5.7,'color','b','linestyle','^','erasemode','xor','markersize',10);
%给循环初值
t=0;
m2=5.7;
n=5.7;
while n<6.3;%确定电流竖向循环范围
    m=1;
    n=0.05*t+5.7;
    set(h,'xdata',[m;m],'ydata',[n-0.5;n-0.1]);
    set(g,'xdata',m,'ydata',n);
    t=t+0.01;
    drawnow;
end
t=0;
while t<2;%在转角处的停顿时间
    m=1.2-0.2*cos((pi/4)*t);
    n=6.3+0.2*sin((pi/4)*t);
    set(h,'xdata',[m-0.5;m-0.1],'ydata',[n;n]);
    set(g,'xdata',m,'ydata',n);
    t=t+0.05;
    drawnow;
end
t=0;
while t<0.5 %在转角后的停顿时间
    t=t+0.5;
    g=line(1.2,6.5,'color','b','linestyle','^','markersize',10,'erasemode','xor');%绘制第二个箭头
    g=line(1.2,6.5,'color','b','linestyle','>','markersize',10,'erasemode','xor'); %绘制第二个箭头
    set(g,'xdata',1.2,'ydata',6.5);
    drawnow;
end
pause(0.5);
t=0;
while m<8 % 确定第二个箭头的循环范围
    m=1.1+0.05*t;
    n=6.5;
    set(g,'xdata',m+0.1,'ydata',6.5);
    set(h,'xdata',[m-0.4;m],'ydata',[6.5;6.5]);
    t=t+0.05;
    drawnow;
end
t=0;
while t<2 %%在转角后的停顿时间
    m=8.1+0.2*cos(pi/2-pi/4*t);
    n=6.3+0.2*sin(pi/2-pi/4*t);
    set(g,'xdata',m,'ydata',n);
    set(h,'xdata',[m;m],'ydata',[n+0.1;n+0.5]);
    t=t+0.05;
    drawnow;
end
t=0;
while t<0.5 %在转角后的停顿时间
    t=t+0.5;
    %绘制第三个箭头
    g=line(8.3,6.3,'color','b','linestyle','>','markersize',10,'erasemode','xor');
    g=line(8.3,6.3,'color','b','linestyle','v','markersize',10,'erasemode','xor');
    set(g,'xdata',8.3,'ydata',6.3);
    drawnow;
end

pause(0.5);
t=0;
while n>1 %确定箭头的运动范围
    m=8.3;
    n=6.3-0.05*t;
    set(g,'xdata',m,'ydata',n);
    set(h,'xdata',[m;m],'ydata',[n+0.1;n+0.5]);
    t=t+0.04;
    drawnow;
end
t=0;
while t<2%箭头的起始时间
    m=8.1+0.2*cos(pi/4*t);
    n=1-0.2*sin(pi/4*t);
    set(g,'xdata',m,'ydata',n);
    set(h,'xdata',[m+0.1;m+0.5],'ydata',[n;n]);
    t=t+0.05;
    drawnow;
end
t=0;
while t<0.5
    t=t+0.5;
    %绘制第四个箭头
    g=line(8.1,0.8,'color','b','linestyle','v','markersize',10,'erasemode','xor');
    g=line(8.1,0.8,'color','b','linestyle','<','markersize',10,'erasemode','xor');
    set(g,'xdata',8.1,'ydata',0.8);
    drawnow;
end
pause(0.5);
t=0;
while m>1.2 %箭头的运动范围
    m=8.1-0.05*t;
    n=0.8;
    set(g,'xdata',m,'ydata',n);
    set(h,'xdata',[m+0.1;m+0.5],'ydata',[n;n]);
    t=t+0.04;
    drawnow;
end
t=0;
while t<2 %停顿时间
    m=1.2-0.2*sin(pi/4*t);
    n=1+0.2*cos(pi/4*t);
    set(g,'xdata',m,'ydata',n);
    set(h,'xdata',[m;m+0.5],'ydata',[n-0.1;n-0.5]);
    t=t+0.05;
    drawnow;
end
t=0;
while t<0.5 %画第五个箭头
    t=t+0.5;
    g=line(1,1,'color','b','linestyle','<','markersize',10,'erasemode','xor');
    g=line(1,1,'color','b','linestyle','^','markersize',10,'erasemode','xor');
    set(g,'xdata',1,'ydata',1);
    drawnow;
end
t=0;
while n<6.3  %循环范围
    m=1;
    n=1+0.05*t;
    set(g,'xdata',m,'ydata',n);
    set(h,'xdata',[m;m],'ydata',[n-0.5;n-0.1]);
    t=t+0.04;
    drawnow;
end
%下面是开关断开后的情况
t=0;
y=6.7;
while y<7.7 %开关的断开
    x=4+sqrt(2)*cos(pi/4*t);
    y=6.7+sqrt(2)*sin(pi/4*t);
    set(a,'xdata',[4;x],'ydata',[6.7;y]);
    drawnow;
    t=t+0.1;
end
pause(0.5);%开关延时作用
nolight=line(10,4.3,'color','y','marker','.','markersize',40,'erasemode','xor');
% end


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

电路演示程序 --下载地址

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

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

想创业却没有经验的人

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

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

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

导入多种最新流行营销软件+网赚教程,让入驻者轻松加盟、复制有效成交技巧、快速赚钱。
·上一源码:弹性蹦球演示程序
·下一源码:电梯动画演示程序

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

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

浏览说明

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