通达信大分割主图指标公式

高点:=50;
低点:=30;
之幅度:=5;
高点A:=22;
低点A:=10;
精准计数周期:=240;
低1开2收3高4:=1;
基准点前N天:=0;
PP:=550;
F1:=1;
F2:=2;
N9:=120;
KP:=BARSLAST(CURRBARSCOUNT=N9);
GDY:=CONST(IF(ISLASTBAR=1HHV(HKP)0));{高点}
DDS:=CONST(IF(ISLASTBAR=1LLV(LKP)0));{低点}
KJ:=GDY-DDS;{高低点差值=分区高度}
DRAWTEXT(CURRBARSCOUNT=N9/2-58GDY-KJ/12' 【风险区】--高抛避险')COLOR555555;
DRAWTEXT(CURRBARSCOUNT=N9/2-58GDY-KJ/3.5' 【警示区】--逢高减仓')COLOR555555;
DRAWTEXT(CURRBARSCOUNT=N9/2-58GDY-KJ/2.23' 【突破区】--主力拉升')COLOR555555;
DRAWTEXT(CURRBARSCOUNT=N9/2-58GDY-KJ/1.82' 【拉升区】--强势畜锐')COLOR555555;
DRAWTEXT(CURRBARSCOUNT=N9/2-58DDS+KJ/3.5' 【反弹中轨】--低买高休')COLOR555555;
DRAWTEXT(CURRBARSCOUNT=N9/2-58DDS+KJ/10' 【低吸区】--大胆买入')COLOR555555;
T1:=CONST(LLVBARS(LOW10));
T1HIGH:=CONST(REF(HIGHT1));
CCC:=CONST(CURRBARSCOUNT);
T2G:=CONST(BARSLAST(CURRBARSCOUNT>CCC+T1 AND HIGH>T1HIGH));
T2HIGH:=CONST(REF(HIGHT2G));
T3:=CONST(BARSLAST(CURRBARSCOUNT>CCC+T2G AND HIGH>T2HIGH));
T3HIGH:=CONST(REF(HIGHT3));
猎击:DRAWLINE(CURRBARSCOUNT=T3+1 T3HIGH ISLASTBAR T3HIGH 1)LINETHICK2COLOR666666;
DRAWTEXT(ISLASTBAR T3HIGH '---------------猎击')LINETHICK1COLOR666666;
BIAS3:=MA((CLOSE-MA(CLOSE27))/MA(CLOSE27)3)*100COLORFF00FFLINETHICK2;
操作区:=IF(BIAS3<0BIAS30)COLORREDLINETHICK3;
观望区:=IF(BIAS3>0BIAS30)COLORGREENLINETHICK3;
VAR2K:=TROUGHBARS(3151)<10;
VAR3K:=PEAKBARS(3151)<10;
VAR4K:=IF(VAR2K=1500);
VAR5K:=IF(VAR3K=1500);
TJ1K:=观望区<REF(观望区1) OR 观望区-REF(观望区1)<REF(观望区1)-REF(观望区2);
TJ2K:=操作区>REF(操作区1);
顶:=IF(TJ1K AND VAR5K=50150)STICK;
底:=IF(TJ2K AND VAR4K=50100)STICKLINETHICK1COLORRED;
STICKLINE(TJ1K AND VAR5K=50HHV(H10)HHV(H10)-0.00121)COLORLIGREEN;
STICKLINE(TJ2K AND VAR4K=50LLV(L10)LLV(L10)+0.00121)COLOR000099;
VAR31:=HHVBARS(ZIG(3 19)>REF(ZIG(319)1)
AND REF(ZIG(319) 1)<REF(ZIG(319) 2)0);
DRAWTEXT(VAR31=1H*0.98'2天')COLORCBCBC0;
DRAWTEXT(VAR31=2L*0.98'3天')COLOR008888;
DRAWTEXT(VAR31=4H*1.03'5天')COLOR008888;
DRAWTEXT(VAR31=7L*0.98'8天')COLOR008888;
DRAWTEXT(VAR31=12H*1.03'13天')COLOR008888;
DRAWTEXT(VAR31=20L*0.98'21天')COLOR008888;
DRAWTEXT(VAR31=27H*0.95'28天')COLORCBCBC0;
DRAWTEXT(VAR31=31H*0.95'32天')COLORCBCBC0;
DRAWTEXT(VAR31=33H*1.03'34天')COLOR008888;
DRAWTEXT(VAR31=49H*0.96'49天')COLORCBCBC0;
DRAWTEXT(VAR31=54L*0.98'55天')COLOR008888;
DRAWTEXT(VAR31=61H*0.96'61天')COLORCBCBC0;
DRAWTEXT(VAR31=88H*1.03'89天')COLOR008888;
DRAWTEXT(VAR31=143L*0.98'144天')COLOR008888;
DRAWTEXT(VAR31=232H*1.03'233天')COLOR008888;
DRAWTEXT(VAR31=376L*0.98'377天')COLOR008888;
Q_3:=CROSS(EMA(C19)EMA(C7));
Q_4:=CROSS(EMA(C7)EMA(C19));
Z1:=L=LLV(LBARSLAST(Q_3)+1);
Z2:=LLV(LBARSLAST(Q_3)+1);
Z3:=H=HHV(HBARSLAST(Q_4)+1);
Z4:=HHV(HBARSLAST(Q_4)+1);
Q_A:=DRAWLINE(Z1Z2Z3Z40)COLORMAGENTALINETHICK2;
Y1:=H=HHV(HBARSLAST(Q_4)+1);
Y2:=HHV(HBARSLAST(Q_4)+1);
Y3:=L=LLV(LBARSLAST(Q_3)+1);
Y4:=LLV(LBARSLAST(Q_3)+1);
Q_B:=DRAWLINE(Y1Y2Y3Y40)COLORCYANLINETHICK2;
TJ1:=IF(Q_B<REF(Q_B1) AND Q_B=Q_A10);
DRAWICON(REF(TJ11)=0 AND TJ1>=1 AND CCI<-40 L*0.99536);
{钱袋指标}
VAR113:=HHV(HIGH60);
VAR114:=LLV(LOW30);
VAR115:=(CLOSE-MA(CLOSE32))/MA(CLOSE32)*100;
VAR116:=(VAR113+VAR114+VAR115)/3;
VAR117:=EMA(VAR1165);
K01:=EMA(VAR1175)*2 COLORFF00FF;
D01:=EMA(K015) COLORWHITE;
B01:=(DRAWICON((ZIG(35)>REF(ZIG(35)1)) AND (REF(ZIG(35)1)<=REF(ZIG(35)2))
AND (REF(ZIG(35)2)<=REF(ZIG(35)3))L*0.981))*D01*2/3;
B02:=IF(TROUGHBARS(3151)=1 AND HIGH>LOW+0.01200);
必买:=(B01 AND B02);
DRAWICON(必买L*0.98538);
VAR2X:=TROUGHBARS(3151)<10;
VAR3X:=PEAKBARS(3151)<10;
VAR4X:=IF(VAR2X=1500);
底部:=IF(VAR4X=50100);
多头能量:=0;
买入:=IF(底部=10 AND REF(底部1)=10 AND REF(底部2)=0500);
{买入延迟线:底部LINETHICK1 COLOR00CCFF;}
DRAWTEXT(买入=50L*0.996'●')COLORCBCBC0;
{波浪}
PL5:=IF(PERIOD>=7ZIG(31)IF(PERIOD=3ZIG(12)ZIG(12)));
{S说明： 如果周月以上的选5%转向，如果日线选3%转向，如果日线以下周期选2%转向 }
PL10:=IF(PERIOD>=7ZIG(330)IF(PERIOD=3ZIG(110)ZIG(110)));
{S说明： 如果周月以上的选10%转向，如果日线选5%转向，如果日线以下周期选4%转向 }
EN1:=PL5>REF(PL51) AND REF(PL51)<=REF(PL52) AND REF(PL52)<=REF(PL53);
EN2:=PL10>REF(PL101) AND REF(PL101)<=REF(PL102) AND REF(PL102)<=REF(PL103);
走强2:=BARSLAST(PL10<REF(PL101));
ZTJZ5:=IF(PL10>REF(PL101)COUNT(EN1走强2)0);
DRAWTEXT(EN2 AND ZTJZ5=1L*0.99'●')COLORYELLOW;
GD:=CONST(FINDHIGH(H0高点*101));
DD:=CONST(FINDLOW(L0低点*101));
GT:=CONST(BARSLAST(GD=H))+1;
DT:=CONST(BARSLAST(DD=L))+1;
SH:=CONST(IF(GT=1HREF(HGT-1)));
SL:=CONST(IF(DT=1LREF(LDT-1)));
CC:=IF(DT>GTDTGT);
CD:=INTPART(CC-(DT+GT)/2);
CG:=IF(高点>CDCD/2高点);
下跌周期:BARSLAST(GD=H)COLORWHITENODRAW;
下跌幅:IF(CURRBARSCOUNT<=GTC/SH*100-100DRAWNULL)NODRAWCOLORGREEN;
下跌均价:IF(CURRBARSCOUNT<=GTSUM(AMOUNTGT)/SUM(VGT)/100DRAWNULL)NODRAWCOLORLIGRAY;
跌换手%:IF(CURRBARSCOUNT<=GTSUM(HSL.HSLGT)DRAWNULL)COLORCYANNODRAW;
上涨周期:IF(CURRBARSCOUNT<=DTBARSLAST(DD=L)DRAWNULL)COLORWHITENODRAW;
上涨幅:IF(CURRBARSCOUNT<=DTC/SL*100-100DRAWNULL)NODRAWCOLORRED;
上涨均价:IF(CURRBARSCOUNT<=DTSUM(AMOUNTDT)/SUM(VDT)/100DRAWNULL)NODRAWCOLORLIGRAY;
涨换手%:IF(CURRBARSCOUNT<=DTSUM(HSL.HSLDT)DRAWNULL)COLORLIMAGENTANODRAW;
星期:=VARCAT(VARCAT('('IF(WEEKDAY=1'一'IF(WEEKDAY=2'二'IF(WEEKDAY=3'三'IF(WEEKDAY=4'四'IF(WEEKDAY=5'五'''))))))')');
日期:=VARCAT('-'VARCAT(VARCAT(VARCAT(VARCAT(VARCAT(VARCAT(VAR2STR(YEAR0)'年')VAR2STR(MONTH0))'月')VAR2STR(DAY0))'日')星期));
{自动黄金分割 普通等系坐标}
DRAWRECTREL(99013821RGB(2502500));
DRAWTEXT_FIX(C>00.3820.000'100%')COLOR00CCCC;
DRAWRECTREL(990188382188RGB(2002000));
DRAWTEXT_FIX(C>00.3820.1890'80.9% 19.1%')COLOR00CCCC;
DRAWRECTREL(990375382375RGB(2001000));
DRAWTEXT_FIX(C>00.3820.3760'61.8% 38.2%')COLOR0099CC;
DRAWRECTREL(990491382491RGB(50500));
DRAWTEXT_FIX(C>00.3820.4920'50.0% 50.0%')COLOR008888;
DRAWRECTREL(990607382607RGB(2001000));
DRAWTEXT_FIX(C>00.3820.6080'38.2% 61.8%')COLOR0099CC;
DRAWRECTREL(990794382794RGB(2002000));
DRAWTEXT_FIX(C>00.3820.7950'19.1% 80.9%')COLOR00CCCC;
DRAWRECTREL(990982382982RGB(2502500));
DRAWTEXT_FIX(C>00.3820.9360'base')COLOR00CCCC;
DRAWRECTREL(990232382232RGB(1001000));
DRAWRECTREL(990144.6382144.6RGB(1001000));
DRAWRECTREL(990750382750RGB(1001000));
DRAWRECTREL(990839382839RGB(1001000));
DRAWRECTREL(990234382234RGB(2002000));
DRAWTEXT_FIX(C>00.3820.2330'76.4% 23.6%%')COLOR00CCCC;
DRAWRECTREL(990752382752RGB(2002000));
DRAWTEXT_FIX(C>00.3820.7530'23.6% 76.4%')COLOR00CCCC;
GDA:=CONST(FINDHIGH(H0高点A*101));
DDA:=CONST(FINDLOW(L0低点A*101));
GTA:=CONST(BARSLAST(GDA=H))+1;
DTA:=CONST(BARSLAST(DDA=L))+1;
SHA:=CONST(IF(GTA=1HREF(HGTA-1)));
SLA:=CONST(IF(DTA=1LREF(LDTA-1)));
CCA:=IF(DTA>GTADTAGTA);
CDA:=INTPART(CCA-(DTA+GTA)/2);
CGA:=IF(高点A>CDACDA/2高点A);
{幅度尺}
DRAWTEXT(CURRBARSCOUNT=GTASHA-SHA*0.03STRCAT('一3% 'CON2STR(SHA-SHA*0.032)))COLOR004500;
DRAWTEXT(CURRBARSCOUNT=GTASHA-SHA*0.05STRCAT('一5% 'CON2STR(SHA-SHA*0.052)))COLOR004500;
DRAWTEXT(CURRBARSCOUNT=GTASHA-SHA*0.08STRCAT('一8% 'CON2STR(SHA-SHA*0.082)))COLOR004500;
DRAWTEXT(CURRBARSCOUNT=GTASHA-SHA*0.1STRCAT('一10% 'CON2STR(SHA-SHA*0.12)))COLOR004500;
DRAWTEXT(CURRBARSCOUNT=GTASHA-SHA*0.13STRCAT('一13% 'CON2STR(SHA-SHA*0.132)))COLOR994400;
DRAWTEXT(CURRBARSCOUNT=GTASHA-SHA*0.15STRCAT('一15% 'CON2STR(SHA-SHA*0.152)))COLOR004500;
DRAWTEXT(CURRBARSCOUNT=GTASHA-SHA*0.18STRCAT('一18% 'CON2STR(SHA-SHA*0.182)))COLOR004500;
DRAWTEXT(CURRBARSCOUNT=GTASHA-SHA*0.2STRCAT('一20% 'CON2STR(SHA-SHA*0.22)))COLOR004500;
DRAWTEXT(CURRBARSCOUNT=GTASHA-SHA*0.25STRCAT('一25% 'CON2STR(SHA-SHA*0.252)))COLOR004500;
DRAWTEXT(CURRBARSCOUNT=GTASHA-SHA*0.3STRCAT('一30% 'CON2STR(SHA-SHA*0.32)))COLOR004500;
DRAWTEXT(CURRBARSCOUNT=GTASHA-SHA*0.4STRCAT('一40% 'CON2STR(SHA-SHA*0.42)))COLOR004500;
DRAWTEXT(CURRBARSCOUNT=GTASHA-SHA*0.5STRCAT('一50% 'CON2STR(SHA-SHA*0.52)))COLOR004500;
DRAWTEXT(CURRBARSCOUNT=GTASHA-SHA*0.6STRCAT('一60% 'CON2STR(SHA-SHA*0.62)))COLOR004500;
DRAWTEXT(CURRBARSCOUNT=GTASHA-SHA*0.7STRCAT('一70% 'CON2STR(SHA-SHA*0.72)))COLOR004500;
DRAWTEXT(CURRBARSCOUNT=GTASHA-SHA*0.8STRCAT('一80% 'CON2STR(SHA-SHA*0.82)))COLOR004500;
DRAWTEXT(CURRBARSCOUNT=GTASHA-SHA*0.9STRCAT('一90% 'CON2STR(SHA-SHA*0.92)))COLOR004500;
DRAWTEXT(CURRBARSCOUNT=DTASLA*1.03STRCAT('一3% 'CON2STR(SLA*1.032)))COLOR444444;
DRAWTEXT(CURRBARSCOUNT=DTASLA*1.05STRCAT('一5% 'CON2STR(SLA*1.052)))COLOR444444;
DRAWTEXT(CURRBARSCOUNT=DTASLA*1.08STRCAT('一8% 'CON2STR(SLA*1.082)))COLOR444444;
DRAWTEXT(CURRBARSCOUNT=DTASLA*1.1STRCAT('一10% 'CON2STR(SLA*1.12)))COLOR444444;
DRAWTEXT(CURRBARSCOUNT=DTASLA*1.13STRCAT('一13% 'CON2STR(SLA*1.132)))COLOR994400;
DRAWTEXT(CURRBARSCOUNT=DTASLA*1.15STRCAT('一15% 'CON2STR(SLA*1.152)))COLOR444444;
DRAWTEXT(CURRBARSCOUNT=DTASLA*1.18STRCAT('一18% 'CON2STR(SLA*1.182)))COLOR444444;
DRAWTEXT(CURRBARSCOUNT=DTASLA*1.2STRCAT('一20% 'CON2STR(SLA*1.22)))COLOR444444;
DRAWTEXT(CURRBARSCOUNT=DTASLA*1.25STRCAT('一25% 'CON2STR(SLA*1.252)))COLOR444444;
DRAWTEXT(CURRBARSCOUNT=DTASLA*1.3STRCAT('一30% 'CON2STR(SLA*1.32)))COLOR444444;
DRAWTEXT(CURRBARSCOUNT=DTASLA*1.4STRCAT('一40% 'CON2STR(SLA*1.42)))COLOR444444;
DRAWTEXT(CURRBARSCOUNT=DTASLA*1.5STRCAT('一50% 'CON2STR(SLA*1.52)))COLOR444444;
DRAWTEXT(CURRBARSCOUNT=DTASLA*1.6STRCAT('一60% 'CON2STR(SLA*1.62)))COLOR444444;
DRAWTEXT(CURRBARSCOUNT=DTASLA*1.7STRCAT('一70% 'CON2STR(SLA*1.72)))COLOR444444;
DRAWTEXT(CURRBARSCOUNT=DTASLA*1.8STRCAT('一80% 'CON2STR(SLA*1.82)))COLOR444444;
DRAWTEXT(CURRBARSCOUNT=DTASLA*1.9STRCAT('一90% 'CON2STR(SLA*1.92)))COLOR444444;
TC1:=IF(H=HHV(H48)HDRAWNULL);
TC2:=CONST(BARSLAST(TC1=H))+1;
UPPER:=CONST(IF(TC2=1HREF(HTC2-1)));
BC1:=IF(L=LLV(L48)LDRAWNULL);
BC2:=CONST(BARSLAST(BC1=L))+1;
LOWER:=CONST(IF(BC2=1LREF(LBC2-1)));
LP:=CURRBARSCOUNT<=BC2 AND L=LOWER;
HP:=CURRBARSCOUNT<=TC2 AND H=UPPER;
AB1:=EMA(((2*C+H+L)/4-LLV(LOW30))/
(HHV(HIGH30)-LLV(LOW30))*1008);
BA1:=EMA(AB15);
上轨:=REFDATE(REF(HHV(MAX(CO)96)5)DATE);
下轨:=REFDATE(REF(LLV(MIN(CO)96)5)DATE);
中轨:=((上轨)+(下轨))/2;
YXHX:=DATE>=REF(DATEBARSLAST(IF(BC2>TC2LPHP)));
上沿:IF(AB1>0 AND AB1-BA1<=0 AND YXHX上轨上轨)DOTLINECOLOR555555;
中枢:IF(AB1>0 AND AB1-BA1<=0 AND YXHX中轨中轨)DOTLINECOLOR555555;
下沿:IF(AB1>0 AND AB1-BA1<=0 AND YXHX下轨下轨)DOTLINECOLOR555555;
HIGHN:=10;
LOWN:=10;
HIGHDISPLAY:=0;
LOWDISPLAY:=0;
ZGDISPLAY:=0;
MADISPLAY:=0;
AAA:=REF(HHIGHN)=HHV(H2*HIGHN+1);
QY:=BACKSET(AAAHIGHN+1);
CCCC:=FILTER(QYHIGHN) AND H=HHV(HHIGHN+1);
DDDF:=BARSLAST(CCCC);
GDTS:=IF(CCCCCURRBARSCOUNT0);
DINGBU:=IF(DDDFREF(HDDDF)H);{顶部}
DINGBUTS:=IF(DDDFREF(GDTSDDDF)GDTS);
GDCS1:=CONST(DINGBUTS);
DINGBUTS1:=REF(DINGBUTSDDDF+1);
GDCS2:=CONST(DINGBUTS1);
DRAWLINE(CURRBARSCOUNT=GDCS2HISLASTBARREF(HGDCS2-1)1)COLOR996600POINTDOT;
DRAWLINE(CURRBARSCOUNT=GDCS1HISLASTBARREF(HGDCS1-1)1)COLOR996600POINTDOT;
AA1:=REF(LLOWN)=LLV(L2*LOWN+1);
QY1:=BACKSET(AA1LOWN+1);
CC1D:=FILTER(QY1LOWN) AND L=LLV(LLOWN+1);
DD1D:=BARSLAST(CC1D);
DDTS:=IF(CC1DCURRBARSCOUNT0);
DDTS1:=IF(DD1DREF(DDTSDD1D)DDTS);
DDCS1:=CONST(DDTS1);
DDTS2:=REF(DDTS1DD1D+1);
DDCS2:=CONST(DDTS2);
DRAWLINE(CURRBARSCOUNT=DDCS1LISLASTBARREF(LDDCS1-1)1)COLOR996600POINTDOT;
DRAWLINE(CURRBARSCOUNT=DDCS2LISLASTBARREF(LDDCS2-1)1)COLOR996600POINTDOT;
前20内高:=HHV(C20);
昨前高:CONST(REF(前20内高2))COLORGRAYPOINTDOT;