public static void IProfil(Double Hoehe1, Double Breite1, Double Stegbreite1, Double Flanschbreite1, Double Laenge1, Double Dichte1, Double Sprache)
{
Berechnungen.Sprache(Sprache);
//Ergebnis Variablen
Double Breiteb;
Double Hoeheh;
Double Querschnitt;
Double Volumen;
Double Gewicht;
Double Schwerpunktx;
Double Schwerpunkty;
Double FTMx;
Double FTMy;
//Zwischenrechnungen
Breiteb = Breite1 - Stegbreite1;
Hoeheh = Hoehe1 - 2 * Flanschbreite1;
//Berechnung Querschnitt
Querschnitt = (2 * Breite1 * Flanschbreite1) + ((Hoehe1 - 2 * Flanschbreite1) * Stegbreite1);
//Berechnung Volumen
Volumen = Querschnitt * Laenge1;
//Berechnung Gewicht
Gewicht = Dichte1 * Volumen;
Console.WriteLine(QuerschnittS + Math.Round(Querschnitt, 3) + " mm²");
Console.WriteLine(VolumenS + Math.Round(Volumen, 3) + " mm³");
Console.WriteLine(GewichtS + Math.Round(Gewicht, 3) + " g");
//Berechnung Schwerpunkte
Schwerpunktx = Breite1 / 2;
Schwerpunkty = Hoehe1 / 2;
Console.WriteLine(SchwerpunktxS + Schwerpunktx + " mm");
Console.WriteLine(SchwerpunktyS + Schwerpunkty + " mm");
//Berechnung FTM
FTMx = ((Breite1 * Math.Pow(Hoehe1, 3) / 12) - (Breiteb * Math.Pow(Hoeheh, 3) / 12));
Console.WriteLine(FTMSX + FTMx + " mm⁴");
FTMy = 2 * ((Flanschbreite1 * Math.Pow(Breite1, 3) / 12)) + ((Hoeheh * Math.Pow(Stegbreite1, 3)) / 12);
Console.WriteLine(FTMSY + FTMy + " mm⁴");
}
public static void UProfil(Double HoeheU, Double BreiteU, Double LaengeU, Double StegBreiteU, Double FlanschbreiteU, Double DichteU, Double Sprache)
{
Berechnungen.Sprache(Sprache);
Double Volumen;
Double Querschnitt;
Double Gewicht;
Double Schwerpunktx; //Abstand des Schwerpunktes zum Ursprungskoordinatensystem, welches auf der linken Profilkante liegt
Double Schwerpunkty; //Abstand des Schwerpunktes zum Ursprungskoordinatensystem, welches auf der unteren Profilkante liegt
Double Festigkeitx;
Double Festigkeity;
//Querschnitt
Querschnitt = (BreiteU * HoeheU) - ((BreiteU - StegBreiteU) * (HoeheU - (2 * FlanschbreiteU)));
Console.WriteLine(QuerschnittS + Querschnitt + " mm²");
//Voulumen
Volumen = Querschnitt * LaengeU;
Console.WriteLine(VolumenS + Volumen + " mm³");
//Gewicht
Gewicht = Volumen * DichteU;
Console.WriteLine(GewichtS + Gewicht + " kg");
//Schwerpunkt
// ' (B * U * B/2) ' - ' (b * u * b/2) '
Schwerpunktx = ((BreiteU * HoeheU * (BreiteU / 2)) - ((BreiteU - StegBreiteU) * (HoeheU - (2 * FlanschbreiteU)) * ((BreiteU - StegBreiteU) / 2 + StegBreiteU)))
// / ' (B * H) ' - ' (b * h) '
/ ((BreiteU * HoeheU) - ((BreiteU - StegBreiteU) * (HoeheU - (2 * FlanschbreiteU))));
Schwerpunkty = HoeheU / 2;
Console.WriteLine(SchwerpunktxS + Schwerpunktx + " mm");
Console.WriteLine(SchwerpunktyS + Schwerpunkty + " mm");
// ' FTM Groß ' - ' FTM Klein '
Festigkeitx = ((BreiteU * Math.Pow(HoeheU, 3)) / 12) - (((BreiteU - StegBreiteU) * Math.Pow((HoeheU - (2 * FlanschbreiteU)), 3)) / 12);
// ' FTM groß ' + ' Fläche groß ' * ' Abstand² zum Schwerpunkt groß '
Festigkeity = ((HoeheU * Math.Pow(BreiteU, 3)) / 12 + ((BreiteU * HoeheU) * Math.Pow(((BreiteU / 2) - Schwerpunktx), 2)))
// - ' FTM klein '
- (((HoeheU - (2 * FlanschbreiteU)) * Math.Pow((BreiteU - StegBreiteU), 3)) / 12
// + ' Fläche klein ' * ' Abstand² zum Schwerpunkt klein '
+ ((BreiteU - StegBreiteU) * (HoeheU - (2 * FlanschbreiteU))) * Math.Pow((((BreiteU - StegBreiteU) / 2 + StegBreiteU) - Schwerpunktx), 2));
Console.WriteLine(FTMSX + Festigkeitx + " mm⁴");
Console.WriteLine(FTMSY + Festigkeity + " mm⁴");
}
static public void TProfil(Double Hoehe1, Double Breite1, Double Laenge1, Double Wandstaerke1, Double Dichte1, Double Sprache)
{
Berechnungen.Sprache(Sprache);
Double Querschnitt;
Double Volumen;
Double Gewicht;
Double Schwerpunkt;
Double FTMx;
Double FTMy;
//Querschnitt
Querschnitt = (Wandstaerke1 * Breite1) + (Wandstaerke1 * (Hoehe1 - Wandstaerke1));
//Voulumen
Volumen = (Wandstaerke1 * Breite1 * Laenge1) + ((Hoehe1 - Wandstaerke1) * Wandstaerke1 * Laenge1);
//Gewicht
Gewicht = Volumen * Dichte1;
Console.WriteLine(QuerschnittS + Math.Round(Querschnitt, 3) + " mm²");
Console.WriteLine(VolumenS + Math.Round(Volumen, 3) + " mm³");
Console.WriteLine(GewichtS + Math.Round(Gewicht, 3) + " g");
//Schwerpunkt
// A1 * y1 + A2 * y2
Schwerpunkt = ((Wandstaerke1 * (Hoehe1 - Wandstaerke1)) * ((Hoehe1 - Wandstaerke1) / 2) + ((Wandstaerke1 * Breite1) * (Breite1 - (Wandstaerke1 / 2))))
// / A1 + A2
/ ((Wandstaerke1 * (Hoehe1 - Wandstaerke1)) + (Breite1 * Wandstaerke1));
Console.WriteLine(SchwerpunktxS + (Breite1 / 2) + " mm");
Console.WriteLine(SchwerpunktyS + Schwerpunkt + " mm");
//Flächenträgheitsmoment
// Ixx1 + A1 * l1²
FTMx = ((Wandstaerke1 * Math.Pow((Hoehe1 - Wandstaerke1), 3)) / 12) + (Wandstaerke1 * (Hoehe1 - Wandstaerke1)) * Math.Pow((Schwerpunkt - ((Hoehe1 - Wandstaerke1) / 2)), 2)
// + Ixx2 + A2 * l2²
+ ((Breite1 * Math.Pow(Wandstaerke1, 3)) / 12) + (Wandstaerke1 * Breite1) * Math.Pow(((Breite1 - (Wandstaerke1 / 2)) - Schwerpunkt), 2);
Console.WriteLine(FTMSX + FTMx + " mm⁴");
// Iyy1 + Iyy2
FTMy = (((Hoehe1 - Wandstaerke1) * Math.Pow(Wandstaerke1, 3)) / 12) + ((Wandstaerke1 * Math.Pow(Breite1, 3)) / 12);
Console.WriteLine(FTMSX + FTMy + " mm⁴");
}
public static void KreisRohr(Double durchmesserU, Double wandstaerkeU, Double laengeU, Double dichteU, Double Sprache)
{
Berechnungen.Sprache(Sprache);
Double querschnitt;
Double volumen;
Double gewicht;
Double festigkeit;
querschnitt = ((Math.Pow(durchmesserU, 2) * Math.PI) - (Math.Pow((durchmesserU - (2 * wandstaerkeU)), 2) * Math.PI)) / 4;
volumen = querschnitt * laengeU;
gewicht = volumen * dichteU;
festigkeit = (Math.PI * (Math.Pow(durchmesserU, 4) - Math.Pow((durchmesserU - (2 * wandstaerkeU)), 4))) / 64;
Console.WriteLine(QuerschnittS + Math.Round(querschnitt, 3) + " mm²");
Console.WriteLine(VolumenS + Math.Round(volumen, 3) + " mm³");
Console.WriteLine(GewichtS + Math.Round(gewicht, 3) + " g");
Console.WriteLine(FTMS + Math.Round(festigkeit, 3) + " mm⁴");
}
public static void RechteckVoll(Double hoeheU, Double breiteU, Double laengeU, Double dichteU, Double Sprache)
{
Berechnungen.Sprache(Sprache);
Double querschnitt;
Double volumen;
Double gewicht;
Double festigkeitx;
Double festigkeity;
querschnitt = hoeheU * breiteU;
volumen = querschnitt * laengeU;
gewicht = volumen * dichteU;
festigkeitx = (breiteU * Math.Pow(hoeheU, 3)) / 12;
festigkeity = (hoeheU * Math.Pow(breiteU, 3)) / 12;
Console.WriteLine(QuerschnittS + Math.Round(querschnitt, 3) + " mm²");
Console.WriteLine(VolumenS + Math.Round(volumen, 3) + " mm³");
Console.WriteLine(GewichtS + Math.Round(gewicht, 3) + " g");
Console.WriteLine(FTMSX + Math.Round(festigkeitx, 3) + " mm⁴");
Console.WriteLine(FTMSY + Math.Round(festigkeity, 3) + " mm⁴");
}
static public void Main(string[] args)
{
//Grundprogramm zum testen der Variablen und zum Programmieren seines teil programmes.<3
String RohrAuswahl;
String Hoehe;
String Laenge;
String Breite;
String Dichte;
String Wandstaerke;
String AuswahlProfil;
String Durchmesser;
String AuswahlDichte;
String AuswahlSprache;
String Stegbreite;
String Flanschbreite;
Double RohrAuswahlD;
Double HoeheD;
Double BreiteD;
Double LaengeD;
Double DichteD;
Double WandstaerkeD;
Double DurchmesserD;
Double AuswahlProfilD;
Double AuswahlDichteD;
Double AuswahlSpracheD;
Double StegbreiteD;
Double FlanschbreiteD;
Console.WriteLine("Please select a language" + n + "(1) English" + n + "(2) Français" + n + "(3) Deutsch");
AuswahlSprache = Console.ReadLine();
AuswahlSpracheD = Convert.ToDouble(AuswahlSprache);
if (AuswahlSpracheD.Equals(3.0))
{
ProfilAuswahl = "Bitte die Art des Profiles Auswaehlen" + n + "Bitte Nur ganze Zahlen Eingeben" + n + n + "(1) Rechteck"
+ n + "(2) Kreis" + n + "(3) I - Profil" + n + "(4) T - Profil" + n + "(5) U - Profil" + n + "(6) L - Profil";
UngenauigkeitErklaerung = "Bitte beachten Sie, dass wir die Kantenverrundungen der I, T, U, L und der Rechteckprofile,"
+ n + "Sowie die Steigung der Stege der T - Profile und die Strigung der Flansche der L - Profile nicht beruecksichtigen koennen."
+ n + "So kommt es dazu, das wir bei genormten Profilen kleinere Abweichungen von den tatsächlichen Werten erhalten.";
RechteckRohrAuswahl = "Rechteck Profil" + n + "Die Berechnung beginnt" + n + "Wollen Sie" + n + "(1) ein Rohr oder"
+ n + "(2) Vollmaterial erstellen?";
GewaehltRohr = "Rohrprofil";
GewaehltVoll = "Vollmaterial";
RechteckHoehe = "Bitte die Gewuenschte Hoehe in mm eingeben";
RechteckBreite = "Bitte die Gewuenschte Breite in mm eingeben";
ProfilLaenge = "Bitte die Gewuenschte Laenge in mm eingeben";
ProfilWandstaerke = "Bitte die Gewuenschte Wandstaerke in mm eingeben";
ProfilFlanschBreite = "Bitte die Gewuenschte Flanschbreite in mm eingeben";
ProfilStegBreite = "Bitte die Gewuenschte Stegbreite in mm eingeben";
FehlerWandHoehe = "Falsche Eingabe" + n + "Wandstärke muss kleiner als Höhe sein!";
FehlerWandBreite = "Falsche Eingabe" + n + "Wandstärke muss kleiner als Breite sein!";
EinleitungWerkstoffe = "(1) Werkstoff auswahl" + n + "(2) Manuelle Eingabe der Dichte";
Werkstoffe = "Werkstoffe";
Error = "Falsche Eingabe";
ManuelleDichte = "Bitte die Gewuenschte Dichte in g / cm³ eingeben";
KreisRohrAuswahl = "Kreis Profil" + n + "Die Berechnung beginnt" + n + "Wollen Sie" + n + "(1) ein Rohr oder" + n + "(2) Vollmaterial erstellen?";
RohrDurchmesser = "Bitte den Gewünschten Durchmesser in mm eingeben";
FehlerDurchmesserWand = "Wandstärke muss kleiner als Durchmesser sein!";
IProfilHoehe = "I - Profil" + n + "Die Berechnung beginnt" + n + "Bitte die Gewuenschte Hoehe in mm eingeben";
TProfilHoehe = "T - Profil" + n + "Die Berechnung beginnt" + n + "Bitte die Gewuenschte Hoehe in mm eingeben";
UProfilHoehe = "U - Profil" + n + "Die Berechnung beginnt" + n + "Bitte die Gewuenschte Hoehe in mm eingeben";
LProfilHoehe = "L - Profil" + n + "Die Berechnung beginnt" + n + "Bitte die Gewuenschte Hoehe in mm eingeben";
EndProgramm = "Belibige Taste drücken zum beenden";
}
else if (AuswahlSpracheD.Equals(1.0))
{
ProfilAuswahl = "Choose the profile" + n + "Only enter whole numbers" + n + n + "(1) Rectangle"
+ n + "(2) Circle" + n + "(3) I-Section" + n + "(4) T-Section" + n + "(5) U-Section" + n + "(6) L-Section";
UngenauigkeitErklaerung = "Please beware, that we cannot consider the edge roundings of the I, T, U, L and rectangle profiles,"
+ n + "As well as the incline of the web of T-profiles and the incline of the flanges of L-profiles."
+ n + "That is why we will get slightly different results from the standard patterns.";
RechteckRohrAuswahl = "Rectangle profile" + n + "Calculation started" + n + "Do you want to create" + n + "(1) a pipe or "
+ n + "(2) solid material?";
GewaehltRohr = "Pipe";
GewaehltVoll = "Solid material";
RechteckHoehe = "Enter hight in mm";
RechteckBreite = "Enter width in mm";
ProfilLaenge = "Enter lenght in mm";
ProfilWandstaerke = "Enter wall thickness in mm";
ProfilFlanschBreite = "Enter flange width in mm";
ProfilStegBreite = "Enter web width in mm";
FehlerWandHoehe = "Error" + n + "Wall thickness must be lower then hight!";
FehlerWandBreite = "Error" + n + "Wall thickness must be lower then width!";
EinleitungWerkstoffe = "(1) Choose material" + n + "(2) Manually enter density";
Error = "Error";
Werkstoffe = "Materials";
ManuelleDichte = "Enter density in g/cm³";
KreisRohrAuswahl = "Circle profile" + n + "Calculation started" + n + "Do you want to create" + n + "(1) a pipe or " + n + "(2) solid material?";
RohrDurchmesser = "Enter diameter in mm";
FehlerDurchmesserWand = "Error" + n + "Wall thickness must be lower then diameter";
IProfilHoehe = "I-profile" + n + "Calculation started" + n + "Enter hight in mm";
TProfilHoehe = "T-profile" + n + "Calculation started" + n + "Enter hight in mm";
UProfilHoehe = "U-profile" + n + "Calculation started" + n + "Enter hight in mm";
LProfilHoehe = "L-profile" + n + "Calculation started" + n + "Enter hight in mm";
EndProgramm = "Press any key to end";
}
else if (AuswahlSpracheD.Equals(2.0))
{
ProfilAuswahl = "Veuillez choisir le profil" + n + "Veuillez seulement entrer nombres entiers" + n + n + "(1) Rectangle"
+ n + "(2) Cercle" + n + "(3) I-Profil" + n + "(4) T-Profil" + n + "(5) U-Profil" + n + "(6) L-Profil";
UngenauigkeitErklaerung = "Veuillez noter, que nous ne pouvons pas considérer des arrondoi edge de les profils I, T, U, L et les profils rectangles,"
+ n + "ainsi que les inclines des bandes desprofils T et les inclines des brides des profiles L."
+ n + "Comme ça ce viens, que nous recevons des résultats différents sur des profils standardisés.";
RechteckRohrAuswahl = "Profil rectangle" + n + "La calculation a commancée" + n + "Voullez vouz créer" + n + "(1) un tuyau ou "
+ n + "(2) du matériau solide?";
GewaehltRohr = "Tuyau";
GewaehltVoll = "Matériau solide";
RechteckHoehe = "Veuillez enter la hauteur en mm";
RechteckBreite = "Veuillez enter la largeur en mm";
ProfilLaenge = "Veuillez enter la longueur en mm";
ProfilWandstaerke = "Veuillez enter la épaisseur de paroi en mm";
ProfilFlanschBreite = "Veuillez enter le largeur de bride en mm";
ProfilStegBreite = "Veuillez enter le largeur de bande en mm";
FehlerWandHoehe = "Erreur" + n + "La épaisseur de paroi droit être moins que la hauter!";
FehlerWandBreite = "Erreur" + n + "La épaisseur de paroi droit être moins que la largeur!";
EinleitungWerkstoffe = "(1) Choisir le matériel d'une liste" + n + "(2) Entrer la densité manuellement";
Error = "Erreur";
Werkstoffe = "Les matériels:";
ManuelleDichte = "Veuillez enter la densité en g/cm³";
KreisRohrAuswahl = "Profil cercle" + n + "La calculation a commancée" + n + "Voullez vouz créer" + n + "(1) un tuyau ou " + n + "(2) du matériau solide?";
RohrDurchmesser = "Veuillez enter la diamètre en mm";
FehlerDurchmesserWand = "Error" + n + "La épaisseur de paroi droit être moins que le diamètre";
IProfilHoehe = "I - profil" + n + "La calculation a commancée" + n + "Enter la hauteur en mm";
TProfilHoehe = "T - profil" + n + "La calculation a commancée" + n + "Enter la hauteur en mm";
UProfilHoehe = "U - profil" + n + "La calculation a commancée" + n + "Enter la hauteur en mm";
LProfilHoehe = "L - profil" + n + "La calculation a commancée" + n + "Enter la hauteur en mm";
EndProgramm = "Veuillez entrer acun clé pour finir";
}
else
{
Console.WriteLine(Error);
}
Console.WriteLine(ProfilAuswahl);
AuswahlProfil = Console.ReadLine();
AuswahlProfilD = Convert.ToDouble(AuswahlProfil);
if (AuswahlProfilD.Equals(1.0))
{
Console.WriteLine(UngenauigkeitErklaerung);
Console.WriteLine(RechteckRohrAuswahl);
RohrAuswahl = Console.ReadLine();
RohrAuswahlD = Convert.ToDouble(RohrAuswahl);
if (RohrAuswahlD.Equals(1.0))
{
Console.WriteLine(GewaehltRohr);
Console.WriteLine(RechteckHoehe);
Hoehe = Console.ReadLine();
HoeheD = Convert.ToDouble(Hoehe);
Console.WriteLine(RechteckBreite);
Breite = Console.ReadLine();
BreiteD = Convert.ToDouble(Breite);
Console.WriteLine(ProfilWandstaerke);
Wandstaerke = Console.ReadLine();
WandstaerkeD = Convert.ToDouble(Wandstaerke);
Console.WriteLine(ProfilLaenge);
Laenge = Console.ReadLine();
LaengeD = Convert.ToDouble(Laenge);
Console.WriteLine();
if (WandstaerkeD.Equals(HoeheD))
{
Console.WriteLine(FehlerWandHoehe);
}
else if (WandstaerkeD.Equals(BreiteD))
{
Console.WriteLine(FehlerWandBreite);
}
else
{
Console.WriteLine(EinleitungWerkstoffe);
AuswahlDichte = Console.ReadLine();
AuswahlDichteD = Convert.ToDouble(AuswahlDichte);
if (AuswahlDichteD.Equals(1.0))
{
String WerkstoffAuswahl;
Double WerkstoffAuswahlD;
Console.WriteLine(Werkstoffe);
Console.WriteLine();
Console.WriteLine("(1) S235");
Console.WriteLine("(2) AlMg4");
Console.WriteLine("(3) S355");
Console.WriteLine("(4) 42CrMo4");
Console.WriteLine("(5) E295");
Console.WriteLine("(6) E355");
Console.WriteLine("(7) C45");
WerkstoffAuswahl = Console.ReadLine();
WerkstoffAuswahlD = Convert.ToDouble(WerkstoffAuswahl);
DichteD = WerkstoffSammlung.Werkstoffe(WerkstoffAuswahlD, AuswahlSpracheD);
Berechnungen.RechteckRohr(HoeheD, BreiteD, WandstaerkeD, LaengeD, DichteD, AuswahlSpracheD);
}
else if (AuswahlDichteD.Equals(2.0))
{
Console.WriteLine(ManuelleDichte);
Dichte = Console.ReadLine();
DichteD = Convert.ToDouble(Dichte);
HoeheD = Convert.ToDouble(Hoehe);
BreiteD = Convert.ToDouble(Breite);
LaengeD = Convert.ToDouble(Laenge);
WandstaerkeD = Convert.ToDouble(Wandstaerke);
Berechnungen.RechteckRohr(HoeheD, BreiteD, WandstaerkeD, LaengeD, DichteD, AuswahlSpracheD);
}
else if (true)
{
Console.WriteLine(Error);
}
}
}
else if (RohrAuswahlD.Equals(2.0))
{
Console.WriteLine(GewaehltVoll);
Console.WriteLine(RechteckHoehe);
Hoehe = Console.ReadLine();
HoeheD = Convert.ToDouble(Hoehe);
Console.WriteLine(RechteckBreite);
Breite = Console.ReadLine();
BreiteD = Convert.ToDouble(Breite);
Console.WriteLine(ProfilLaenge);
Laenge = Console.ReadLine();
LaengeD = Convert.ToDouble(Laenge);
Console.WriteLine();
Console.WriteLine(EinleitungWerkstoffe);
AuswahlDichte = Console.ReadLine();
AuswahlDichteD = Convert.ToDouble(AuswahlDichte);
if (AuswahlDichteD.Equals(1.0))
{
String WerkstoffAuswahl;
Double WerkstoffAuswahlD;
Console.WriteLine(Werkstoffe);
Console.WriteLine();
Console.WriteLine("(1) S235");
Console.WriteLine("(2) AlMg4");
Console.WriteLine("(3) S355");
Console.WriteLine("(4) 42CrMo4");
Console.WriteLine("(5) E295");
Console.WriteLine("(6) E355");
Console.WriteLine("(7) C45");
WerkstoffAuswahl = Console.ReadLine();
WerkstoffAuswahlD = Convert.ToDouble(WerkstoffAuswahl);
DichteD = WerkstoffSammlung.Werkstoffe(WerkstoffAuswahlD, AuswahlSpracheD);
Berechnungen.RechteckVoll(HoeheD, BreiteD, LaengeD, DichteD, AuswahlSpracheD);
}
else if (AuswahlDichteD.Equals(2.0))
{
Console.WriteLine(ManuelleDichte);
Dichte = Console.ReadLine();
DichteD = Convert.ToDouble(Dichte);
HoeheD = Convert.ToDouble(Hoehe);
BreiteD = Convert.ToDouble(Breite);
LaengeD = Convert.ToDouble(Laenge);
Berechnungen.RechteckVoll(HoeheD, BreiteD, LaengeD, DichteD, AuswahlSpracheD);
}
else if (true)
{
Console.WriteLine(Error);
}
}
else
{
Console.WriteLine(Error);
}
}
else if (AuswahlProfilD.Equals(2.0))
{
Console.WriteLine(KreisRohrAuswahl);
RohrAuswahl = Console.ReadLine();
RohrAuswahlD = Convert.ToDouble(RohrAuswahl);
if (RohrAuswahlD.Equals(1.0))
{
Console.WriteLine(GewaehltRohr);
Console.WriteLine(RohrDurchmesser);
Durchmesser = Console.ReadLine();
DurchmesserD = Convert.ToDouble(Durchmesser);
Console.WriteLine(ProfilWandstaerke);
Wandstaerke = Console.ReadLine();
WandstaerkeD = Convert.ToDouble(Wandstaerke);
Console.WriteLine(ProfilLaenge);
Laenge = Console.ReadLine();
LaengeD = Convert.ToDouble(Laenge);
Console.WriteLine();
if (WandstaerkeD.Equals(DurchmesserD))
{
Console.WriteLine(FehlerDurchmesserWand);
}
else
{
Console.WriteLine(EinleitungWerkstoffe);
AuswahlDichte = Console.ReadLine();
AuswahlDichteD = Convert.ToDouble(AuswahlDichte);
if (AuswahlDichteD.Equals(1.0))
{
String WerkstoffAuswahl;
Double WerkstoffAuswahlD;
Console.WriteLine(Werkstoffe);
Console.WriteLine();
Console.WriteLine("(1) S235");
Console.WriteLine("(2) AlMg4");
Console.WriteLine("(3) S355");
Console.WriteLine("(4) 42CrMo4");
Console.WriteLine("(5) E295");
Console.WriteLine("(6) E355");
Console.WriteLine("(7) C45");
WerkstoffAuswahl = Console.ReadLine();
WerkstoffAuswahlD = Convert.ToDouble(WerkstoffAuswahl);
DichteD = WerkstoffSammlung.Werkstoffe(WerkstoffAuswahlD, AuswahlSpracheD);
Berechnungen.KreisRohr(DurchmesserD, WandstaerkeD, LaengeD, DichteD, AuswahlSpracheD);
}
else if (AuswahlDichteD.Equals(2.0))
{
Console.WriteLine(ManuelleDichte);
Dichte = Console.ReadLine();
DichteD = Convert.ToDouble(Dichte);
Berechnungen.KreisRohr(DurchmesserD, WandstaerkeD, LaengeD, DichteD, AuswahlSpracheD);
}
else
{
Console.WriteLine(Error);
}
}
}
else if (RohrAuswahlD.Equals(2.0))
{
Console.WriteLine(GewaehltVoll);
Console.WriteLine(RohrDurchmesser);
Durchmesser = Console.ReadLine();
DurchmesserD = Convert.ToDouble(Durchmesser);
Console.WriteLine(ProfilLaenge);
Laenge = Console.ReadLine();
LaengeD = Convert.ToDouble(Laenge);
Console.WriteLine();
Console.WriteLine(EinleitungWerkstoffe);
AuswahlDichte = Console.ReadLine();
AuswahlDichteD = Convert.ToDouble(AuswahlDichte);
if (AuswahlDichteD.Equals(1.0))
{
String WerkstoffAuswahl;
Double WerkstoffAuswahlD;
Console.WriteLine(Werkstoffe);
Console.WriteLine();
Console.WriteLine("(1) S235");
Console.WriteLine("(2) AlMg4");
Console.WriteLine("(3) S355");
Console.WriteLine("(4) 42CrMo4");
Console.WriteLine("(5) E295");
Console.WriteLine("(6) E355");
Console.WriteLine("(7) C45");
WerkstoffAuswahl = Console.ReadLine();
WerkstoffAuswahlD = Convert.ToDouble(WerkstoffAuswahl);
DichteD = WerkstoffSammlung.Werkstoffe(WerkstoffAuswahlD, AuswahlSpracheD);
Berechnungen.KreisVoll(DurchmesserD, LaengeD, DichteD, AuswahlSpracheD);
}
else if (AuswahlDichteD.Equals(2.0))
{
Console.WriteLine(ManuelleDichte);
Dichte = Console.ReadLine();
DichteD = Convert.ToDouble(Dichte);
Berechnungen.KreisVoll(DurchmesserD, LaengeD, DichteD, AuswahlSpracheD);
}
else
{
Console.WriteLine(Error);
}
}
else
{
Console.WriteLine(Error);
}
}
else if (AuswahlProfilD.Equals(6.0))
{
Console.WriteLine(UngenauigkeitErklaerung);
Console.WriteLine(LProfilHoehe);
Hoehe = Console.ReadLine();
HoeheD = Convert.ToDouble(Hoehe);
Console.WriteLine(RechteckBreite);
Breite = Console.ReadLine();
BreiteD = Convert.ToDouble(Breite);
Console.WriteLine(ProfilWandstaerke);
Wandstaerke = Console.ReadLine();
WandstaerkeD = Convert.ToDouble(Wandstaerke);
Console.WriteLine(ProfilLaenge);
Laenge = Console.ReadLine();
LaengeD = Convert.ToDouble(Laenge);
Console.WriteLine();
if (WandstaerkeD.Equals(HoeheD))
{
Console.WriteLine(FehlerWandHoehe);
}
else if (WandstaerkeD.Equals(BreiteD))
{
Console.WriteLine(FehlerWandBreite);
}
else
{
Console.WriteLine(EinleitungWerkstoffe);
AuswahlDichte = Console.ReadLine();
AuswahlDichteD = Convert.ToDouble(AuswahlDichte);
if (AuswahlDichteD.Equals(1.0))
{
String WerkstoffAuswahl;
Double WerkstoffAuswahlD;
Console.WriteLine(Werkstoffe);
Console.WriteLine();
Console.WriteLine("(1) S235");
Console.WriteLine("(2) AlMg4");
Console.WriteLine("(3) S355");
Console.WriteLine("(4) 42CrMo4");
Console.WriteLine("(5) E295");
Console.WriteLine("(6) E355");
Console.WriteLine("(7) C45");
WerkstoffAuswahl = Console.ReadLine();
WerkstoffAuswahlD = Convert.ToDouble(WerkstoffAuswahl);
DichteD = WerkstoffSammlung.Werkstoffe(WerkstoffAuswahlD, AuswahlSpracheD);
Berechnungen.LProfil(HoeheD, BreiteD, LaengeD, WandstaerkeD, DichteD, AuswahlSpracheD);
}
else if (AuswahlDichteD.Equals(2.0))
{
Console.WriteLine(ManuelleDichte);
Dichte = Console.ReadLine();
DichteD = Convert.ToDouble(Dichte);
HoeheD = Convert.ToDouble(Hoehe);
BreiteD = Convert.ToDouble(Breite);
LaengeD = Convert.ToDouble(Laenge);
WandstaerkeD = Convert.ToDouble(Wandstaerke);
Berechnungen.LProfil(HoeheD, BreiteD, LaengeD, WandstaerkeD, DichteD, AuswahlSpracheD);
}
else if (true)
{
Console.WriteLine(Error);
}
}
}
else if (AuswahlProfilD.Equals(4.0))
{
Console.WriteLine(UngenauigkeitErklaerung);
Console.WriteLine(TProfilHoehe);
Hoehe = Console.ReadLine();
HoeheD = Convert.ToDouble(Hoehe);
Console.WriteLine(RechteckBreite);
Breite = Console.ReadLine();
BreiteD = Convert.ToDouble(Breite);
Console.WriteLine(ProfilWandstaerke);
Wandstaerke = Console.ReadLine();
WandstaerkeD = Convert.ToDouble(Wandstaerke);
Console.WriteLine(ProfilLaenge);
Laenge = Console.ReadLine();
LaengeD = Convert.ToDouble(Laenge);
Console.WriteLine();
Console.WriteLine(EinleitungWerkstoffe);
AuswahlDichte = Console.ReadLine();
AuswahlDichteD = Convert.ToDouble(AuswahlDichte);
if (AuswahlDichteD.Equals(1.0))
{
String WerkstoffAuswahl;
Double WerkstoffAuswahlD;
Console.WriteLine(Werkstoffe);
Console.WriteLine();
Console.WriteLine("(1) S235");
Console.WriteLine("(2) AlMg4");
Console.WriteLine("(3) S355");
Console.WriteLine("(4) 42CrMo4");
Console.WriteLine("(5) E295");
Console.WriteLine("(6) E355");
Console.WriteLine("(7) C45");
WerkstoffAuswahl = Console.ReadLine();
WerkstoffAuswahlD = Convert.ToDouble(WerkstoffAuswahl);
DichteD = WerkstoffSammlung.Werkstoffe(WerkstoffAuswahlD, AuswahlSpracheD);
Berechnungen.TProfil(HoeheD, BreiteD, LaengeD, WandstaerkeD, DichteD, AuswahlSpracheD);
}
else if (AuswahlDichteD.Equals(2.0))
{
Console.WriteLine(ManuelleDichte);
Dichte = Console.ReadLine();
DichteD = Convert.ToDouble(Dichte);
Berechnungen.TProfil(HoeheD, BreiteD, LaengeD, WandstaerkeD, DichteD, AuswahlSpracheD);
}
}
else if (AuswahlProfilD.Equals(3.0))
{
Console.WriteLine(UngenauigkeitErklaerung);
Console.WriteLine(IProfilHoehe);
Hoehe = Console.ReadLine();
HoeheD = Convert.ToDouble(Hoehe);
Console.WriteLine(RechteckBreite);
Breite = Console.ReadLine();
BreiteD = Convert.ToDouble(Breite);
Console.WriteLine(ProfilStegBreite);
Stegbreite = Console.ReadLine();
StegbreiteD = Convert.ToDouble(Stegbreite);
Console.WriteLine(ProfilFlanschBreite);
Flanschbreite = Console.ReadLine();
FlanschbreiteD = Convert.ToDouble(Flanschbreite);
Console.WriteLine(ProfilLaenge);
Laenge = Console.ReadLine();
LaengeD = Convert.ToDouble(Laenge);
Console.WriteLine();
Console.WriteLine(EinleitungWerkstoffe);
AuswahlDichte = Console.ReadLine();
AuswahlDichteD = Convert.ToDouble(AuswahlDichte);
if (AuswahlDichteD.Equals(1.0))
{
String WerkstoffAuswahl;
Double WerkstoffAuswahlD;
Console.WriteLine(Werkstoffe);
Console.WriteLine();
Console.WriteLine("(1) S235");
Console.WriteLine("(2) AlMg4");
Console.WriteLine("(3) S355");
Console.WriteLine("(4) 42CrMo4");
Console.WriteLine("(5) E295");
Console.WriteLine("(6) E355");
Console.WriteLine("(7) C45");
WerkstoffAuswahl = Console.ReadLine();
WerkstoffAuswahlD = Convert.ToDouble(WerkstoffAuswahl);
DichteD = WerkstoffSammlung.Werkstoffe(WerkstoffAuswahlD, AuswahlSpracheD);
Berechnungen.IProfil(HoeheD, BreiteD, StegbreiteD, FlanschbreiteD, LaengeD, DichteD, AuswahlSpracheD);
}
else if (AuswahlDichteD.Equals(2.0))
{
Console.WriteLine(ManuelleDichte);
Dichte = Console.ReadLine();
DichteD = Convert.ToDouble(Dichte);
Berechnungen.IProfil(HoeheD, BreiteD, StegbreiteD, FlanschbreiteD, LaengeD, DichteD, AuswahlSpracheD);
}
}
else if (AuswahlProfilD.Equals(5.0))
{
Console.WriteLine(UngenauigkeitErklaerung);
Console.WriteLine(UProfilHoehe);
Hoehe = Console.ReadLine();
HoeheD = Convert.ToDouble(Hoehe);
Console.WriteLine(RechteckBreite);
Breite = Console.ReadLine();
BreiteD = Convert.ToDouble(Breite);
Console.WriteLine(ProfilStegBreite);
Stegbreite = Console.ReadLine();
StegbreiteD = Convert.ToDouble(Stegbreite);
Console.WriteLine(ProfilFlanschBreite);
Flanschbreite = Console.ReadLine();
FlanschbreiteD = Convert.ToDouble(Flanschbreite);
Console.WriteLine(ProfilLaenge);
Laenge = Console.ReadLine();
LaengeD = Convert.ToDouble(Laenge);
Console.WriteLine();
if (FlanschbreiteD.Equals(HoeheD / 2))
{
Console.WriteLine(FehlerWandHoehe);
}
else if (StegbreiteD.Equals(BreiteD))
{
Console.WriteLine(FehlerWandBreite);
}
else
{
Console.WriteLine(EinleitungWerkstoffe);
AuswahlDichte = Console.ReadLine();
AuswahlDichteD = Convert.ToDouble(AuswahlDichte);
if (AuswahlDichteD.Equals(1.0))
{
String WerkstoffAuswahl;
Double WerkstoffAuswahlD;
Console.WriteLine(Werkstoffe);
Console.WriteLine();
Console.WriteLine("(1) S235");
Console.WriteLine("(2) AlMg4");
Console.WriteLine("(3) S355");
Console.WriteLine("(4) 42CrMo4");
Console.WriteLine("(5) E295");
Console.WriteLine("(6) E355");
Console.WriteLine("(7) C45");
WerkstoffAuswahl = Console.ReadLine();
WerkstoffAuswahlD = Convert.ToDouble(WerkstoffAuswahl);
DichteD = WerkstoffSammlung.Werkstoffe(WerkstoffAuswahlD, AuswahlSpracheD);
Berechnungen.UProfil(HoeheD, BreiteD, LaengeD, StegbreiteD, FlanschbreiteD, DichteD, AuswahlSpracheD);
}
else if (AuswahlDichteD.Equals(2.0))
{
Console.WriteLine(ManuelleDichte);
Dichte = Console.ReadLine();
DichteD = Convert.ToDouble(Dichte);
HoeheD = Convert.ToDouble(Hoehe);
BreiteD = Convert.ToDouble(Breite);
LaengeD = Convert.ToDouble(Laenge);
StegbreiteD = Convert.ToDouble(Stegbreite);
FlanschbreiteD = Convert.ToDouble(Flanschbreite);
Berechnungen.UProfil(HoeheD, BreiteD, LaengeD, StegbreiteD, FlanschbreiteD, DichteD, AuswahlSpracheD);
}
}
}
Console.WriteLine(EndProgramm);
Console.ReadKey();
}
public static void LProfil(Double HoeheL, Double BreiteL, Double LaengeL, Double WandstaerkeL, Double DichteL, Double Sprache)
{
Berechnungen.Sprache(Sprache);
Double Volumen;
Double Querschnitt;
Double Gewicht;
Double Schwerpunktx; //Abstand des Schwerpunktes zum Ursprungskoordinatensystem, welches auf der linken Profilkante liegt
Double Schwerpunkty; //Abstand des Schwerpunktes zum Ursprungskoordinatensystem, welches auf der unteren Profilkante liegt
Double Festigkeitxx;
Double Festigkeityy;
Double Festigkeitxy; //Deviationsmoment, da keine der Schwerpunktachsen Symetrieachse ist --- um Vredrehwinkel der hauptträgheitsachsen auszurechnen
Double AchswinkelRad; //Verdrehung der Hauptträgheitsachsen zu den Schwerpunktachsen in Radiant
Double AchswinkelGrad; //Verdrehung der Hauptträgheitsachsen zu den Schwerpunktachsen in Grad
Double Festigkeitu;
Double Festigkeitv;
//Querschnitt
Querschnitt = BreiteL * WandstaerkeL + (HoeheL - WandstaerkeL) * WandstaerkeL;
//Voulumen
Volumen = Querschnitt * LaengeL;
//Gewicht
Gewicht = Volumen * DichteL;
Console.WriteLine(QuerschnittS + Math.Round(Querschnitt, 3) + " mm²");
Console.WriteLine(VolumenS + Math.Round(Volumen, 3) + " mm³");
Console.WriteLine(GewichtS + Math.Round(Gewicht, 3) + " g");
//Schwerpunkte: (b * h * b/2--Schwerpunkt auf halber Höhe/Breite, ganze Fläche-- - (b - w) * (h - w)--Ausgeschnittene Fläche-- * ((b - w)/2 + w)--Schwerpunkt der Fläche, da Ursprungs KS auf linker Profilkante--) / (b * h - (b - w) * (h - w))--Querschnitt--
Schwerpunktx = (BreiteL * HoeheL * (BreiteL / 2) - (BreiteL - WandstaerkeL) * (HoeheL - WandstaerkeL) * ((BreiteL - WandstaerkeL) / 2 + WandstaerkeL)) / ((BreiteL * HoeheL) - ((BreiteL - WandstaerkeL) * (HoeheL - WandstaerkeL)));
Schwerpunkty = (HoeheL * BreiteL * (HoeheL / 2) - (HoeheL - WandstaerkeL) * (BreiteL - WandstaerkeL) * ((HoeheL - WandstaerkeL) / 2 + WandstaerkeL)) / ((HoeheL * BreiteL) - ((HoeheL - WandstaerkeL) * (BreiteL - WandstaerkeL)));
// - Flächenträgheitsmomente -Steiner Anteil: -Fläche -; -Abstand² des Teilschwerpkt. vom Gesamtschwerpkt, mit Ursprungs KS auf linker Profilkante
// - - Flächenträgheitsmoment - - Fläche - -Abstand² von Teilschw. zu Gesamtschw. mit KS auf Unterkante
Festigkeitxx = ((WandstaerkeL * Math.Pow(HoeheL, 3) / 12) + (WandstaerkeL * HoeheL) * Math.Pow((HoeheL / 2 - Schwerpunkty), 2)) + (((BreiteL - WandstaerkeL) * Math.Pow(WandstaerkeL, 3) / 12) + (((BreiteL - WandstaerkeL) * WandstaerkeL) * Math.Pow((Schwerpunkty - (WandstaerkeL / 2)), 2))); //Klappt
Festigkeityy = ((HoeheL * Math.Pow(WandstaerkeL, 3) / 12) + (WandstaerkeL * HoeheL) * Math.Pow((Schwerpunktx - (WandstaerkeL / 2)), 2)) + ((WandstaerkeL * Math.Pow((BreiteL - WandstaerkeL), 3) / 12) + (((BreiteL - WandstaerkeL) * WandstaerkeL) * Math.Pow(((BreiteL - WandstaerkeL) / 2 + WandstaerkeL) - Schwerpunktx, 2))); //Klappt
Festigkeitxy = -Math.Pow((BreiteL * HoeheL), 2) / 4 - (-(Math.Pow((BreiteL * HoeheL), 2) - Math.Pow((HoeheL * WandstaerkeL), 2) - Math.Pow((BreiteL * WandstaerkeL), 2) + Math.Pow(WandstaerkeL, 4)) / 4) + (((BreiteL * HoeheL) - (BreiteL - WandstaerkeL) * (HoeheL - WandstaerkeL)) * Schwerpunktx * Schwerpunkty);
//Achswinkel = (1 / 2) * Math.Atan((2 * Festigkeitxy) / (Festigkeitxx - Festigkeityy));
AchswinkelRad = (Math.Atan((2 * Festigkeitxy) / (Festigkeitxx - Festigkeityy))) / 2;
AchswinkelGrad = AchswinkelRad * 180 / Math.PI;
Festigkeitu = (Festigkeitxx + Festigkeityy) / 2 + (((Festigkeitxx - Festigkeityy) / 2) * Math.Cos(2 * AchswinkelRad)) + Festigkeitxy * Math.Sin(2 * AchswinkelRad);
Festigkeitv = (Festigkeitxx + Festigkeityy) / 2 - (((Festigkeitxx - Festigkeityy) / 2) * Math.Cos(2 * AchswinkelRad)) - Festigkeitxy * Math.Sin(2 * AchswinkelRad);
Console.WriteLine(SchwerpunktxS + Schwerpunktx + " mm");
Console.WriteLine(SchwerpunktyS + Schwerpunkty + " mm");
Console.WriteLine(FTMSX + Festigkeitxx + " mm⁴");
Console.WriteLine(FTMSY + Festigkeityy + " mm⁴");
Console.WriteLine(FTMSXY + Festigkeitxy + " mm⁴");
Console.WriteLine(DrehungAchsenRad + AchswinkelRad + ".");
Console.WriteLine(DrehungAchsenGrad + AchswinkelGrad + "°.");
Console.WriteLine(DrehungUX + AchswinkelGrad + Drehsinn);
Console.WriteLine(DrehungVY + AchswinkelGrad + "°.");
Console.WriteLine(FTMSU + Festigkeitu + " mm⁴");
Console.WriteLine(FTMSV + Festigkeitv + " mm⁴");
}
