以下是通达信指标及缠论指标公式没有时间限制源码和截图
通达信缠论指标及缠论选股指标公式没有时间限制源码:
KX:='CHANLUN@KXIAN';
KXG:='CHANLUN@KXG';
KXD:='CHANLUN@KXD';
KXFX:='CHANLUN@KXFX';
笔:='CHANLUN@BI';
笔周期:'CHANLUN@BILAST',LINETHICK1,COLORFF00FF;
BILAST:='CHANLUN@BILAST';{笔周期};
段:='CHANLUN@DUAN';
段周期:'CHANLUN@DUANLAST',LINETHICK1,COLORFFFFFF;
DUANLAST:='CHANLUN@DUANLAST';{段周期};
中枢:='CHANLUN@ZS';
ZSZG:='CHANLUN@ZSZG';
ZSZD:='CHANLUN@ZSZD';
ZSGG:='CHANLUN@ZSGG';
ZSDD:='CHANLUN@ZSDD';
ZSZZ:='CHANLUN@ZSZZ';
ZSKS:='CHANLUN@ZSKSLAST';
ZSJS:='CHANLUN@ZSJSLAST';
BIFX:=-REF(笔,BILAST);
DUANFX:=-REF(段,DUANLAST);
KXQJ:='CHANLUN@KXQJ';
{画中枢BEGIN}{以背景方式画}
STICKLINE(ZSZG ZSZDANDDUANFX=1,ZSZG,ZSZD,10,1),COLOR8E236B;
STICKLINE(ZSZG ZSZDANDDUANFX=-1,ZSZG,ZSZD,10,1),COLOR007700;
{中枢震荡监视器}
DRAWLINE(ZSKS=1,ZSZZ,ZSJS=1,ZSZZ,0),COLORFFFFFF;
{画中枢END}
{分型}
STICKLINE(KX 0,KXG,KXD,5,1),COLOR007700,LINETHICK2;
STICKLINE(KX 0,KXG,KXD,5,1),COLOR00FFFF,LINETHICK2;
{笔段}
STICKLINE(笔=1,KXG,KXD,5,1),COLORGREEN,LINETHICK2;
STICKLINE(笔=-1,KXG,KXD,5,1),COLORRED,LINETHICK2;
STICKLINE(段=1,KXG,KXD,5,0),COLOR007700,LINETHICK2;
STICKLINE(段=-1,KXG,KXD,5,0),COLOR0000CC,LINETHICK2;
{画K线END}
{画笔段}
DRAWLINE(笔=1,H,笔=-1,L,0),COLORBLUE,LINETHICK2;
DRAWLINE(笔=-1,L,笔=1,H,0),COLORFF00FF,LINETHICK2;
DRAWLINE(段=1,H,段=-1,L,0),COLOR007700,LINETHICK2;
DRAWLINE(段=-1,L,段=1,H,0),COLORRED,LINETHICK2;
{笔高低点周期力度提示}
DRAWTEXT(笔=1,H*1.038,H),COLORRED;
DRAWTEXT(笔=-1,L*0.96,L),COLORFFFFFF;
VAR3:=LLV(H,240);
VAR4:=100*(C-VAR3)/VAR3;
VAR5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;
VAR6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;
VAR7:=0;
VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;
VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;
VAR10:=IF(TROUGHBARS(3,16,1)=0ANDH L+0.04,4,0);
VAR11:=ZIG(3,6) REF(ZIG(3,6),1)ANDREF(ZIG(3,6),1) =REF(ZIG(3,6),2)ANDREF(ZIG(3,6),2) =REF(ZIG(3,6),3);
VAR12:=ZIG(3,6) REF(ZIG(3,6),1)ANDREF(ZIG(3,6),1) =REF(ZIG(3,6),2)ANDREF(ZIG(3,6),2) =REF(ZIG(3,6),3);
VAR13:=ZIG(3,22) REF(ZIG(3,22),1)ANDREF(ZIG(3,22),1) =REF(ZIG(3,22),2)ANDREF(ZIG(3,22),2) =REF(ZIG(3,22),3);
VAR14:=ZIG(3,22) REF(ZIG(3,22),1)ANDREF(ZIG(3,22),1) =REF(ZIG(3,22),2)ANDREF(ZIG(3,22),2) =REF(ZIG(3,22),3);
VAR15:=ZIG(3,51) REF(ZIG(3,51),1)ANDREF(ZIG(3,51),1) =REF(ZIG(3,51),2)ANDREF(ZIG(3,51),2) =REF(ZIG(3,51),3);
VAR16:=ZIG(3,51) REF(ZIG(3,51),1)ANDREF(ZIG(3,51),1) =REF(ZIG(3,51),2)ANDREF(ZIG(3,51),2) =REF(ZIG(3,51),3);
VAR17:=ZIG(3,72) REF(ZIG(3,72),1)ANDREF(ZIG(3,72),1) =REF(ZIG(3,72),2)ANDREF(ZIG(3,72),2) =REF(ZIG(3,72),3);
VAR18:=ZIG(3,72) REF(ZIG(3,72),1)ANDREF(ZIG(3,72),1) =REF(ZIG(3,72),2)ANDREF(ZIG(3,72),2) =REF(ZIG(3,72),3);
VAR19:=EMA(C,2)-EMA(C,150);
买1:=VAR10;
买2:=(VAR11+VAR13+VAR15+VAR17);
卖1:=(VAR12+VAR14+VAR16+VAR18);
DRAWTEXT(买1 0OR买2 0,L*0.985,'买'),COLOR00FFFF;
DRAWTEXT(卖1 0,H*1.01,'卖'),COLOR00FFFF;
APP:=(VOL)/((H-L)*(2)-ABS(C-O));
ZL:=IF((H O),(APP)*(H-L),IF((L O),(APP)*(H-O+C-L),(VOL)/(2)));
SF:=IF((H O),0-(APP)*(H-C+O-L),IF((L O),0-(APP)*(H-L),0-(VOL)/(2)));
库存能量:=MA(ZL+SF,2);
库存平均:=MA(ZL+SF,5);
GET:ZIG(3,5),COLORYELLOW,LINETHICK3;
PL5:=ZIG(3,5);
EN1:=PL5 REF(PL5,1)ANDREF(PL5,1) =REF(PL5,2)ANDREF(PL5,2) =REF(PL5,3);
EX1:=PL5 REF(PL5,1)ANDREF(PL5,1) =REF(PL5,2)ANDREF(PL5,2) =REF(PL5,3);
PL10:=ZIG(3,10);
EN2:=PL10 REF(PL10,1)ANDREF(PL10,1) =REF(PL10,2)ANDREF(PL10,2) =REF(PL10,3);
EX2:=PL10 REF(PL10,1)ANDREF(PL10,1) =REF(PL10,2)ANDREF(PL10,2) =REF(PL10,3);
PL20:=ZIG(3,20);
EN3:=PL20 REF(PL20,1)ANDREF(PL20,1) =REF(PL20,2)ANDREF(PL20,2) =REF(PL20,3);
EX3:=PL20 REF(PL20,1)ANDREF(PL20,1) =REF(PL20,2)ANDREF(PL20,2) =REF(PL20,3);
走强1:=BARSLAST(PL5 REF(PL5,1));
走弱1:=BARSLAST(PL5 REF(PL5,1));
走强2:=BARSLAST(PL10 REF(PL10,1));
走弱2:=BARSLAST(PL10 REF(PL10,1));
走强3:=BARSLAST(PL20 REF(PL20,1));
走弱3:=BARSLAST(PL20 REF(PL20,1));
ZTJZ5:=IF(PL10 REF(PL10,1),COUNT(EN1,走强2),0);
ZTJD5:=IF(PL10 REF(PL10,1),COUNT(EX1,走强2),0);
DTJZ5:=IF(PL10 REF(PL10,1),COUNT(EN1,走弱2),0);
DTJD5:=IF(PL10 REF(PL10,1),COUNT(EX1,走弱2),0);
ZTJZ10:=IF(PL20 REF(PL20,1),COUNT(EN2,走强3),0);
ZTJD10:=IF(PL20 REF(PL20,1),COUNT(EX2,走强3),0);
DTJZ10:=IF(PL20 REF(PL20,1),COUNT(EN2,走弱3),0);
DTJD10:=IF(PL20 REF(PL20,1),COUNT(EX2,走弱3),0);
DRAWTEXT(EN2ANDDTJZ10=1,L*0.96,'[类二买]'),COLORFFFFFF;
DRAWTEXT(EN3ANDZTJZ10=1,L*0.95,'[一买]'),COLORFF00FF;
DRAWTEXT(EX2ANDPL20 REF(PL20,1)ANDZTJD10=1,H*1.04,'[二卖]'),COLORFFFF00,LINETHICK2;
DRAWTEXT(EN2ANDPL20 REF(PL20,1)ANDZTJZ10=2,L*0.94,'[二买]'),COLORFFFF00,LINETHICK2;
DRAWTEXT(EX2ANDPL20 REF(PL20,1)ANDZTJD10=2OR(ZTJD10=0ORZTJD10=2)ANDEX2,H*1.03,'[一卖]'),COLOR00FF00,LINETHICK3;
DRAWTEXT_FIX(ISLASTBAR,0.15,0.029,0,'历史最高价='),COLORFF00FF;
DRAWTEXT_FIX(ISLASTBAR,0.15,0.058,0,'历史最低价='),COLORAFFF00;
DRAWTEXT_FIX(ISLASTBAR,0.15,0.087,0,'20日最高价='),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.15,0.116,0,'20日最低价='),COLORAFFF00;
DRAWNUMBER_FIX(ISLASTBAR,0.199,0.029,0,HHV(HIGH,0)),COLORFF00FF;
DRAWNUMBER_FIX(ISLASTBAR,0.199,0.058,0,LLV(LOW,0)),COLORAFFF00;
DRAWNUMBER_FIX(ISLASTBAR,0.199,0.087,0,HHV(HIGH,20)),COLORRED;
DRAWNUMBER_FIX(ISLASTBAR,0.199,0.116,0,LLV(LOW,20)),COLORAFFF00;
DIFF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIFF,9);
:(DIFF-DEA)*2,COLORSTICK;
N1:=BARSLAST(CROSS(DEA,DIFF));
N2:=REF(BARSLAST(CROSS(DEA,DIFF)),N1+1);
M1:=BARSLAST(CROSS(DIFF,DEA));
M2:=REF(BARSLAST(CROSS(DIFF,DEA)),M1+1);
CL1:=LLV(CLOSE,N1+1),NODRAW;
CL2:=REF(CL1,M1+1),NODRAW;
CL3:=REF(CL2,M1+1),NODRAW;
DIFL1:=LLV(DIFF,N1+1),NODRAW;
DIFL2:=REF(DIFL1,M1+1),NODRAW;
DIFL3:=REF(DIFL2,M1+1),NODRAW;
直接底钝化:=CL1 CL2ANDDIFL1 DIFL2ANDREF(MACD,1) 0ANDDIFL2 0,NODRAW;
隔峰底钝化:=CL1 CL3ANDDIFL1 DIFL2ANDDIFL1 DIFL3ANDDIFF DEAANDREF(MACD,1) 0ANDDIFL3 0,NODRAW;
底部钝化:=(直接底钝化OR隔峰底钝化)ANDREF(MACD,1) 0,NODRAW;
底钝化:=底部钝化ANDREF(底部钝化,1)=0ANDDIFF DEA,NODRAW;
底钝化消失:=(REF(直接底钝化,1)ANDDIFL1 DIFL2ANDDIFF DEA)OR(REF(隔峰底钝化,1)ANDDIFL1 DIFL3ANDDIFF DEA),NODRAW;
底部结构:=DIFF REF(DIFF,1)ANDREF(底部钝化,1)ANDDIFL1*0.9884 DIFF,NODRAW;
底结构形成:=底部结构ANDREF(底部结构,1)=0,NODRAW;
底再次钝化1:=COUNT(底部结构,5)AND底部钝化ANDDIFF REF(DIFF,1)*1.01,NODRAW;
底再次钝化:=底再次钝化1ANDREF(底再次钝化1,1)=0,NODRAW;
M3:=BARSLAST(底结构形成)-1,NODRAW;
M4:=BARSLAST(底钝化OR底再次钝化),NODRAW;
M5:=BARSLAST(CROSS(DIFF,0)),NODRAW;
M6:=C REF(CL1,M3)ANDC REF(CL2,M3)ANDM3 M4ANDM3 M5,NODRAW;
底结构消失1:=COUNT(M6,M3)=1ANDREF(M6,1)=0ANDM3 M4ANDM3 M5,NODRAW;
底结构消失:=底结构消失1ANDREF(底结构消失1,1)=0ANDREF(底结构消失1,2)=0,NODRAW;
DRAWTEXT(底结构形成,DIFF/0.88,'结构形成'),COLORMAGENTA;
DRAWTEXT(底钝化OR底再次钝化,DIFF/0.80,'钝化'),COLORYELLOW;
DRAWTEXT((底结构消失OR底钝化消失)AND底部钝化=0AND底再次钝化=0,DIFF/0.75,'消失'),COLORGREEN;
CH1:=HHV(CLOSE,M1+1),NODRAW;
CH2:=REF(CH1,N1+1),NODRAW;
CH3:=REF(CH2,N1+1),NODRAW;
DIFH1:=HHV(DIFF,M1+1),NODRAW;
DIFH2:=REF(DIFH1,N1+1),NODRAW;
DIFH3:=REF(DIFH2,N1+1),NODRAW;
直接顶钝化:=CH1 CH2ANDDIFH1 DIFH2ANDREF(MACD,1) 0ANDDIFH2 0,NODRAW;
隔峰顶钝化:=CH1 CH3ANDDIFH1 DIFH2ANDDIFH1 DIFH3ANDREF(MACD,1) 0ANDDIFH3 0,NODRAW;
顶部钝化:=(直接顶钝化OR隔峰顶钝化)ANDREF(MACD,1) 0,NODRAW;
顶钝化:=顶部钝化ANDREF(顶部钝化,1)=0ANDDIFF DEA,NODRAW;
顶钝化消失:=(REF(直接顶钝化,1)ANDDIFH1 =DIFH2ANDDIFF DEA)OR(REF(隔峰顶钝化,1)ANDDIFH1 =DIFH3ANDDIFF DEA),NODRAW;
顶部结构:=REF(顶部钝化,1)ANDDIFF REF(DIFF,1)ANDDIFH1*0.99 DIFF,NODRAW;
顶结构形成:=顶部结构ANDREF(顶部结构,1)=0,NODRAW;
顶再次钝化1:=COUNT(顶部结构,5)AND顶部钝化ANDDIFF*0.99 REF(DIFF,1),NODRAW;
顶再次钝化:=顶再次钝化1ANDREF(顶再次钝化1,1)=0,NODRAW;
N3:=BARSLAST(顶结构形成)-1,NODRAW;
N4:=BARSLAST(顶钝化OR顶再次钝化),NODRAW;
N5:=BARSLAST(CROSS(0,DIFF)),NODRAW;
N6:=C REF(CH1,N3)ANDC REF(CH2,N3)ANDN3 N4ANDN3 N5,NODRAW;
顶结构消失1:=COUNT(N6,N3)=1ANDREF(N6,1)=0ANDN3 N4ANDN3 N5,NODRAW;
顶结构消失:=顶结构消失1ANDREF(顶结构消失1,1)=0ANDREF(顶结构消失1,2)=0,NODRAW;
DRAWTEXT(顶结构形成,DIFF*1.15,'结构形成'),COLORMAGENTA;
DRAWTEXT(顶钝化OR顶再次钝化,DIFF*1.20,'钝化'),COLORYELLOW;
DRAWTEXT((顶结构消失OR顶钝化消失)AND顶部钝化=0AND顶再次钝化=0,DIFF*1.25,'消失'),COLORGREEN;
定量结构
VAR1:=LLV(LOW,13);
VAR2:=HHV(HIGH,13);
VAR3:=SMA((CLOSE-VAR1)/(VAR2-VAR1)*100,5,1);
VAR4:=SMA((VAR2-CLOSE)/(VAR2-VAR1)*100,5,1);
DRAWBAND(VAR3,RGB(155,50,50),50,RGB(0,100,50));
:VAR3,COLORRED;
:VAR4,COLORGREEN;
VAR5:=SMA(MAX(CLOSE-REF(CLOSE,1),0),5,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),5,1)*100;
操作:EMA(VAR5,3),COLORYELLOW;
STICKLINE(C,90,90,1,0),COLOR3C3CFF;
STICKLINE(C,50,50,1,0),COLORYELLOW;
STICKLINE(C,10,10,1,0),COLORCYAN;
一根线
个股线:MA(C,1)/MA(REF(C,18),18)*100,LINETHICK2,COLOR00FFFF;
资金生命线:MA(FORCAST(个股资金线,20),6),COLORMAGENTA,LINETHICK2;
资金线
E:=(H+L+O+2*C)/5;
次日价:=E+(H-L);
突:=REF(次日突破价,1),NODRAW;
次日阻力价:=2*E-L;
阻:=REF(次日阻力价,1),NODRAW;
次日支撑价:=2*E-H;
支:=REF(次日支撑价,1),NODRAW;
次日下跌价:=E-(H-L);
转:=REF(次日下跌反转价,1),NODRAW;
保:=(REF(C,1)+REF(C,2)+O)/3,COLORCYAN,NODRAW;
BAO1:=保;
MA5:MA(CLOSE,5),COLORRED;
判5:IF(MA5 REF(MA5,1),MA5,DRAWNULL),COLORWHITE;
MA13:MA(CLOSE,13),COLORGREEN;
判13:IF(MA13 REF(MA13,1),MA13,DRAWNULL),COLORBLUE;
MA20:MA(CLOSE,20),COLORMAGENTA,LINETHICK2;
判20:IF(MA20 REF(MA20,1),MA20,DRAWNULL),COLORWHITE,LINETHICK2;
MA60:=MA(CLOSE,60),COLORYELLOW,LINETHICK3;
判60:=IF(MA60 REF(MA60,1),MA60,DRAWNULL),COLORWHITE,LINETHICK3;
MA120:=MA(CLOSE,120),COLORBLUE,LINETHICK3;
判120:=IF(MA120 REF(MA120,1),MA120,DRAWNULL),COLORWHITE,LINETHICK3;
MA200:=MA(CLOSE,200),COLORGRAY;
判200:=IF(MA200 REF(MA200,1),MA200,DRAWNULL),COLORWHITE;
获利20:C/MA20,COLORMAGENTA,NODRAW;
获利60:=C/MA60,COLORYELLOW,NODRAW;
DD:=C;即时点:REFDATE(DD,DATE),DOTLINE,COLORWHITE,LINETHICK1;
C22:=REF(C,1);
1:=IF((C/C22*100-100 =9.86),1,0);
STICKLINE(涨停1,OPEN,CLOSE,2,0),,COLORYELLOW;
STICKLINE(涨停1,H,L,0,0),,COLORYELLOW;
C23:=REF(C,1);
大阳:=IF((C/C23*100-100 =7),0.6,0)ANDIF((C/C23*100-100 9.86),1,0);
STICKLINE(大阳,OPEN,CLOSE,0.6,0),,COLORMAGENTA;
STICKLINE(大阳,H,L,0,0),,COLORRED;
大阳1:=IF((C/C23*100-100 =4),0.6,0)ANDIF((C/C23*100-100 7),1,0);
STICKLINE(大阳1,OPEN,CLOSE,0.6,0),,COLORRED;
STICKLINE(大阳1,H,L,0,0),,COLORRED;
C24:=(C-C23)/3;
XX:=C-C24*2;
实顶下浮:XX,COLORYELLOW,NODRAW;
{跳空}
STICKLINE(REF(L,1) H,H,REF(L,1),5,0),COLORGRAY;
STICKLINE(REF(H,1) L,L,REF(H,1),5,0),COLORGRAY;
LTB:=FINANCE(7)*100/FINANCE(1);
ZGB:=FINANCE(1)/100000000;
JJS:=LTB-REF(LTB,1);
DRAWTEXT(LTB REF(LTB,1)*0.95ANDZGB REF(ZGB,1),L*0.990,'定向增发'),COLORRED;
DRAWTEXT(ZGB REF(ZGB,1)*0.95ANDLTB REF(LTB,1),L*0.990,'回购'),COLORGREEN;
DRAWTEXT(LTB REF(LTB,1)*1.05ANDZGB=REF(ZGB,1),L*0.990,'大小非'),COLORRED;
DRAWTEXT(LTB REF(LTB,1)*1.05ANDZGB REF(ZGB,1),L*0.990,'公开发行');
TJ:=ISLASTBARANDC
DRAWTEXT_FIX(TJ,0,0,0,HYBLOCK);{在屏幕左上角显示所属行业}
DRAWTEXT_FIX(TJ,0.05,0,0,DYBLOCK);{在屏幕左上角显示所属地域板块}
DRAWTEXT_FIX(TJ,0.1,0,0,GNBLOCK);{在屏幕左上角显示所属概念板块}
DRAWTEXT_FIX(TJ,0.25,0.035,0,FGBLOCK),COLORGREEN;
单阳:C*C/REF(C,1)/0.9,NODRAW,COLOR0000FF;
单阴:C*C/REF(C,1)/1.1,NODRAW;
主图
DIFF:=(Ema(CLOSE,12)-EMA(CLOSE,26));
DEA:=EMA(DIFF,9),COLORBLUE,LINETHICK0;
macd:=2*(DIFF-DEA);
REF(MacD,1) 0ANDMACD REF(MACD,1)ANDREF(MACD,1) REF(MACD,2)ANDREF(MACD,2) REF(MACD,3)ANDC
通达信缠论指标及缠论选股指标公式没有时间限制截图