未知的GW-BASIC函数/语法:Q(var)= var

Question

我正在将一个过时的旧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$为是/否输入变量,因此我在其中放置一个浮点数是没有意义的.Q()之前的程序中没有定义任何函数,也无法Q()在GW-BASIC中找到对函数的引用.

有帮助吗？

Answer 1

Q和Q $是单独的变量.任何带$的东西都是字符串变量.Q(Z)是一个数字数组.

1和2字符名称很常见,因为在早期版本的Basic中,变量名最多限制为2个字符.