【分享】干货！！空气湿球温度、露点、焓值计算SCL-技术论坛-工业支持中心-西门子中国

【分享】干货！！空气湿球温度、露点、焓值计算SCL

已锁定

ziege

帖子

15
精华

0
被关注

2

论坛等级：游士

注册时间：2010-09-18

普通如何晋级?

【分享】干货！！空气湿球温度、露点、焓值计算SCL

5378

12

2020-09-24 11:53:05

//计算露点、湿球温度、含湿量、比焓、饱和空气压力、水蒸气分压

#Td := (237.7 * (17.27 * #T / (237.7 + #T) + LN(#RH / 100))) / (17.27 - (17.27 * #T / (237.7 + #T) + LN(#RH / 100)));//计算空气含湿量(Td)

#Pv_Temp := EXP((18.678 - #T/ 234.5) * #T / (#T + 257.14));

#PV := 611.2 * #Pv_Temp;//计算饱和压力(Pv)

#d_Temp:= 0.01 * #RH * #PV/ (101326 - 0.01 * #RH * #PV);//计算含湿量(d)

#d := 0.6219 * #d_Temp;

#H := 1.01 * #T + (2500 + 1.84 * #T) * #d;//计算焓值(H)

#Tw_low_Temp := #Td;

#Tw_high_Temp := #T;

FOR #I := 1 TO 100 BY 1 DO

#Tw_Temp := (#Tw_high_Temp - #Tw_low_Temp) * 0.5;

#Tw_Guess := #Tw_Temp + #Tw_low_Temp;

#Pvw_temp := 611.2 * EXP((18.678 - #Td / 234.5) * #Tw_Guess / (#Tw_Guess + 257.14));//计算湿球饱和压力(Pvw)

#dw_Temp := 0.6219 * #Pvw_temp / (101326 - #Pvw_temp);//计算湿球含湿量(dw)

#Hw_Temp := 1.01 * #Tw_Guess + (2500 + 1.84 * #Tw_Guess) * #dw_Temp;//计算湿球焓值

IF (#H - #Hw_Temp) >= 0.0 THEN

#Tw_low_Temp := #Tw_Guess;

ELSE

#Tw_high_Temp := #Tw_Guess;

END_IF;

IF ABS(#Tw_Temp) < 0.0001 THEN

EXIT;

END_IF;

END_FOR;

#Tw := #Tw_Guess;

Air parameter calculation.rar

转载请注明出处！

【分享】干货！！空气湿球温度、露点、焓值计算SCL 已锁定

已锁定

编辑推荐：关闭

请填写推广理由：

活动公告查看全部公告>

【仅剩99份】学PLC得PLC限量学习笔记，下单立减50元享加赠

热门视频，猜你喜欢

本版热门话题

SIMATIC S7-1500系列

共有8651条技术帖

相关推荐

热门标签

相关帖子推荐

guzhang

恭喜，你发布的帖子

被评为精华帖！

快扫描右侧二维码晒一晒吧！

再发帖或跟帖交流2条，就能晋升VIP啦！开启更多专属权限！

分享
只看
楼主

您收到0封站内信：

×

×

信息提示

很抱歉！您所访问的页面不存在，或网址发生了变化，请稍后再试。