[浏览完整版]
标题：[求助]公式不能插入，也不能显示的问题
1楼
chloe239 发表于：2018/5/21 11:33:11{笔段中枢初始化}
kxian:="CHZHSHL@kxian";
kxg:="CHZHSHL@kxg";
kxd:="CHZHSHL@kxd";
fx:="CHZHSHL@fenxing"(以笔结尾);
bi:="CHZHSHL@bi"(分型包含类型, 新低新高成笔,笔类型);
duan:="CHZHSHL@duan"(段方式, 笔破坏包含);
ZSFW:="CHZHSHL@zsfw";
ZSZG:="CHZHSHL@zszg";
ZSZD:="CHZHSHL@zszd";
ZSKS:="CHZHSHL@zskslast";
ZSJS:="CHZHSHL@zsjslast";
DRAWLINE(笔中枢=1 AND ZSKS=1 AND ZSFW=-1 , ZSZG, ZSJS=1 AND ZSFW=-1, ZSZG, 0),COLORRED, LINEDOT;
DRAWLINE(笔中枢=1 AND ZSKS=1 AND ZSFW=-1 , ZSZD, ZSJS=1 AND ZSFW=-1, ZSZD, 0),COLORRED, LINEDOT;
STICKLINE(笔中枢=1 AND ZSKS=1 ,ZSZG,ZSZD,0,2),COLORRED, LINETHICK1;
STICKLINE(笔中枢=1 AND ZSJS=1 ,ZSZG,ZSZD,0,2),COLORRED, LINETHICK1;
DRAWLINE(笔中枢=1 AND ZSKS=1 AND ZSFW=1, ZSZG, ZSJS=1 AND ZSFW=1 , ZSZG, 0),COLORGREEN, LINEDOT;
DRAWLINE(笔中枢=1 AND ZSKS=1 AND ZSFW=1, ZSZD, ZSJS=1 AND ZSFW=1, ZSZD, 0),COLORGREEN, LINEDOT;
STICKLINE(笔中枢=1 AND ZSKS=1 AND ZSFW=1 ,ZSZG,ZSZD,0,2),COLORGREEN, LINETHICK1;
STICKLINE(笔中枢=1 AND ZSJS=1 AND ZSFW=1 ,ZSZG,ZSZD,0,2),COLORGREEN, LINETHICK1;
STICKLINE(笔中枢=2 AND ZSFW=-1 ,ZSZG,ZSZD,10,0),COLOR000044, LINETHICK1;
STICKLINE(笔中枢=2 AND ZSFW=1 ,ZSZG,ZSZD,10,0),COLOR004400, LINETHICK1;
ZSZZ:= (ZSZG + ZSZD) / 2;
DRAWLINE(笔中枢 > 0 AND ZSKS=1, ZSZZ, ZSJS=1, ZSZZ, 0),COLORYELLOW, LINEDOT;
{显示笔}
IF 笔开关=1 THEN BEGIN
drawline(bi=1, kxg, bi=-1, kxd, 0),colorwhite,linedash, linethick1;
drawline(bi=-1, kxd, bi=1, kxg, 0),colorwhite,linedash, linethick1;
END;
{显示段}
IF 段开关=1 THEN BEGIN
drawline(duan=1, kxg, duan=-1, kxd, 0),coloryellow,linedash,linethick1;
drawline(duan=-1, kxd, duan=1, kxg, 0),coloryellow,linedash,linethick1;
END;
//显示点位
var1:=kxian;
var2:=bi;
var3:=duan;
pre:=2; {设置小数点位数}
if STKTYPE=0 then pre:=1;
a1:=barslast(var2<>0);
a2:=ref(var2,a1);
aa1:=ref(a1+1,1);
aa2:=ref(a2,1);
a3:=if (aa2>0,l-ref(h,aa1),h-ref(l,aa1)),linethick0;{计算点位差}
//显示最后没完成的点位
aa9:=hhv(h,a1);
aa11:=llv(l,a1);
{显示涨跌停}
stickline(DATAPERIOD=6 and c/ref(c,1)>=1.097,o,c,6,1),colormagenta;
stickline(DATAPERIOD=6 and c/ref(c,1)<=0.903, o,c,6,1),colorgreen;
{显示笔数值}
IF 笔数值=1 then begin
drawnumber(var2= 1,h,h,pre),pxup20,color3300ff,align0;
drawnumber(var2=-1,l,l,pre),pxdn5,colorffff00,align0;
end;
{显示段数值}
IF 段数值=1 then begin
drawnumber(var3= 1,h,h,pre),pxup20,color3300ff,align0;
drawnumber(var3=-1,l,l,pre),pxdn5,colorffff00,align0;
end;
以上是一个画线的公式，是用在主图叠加上面，现在无法正常插入到软件，也不能自动画线，请问是什么原因。附件是dll文件。和这个公式配套使用的，也已经安装在fmldll里面
2楼
chloe239 发表于：2018/5/21 12:24:14
此主题相关图片如下：02.png
3楼
chloe239 发表于：2018/5/21 12:24:58此主题相关图片如下：01.png
4楼
chloe239 发表于：2018/5/21 12:26:54本来应该跟通达信软件显示的画线一样，自动画出虚线和实线，链接k线的高低点。然后有个dll文件我也放进了系统文件里面，不知道为什么不能自动画线，也不能显示，说不能插入
此主题相关图片如下：03.png
5楼
wenarm 发表于：2018/5/21 13:08:24请上传你的DLL文件。
另外你的dll是基于金字塔的吗。不同平台dll是不通用的。
[此贴子已经被作者于2018/5/21 13:13:21编辑过]
6楼
chloe239 发表于：2018/5/21 15:09:19| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:chzhshl.zip |
7楼
chloe239 发表于：2018/5/21 15:15:45已经上传了，麻烦您看一下，谢谢。是用于金字塔的
8楼
FireScript 发表于：2018/5/21 15:57:49 你试下
kxian:="CHZHSHL@kxian";
只做这一句的输出，能否正常输出。工作人员这样测试是正常的。
kxian:="CHZHSHL@kxian";
只做这一句的输出，能否正常输出。工作人员这样测试是正常的。
9楼
chloe239 发表于：2018/5/22 14:22:29这一句的话，可以插入到主图里面，但是没有任何输出啊，没有解决任何问题，麻烦能全部一起看一下,给一个可以使用的代码可以吗？谢谢了
10楼
FireScript 发表于：2018/5/22 14:31:39 可能是dll引用上出现问题。不过我们工作人员有调试过的，是能输出的。
此主题相关图片如下：temp.png
我只用以下代码测试DLL引用的情况。
你看我这边。输出是正常的。
kxian:"CHZHSHL@kxian";
kxg:"CHZHSHL@kxg";
kxd:"CHZHSHL@kxd";
fx:"CHZHSHL@fenxing";
bi:"CHZHSHL@bi";
duan:"CHZHSHL@duan";
ZSFW:"CHZHSHL@zsfw";
ZSZG:"CHZHSHL@zszg";
ZSZD:"CHZHSHL@zszd";
ZSKS:="CHZHSHL@zskslast";
ZSJS:="CHZHSHL@zsjslast";
你看我这边。输出是正常的。
kxian:"CHZHSHL@kxian";
kxg:"CHZHSHL@kxg";
kxd:"CHZHSHL@kxd";
fx:"CHZHSHL@fenxing";
bi:"CHZHSHL@bi";
duan:"CHZHSHL@duan";
ZSFW:"CHZHSHL@zsfw";
ZSZG:"CHZHSHL@zszg";
ZSZD:"CHZHSHL@zszd";
ZSKS:="CHZHSHL@zskslast";
ZSJS:="CHZHSHL@zsjslast";
你金字塔什么版本的，多少位金字塔？
[此贴子已经被作者于2018/5/22 14:32:52编辑过]