您好, 歡迎來到化工儀器網
西門子1500寬溫型CPU模塊6AG15131AL027AB0
6AG1513-1AL02-7AB0
SIPLUS S7-1500 CPU 1513-1 PN -40...+70°C， 帶防腐蝕涂層 根據 6ES7513-1AL02-0AB0 . *處理器，帶 主存儲器 300 KB 用于 程序及 1.5MB 用于數據， 第 1 個接口：PROFINET IRT 帶雙端口交換機， 40 ns
產品簡介
詳細介紹
西門子1500寬溫型CPU模塊6AG15131AL027AB0
 | 6AG1513-1AL02-7AB0 SIPLUS S7-1500 CPU 1513-1 PN -40...+70°C， 帶防腐蝕涂層 根據 6ES7513-1AL02-0AB0 . *處理器，帶 主存儲器 300 KB 用于 程序及 1.5MB 用于數據， 第 1 個接口：PROFINET IRT 帶雙端口交換機， 40 ns 比特性能表現， 需要 SIMATIC 存儲卡 |
SIEMENS西門子
*，質量保證，保修一年
專業銷售及維修西門子各類工控自動化配件;
：S7-200CN、S7-200SMART、S7-300、S7-400、 S7-1200、S7-1500、ET200、LOGO邏西門子可編程控制器輯控制模塊
西門子HMI人機界面：觸摸屏
西門子變頻器：MM420、MM430、MM440、G110、G120、6SE70
西門子工業以太網：通訊網卡、通訊電纜、通訊接頭、總線連接器 工控機、交換機、自動化軟件等系型號齊全，快速報價，買我們的產品無憂所值，我們的產品都承諾質保一年，讓您買的省心舒心，用的放心！
之前發布過一個濕球溫度計算的SCL代碼，主要是翻譯網上的一個C語言的，但是PLC跑不動，實際關鍵問題在于迭代算法的優化。本程序是優化了迭代算法。采用了二分法迭代，PLC正常計算。以下供大家參考學習 難算的莫過于是濕球溫度，因為需要迭代運算。這個程序對于做樓控項目的工程師非常有用的哦。
本程序可計算 露點、濕球溫度、含濕量、比焓、飽和空氣壓力、水蒸氣分壓
//####################################################
//露點焓值等公式法 采用二分法迭代計算的濕球溫度
//飽和空氣分壓采用簡便算法
//本程序可計算 露點、濕球溫度、含濕量、比焓、飽和空氣壓力、水蒸氣分壓
//EBC LW 20181006
//####################################################
FUNCTION_BLOCK FB14
TITLE = 'DP&H'
AUTHOR: EBC_LW
NAME: DPH
VERSION: '0.01'
FAMILY: EBC
KNOW_HOW_PROTECT
VAR_INPUT
Tdb:REAL:=23.0; //干球溫度℃
RH:REAL:=55.0;//相對濕度%
ATM:REAL:=101.325; //大氣壓力KPa(千帕)
END_VAR
VAR_OUTPUT
Pws:REAL;//飽和空氣壓力KPa(千帕)
Pw:REAL;//空氣的水蒸氣分壓力KPa(千帕)
Tdp:REAL;//露點溫度℃
Twb:REAL;//濕球溫度℃
d:REAL;//空氣的含濕量g/KgDA
H:REAL;//空氣焓值Kj/KgDA
END_VAR
VAR_TEMP
LogEW:REAL;
TEMP_twb:REAL;//濕球溫度猜測值
TEMP_pws:REAL;//猜測的濕球溫度的飽和空氣壓力KPa(千帕)
TEMP_d:REAL; //猜測的濕球溫度的空氣含濕量g/Kg干空氣
TEMP_dt:REAL;//用于迭代的差值
TEMP_hmid:REAL;//濕球溫度猜測的焓值
TEMP_tlow:REAL;//用于迭代的下限
TEMP_thigh:REAL;//用于迭代的上限
I:INT; //迭代循環變量
END_VAR
VAR
// Static Variables
END_VAR
//=====================================================================
//露點溫度計算
LogEW:= 0.66077 + 7.5 * Tdb / (237.3 + Tdb) + (LOG(RH)- 2) ;
Tdp:=((0.66077- logEW)*237.3)/(logEW - 8.16077) ;
//=====================================================================
//焓值的計算
Pws:=0.6112*EXP((18.678-Tdb/234.5)*Tdb/(Tdb+257.14));//簡化算法
Pw:=RH/100*Pws;//求出空氣的水蒸汽分壓力KPa
//d:=621.9*(0.01*RH*Pws/(ATM-0.01*RH*Pws));
d:=621.9*(Pw/(ATM-Pw));
H:=1.01*Tdb+0.001*d*(2500+1.84*Tdb);
//=====================================================================
//濕球溫度的計算
TEMP_tlow := Tdp; //露點值賦給低限
TEMP_thigh := Tdb;//干球溫度賦給高限
FOR I:= 1 TO 100 BY 1 DO //迭代100次
TEMP_dt:=(TEMP_thigh-TEMP_tlow)*0.5;//二分法
TEMP_twb:=TEMP_tlow+TEMP_dt;
//----------------------------------------------------------------------- Kpa
//計算該濕球溫度下的飽和空氣壓力KPa(千帕)
TEMP_pws := 0.6112*EXP((18.678-TEMP_twb/234.5)*TEMP_twb/(TEMP_twb+257.14));
//-----------------------------------------------------------------------g/kg（a）
//計算該濕球溫度下的含濕量
TEMP_d:=621.9 * (TEMP_pws/(ATM - TEMP_pws));
//-----------------------計算焓值-------------------------------------------------kJ/kg
//計算該濕球溫度下的焓值
TEMP_hmid:= 1.01 * TEMP_twb + 0.001*TEMP_d* (2501 + 1.84 * TEMP_twb);
//--------------------------------------------------------------------
IF (H-TEMP_hmid)>=0.0 THEN
TEMP_tlow:=TEMP_twb;
ELSE
TEMP_thigh:=TEMP_twb;
END_IF;
IF ABS(TEMP_dt)<0.0001 THEN//設置迭代精度
EXIT;
END_IF;
END_FOR;
Twb:=TEMP_twb;//返回迭代猜測正確的濕球溫度
西門子1500寬溫型CPU模塊6AG15131AL027AB0