共4 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：画亚当理论的双重映像图的含VBS的语句怎样才能运行出结果啊?
1楼
kevintang 发表于：2014/6/8 11:20:52以下网上流行的画亚当理论的双重映像图的含VBS的语句的程序放在软件里要怎么样设置才能运行出结果? 麻烦高手和版主们解答!
看过金字塔VBS的资料 下面这样的代码应该可以执行啊? 为会么执行后只出现最后一条语句画的竖虚线? K线都画到哪去了?
AH:=HIGH; AL:=LOW; AO:=OPEN; AC:=CLOSE;
<%vh=ffl.vardata("AH")
vl=ffl.vardata("AL")
vo=ffl.vardata("AO")
vc=ffl.vardata("AC")
last=ubound(vh)
if last<101 then
b=last+1
else
b=0
for i=last-101 to last-51
vh(i)=vh(i+51)
vl(i)=vl(i+51)
vo(i)=vo(i+51)
vc(i)=vc(i+51)
next
a=(vh(last-51)+vl(last-51))/2
j=1
for i=last-49 to last
j=j+2
vh(i)=2*a-vl(i-j)
vl(i)=2*a-vh(i-j)
vo(i)=2*a-vc(i-j)
vc(i)=2*a-vo(i-j)
next
end if
ffl.vardata("AH")=vh
ffl.vardata("AL")=vl
ffl.vardata("AO")=vo
ffl.vardata("AC")=vc
ffl.varstartindex("AH")=b
ffl.varstartindex("AL")=b
ffl.varstartindex("AO")=b
ffl.varstartindex("AC")=b
%>
A:=BACKSET(ISLASTBAR,50);
STICKLINE(A AND AC>=AO,AO,AC,6,1),COLORMAGENTA,SHIFT50;
STICKLINE(A AND AC>=AO,AL,AO,0.1,1),COLORMAGENTA,SHIFT50;
STICKLINE(A AND AC>=AO,AC,AH,0.1,1),COLORMAGENTA,SHIFT50;
STICKLINE(A AND AC<AO,AO,AC,6,0),COLORGREEN,SHIFT50;
STICKLINE(A AND AC<AO,AL,AH,0.1,0),COLORGREEN,SHIFT50;
VERTLINE(ISLASTBAR),COLORYEALOW,POINTDOT;
此主题相关图片如下：2014-06-08_111911.jpg
2楼
kevintang 发表于：2014/6/8 21:59:24附一张要实现的效果, 以最后一根K线实体的中间价格为中心实现如图的双重镜向
此主题相关图片如下：2014-06-08_213732.jpg
此主题相关图片如下：2014-06-08_213732.jpg3楼
王锋 发表于：2014/6/8 22:12:134楼
kevintang 发表于：2014/6/9 10:02:43多谢王老师搜过老帖但没收到你给的这个 谢谢!问题决了
共4 条记录, 每页显示 10 条, 页签:
[1]