function argument value,type,or count is invalid  返回错误

h=VAL('min(&CSTR)')
?h
返回的是0.00

谢了

正解，谢了，现在我就可以继续了，编个sma的函数，还请各位大侠援手

CLOSE TABLES
USE 1a0001.DBF ALIAS A
BLANK ALL FIELDS K
FOR I=1 TO RECCOUNT()-8
SELECT SHLOW FROM 1A0001 WHERE BETWEEN(RECNO(),I,I+8) INTO ARRAY AA
=ACOPY(AA,BB)
=ASORT(BB) && BB(1)为最小值，BB(9)为最大值
SELECT A
REPLACE K WITH BB(1) FOR RECNO()=I+8

SELECT SHhigh FROM 1A0001 WHERE BETWEEN(RECNO(),I,I+8) INTO ARRAY AA
=ACOPY(AA,BB)
=ASORT(BB) && BB(1)为最小值，BB(9)为最大值
SELECT A
REPLACE d WITH BB(9) FOR RECNO()=I+8
ENDFOR
n=9
GO n
DO WHILE !EOF()
rsv=(shclose-k)/(d-k)*100
REPLACE ALL trix WITH rsv  &&怎么都是100还报错
SKIP
n=n+1
ENDDO
 CLOSE ALL

供参考

你的程序里有问题，d取的值是shhigh内9天的最大值

你取值都从shlow中取了，shlow取最低值，shhigh中取最大值，我表达的不清楚，应该从2个字段中分别取出9天中shhigh的最大值和9天中shlow中的最低值，所以我分开了，写k和d

USE 1a0001.DBF ALIAS A
BLANK ALL FIELDS K
FOR I=1 TO RECCOUNT()-8
SELECT SHLOW FROM 1A0001 WHERE BETWEEN(RECNO(),I,I+8) INTO ARRAY AA
=ACOPY(AA,BB)
=ASORT(BB) && BB(1)为最小值，BB(9)为最大值
SELECT A
REPLACE K WITH BB(1) FOR RECNO()=I+8

SELECT SHhigh FROM 1A0001 WHERE BETWEEN(RECNO(),I,I+8) INTO ARRAY AA
=ACOPY(AA,BB)
=ASORT(BB) && BB(1)为最小值，BB(9)为最大值
SELECT A
REPLACE d WITH BB(9) FOR RECNO()=I+8

ENDFOR
n=9
GO n
DO WHILE !EOF()
rsv=((shclose-k)/(d-k))*100
REPLACE trix WITH rsv  
SKIP
n=n+1
ENDDO

成功计算出rsv，谢谢，现在编 K=SMA(RSV,3,1);

哈哈，没注意到你又改进了程序，我的笨程序见笑了