我正在将一个非常老的GW-BASIC程序翻译成JavaScript,但是我遇到了一段语法使我困惑。请注意(再次强调):这不是我的代码,并且变量名都很疯狂,这也是我首先要移植它的原因。
1380 Z = 1
1390 RATIO = FCO2 /(1-FCO2-10^REFFO2)
1400 AA =(1 - 2*RATIO*(100 / MIXRATIO - 1))/(1 + 2*(100 / MIXRATIO - 1))
1410 PART = LOG(1 - AA)- LOG(100 / MIXRATIO - 1)
1420 FOR I = 1 TO - 1 STEP -2
1430 H = I
1440 W = T + H
1450 GG = 62.110326# - .02144446#*W + 4.720326E-07*(W^ 2)+(- 4.5574288#)*(10^(- 12))*(W^ 3)- 7.343018200000001#*(10^(- 15))*(W^ 4)
1460 KK = EXP(- GG /(R*(W + 273.18)))
1470 Q(Z)= KK
1480 Z = Z + 1
1490 NEXT I
1500 NEWFO21 = LOG(10)*.5*(LOG(Q(1))+ PART):NEWFO22 = LOG(10)*.5*(LOG(Q(2))+ PART)
1510 DELEMFDELT =(FN EMF (TREF + 1,NEWFO21) - FN EMF (TREF - 1, NEWFO22))/2
1520 RETURN
问号出现在第1470行,代码为
Q(Z) = KK
。 Q
在程序早期被定义为是/否输入变量,因此将浮点数放入其中是没有意义的。程序中早期没有定义过Q()
函数,而且我在GW-BASIC中也找不到对Q()
函数的引用。需要帮忙吗?