kimmygzh 发表于 2007-11-30 10:18

单相异步电动机计算程序源程序代码

好久不来论坛了，好想大家，今天来发个贴，是一个单相异步电动机的计算程序的源程序。

软件介绍：如果说RMXprt的计算结果和实际测试结果差5%的话，这个程序应该误差在3%之内，这是经过样机和实际测试后反复对比后得出的结论。当然对于RMxprt的准确性我没有资格评论，我用RMxprt计算出来的结果和实际测试结果一般要差5%左右了。这可能是我还不熟练所致。

软件优点:1   体积非常小，总共大小才3.4M，可以计算电阻起动，电容启动，电容运转，双值电容。铝线，铜线，大小槽等等
                      2    公布的是源程序，会设计的人可以自己根据自己的需要修改，完善。并且可以转换为C语言，可视化程度更高。
                      3   计算结果令人满意，精确度较高。


说明:我下面发的是该程序的源程序，大家有兴趣的朋友可以编译成可视化程序，并且可以随意修改.非常人性化。


[ 本帖最后由 kimmygzh 于 2008-11-17 16:50 编辑 ]

madejin 发表于 2007-11-30 10:58

了不起，顶了。可惜我没有学过Fortran，

kimmygzh 发表于 2007-11-30 11:01

单相异步电动机计算程序源程序代码一个单相异步电动机的计算程序的源程序。

软件介绍：该程序是我公司一个老工程师根据上海电器科学研究所的出版的《中小型电机设计手册》用fortuan语言编写的，他本人有40多年的工作经验，精通电机设计，反复修改了这个程序，有些地方加入了自己的理解，有些地方经过了他的修正。如果说RMXprt的计算结果和实际测试结果差5%的话，这个程序应该误差在3%之内，这是经过样机和实际测试后反复对比后得出的结论。当然对于RMxprt的准确性我没有资格评论，我用RMxprt计算出来的结果和实际测试结果一般要差5%左右了。这可能是我还不熟练所致。

软件优点:1   体积非常小，总共大小才3.4M，可以计算电阻起动，电容启动，电容运转，双值电容。铝线，铜线，大小槽等等
                      2    公布的是源程序，会设计的人可以自己根据自己的需要修改，完善。并且可以转换为C语言，可视化程度更高。
                      3   计算结果令人满意，精确度较高。


说明:我下面发的是该程序的Fortran源程序，大家有兴趣的朋友可以用Visual_Fortran编译成源程序，并且可以随意修改.非常人性化。编译好的程序很抱歉不能发布出来，因为牵涉到公司内部软件的问题，并且那位工程师也不大愿意发出来bq2_31

[ 本帖最后由 kimmygzh 于 2007-11-30 15:17 编辑 ]

Heaven 发表于 2007-11-30 15:19

真是个好东西啊，可惜金钱不够，等够了一定买了

ahwhdj 发表于 2007-11-30 18:13

你把lzs3.DAT数据文件传上来,还有数据文件说明

12qq21 发表于 2007-11-30 18:32

我以前用的，现在早就忘了，连FORTRAN软件都没有，怎么办？

12qq21 发表于 2007-11-30 18:34

哪位给我个可以看FORTRAN程序得软件？

kim大哥你那个公司得？

[ 本帖最后由 12qq21 于 2007-11-30 18:36 编辑 ]

Heaven 发表于 2007-11-30 19:45

回复 5# 的帖子

