下载
登录/ 注册
主页
论坛
视频
热股
可转债
下载
下载

求助:帮忙将以下公式改成通达信应用的公式

10-04-05 20:45 1463次浏览
fsggg
+关注
博主要求身份验证
登录用户ID:
求助:帮忙将以下公式改成通达信应用的公式,原公式是大智慧检测通过的!公式是个朋友编的,不太懂谢谢各位了!

dc:=0;
kc:=0;
dcjl:=0;
kcjl:=0;
su:=0;
for i=9 to 1 do begin
if (ref(close,i)>ref(close,i+1) and ref(vol,i)>ref(vol,i+1)) or (ref(close,i)<ref(close,i+1) and ref(vol,i)<ref(vol,i+1))
then
dc:=dc+1;
dcjl:=dcjl+ref(vol,i);
if (ref(close,i)>ref(close,i+1) and ref(vol,i)<ref(vol,i+1)) or (ref(close,i)<ref(close,i+1) and ref(vol,i)>ref(vol,i+1))
then
kc:=kc+1;
kcjl:=kcjl+ref(vol,i);
end
su:=dc/kc/(dcjl/kcjl);
su<0.5;
打开淘股吧APP
0
评论(1)
收藏
展开
热门 最新
碧血丹心

10-04-19 10:40

0
DC:=SUM(IF ((C>REF(CLOSE,1) AND V>REF(V,1)) OR (C<REF(CLOSE,1) AND V<REF(VOL,1)),1,0),10);
DCJL:=SUM(IF ((C>REF(CLOSE,1) AND V>REF(VOL,1)) OR (C<REF(CLOSE,1) AND V<REF(VOL,1)),V,0),10);
KC:=SUM(IF ((C>REF(CLOSE,1) AND V<REF(VOL,1)) OR (C<REF(CLOSE,1) AND V>REF(VOL,1)),1,0),10);
KCJL:=SUM(IF ((C>REF(CLOSE,1) AND V<REF(VOL,1)) OR (C<REF(CLOSE,1) AND V>REF(VOL,1)),V,0),10);
SU:=DC/KC/(DCJL/KCJL);
SU<0.5;
刷新 首页上一页 下一页末页
提交