⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 dqbyhsj.cpp

📁 这是本人两年前兼职为某个公司做的石油钻进设计软件
💻 CPP
📖 第 1 页 / 共 5 页
字号:
// dqbyhsj.cpp : implementation file
//

#include "stdafx.h"
#include "Cvenus.h"
#include "dqbyhsj.h"

#include "math.h"
#include "yqsxz.h"
#include "zpjjdfx.h"
#include "LZXJD.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

extern	int	g_iProgress ;	// 计算进度
extern	bool	bFinishThread;

/////////////////////////////////////////////////////////////////////////////
// dqbyhsj

dqbyhsj::dqbyhsj()
{
}

dqbyhsj::~dqbyhsj()
{
}



/////////////////////////////////////////////////////////////////////////////
// dqbyhsj message handlers
void dqbyhsj::dqbyhsjjs() //电潜泵举升井优化设计
{
	char  temp[120],Temp[120];
	double fz,bxhbgd,zdjx,prm,wzjs,LW,wjtg,LD,smsd,siz,tw,twjb,PR;
	double pwfo,QG,QW,GA,sh2s,cl,talppm,G,qh2s,CO2,cccd,sycl;
	double Q,S,sink,DT,DD,WO,FMAX,D,QWMAX,PT,IQ,IP,PWFQ;
	double LHANG,HD,HA,QA,DLTA,PW,UW,A,v,RE,DTA,EPSLA,LMUTA;
	double HF,H,PD,PD5,Q5,H5,B[30][30],CA,CB,JS,LJ,WJ,DF,V10DATA;
	double LF,WF,DJ[40][40],DCA,DCB,DXH,NDJ,VE,IE,VS10,I10,WOE;
	double DLJ,DWJ,DDJ,WD,TTT[50][20],FACTOR,VS50,VDR50;
	double VS80,KV50,KV,YON,WKAZ,PJ,HJ,Pmax,PMIN,UMAX,A1[50];
	double A2[50],C1[50],C2[50],B1,B2,X1,X2,VQ,VE10;
	double UOUTPUT,KV50BY,VDR50BY,UHZ,FHZMAX,HH,VDR10,DA,ww,FFFF;
	CString title,AA[100],F,title1,title2,title3,title4,title5;
	CString title6,title7,title8,fff,T1,T2,X[50];
	CString title9,title10,title11,str,templs1;
	CString PP,fileDialogFilter2,fileDialogExt2;
	int i,MX,J,DMX,Form,J1,I1,J2,I2;
	CString sss[] = {"2080", "3617", "A-A", "2082", "3520", "A-B", "1976", "3423", "A-C", "1920", "3326", "A-D", "1864", "3229", "A-E", "1808", "3132", "B-A", "1752", "3035", "B-B", "1696", "2938", "B-C", "1640", "2841", "B-D", "1584", "2744", "B-E", "1528", "2647", "C-A", "1472", "2550", "C-B", "1416", "2453", "C-C", "1360", "2356", "C-D", "1304", "2259", "C-E", "1248", "2162", "D-A", "1192", "2065", "D-B", "1136", "1968", "D-C", "1080", "1871", "D-D", "1024", "1774", "D-E", "968", "1677", "E-A", "912", "1580", "E-B", "856", "1488", "E-C", "800", "1386", "E-D", "744", "1229", "E-E"};
	
//	SetCursor(LoadCursor(NULL, IDC_WAIT));
	//赋初值
	g_iProgress = 5;	// 计算进度
	ENDCOMPUTE;
	v=0;ia=0;ldl=0;hzg2=0;uj=0;uouput=0;BYB=0;qddy=0;zggl=0;
	
	
	   for(i=0;i<30;i++)
	   {
		   for(J=0;J<30;J++)
		   {
			   B[i][J]=0;
		   }
	   }
	   for(i=0;i<40;i++)
	   {
		   for(J=0;J<40;J++)
		   {
			   DJ[i][J]=0;
		   }
	   }
	   for(i=0;i<50;i++)
	   {
		   for(J=0;J<20;J++)
		   {
			   TTT[i][J]=0;
		   }
	   }
	   for(i=0;i<50;i++)
	   {
		   A1[i]=0;
		   A2[i]=0;
		   C1[i]=0;
		   C2[i]=0;
	   }
	   fz=0;bxhbgd=0;zdjx=0;prm=0;wzjs=0;LW=0;wjtg=0;LD=0;smsd=0;siz=0;tw=0;twjb=0;PR=0;
	   pwfo=0;QG=0;QW=0;GA=0;sh2s=0;cl=0;talppm=0;G=0;qh2s=0;CO2=0;cccd=0;sycl=0;
	   Q=0;S=0;sink=0;DT=0;DD=0;WO=0;FMAX=0;D=0;QWMAX=0;PT=0;IQ=0;IP=0;PWFQ=0;
	   LHANG=0;HD=0;HA=0;QA=0;DLTA=0;PW=0;UW=0;A=0;v=0;RE=0;DTA=0;EPSLA=0;LMUTA=0;
	   HF=0;H=0;PD=0;PD5=0;Q5=0;H5=0;CA=0;CB=0;JS=0;LJ=0;WJ=0;DF=0;V10DATA=0;
	   LF=0;WF=0;DCA=0;DCB=0;DXH=0;NDJ=0;VE=0;IE=0;VS10=0;I10=0;WOE=0;
	   DLJ=0;DWJ=0;DDJ=0;WD=0;FACTOR=0;VS50=0;VDR50=0;
	   VS80=0;KV50=0;KV=0;YON=0;WKAZ=0;PJ=0;HJ=0;Pmax=0;PMIN=0;UMAX=0;
	   B1=0;B2=0;X1=0;X2=0;VQ=0;VE10=0;
	   UOUTPUT=0;KV50BY=0;VDR50BY=0;UHZ=0;FHZMAX=0;HH=0;VDR10=0;DA=0;ww=0;FFFF=0;
	   i=0;MX=0;J=0;DMX=0;Form=0;J1=0;I1=0;J2=0;I2=0;
	   
	   for(i=1;i<=43;i++)
	   {
		   Gcsz[i] = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(i, 5);
	   }
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(7, 5);
	   fz=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(8, 5);
	   bxhbgd=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(9, 5);
	   zdjx=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(10, 5);
	   prm=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(11, 5);
	   wzjs=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(12, 5);
	   LW=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(13, 5);
	   wjtg=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(14, 5);
	   LD=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(15, 5);
	   smsd=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(16, 5);
	   siz=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(17, 5);
	   tw=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(18, 5);
	   twjb=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(19, 5);
	   PR=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(20, 5);
	   pwfo=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(21, 5);
	   QG=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(22, 5);
	   QW=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(23, 5);
	   GA=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(24, 5);
	   sh2s=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(25, 5);
	   cl=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(26, 5);
	   talppm=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(27, 5);
	   G=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(28, 5);
	   qh2s=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(29, 5);
	   CO2=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(30, 5);
	   cccd=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(31, 5);
	   sycl=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(32, 5);
	   Q=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(33, 5);
	   S=atof(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(34, 5);
	   Form=atoi(str);
	   str = ((CCVenusApp*)AfxGetApp())->m_pMainDlg->m_grid.GetTextRC(35, 5);
	   sink=atof(str);
	   
	   //打开文件,写入设计结果
	   /*	  fileDialogFilter2 ="Data files (*.RQB)|*.RQB|All files (*.*)|*.*||";
	   fileDialogExt2 = "RQB";
	   CFileDialog fileDialog2( FALSE, 
	   fileDialogExt2, NULL,
	   0, fileDialogFilter2 );
	   fileDialog2.m_ofn.lpstrTitle="保存计算结果";
	   if( fileDialog2.DoModal() == IDCANCEL )
	   {
	   return;
	  }*/
	   CStdioFile f3;
	   CFileException exception3;
	   BOOL status2;	
	   templs1 = ((CCVenusApp*)AfxGetApp())->GetMyAppPath();
	   templs1  += "\\tempfile.txt";	
	   status2 = f3.Open(templs1,CFile::modeCreate|CFile::modeWrite);	
	   if (!status2)
	   {
		   sprintf(temp, "Error opening file for reading. Code:%d",
			   exception3.m_cause);
		   AfxMessageBox(temp);
		   return;
	   }  
	   try
	   {
		   //		  title="";
		   title="\n-    $$变频电潜泵机组排水采气优化设计$0\n";
		   f3.WriteString(title);
	   }
	   catch (CFileException exception3)
	   {
		   AfxMessageBox("Error reading file");
		   return;
	   }
	   if(siz==2)
	   {
		   DT = 1.995 * 25.4;
		   DD = 2.375 * 25.4;
		   WO = 6.99;
		   FMAX = 32540;
	   }
	   if(siz==2.5)
	   {
		   DT = 2.441 * 25.4;
		   DD = 2.875 * 25.4;
		   WO = 9.67;
		   FMAX = 45210;
	   }
	   if(siz==3)
	   {
		   DT = 2.992 * 25.4;
		   DD = 3.5 * 25.4;
		   WO = 13.84;
		   FMAX = 64620;
	   }
	   
	   D = DT / 1000;
	   QWMAX = QW / (1 - 0.2 * pwfo / PR - 0.8 * pow((pwfo / PR),2));
	   PT = 0.5;
	   
	   IQ = Q / QWMAX;
	   IP = (-0.2 + sqrt(0.04 - 3.2 * (IQ - 1))) / 1.6;
	   PWFQ = IP * PR;
	   LHANG = LW - PWFQ * 10.01 * 10.2 / GA + sink;
	   
	   HD = LW - PWFQ * 10.01 * 10.2 / GA;
	   HA = PT * 10.01 * 10.2 / GA;
	   QA = Q;
	   
	   // ======================计算油管摩阻损失=========================
	   DLTA = 0.6;
	   PW = 1.08388 - 5.10546 * 0.0001 * tw - 3.062 * 0.000001 * pow(tw,2);
	   UW = exp(1.003 - 0.4733 * (5.625 * 0.01 * tw + 1) + 2.0296 * 0.01 * pow((5.625 * 0.01 * tw + 1),2));
	   A = 3.142 * pow(D,2) / 4;
	   QA = QA / 86400;
	   v = QA / A;
	   RE = PW * v * D / UW * 1000000;
	   DTA = DLTA / 1000;
	   EPSLA = 2 * DTA / D;
	   if( RE <= 2000)
	   {
		   LMUTA = 64 / RE;
	   }
	   else if( RE > 2000 && RE < 59.7 / pow(EPSLA,(8 / 7)))
	   {
		   LMUTA = 0.3164 / pow(RE,0.25);
	   }
	   else if( RE > 59.7 / pow(EPSLA,(8 / 7)) && RE < (665 - 765 * log(EPSLA) / 2.303) / EPSLA)
	   {
		   LMUTA = pow((-1 / (1.8 * (68 / RE + pow((DTA / 3.7 / D),1.11)))),2);
	   }
	   else
	   {
		   LMUTA = 1 / pow((2 * log(3.7 * D / DTA) / 2.303),2);
	   }
	   HF = LMUTA * LHANG / D * pow(v,2) / (2 * 9.8);
	   
	   H = HD + HA + HF;
	   
	   PD = Q * H * GA / 8813 / 0.6 + 3.5;
	   PD5 = PD * 50 / fz;
	   
	   Q5 = 50 / fz * Q;
	   H5 = H / pow((fz / 50),2);
	   
	   //==============选泵   输入所选泵的排量(M3/d),Q5  输入泵扬程(M),H5 ===
	   
	   // 400 系列
	   AA[1] = "b-11"; B[1][1] = 400; B[1][2] = 50; B[1][3] = 4.4; B[1][4] = 0.48; B[1][5] = 0.025; B[1][6] = 1.092;
	   AA[2] = "W-18"; B[2][1] = 400; B[2][2] = 79; B[2][3] = 5.4; B[2][4] = 0.58; B[2][5] = 0.025; B[2][6] = 1.092;
	   AA[3] = "H-27"; B[3][1] = 400; B[3][2] = 117; B[3][3] = 4.6; B[3][4] = 0.65; B[3][5] = 0.0285; B[3][6] = 1.24;
	   AA[4] = "m-34"; B[4][1] = 400; B[4][2] = 147; B[4][3] = 4.8; B[4][4] = 0.65; B[4][5] = 0.0289; B[4][6] = 1.258;
	   AA[5] = "G-48"; B[5][1] = 400; B[5][2] = 212; B[5][3] = 4.5; B[5][4] = 0.65; B[5][5] = 0.032; B[5][6] = 1.38;
	   AA[6] = "J-61"; B[6][1] = 400; B[6][2] = 245; B[6][3] = 4.4; B[6][4] = 0.6; B[6][5] = 0.0355; B[6][6] = 1.54;
	   AA[7] = "Z-69"; B[7][1] = 400; B[7][2] = 270; B[7][3] = 4.2; B[7][4] = 0.7; B[7][5] = 0.06; B[7][6] = 2.63;
	   AA[8] = "N-80"; B[8][1] = 400; B[8][2] = 350; B[8][3] = 3.9; B[8][4] = 0.63; B[8][5] = 0.061; B[8][6] = 2.66;
	   
	   // 513 系列
	   AA[9] = "I-42B"; B[9][1] = 513; B[9][2] = 200; B[9][3] = 8.4; B[9][4] = 0.63; B[9][5] = 0.0368; B[9][6] = 2.442;
	   AA[10] = "Y-62B"; B[10][1] = 513; B[10][2] = 278; B[10][3] = 8.5; B[10][4] = 0.68; B[10][5] = 0.0552; B[10][6] = 3.54;
	   AA[11] = "K-70"; B[11][1] = 513; B[11][2] = 370; B[11][3] = 7; B[11][4] = 0.71; B[11][5] = 0.068; B[11][6] = 4.34;
	   AA[12] = "C-72"; B[12][1] = 513; B[12][2] = 320; B[12][3] = 10; B[12][4] = 0.68; B[12][5] = 0; B[12][6] = 0;
	   AA[13] = "KA-100"; B[13][1] = 513; B[13][2] = 420; B[13][3] = 9.2; B[13][4] = 0.71; B[13][5] = 0.068; B[13][6] = 4.165;
	   AA[14] = "E-127"; B[14][1] = 513; B[14][2] = 560; B[14][3] = 7.6; B[14][4] = 0.7; B[14][5] = 0.0775; B[14][6] = 4.95;
	   AA[15] = "S-175"; B[15][1] = 513; B[15][2] = 790; B[15][3] = 6; B[15][4] = 0.68; B[15][5] = 0.083; B[15][6] = 5.188;
	   AA[16] = "D-225"; B[16][1] = 513; B[16][2] = 1040; B[16][3] = 5.4; B[16][4] = 0.68; B[16][5] = 0.0999; B[16][6] = 6.19;
	   CA = fabs(Q5 - B[1][2]);
	   for(i=1;i<=16;i++)
	   {
		   CB = fabs(Q5 - B[i][2]);
		   if( CB <= CA)
		   {
			   MX = i;
			   CA = CB;
		   }
	   }
	   JS = H5 / B[MX][3];
	   LJ = JS * B[MX][5];
	   WJ = JS * B[MX][6];
	   if( B[MX][1] == 400)
	   {
		   DF = 102;
		   LF = 0.76;
		   WF = 34;
		   F = "FRSXNG";
	   }
	   else
	   {
		   DF = 130;
		   LF = 0.99;
		   WF = 59;
		   F = "GRSXING";
	   }
	   
	   // ========================  电机  ========================================
	   PD5 = PD5 * 1.34;
	   
	   DJ[1][1] = 544; DJ[1][2] = 83; DJ[1][3] = 1079; DJ[1][4] = 47; DJ[1][5] = 3.96; DJ[1][6] = 436;
	   DJ[2][1] = 544; DJ[2][2] = 104; DJ[2][3] = 1179; DJ[2][4] = 54; DJ[2][5] = 4.79; DJ[2][6] = 506;
	   DJ[3][1] = 544; DJ[3][2] = 125; DJ[3][3] = 2020; DJ[3][4] = 38; DJ[3][5] = 5.64; DJ[3][6] = 596;
	   DJ[4][1] = 544; DJ[4][2] = 157; DJ[4][3] = 2020; DJ[4][4] = 47; DJ[4][5] = 6.92; DJ[4][6] = 732;
	   DJ[5][1] = 544; DJ[5][2] = 187; DJ[5][3] = 1820; DJ[5][4] = 63; DJ[5][5] = 8.2; DJ[5][6] = 867;
	   DJ[6][1] = 544; DJ[6][2] = 208; DJ[6][3] = 2020; DJ[6][4] = 63; DJ[6][5] = 9.02; DJ[6][6] = 942;
	   DJ[7][1] = 544; DJ[7][2] = 229; DJ[7][3] = 1853; DJ[7][4] = 76; DJ[7][5] = 9.88; DJ[7][6] = 1016;
	   DJ[8][1] = 562; DJ[8][2] = 96; DJ[8][3] = 1691; DJ[8][4] = 33; DJ[8][5] = 4.08; DJ[8][6] = 429;
	   DJ[9][1] = 562; DJ[9][2] = 108; DJ[9][3] = 1787; DJ[9][4] = 35; DJ[9][5] = 4.51; DJ[9][6] = 470;
	   DJ[10][1] = 562; DJ[10][2] = 125; DJ[10][3] = 1842; DJ[10][4] = 39; DJ[10][5] = 4.93; DJ[10][6] = 522;
	   DJ[11][1] = 562; DJ[11][2] = 137; DJ[11][3] = 1858; DJ[11][4] = 43; DJ[11][5] = 5.4; DJ[11][6] = 575;
	   DJ[12][1] = 562; DJ[12][2] = 150; DJ[12][3] = 1842; DJ[12][4] = 47; DJ[12][5] = 5.8; DJ[12][6] = 622;
	   DJ[13][1] = 562; DJ[13][2] = 162; DJ[13][3] = 1787; DJ[13][4] = 52; DJ[13][5] = 6.26; DJ[13][6] = 669;
	   DJ[14][1] = 562; DJ[14][2] = 187; DJ[14][3] = 1825; DJ[14][4] = 59; DJ[14][5] = 7.13; DJ[14][6] = 771;
	   DJ[15][1] = 562; DJ[15][2] = 212; DJ[15][3] = 1787; DJ[15][4] = 69; DJ[15][5] = 7.99; DJ[15][6] = 863;
	   DJ[16][1] = 562; DJ[16][2] = 233; DJ[16][3] = 2008; DJ[16][4] = 67; DJ[16][5] = 8.86; DJ[16][6] = 957;
	   DJ[17][1] = 562; DJ[17][2] = 250; DJ[17][3] = 1858; DJ[17][4] = 77; DJ[17][5] = 9.74; DJ[17][6] = 1064;
	   DJ[18][1] = 562; DJ[18][2] = 275; DJ[18][3] = 2045; DJ[18][4] = 77; DJ[18][5] = 10.61; DJ[18][6] = 1150;
	   DJ[19][1] = 562; DJ[19][2] = 325; DJ[19][3] = 1900; DJ[19][4] = 98; DJ[19][5] = 13.72; DJ[19][6] = 1409;
	   DJ[20][1] = 562; DJ[20][2] = 375; DJ[20][3] = 2192; DJ[20][4] = 98; DJ[20][5] = 15.45; DJ[20][6] = 1613;
	   DJ[21][1] = 562; DJ[21][2] = 425; DJ[21][3] = 2483; DJ[21][4] = 98; DJ[21][5] = 17.17; DJ[21][6] = 1810;
	   DJ[22][1] = 562; DJ[22][2] = 466; DJ[22][3] = 2725; DJ[22][4] = 98; DJ[22][5] = 18.9; DJ[22][6] = 2014;
	   DJ[23][1] = 562; DJ[23][2] = 500; DJ[23][3] = 2925; DJ[23][4] = 98; DJ[23][5] = 20.67; DJ[23][6] = 2218;
	   DJ[24][1] = 562; DJ[24][2] = 550; DJ[24][3] = 3215; DJ[24][4] = 98; DJ[24][5] = 22.41; DJ[24][6] = 2415;
	   
	   DCA = fabs(PD5 - DJ[1][2]);
	   for(i=1;i<=24;i++)
	   {
		   DCB = fabs(PD5 - DJ[i][2]);
		   if( DCB <= DCA)
		   {
			   DMX = i;
			   DCA = DCB;
		   }
	   }
	   DXH = DJ[DMX][1];
	   NDJ = DJ[DMX][2] / 1.34;
	   VE = DJ[DMX][3];
	   IE = DJ[DMX][4];
	   DLJ = DJ[DMX][5];
	   DWJ = DJ[DMX][6];
	   DDJ = DXH * 25.4 / 100;
	   
	   WD = 1.8 * (int(LHANG + 0.5) + 30);
	   ldl = int(LHANG + 0.5) + 30;
	   
	   for(J=1;J<=32;J++)
	   {
		   TTT[J][1] = 0;
		   TTT[J][2] = 0;
	   }
	   
	   TTT[1][1] = 38; TTT[1][2] = 1.07; TTT[2][1] = 43; TTT[2][2] = 1.092;
	   TTT[3][1] = 49; TTT[3][2] = 1.114; TTT[4][1] = 54; TTT[4][2] = 1.136;
	   TTT[5][1] = 60; TTT[5][2] = 1.157; TTT[6][1] = 66; TTT[6][2] = 1.179;
	   TTT[7][1] = 71; TTT[7][2] = 1.201; TTT[8][1] = 77; TTT[8][2] = 1.223;
	   TTT[9][1] = 82; TTT[1][2] = 1.245; TTT[10][1] = 88; TTT[10][2] = 1.267;
	   TTT[11][1] = 93; TTT[11][2] = 1.288; TTT[12][1] = 99; TTT[12][2] = 1.31;
	   TTT[13][1] = 104; TTT[13][2] = 1.332; TTT[14][1] = 110; TTT[14][2] = 1.354;
	   TTT[15][1] = 116; TTT[15][2] = 1.376; TTT[16][1] = 121; TTT[16][2] = 1.398;
	   TTT[17][1] = 127; TTT[17][2] = 1.42; TTT[18][1] = 132; TTT[12][2] = 1.441;
	   TTT[19][1] = 138; TTT[19][2] = 1.463; TTT[20][1] = 143; TTT[20][2] = 1.485;
	   TTT[21][1] = 159; TTT[21][2] = 1.507;
	   
	   for(J=1;J<=21;J++)
	   {
		   if( fabs(TTT[J][1] - tw) < 3)
		   {
			   switch(Form)
			   {
			   case 5:
				   FACTOR = 18.87;       //电阻温度系数 FACTOR
				   break;
			   case 10:
				   FACTOR = 31.2;
				   break;
			   }
			   break;
		   }
	   }
	   
	   //50HZ时所需地面电压
	   VS50 = VE + sqrt(3) * IE * FACTOR * (ldl / 1000) * TTT[J][2] / S;
	   VDR50 = 50 * (480 - 10) / fz;
	   VS80 = fz / 50 * VE - VE + VS50;
	   KV50 = VS50 / VDR50;
	   KV = KV50;
	   YON = sqrt(3) * IE * VS80 / 1000;
	   WKAZ = LHANG / 9.600001 * 2 * 0.1;
	   PJ = WJ + WF + 240 + DWJ + WD + WKAZ + 34;
	   
	   //选择电机
	   HJ = LW - prm * 10.01 * 10.2 / GA;
	   Pmax = (LHANG - HJ) * GA / 10.01 / 10.2;
	   PMIN = sink * GA / 10.01 / 10.2;
	   
	   //变压器挡位选择
	   UMAX = KV * 480;

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -