Programacion

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;

namespace Rebobinado_Transformador_01
{
    public partial class Form1 : Form
    {
        public Form1()
        {
            InitializeComponent();
        }

private void button1_Click(object sender, EventArgs e)
        {
            double[] mm2 = { 53.58, 52.41, 33.63, 26.67, 21.15, 16.77, 13.3, 10.55, 8.366, 6.634, 5.262, 4.172, 3.309, 2.624, 2.081, 1.65, 1.309, 1.038, 0.823, 0.653, 0.518, 0.411, 0.326, 0.258, 0.205, 0.162, 0.129, 0.102, 0.081, 0.064, 0.051, 0.04, 0.032, 0.025, 0.02, 0.016, 0.013, 0.01, 0.008, 0.006, 0.005, 0.004, 0.0025, 0.002 };
		    double a, b, p,s,area, seccion, nebp, nebs, ipri, isec, cp, cs;
		    byte awgp = 0;
            byte awgs = 0;
            string cadena = "";
    		
		    a=Convert.ToDouble(txtA.Text);
		    b=Convert.ToDouble(txtB.Text);
            p = Convert.ToDouble(txtP.Text);
            s = Convert.ToDouble(txtS.Text);
    		
		    area = a * b;
		    seccion = (area / 0.903) * (area / 0.903);
		    nebp = (p * 37.53) / area;
		    nebs =  ((s * nebp) / p) + (((s * nebp) / p) * 0.068);
		    ipri = seccion / p;
		    isec = seccion / s;
		    cp = ipri / 4.5;
		    cs = isec / 4.5;
    		
		    for (byte j = 0; j <=44; j++){
			    if(cp > mm2[j]){
				    awgp = j;
				    break;
			    }
		    }
    		
		    for (byte j = 0; j <=44; j++){
			    if(cs > mm2[j]){
				    awgs = j;
				    break;
			    }
		    }
            cadena += "Nebp = " + Math.Round(nebp,0).ToString() + " Espiras\n";
            cadena += "Nebs = " + Math.Round(nebs,0).ToString() + " Espiras\n";
            cadena += "Ibp = " + Math.Round(ipri,3).ToString() + " Amperios\n";
            cadena += "Ibs = " + Math.Round(isec,3).ToString() + " Amperios\n";
            cadena += "Calibre P. = " + awgp.ToString() + " AWG\n";
            cadena += "Calibre S. = " + awgs.ToString() + " AWG";

lblSalida.Text = cadena;
        }
    }
}

Descargar archivo