Листинг программы для автоматизации выполнения расчетов и создания чертежей

CalculateFunctions. cs

using System;System. Collections. Generic;System.componentModel;System. Data;System. Drawing;System. Linq;System. Text;System. Windows. Forms;ProjectCreator

{partial class MainForm: Form

{[] calculateRashod (int what, object nagruzka, object T1, object T2) 3D модели лифта

{(what)

{0: // отопление

{[] rezult = { "", "" };[0] = Convert. ToString (Math. Round (Convert. ToDouble (nagruzka) * 1000/ (Convert. ToDouble (T1) - Convert. ToDouble (T2)),

));[1] = Convert. ToString (Math. Round (Convert. ToDouble (rezult [0]) / 3600,6));rezult;

}1: // ГВС циркуляционная

{[] rezult = { "", "", "", "", "", "", "" };

/* Qг. в. max */[0] = Convert. ToString (Math. Round (Convert. ToDouble (nagruzka) * 2.4f,

));

/* Qг. в. цирк*/[1] = Convert. ToString (Math. Round (Convert. ToDouble (nagruzka) * 0.25f / (1 + 0.25f),

));

/* Gг. в. max */[2] = Convert. ToString (Math. Round (Convert. ToDouble (rezult [0]) * 1000/ (Convert. ToDouble (T1) - Convert. ToDouble (T2)),

));

/* Gг. в. min */[3] = Convert. ToString (Math. Round (Convert. ToDouble (rezult [1]) * 0.8f * 100,3));

/* Gцирк. max*/[4] = Convert. ToString (Math. Round (Convert. ToDouble (rezult [3]) * 1.5f,

));

/* Gцирк. min*/[5] = Convert. ToString (Math. Round (Convert. ToDouble (rezult [3]) * 0.4f,

));

/* Gг. в. лет */[6] = Convert. ToString (Math. Round (Convert. ToDouble (rezult [2]) * 0.8f,

));rezult;

}2: // ГВС тупиковая

{[] rezult = { "", "", "" };

/* Qг. в. max */[0] = Convert. ToString (Math. Round (Convert. ToDouble (nagruzka) * 2.4f,

));

/* Gг. в. max */[1] = Convert. ToString (Math. Round (Convert. ToDouble (rezult [0]) * 1000/ (Convert. ToDouble (T1) - Convert. ToDouble (T2)),

));[2] = Convert. ToString (Math. Round (Convert. ToDouble (rezult [1]) / 3600,6));rezult;

}:

{[] rezult = { "" };rezult;

}

}

}[] calculatePoteri (object dyprib, object dytrub, object inputrashod)

{rashod = Convert. ToDouble (inputrashod);dypribora = Convert. ToDouble (dyprib) / 1000;dytruboprovoda = Convert. ToDouble (dytrub) / 1000;L = Math. Round (getTrubaLength (dypribora), 1);v = rashod / ( (3.14f * dytruboprovoda * dytruboprovoda) / 4.0f);Re = v * dytruboprovoda / (0.415f * Math. Pow (10, - 6.0f));Rep = 560.0f * dytruboprovoda / 0.0002f;lt;(Re < Rep) { lt = 0.316f / Math. Pow (Re, 0.25f); }{ lt = 0.11f * Math. Pow ( (0.0002f / dytruboprovoda), 0.25f); }htr = lt * (L / dytruboprovoda) * (v * v / (2.0f * 9.81f));n = Math. Round (dytruboprovoda / dypribora,

);hdif = ( (0.46f * lt * (1 - 1/ (n * n))) + (0.5f * (1 - 1/ (n * n)) * v * v) / (2.0f * 9.81f));hkonf = ( (0.46f * lt * (1 - 1/ (n * n))) * (v * v / (2.0f * 9.81f)));hp = htr + hdif + hkonf + 0.1f;[] rezult = { L, Math. Round (v,3), Math. Round (lt,3), n,. Round (htr,3), Math. Round (hdif,3), Math. Round (hkonf,3),. Round (hp,3) };rezult;

}

}

}

getFunctions. cs

using System;System. Collections. Generic;System.componentModel;System. Data;System. Drawing;System. Linq;System. Text;System. Windows. Forms;ProjectCreator

{partial class MainForm: Form

{getTrubaLength (object dypribora)

{dy = Convert. ToInt32 (dypribora);(dy >= 50) { return 1.2f; }if (dy == 40) { return 1.0f; }{ return 0.8f; }

}

/*[] checkPriborType (object dyforcheck, int amount)

{dy = Convert. ToString (dyforcheck),;(radioPREM. Checked)

{(amount == 2) { SPTConnectionFile = "\\images\\spt941premX2. png"; }{ SPTConnectionFile = "\\images\\spt941premX1. png"; }R1 = "-", R2 = "-";(dy)

Перейти на страницу: 1 2 3 4

Читайте также

Применение системы автоматического проектирования на ИП Суслова
Почти все крупные предприятия используют в своей работе возможности компьютерной техники, в частности CAD, CAM, САЕ технологии, т.к. они предоставляют ряд преимуществ, таких как ...

Проектирование аппаратного обеспечения одноплатных микроконтроллеров
Задание: В заданной РЭС осуществить управляющую функцию по одному из заданных параметров с помощью контроллера, построенного на МПК, разработать электрическую принципиальную схему проект ...

Проект оконечной ОС на базе системы DX200
Современное состояние и перспективные планы развития Единой Сети Электросвязи (ЕСЭ) Российской Федерации характеризуются широким внедрением цифровых технологий и оборудования цифровых си ...

Основные разделы

Все права защищены! (с)2024 - www.generallytech.ru