以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  [求助]求DLL指标如何在金字塔上显示，谢谢  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=5738)
--  作者：ricky
--  发布时间：2011/3/16 16:31:03
--  [求助]求DLL指标如何在金字塔上显示，谢谢

此DLL指标在飞狐下正常，但不能在金字塔里显示，求各高手帮帮忙，谢谢！！DLL文件已复制到FMLDLL下

 

dla:="LTFunc4@FORLT2";
dls1:="LTFunc4@LT_S1";
dlhs:="LTFunc4@LT_HS";
dlls:="LTFunc4@LT_LS";
dlp1:="LTFunc4@LT_P1";
dlupp:="LTFunc4@LT_UPP";
dludd:="LTFunc4@LT_UDD";
dllxb:=dlp1=1 and ref(dlp1,1)=0;{B点}
dllxs:=dlp1=0 and ref(dlp1,1)=1;{S点}
dlmr:=dls1=1 and ref(dls1,1)=0 and (dlp1+ref(dlp1,1))<>1;{短线买入机会}
dlmc:=dls1=0 and ref(dls1,1)=1 and (dlp1+ref(dlp1,1))<>1;{短线卖出机会}
STICKLINE(dlp1=1 and c>=o and o<>0,c,o,7.5,0),colorblack;
STICKLINE(dlp1=1 and c>=o and o<>0,c,c,7.5,0),color5454ff;
STICKLINE(dlp1=1 and c>=o and o<>0,o,o,7.5,0),color5454ff;
STICKLINE(dlp1=1 and c>=o and o<>0,o,c,7.5,1),color5454ff;
STICKLINE(dlp1=1 and c<=o,o,c,7.5,1),color5454ff;
STICKLINE(dlp1=1 and c<=o,l,c,0.5,1),color5454ff;
STICKLINE(dlp1=1 and c<=o,h,o,0.5,1),color5454ff;
STICKLINE((dlp1<>1 or barscount(c)<3) and c>=o,c,o,7.5,1),colorffff54;
STICKLINE((dlp1<>1 or barscount(c)<3) and c>=o,c,h,0.5,1),colorffff54;
STICKLINE((dlp1<>1 or barscount(c)<3) and c>=o,l,o,0.5,1),colorffff54;
drawicon(dllxb,l,\'buy1\'),align0;
drawicon(dllxs,h,\'sell1\'),align0;
drawicon(dlmr,l,\'bs\'),align0;
drawicon(dlmc,h,\'ss\'),align0;
--  作者：admin
--  发布时间：2011/3/16 17:07:10
--  

请把DLL上传至网盘，然后贴连接过来
--  作者：ricky
--  发布时间：2011/3/16 22:42:26
--  

FMLDLL：

 

http://www.rayfile.com/zh-cn/files/640cbfd7-4fdb-11e0-8763-0015c55db73d/

[此贴子已经被作者于2011-3-16 22:55:38编辑过]
--  作者：ricky
--  发布时间：2011/3/16 22:54:49
--  

小弟菜鸟，在此还想请教ADMIN大哥，以下是主图叠加成交量的，但不知如何多添加一条5日量的移动平均线，而且不占画面的，我用“NOAXIS”不行，线太占画面了，谢谢！！！

 

a:=SYSPARAM(4)-sysparam(5);//画面高低差幅
ab:=sysparam(4)+a/3;
P1:=0;
P2:=VOL;
N1:=SYSPARAM(2);
N2:=SYSPARAM(3);
FOR I=N1 TO N2 DO
BEGIN
IF P1<P2[I] THEN
P1:= P2[I];
END;
b:=p1;//最大量
d:=b/a*2;//倍数系数
e:=sysparam(5)-a/2;//最低位置
vx:=v/d+e;
stickline((c>o or c>ref(c,1)),e,vx,7,1),COLORRED;
stickline(c<o or c<=ref(c,1),e,vx,7,0),COLORCYAN;
--  作者：董小球
--  发布时间：2011/3/17 13:44:47
--  
能不能吧成交量都乘以一个倍数 比如0.001 这样就可以降低占用的画面了
--  作者：admin
--  发布时间：2011/3/17 18:31:13
--  

LTFunc4 这个DLL的源代码你那里有吗？

经过测试，只有第一行的调用成功，后面的均失败，DLL返回－1表示失败，目前不知道具体失败原因
--  作者：ricky
--  发布时间：2011/3/17 20:14:20
--  

谢谢ADMIN大哥，我没有，还有我4楼的公式问题该如何弄，谢谢！！

主图叠加的成交量公式，该如何加多句5天成交量的移动平均线：

 

a:=SYSPARAM(4)-sysparam(5);//画面高低差幅
ab:=sysparam(4)+a/3;
P1:=0;
P2:=VOL;
N1:=SYSPARAM(2);
N2:=SYSPARAM(3);
FOR I=N1 TO N2 DO
BEGIN
IF P1<P2[I] THEN
P1:= P2[I];
END;
b:=p1;//最大量
d:=b/a*2;//倍数系数
e:=sysparam(5)-a/2;//最低位置
vx:=v/d+e;
stickline((c>o or c>ref(c,1)),e,vx,7,1),COLORRED;
stickline(c<o or c<=ref(c,1),e,vx,7,0),COLORCYAN;
--  作者：ricky
--  发布时间：2011/3/17 20:27:11
--  

谢谢ADMIN大哥，我没有，还有我4楼的公式问题该如何弄，谢谢！！

主图叠加的成交量公式，该如何加多句5天成交量的移动平均线：

 

a:=SYSPARAM(4)-sysparam(5);//画面高低差幅
ab:=sysparam(4)+a/3;
P1:=0;
P2:=VOL;
N1:=SYSPARAM(2);
N2:=SYSPARAM(3);
FOR I=N1 TO N2 DO
BEGIN
IF P1<P2[I] THEN
P1:= P2[I];
END;
b:=p1;//最大量
d:=b/a*2;//倍数系数
e:=sysparam(5)-a/2;//最低位置
vx:=v/d+e;
stickline((c>o or c>ref(c,1)),e,vx,7,1),COLORRED;
stickline(c<o or c<=ref(c,1),e,vx,7,0),COLORCYAN;