焓值程序

焓值定义：空气中的焓值是指空气中含有的总热量，通常以干空气的单位质量为基准，称作比焓。工程中简称为焓，是指一千克干空气的焓和与它相对应的水蒸气的焓的总和。在工程上，我们可以根据一定质量的空气在处理过程中比焓的变化，来判定空气是得到热量还是失去了热量。空气的比焓增加表示空气中得到热量;空气的比焓减小表示空气中失去了热量。 焓值计算公式: i=1.01t+(2500+1.84t)d/1000 式中： t—空气温度℃； d —空气的含湿量g/kg干空气； 1.01 —干空气的平均定压比热 kj/(kg.K)； 1.84 —水蒸气的平均定压比热kj/(kg.K)； 2500 —0℃时水的汽化潜热 kj/kg。 含湿量D的定义：湿空气中与一千克干空气同时并存的水蒸气的质量（克）。在湿空气中，与1kg干空气同时并存的水蒸汽量称为含湿量，用符号d表示，单位为g/kg(干空气)。 含湿量D的公式： d=622φPs/(P－φPs) 式中P——大气压力（Pa），一般101.325KPa； Ps——水蒸气的饱和蒸汽压(Pa)； φ——空气的相对湿度。 饱和蒸气压Ps：在密闭条件中，在一定温度下，与固体或液体处于相平衡的蒸气所具有的压力称为蒸气压。同一物质在不同温度下有不同的蒸气压，并随着温度的升高而增大。不同液体饱和蒸气压不同，溶质难溶时，纯溶剂的饱和蒸气压大于溶液的饱和蒸气压；对于同一物质，固态的饱和蒸气压小于液态的饱和蒸气压。 饱和蒸气压公式：PS=0.04204*(0.9202+F/180)^8 F——华氏温度。 华氏温度公式：F=(C×9/5)+32 C——摄氏温度。 由此将焓值计算方法全部涵盖。 举例：空气状态计算 例：20℃ 90％ 101.325KPa d 13.2 g/kg干 i 53.7KJ/Kg干 计算含湿量d Kg/m3 计算含湿量d=622(RHPDS/100)/(P/6.89-RHPDS/100) P－-当地大气压 一般101.325KPa PDS-=0.04204*(0.9202+F/180)^8 F-- =9*t/5+32 TT-----所测温度 RH-----所测湿度

00009 GOSUB 10 P,TT,RH,D
00010 LOCAL(PDS)
00020 $LOC1 = 1.8 * $ARG2
00030 $LOC2 = 32.0 + $LOC1
00040 $LOC1 = $LOC2 / 180.0
00050 $LOC2 = $LOC1 + 0.9202
00060 $LOC1 = LOG($LOC2)
00070 $LOC2 = $LOC1 * 8
00080 $LOC1 = EXP($LOC2)
00090 $PDS = $LOC1 * 0.04204
00100 $LOC1 = $PDS / 100.0
00110 $LOC2 = $LOC1 * $ARG3
00120 $LOC1 = $ARG1 / 6.89
00130 $LOC3 = $LOC1 - $LOC2
00140 $LOC1 = $ARG3 * $PDS
00150 $LOC2 = $LOC1 / 100.0
00160 $LOC1 = 622.0 * $LOC2
00170 $ARG4 = $LOC1 / $LOC3 
00180 RETURN

计算焓值公式

i=1.01t+(2500+1.84t)d/1000

00009 GOSUB 10 P,TT,RH,I
00010 LOCAL(PDS)
00020 $LOC1 = 1.8 * $ARG2
00030 $LOC2 = 32.0 + $LOC1
00040 $LOC1 = $LOC2 / 180.0
00050 $LOC2 = $LOC1 + 0.9202
00060 $LOC1 = LOG($LOC2)
00070 $LOC2 = $LOC1 * 8
00080 $LOC1 = EXP($LOC2)
00090 $PDS = $LOC1 * 0.04204
00100 $LOC1 = $PDS / 100.0
00110 $LOC2 = $LOC1 * $ARG3
00120 $LOC1 = $ARG1 / 6.89
00130 $LOC3 = $LOC1 - $LOC2
00140 $LOC1 = $ARG3 * $PDS
00150 $LOC2 = $LOC1 / 100.0
00160 $LOC1 = 622.0 * $LOC2
00170 $LOC2 = $LOC1 / $LOC3 
00180 $LOC1 = 1.84 * $ARG2
00190 $LOC3 = 2500 + $LOC1
00200 $LOC1 = $LOC3 * $LOC2 
00210 $LOC2 = 1.01 * $ARG2
00220 $ARG4 = $LOC2 + $LOC1/ 1000.0
00230 RETURN