打印本文打印本文 关闭窗口关闭窗口

缠K线缠论买卖点副图指标公式

作者:飞狐 来源:cxh99.com 发布时间:2019年05月23日

相关标签:缠论三类买点指标公式 、 缠中说禅中枢指标公式 、 缠中说禅背驰指标公式 、 缠论指标公式代码集锦 、 缠论画笔中枢公式指标 、 缠论买卖点副图指标公式 、 缠中说禅指标公式高级版 、 大智慧缠论中枢指标公式 、 博易大师+缠论指标公式 、 缠论顶底分型主图公式 、 缠论禅师用的指标公式 、 缠论分型指标公式源码 、

 

 

原理解析:


 

 来源:程序化99( WWW.CXH99.COM )

源码:

 

 

{缠K线}
variable:CKHIGH= high,CKLOW=low,LCKHI=high,LCKLOW=low,RAISE=close,DOWN=close;
CKHIGH:=high*0;
CKLOW:=CKHIGH;
RAISE:=CKHIGH;
DOWN:=CKHIGH;
for p=lbound(LCKHI)+1 to ubound(LCKHI) do begin
RAISE[p]:=LCKHI[p]>LCKHI[p-1] and LCKLOW[p]>LCKLOW[p-1] ;
DOWN[p]:= LCKHI[p]<LCKHI[p-1] and LCKLOW[p]<LCKLOW[p-1] ;
IF RAISE[p]=1 or DOWN[p]=1 THEN begin
CKHIGH[p]:=LCKHI[p];
CKLOW[p]:=LCKLOW[p];
end;
ELSE BEGIN
IF RAISE[p-1]=1 THEN BEGIN
IF LCKLOW[p]>LCKLOW[p-1] then
CKLOW[p]:=LCKLOW[p]
else
CKLOW[p]:=LCKLOW[p-1];
CKHIGH[p] := IF(LCKHI[p]>LCKHI[p-1], LCKHI[p-1],LCKHI[p]);
RAISE[p]:=1;
END;
ELSE IF DOWN[p-1] THEN BEGIN
CKLOW[p]:= IF(LCKLOW[p]>LCKLOW[p-1],LCKLOW[p-1],LCKLOW[p]);
CKHIGH[p]:= IF(LCKHI[p]<LCKHI[p-1], LCKHI[p],LCKHI[p-1]);
DOWN[p]:= 1;
END;
ELSE BEGIN
CKHIGH[p]:=LCKHI[p];
CKLOW[p]:=LCKLOW[p];
END ;
END
end;
STICKLINE(RAISE, CKHIGH , CKLOW , 5, 0 ), COLORRed;
STICKLINE(DOWN, CKHIGH , CKLOW , 5, 1 ), COLORGreen;

 

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】

 

打印本文打印本文 关闭窗口关闭窗口