yanggupiao 发表于 2015-5-28 13:02

笔穿破

笔穿头破脚
IF 1 then begin {光标位于右起第二个K线,激活第一个隐藏指标}
fx:="chzhshch@fenxing",linethick1;
IF DATATYPE>=0 and DATATYPE<=12then
begin
IF DATATYPE=0 then minbi:="fbase.var2#min1";
IF DATATYPE=1 then minbi:="fbase.var2#min5";
IF DATATYPE=2 then minbi:="fbase.var2#min30";
IF DATATYPE=3 then minbi:="fbase.var2#min60";
IF DATATYPE=4 then minbi:="fbase.var2#day";
IF DATATYPE=5 then minbi:="fbase.var2#day";
IF DATATYPE=6 then minbi:="fbase.var2#week";
IF DATATYPE=7 then minbi:="fbase.var2#month";
IF DATATYPE=8 then minbi:="fbase.var2#year";
var1:="chzhshch@kxian";{处理K线}
var2:="chzhshch@bi";{处理笔关系}
var4:="chzhshch@tongji"(minbi);{同级别分解}
zg:="chzhshch@zg"(var4),LINETHICK,COLORMAGENTA;//一定要先调用ZG
zd:="chzhshch@zd"(var4),LINETHICK;
end;
var3:="chzhshch@duan",LINETHICK;{处理段关系}
笔:=var2,LINETHICK;
段:=var3,LINETHICK;end;

笔A:=BARSLAST(笔=-1);
笔V:=BARSLAST(笔=1);
笔A1:=BARSLAST(REF(笔,1)=-1);
笔V1:=BARSLAST(REF(笔,1)= 1);
笔卡:IF(笔V1>笔A,笔A,0)-IF(笔A1>笔V,笔V,0),COLORGREEN,LINETHICK0;

段A:=BARSLAST(段=-1),LINETHICK0,COLORGRAY;
段V:=BARSLAST(段= 1),LINETHICK0,COLORGRAY;
段A1:=BARSLAST(REF(段,1)=-1);
段V1:=BARSLAST(REF(段,1)= 1);
段卡:IF(段V1>段A,段A,0)-IF(段A1>段V,段V,0),COLORRED,LINETHICK0;

H1:=BARSLAST(var2=1);
H2:=REF(var2,H1);
HH1:=REF(H1+1,1);
HH2:=-REF(H2,1);
L1:=BARSLAST(var2=-1);
L2:=REF(var2,L1);
LL1:=REF(L1+1,1);
LL2:=-REF(L2,1);
高笔:=REF(HIGH,h1),COLORGRAY;//PARTLINE(1,高笔),COLORGRAY;
底笔:=REF(LOW,L1),COLORGRAY;//PARTLINE(1,底笔),COLORGRAY;
上笔高:=IF(H>REF(高笔,1),BARSLAST(CROSS(H,REF(高笔,1)))+1,0),LINETHICK,COLORRED;
下笔底:=IF(L<REF(底笔,1),BARSLAST(CROSS(REF(底笔,1),L))+1,0),LINETHICK,COLORWHITE;//DRAWICON(下笔底=1,REF(底笔,1),9),align0,pxup5;
笔穿头破脚:IF(H>REF(高笔,1),BARSLAST(CROSS(H,REF(高笔,1)))+1,0)-IF(L<REF(底笔,1),BARSLAST(CROSS(REF(底笔,1),L))+1,0),COLORGREEN,linethick1;


大智基金会 发表于 2015-5-28 13:19

支持。

qlzzxy 发表于 2015-5-28 13:38

谢谢楼主的分享！支持！

hha6806 发表于 2015-5-28 14:23

谢谢分享————————

阳江天下 发表于 2015-5-28 16:44

是通达信的？

nanjiqie888 发表于 2015-5-28 20:31

通达信不好用啊

wangfeng_005 发表于 2015-5-29 12:43

通达信好像用不了啊。通达信参数要多１６个。:dizzy:

wangfeng_005 发表于 2015-5-29 12:55

不过要支持下。:WX:

sjg2001 发表于 2015-5-29 13:24

学习

yanggupiao 发表于 2015-5-29 20:18

笔穿头破脚指标 飞狐,金魔方.步步汇盈全好用

oyyt2004 发表于 2015-5-30 11:34

谢谢楼主的分享！

欢乐雨 发表于 2015-5-30 11:46

不会整啊   求解谢谢
页: [1]
查看完整版本: 笔穿破