主图
顶周期:=TOPRANGE(H);底周期:=LOWRANGE(L);
上内:=LLVBARS(H,顶周期);上外:=LLVBARS(L,顶周期);
下内:=HHVBARS(L,底周期);下外:=HHVBARS(H,底周期);
上力度:=HHV(L,上内+1)>LLV(H,上内+1);
下力度:=HHV(L,下内+1)>LLV(H,下内+1);
上包含:=COUNT(L>=REF(L,1),上外)>2 AND COUNT(H>=REF(H,1),上内)>2;
下包含:=COUNT(H<=REF(H,1),下外)>2 AND COUNT(L<=REF(L,1),下内)>2;
顶0:=顶周期 AND 上力度 AND 上包含 AND 上外>3;
底0:=底周期 AND 下力度 AND 下包含 AND 下外>3;
顶分天数:=BARSLAST(顶0);
底分天数:=BARSLAST(底0);
含中间K线:=IF(顶分天数=0,底分天数,顶分天数)>=3;
顶:=顶0 AND 含中间K线 AND H=HHV(H,BARSLAST(底0));
底:=底0 AND 含中间K线 AND L=LLV(L,BARSLAST(顶0));
NOTEXT上笔划线: DRAWLINE(底,L,顶,H,0),COLORLIRED,LINETHICK1;
NOTEXT下笔划线: DRAWLINE(顶,H,底,L,0),COLORLIGREEN,LINETHICK1;
分界点:=NOTEXT上笔划线 AND NOTEXT下笔划线;
位置调整:=
IF(PERIOD=11,0.02,{年}
IF(PERIOD=10,0.02,{季}
IF(PERIOD=9,0.02, {多日}
IF(PERIOD=8,0.001,{多分钟}
IF(PERIOD=7,0.02, {月}
IF(PERIOD=6,0.01, {周}
IF(PERIOD=5,0.005, {日}
IF(PERIOD=4,0.002,{60F}
IF(PERIOD=3,0.001,{30F}
IF(PERIOD=2,0.001,{15F}
IF(PERIOD=1,0.0003,{5F}
IF(PERIOD=0,0.0002,{1F}0))))))))))));
DRAWNUMBER(分界点 AND 顶,H+H*位置调整,H),COLORLIGREEN;
DRAWNUMBER(分界点 AND 底,L,L),COLORLIMAGENTA;
MACD
{MACD扩展公式 *暴风音符* }
{周期放大开关:1为普通模式,0为放大模式}
倍数:=
IF(PERIOD=11,1,{年}
IF(PERIOD=10,4,{季}
IF(PERIOD=9,6, {多日}
IF(PERIOD=8,10,{多分钟}
IF(PERIOD=7,12,{月}
IF(PERIOD=6,5, {周}
IF(PERIOD=5,5, {日}
IF(PERIOD=4,4, {60F}
IF(PERIOD=3,8, {30F}
IF(PERIOD=2,4, {15F}
IF(PERIOD=1,6, {5F}
IF(PERIOD=0,5, {1F}
1))))))))))));
N1:=IF(周期放大,12,12*倍数);
N2:=IF(周期放大,26,26*倍数);
N3:=IF(周期放大,9,9*倍数);
DIFF:EMA(CLOSE,N1) - EMA(CLOSE,N2),COLORWHITE,NODRAW;
DEA:EMA(DIFF,N3),COLORYELLOW,NODRAW;
MACD: (DIFF-DEA)*2,COLORSTICK,NODRAW;
红柱面积:IF(MACD>0,SUM(MACD,BARSLAST(MACD<0)),0),NODRAW,COLORRED;
绿柱面积:ABS(IF(MACD<0,SUM(MACD,BARSLAST(MACD>0)),0)),NODRAW,COLORLIGREEN;
MACD面积:=IF(MACD>0,红柱面积,绿柱面积),NODRAW,COLORFFFF00;
位置:=MAX(HHV(DIFF,100),ABS(LLV(DIFF,100)));
{柱变与交叉临界}
开盘价格:=O,COLORYELLOW,NODRAW;
收盘价格:=C,COLORYELLOW,NODRAW;
最高价格:=H,COLORYELLOW,NODRAW;
最低价格:=L,COLORYELLOW,NODRAW;
振幅:=(H-L)/REF(C,1)*100,COLORYELLOW,NODRAW;
柱变临界:REF((EMA(CLOSE,12)*1134-EMA(CLOSE,26)*910-DEA*702)/224,1),COLORLIMAGENTA,NODRAW;
叉临界:351/28*(EMA(REF(DIFF,1),9)-11/13*EMA(REF(C,1),12)+25/27*EMA(REF(C,1),26)),COLORLIMAGENTA,NODRAW;
明日柱变临界: (EMA(CLOSE,12)*1134-EMA(CLOSE,26)*910-DEA*702)/224,COLORLIBLUE,NODRAW;
明日交叉临界:351/28*(EMA(DIFF,9)-11/13*EMA(C,12)+25/27*EMA(C,26)),COLORLIBLUE,NODRAW;
{MACD重建-避免遮挡}
STICKLINE(MACD>0,0,MACD,1,0),COLORRED;
STICKLINE(MACD<0,0,MACD,1,0),COLORGREEN;
STICKLINE(MACD>0 AND MACD<=REF(MACD,1),0,MACD,1,0),COLORYELLOW;
STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,1,0),COLORWHITE;
NOTEXTDIFF:EMA(CLOSE,N1) - EMA(CLOSE,N2),COLORWHITE;
NOTEXTDEA:EMA(DIFF,N3),COLORYELLOW;
{数显开关:1为打开,0为关闭}
DRAWNUMBER(数显开关=1 AND LONGCROSS(DEA,DIFF,3),位置*0.8,REF(红柱面积,1)),COLORRED;
DRAWNUMBER(数显开关=1 AND LONGCROSS(DIFF,DEA,3),0-位置*0.5,REF(绿柱面积,1)),COLORGREEN;
NOTEXTLMH: DRAWNUMBER(数显开关=1 AND ISLASTBAR AND MACD>0,位置*0.8,红柱面积),COLORRED;
NOTEXTLML: DRAWNUMBER(数显开关=1 AND ISLASTBAR AND MACD<0,0-位置*0.5,绿柱面积),COLORGREEN;
三线同图
上:"RSI.RSI1",COLORCYAN;
中:"CCI.CCI"/5,COLORWHITE;
下:"KDJ.J"-100,COLORMAGENTA;
{RSI CCI KDJ 三线同图-暴风音符 }
NOTEXT1:IF(上<20,上,DRAWNULL),COLORRED,LINETHICK2;
NOTEXT2:IF(上>80,上,DRAWNULL),COLORGREEN,LINETHICK2;
NOTEXT3:IF(中<-35,中,DRAWNULL),COLORRED,LINETHICK2;
NOTEXT4:IF(中>35,中,DRAWNULL),COLORGREEN,LINETHICK2;
NOTEXT5:IF(下>-5,下,DRAWNULL),COLORGREEN,LINETHICK2;
NOTEXT6:IF(下<-95,下,DRAWNULL),COLORRED,LINETHICK2;
NOTEXT7:100;
NOTEXT8:50;
NOTEXT9:0,COLORLIRED;
NOTEXT10:-50;
NOTEXT11:-100;
{www.loneke.com}
T1:=EXIST(上< 120,3) AND 上>REF(上,1);
T2:=EXIST(中<-35,3) AND 中>REF(中,1);
T3:=EXIST(下<-95,3) AND 下>REF(下,1);
T4:=REF(V,1)[REF(BFCCI,1),COLORLIRED,NODRAW;
绿清黄减:BFCCI>150 OR REF(BFCCI,1)>150 AND BFCCI][REF(CCI,1) AND L=LLV(L,3) AND H>REF(L,2) AND L][200,4) AND CCI][REF(H,1)*1.01 AND H>REF(HHV(H,3),1)*1.01,COLORGREEN,NODRAW;
STICKLINE(BFCCI>150 OR REF(BFCCI,1)>150 AND BFCCI][200 OR REF(BFCCI,1)>200 AND BFCCI][REF(BFCCI,1),-200,-250,3,0),COLORLIRED;
STICKLINE(BFCCI<-200 OR REF(BFCCI,1)<-200 AND BFCCI>REF(BFCCI,1),-200,-250,3,0),COLORRED;
STICKLINE(CCI底背离,-200,200,0,-1),COLORLIMAGENTA;
STICKLINE(CCI顶背离,-200,200,0,-1),COLORGREEN;
NOTEXTCCIS200:200,COLORCYAN,LINETHICK2;
NOTEXTCCIX200:-200,COLORLIRED,LINETHICK2;
NOTEXTBFCCI:BFCCI,COLORWHITE,LINETHICK2;
选股:
TYP:= (HIGH+LOW+CLOSE)/3;
CCI:= (TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
CCI底背离:EXIST(CCI<-200,4) AND CCI>REF(CCI,1) AND L=LLV(L,3) AND H>REF(L,2) AND L][
]
本文档为【缠论公式】,请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑,
图片更改请在作品中右键图片并更换,文字修改请直接点击文字进行修改,也可以新增和删除文档中的内容。
该文档来自用户分享,如有侵权行为请发邮件ishare@vip.sina.com联系网站客服,我们会及时删除。
[版权声明] 本站所有资料为用户分享产生,若发现您的权利被侵害,请联系客服邮件isharekefu@iask.cn,我们尽快处理。
本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用。
网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。