以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  画亚当理论的双重映像图的含VBS的语句怎样才能运行出结果啊?  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=65916)

--  作者:kevintang
--  发布时间:2014/6/8 11:20:52
--  画亚当理论的双重映像图的含VBS的语句怎样才能运行出结果啊?
以下网上流行的画亚当理论的双重映像图的含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
图片点击可在新窗口打开查看


--  作者:kevintang
--  发布时间:2014/6/8 21:59:24
--  
附一张要实现的效果, 以最后一根K线实体的中间价格为中心实现如图的双重镜向

图片点击可在新窗口打开查看此主题相关图片如下:2014-06-08_213732.jpg
图片点击可在新窗口打开查看


--  作者:王锋
--  发布时间:2014/6/8 22:12:13
--  

http://www.weistock.com/bbs/dispbbs.asp?BoardID=5&ID=61944&skin=0

建议提问问题时,先搜老帖


--  作者:kevintang
--  发布时间:2014/6/9 10:02:43
--  
多谢王老师搜过老帖但没收到你给的这个 谢谢!问题决了