你要的LZS4的数据如下：




      ********数据文件数据输入,请输入你的变量数据！***********      
   功率pn,电压u1,极数p,相数m,频率f1,效率XFN1,功率因素COSFI1,磁密Bg1
      880.   240.    2.      2.      50.    .680   .990    7950.
   定外D1,D10,定内Di1,转外D2,转内Di2,定槽Q1,转槽Q2,定长L1,转长L2   
       12.8   .0    6.7   6.64    1.70    24.   18.      5.5   5.5
   定子槽形数据 ( bo1, bs1, bs2, hs0, hs1,hs2, hs,Ftm1 )      
      .250    .490    .700    .070    .070    .800   1.290   1.38
   转子槽形数据(bo2, br1,br2, hr0, hr1, hr2, hr,dk,起动电容 cst)
      .000    .460    .300    .020    .230    .460      .860    .000   0.
   转子端环数据 (b1,b2,Dre,Dri,d)(DTm1),匝比(a),运行电容(C),(lo2)
   1.15    1.00    6.30    4.00   .60      .0    1.24   20.   8.68
   主、副绕组线径(dm, dm1, da, da1)开关(DZCX,ZZCX,LQFS,YXFS)      
      .900   .96   .600   .64    YDC   LXC   ZSL   DRYZ
   主、副绕组数据(Jym,Jya,Kdpm,Kdpa,am,aa,Nm,Na)                  
      4       2      .830    .958   1.      1.      1.      1.   
   *******主绕组线圈跨距值 Ymi(J) J=1,8 ***************************
      0.      0.      5.      7.      9.   11.      0.      0.   
   *******副绕组线圈跨距值 Yai(J) J=1,8 ***************************
       11.      9.      0.      0.      0.      0.      0.      0.   
   *******主绕组线圈百分比 tmi(J) J=1,8 ***************************
      .000    .000    .250    .250    .250    .250    .000    .000   
   *******副绕组线圈百分比 tai(J) J=1,8 ***************************
      .500    .500    .000    .000    .000    .000    .000    .000   

   =====================电容运转单相电机电磁计算结果=======================


   ********************** 冲片尺寸及铁心数据计算结果*** ********************

   Tao=   10.5243   t1=      .8770   t2=   1.1589   bts=   .4233
   btr=   .6113   ht1=   .9867   ht2=   .7400   hc1=    1.8767
   hc2=    2.0850   Lc1=    8.5792   Lc2=    2.9727   Ss=      .5911
   Si=      .0710   Se=      .5201   Sb=      .2932   bsk=   .8770
   Sr=      .6450   Dr=   5.1500   Kr=      .9024   Kc1=    1.2871
   Kc2=    1.0000   Kc=   1.2871   g=      .0300      r1=      .2300
   r2=      .1500   R=      .3500

   ****************** 主绕组计算结果 **************************************

   Ym=   8.0000   Wpm=184.0000   Zm=   736.0000   Lm=    16.6955
   dm=      .9000   dm1=   .9600   Sm=      .6362   De=   8.1300
   Zm1=   .0000   Zm2=   .0000   Zm3=   46.0000   Zm4=   46.0000   
   Zm5=   46.0000   Zm6=   46.0000   Zm7=   .0000   Zm8=   .0000   

   *********************** 主相参数计算结果 **********************************
   R1m=    6.6831   Rbr=    3.4186   Rrr=    3.7166   R2m=    7.1352
   Au1=   .4692   AL1=   .7080   As1=    1.1772   Ad1=    1.9781
   Ae1=    2.1168   Kx=   1.1724   Xs1=   .7939   Xd1=    1.3339
   Xe1=    1.4274   X1m=    3.5552   Au2=    1.8311   AL2=   .8768
   As2=    2.7079   Ad2=    1.3646   Ask=   .3908   Ae2=    1.0534
   Xs2=    2.4348   Xd2=    1.2270   Xsk=   .3514   Xe2=   .9472
   X2m=    4.9603   Xtm=    8.5155   Rtm=   13.8183   Ztm=   16.2314
   Z1m=    7.5699

   ************************** 磁路计算结果 ************ ********************

   EPS1=    .1215   EPS11=   .1072   FIJ1=28.0116   FIJ2=   8.1096
   Ke=      .8867   Ke1=   .8940   Kp=      .9919   Ft1=    1.3978
   AFAi=    .7176   Kb=   1.0791   FI=322832.00   Bg=    7772.59
   Bt1=17089.08   Bt2=15511.99   Bc1=16595.52   Bc2=14816.80
   att1=76.2474   att2=26.8859   atc1=56.7214   atc2=18.2603
   C1=      .2769   C2=      .3373   ATg=240.0943   ATt1=75.2308
   ATt2=19.8955   ATc1= 134.7385   ATc2=18.3112   Ft=   1.3962
   AT=   488.2703   Ftm=    2.0337   Ium=    1.7762   Xum=119.8167

   ************************** 铁耗、机械耗计算结果 ************************

   Gt1=   .4085   Gt2=   .3318   Gc1=    2.6247   Gc2=    1.0104
   Pt1=    6.4859   Pt2=    5.4443   Pc1=    6.1510   Pc2=    4.9787
   Pfe1=32.7446   Pfe2=17.9961   Pfe=   50.7406   Pfw=   26.5751

   ************************ 副绕组计算结果 *********************************

   Ya=    10.0000   Wpa=198.0000   Za=   792.0000   da=      .6000
   da1=   .6400   Sa=      .2827   Sfmax=   .8151   La=    19.4944
   R1a=   18.8938
   Za1=   99.0000   Za2=   99.0000   Za3=   .0000   Za4=   .0000   
   Za5=   .0000   Za6=   .0000   Za7=   .0000   Za8=   .0000   
   Sf1=   .7797   Sf2=   .7797   Sf3=   .8151   Sf4=   .8151   
   Sf5=   .8151   Sf6=   .8151   Sf7=   .0000   Sf8=   .0000   

   ******************************* 性能计算结果 ****************************

   Xafa= 124.7769   Kafa=    .9602   M1=   3.2896   M2=   .0572
   M3=    59.9083   M4=   2.3815   S=       .0817   Rf=    27.0248
   Rb=   1.7133   Xf=    21.2964   Xb=   2.4326   Rt=    35.4212
   Xt=    27.2842   C=   20.0000   Xc=   159.1549   Rc=   9.5000
   Rta=   72.5815   Xta= -117.2028   R3=5330.7550   X3=    -3639.45
   R4=      .0307   X4=   -.0210   R5=   3.3097   X5=    -1.6040
   R6=   1.8920   X6=   1.1071   Im=   3.6779   STm=-25.8561
   DTm=    5.7813   Ia=   2.1921   STa=   30.3326   DTa=    7.7530
   IL=   5.2254   P1=1281.1620   P2=   879.9996   EFN=   .6869
   COSFI=   .9955   n2=2754.8950   Uc=   349.5043   Smm=   .2338
   P2m= 1140.9130   Tm=   1.5538   ADT=   1382.9790   I0=   1.8197
   Pcu10=   84.70   Pcu20=   10.89   P10=172.9053

   ****************************** 起动计算结果 *****************************

   Cr=      .9191   Cx=   1.0445   Rmst=13.2408   xMST1=8.8944
   Zmst1= 15.9509   Imst1= 15.0462   Im11st= 16.0038    ATst= 998.5479
   Qm=    16.0000   BATc=    .9435   BL= 22049.5000   Kz=      .8195
   Cs1=   .1132   Cs2=   .2092   DTAu1=   .1026   As1st=1.0746
   Xs1st=   .7247   Xd1st=1.0931   X1mst=3.2453   DTAu2=   .0000
   Au2st=   .5166   As2st=1.3934   Xs2st=1.2529   Xd2st=1.0055
   Xskst=   .2879   X2mst=3.4935   Xtmst=6.7387   Xmst=   7.0386
   Zmst=14.9954   Imst=16.0049   DTmst= 25.1581   Rast=38.4770
   Xast=-148.33   Zast= 153.2416   Iast=   1.5662   DTast=5.5391
   STmst= -27.994   STast=75.458   Tst=   .4213   Ist=   15.7146
   Ucst= 249.7049   Cst=   .0000   C=   20.0000

   ******************************** 主要性能数据 ***************************

   Bg=7773.   Bt1= 17089.   Bt2=15512.    Bc1=16596.   Bc2=14817.
   P1=1281.16   P2=880.00   IL=5.225    n2=2755.   Sfmax=   .8151
   EFN= .6869   COSFI= .9955    Ist= 15.715   Tst= .421      Tm=1.554
   Wpm=184.   Kwpm= .8300   DTm= 5.781    dm=.9000   a=   1.240
   Wpa=198.   Kwpa= .9580   DTa= 7.753    da=.6000   ADT=1382.9790
   Cst=    0.   C=   20.      GFe= 6.7516   Gcu=.3454    GAl=.1347

   ************************************ 完 **********************************

ahwhdj 发表于 2007-12-4 17:43

需要电子档的文件,以附件传上来,输入太麻烦.谢谢!

qqmotor 发表于 2007-12-6 13:41

好东西

好东西，再贵也值。。。。
不知道用起来效果如何

qqmotor 发表于 2007-12-6 13:44

我没有学过编程呀。

兄弟，我已经付币了
但是我没有那个编程软件，还有，我也不会编程呀。
怎么办呢？/？
:L

能否帮助一下，

achilles 发表于 2007-12-6 23:10

穷人难活啊

初来乍到 身无分文 怎么买您的东西啊

小小鸟儿 发表于 2007-12-6 23:33

不花钱心得:趁还没加入精华时下载!!!   当然了,你得有时间时刻关注论坛发贴走势............:lol

flytogod2 发表于 2007-12-8 19:37

好资料!!
公式中加的参数是需要经验的,这个可是"一般人我不告诉他"哟!!

zhyulong29 发表于 2007-12-11 21:42

兄弟，没有钱啊，怎么购买啊？

wjqdslz 发表于 2007-12-13 12:36

幵

一时上下跳动地上事古丰

kimmygzh 发表于 2007-12-13 16:05

回9楼的:
本来就是电子档的文件啊,在上传的附件里面

kimmygzh 发表于 2007-12-13 16:09

回复 12楼 的帖子

编译好的程序有不好给你们,不好意思,不是我小气,是因为我答应过我们单位的工程师,说不定哪天他也来上这个论坛了,看到了这个帖子(当然可能性比较小),那我不是很难做人了,拜师可不敢当,私下交流没有任何问题

kimmygzh 发表于 2007-12-13 16:10

回复 16楼 的帖子

这都行!!!!鄙视啊 bq2_19

kimmygzh 发表于 2007-12-13 16:13

回15#,18#的两位朋友,没钱可以多来论坛啊,我要的又不是什么RMB,只是论坛上的虚拟货币,有些东西你找到后或许对你会有很大的帮助,付出点时间也值得对不?当然,我也不是为了故意刁难大家了,稍微付出点劳动也有好处
页: [1] 2 3 4 5 6 7 8 9 10
查看完整版本: 单相异步电动机计算程序源程序代码