通达信撑压布林主图源码，简单说明
白色虚线 是相对的 支撑和压力，绿色是启动线，黄色可以理解为强势拉升了
{p243}
N:=POW(2,P);
FF:=CONST(REF(C,1));
AA:=IF((FF < 100),FF,(FF / 100));
A:=INTPART(((N * (LOG(AA) / LOG(2))) + 1));
Y1:=(A/N);
Y2:=((A+1 ) / N);
Y3:=((A+2 ) / N);
Z1:=((A-1) / N);{第一个支撑}
Z2:=((A-2) / N);
Z3:=((A-3) / N);
ZC1:=IF((FF > 100),(POW(2,Z1) * 100),POW(2,Z1));
ZC2:=IF((FF > 100),(POW(2,Z2) * 100),POW(2,Z2));
ZC3:=IF((FF > 100),(POW(2,Z3) * 100),POW(2,Z3));
YL1:=IF((FF > 100),(POW(2,Y1) * 100),POW(2,Y1));
YL2:=IF((FF > 100),(POW(2,Y2) * 100),POW(2,Y2));
YL3:=IF((FF > 100),(POW(2,Y3) * 100),POW(2,Y3));
支撑一:IF(CURRBARSCOUNT<=50,ZC1,DRAWNULL),COLOR00F24F;
支撑二:IF(CURRBARSCOUNT<=50,ZC2,DRAWNULL),COLORWHITE,POINTDOT,LINETHICK4;
{支撑三:IF(CURRBARSCOUNT<=50,ZC3,DRAWNULL),COLORWHITE,POINTDOT;}
压力一:IF(CURRBARSCOUNT<=50,YL1,DRAWNULL),COLOR05DDFC;
压力二:IF(CURRBARSCOUNT<=50,YL2,DRAWNULL),COLORWHITE,POINTDOT,LINETHICK4;
{压力三:IF(CURRBARSCOUNT<=50,YL3,DRAWNULL),COLORWHITE,POINTDOT;}
均价线:=AMOUNT/V/100;
C2:=REF(C,1);
涨停:=IF(REF(C,1)*1.1-C<0.01 ,1,0);
STICKLINE(涨停,OPEN,CLOSE,4,0),COLORRED;
STICKLINE(涨停,OPEN,CLOSE,3,0),COLORYELLOW;
STICKLINE(涨停,H,L,0,0),COLORYELLOW;
支撑线:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
LC:=REF(CLOSE,1);
操作线:=SMA(MAX(CLOSE-LC,0),2,1)/SMA(ABS(CLOSE-LC),2,1)*100;
趋势线:=SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100;
震仓线:=45;
震仓线2:=50;
逃命线:=80;
抄底线:=20;
绝底线:=5;
PP2:=操作线<震仓线2 AND REF(操作线,1)>震仓线2 ;
PP:=操作线<震仓线 AND REF(操作线,1)>震仓线 ;
PP3:=操作线<抄底线 AND REF(操作线,1)>抄底线;
HH:=COUNT(涨停,13)>=1;
STICKLINE(PP2 AND HH,OPEN,CLOSE,0.8,0),COLORBLUE;
STICKLINE(PP AND HH,OPEN,CLOSE,0.8,0),COLORBLUE;
STICKLINE(PP3 AND HH,OPEN,CLOSE,0.8,0),COLORBLUE;
A8:=SMA(L,4,3) ;
STICKLINE(A8 AND REF(PP,1) AND HH ,A8*0.9999,A8*0.9979,5,0);
DRAWICON(A8 AND REF(PP,1) AND HH,L*0.98,1);
STICKLINE(A8 AND REF(PP3,1) AND HH ,A8*0.9999,A8*0.9979,5,0);
DRAWICON(A8 AND REF(PP3,1) AND HH,L*0.98,1);
HD:=COUNT(涨停,21)>=1;
A1:=SMA(H,4,3);
STICKLINE(A1 AND HD ,A1,A1*1.001,0.3,0);
ZT:=C/REF(C,1)>1.097;
DRAWTEXT(ZT,L*0.98,'涨停'),COLORGRAY;
VARZT:=BARSLAST(C/REF(C,1)>1.097);
STICKLINE(VARZT=2,L*0.97,L*0.98,3.5,0),COLOR0000FF;
DRAWTEXT(VARZT=2,L*0.95,'3'),COLORYELLOW;
STICKLINE(VARZT=4,H*1.03,H*1.02,3.5,0),COLOR9966FF;
DRAWTEXT(VARZT=4,H*1.06,'5'),COLORYELLOW;
STICKLINE(VARZT=7,L*0.97,L*0.98,3.5,0),COLOR00FFFF;
DRAWTEXT(VARZT=7,L*0.95,'8'),COLORYELLOW;
STICKLINE(VARZT=12,H*1.03,H*1.02,3.5,0),COLORFF33FF;
DRAWTEXT(VARZT=12,H*1.06,'13'),COLORYELLOW;
MA9.98:=MA(CLOSE,9.98);
{UPPER:MA9.98+3*STD(CLOSE,9.98),,COLORFF9900;
LOWER:MA9.98-3*STD(CLOSE,9.98),,COLORYELLOW;}
STICKLINE(CLOSE>=OPEN AND CLOSE>=MA9.98,OPEN,CLOSE,2,0),COLOR000077;
STICKLINE(CLOSE>=OPEN AND CLOSE>=MA9.98,H,L,0,0),COLOR000077;
STICKLINE(OPEN>CLOSE AND CLOSE>=MA9.98,OPEN,CLOSE,2,0),COLOR777700;
STICKLINE(OPEN>CLOSE AND CLOSE>=MA9.98,H,L,0,0),COLOR777700;
STICKLINE(CROSS(CLOSE,MA9.98),CLOSE,OPEN,0.5,0),COLOR0080FF;
AAW:MA9.98,COLORFFAA00;
IF(AAW>REF(AAW,1),MA9.98,DRAWNULL),COLORRED;
天60:MA(CLOSE,60),LINETHICK2,COLORE6E8FA;
攻防价位:(REF((H-L)*0.618+L,1)),NODRAW,COLORYELLOW;
STICKLINE(ISLASTBAR,攻防价位-0.01,攻防价位,6,0),COLORYELLOW;
C幼马:=CROSS(C,MA(C,25));
DRAWTEXT(C幼马 ,L,'*潜'),COLORYELLOW;
C操盘线:=CROSS(C,EMA(C,144));
DRAWTEXT(C操盘线,L,'*CP'),COLORF0F000;
九号线99:MA(CLOSE,99),COLORGREEN,LINETHICK2;
MA7:=EMA(CLOSE,7),COLORRED,LINETHICK2;
MID:=MA(CLOSE,20),COLORYELLOW,LINETHICK2;
{UPR:MID+2*STD(CLOSE,20),COLORRED,DOTLINE;
LOR:=MID-2*STD(CLOSE,20),COLORGREEN,DOTLINE;
STICKLINE(ISLASTBAR,HHV(C,5),HHV(C,5),218,1)COLORBLUE;
STICKLINE(ISLASTBAR,HHV(C,5)*0.97,HHV(C,5)*0.97,218,1)COLORRED;}
AAAA:=BARSLAST(CROSS(EMA(C,8),EMA(C,3)) AND C>MA(C,25));
DRAWTEXT(C操盘线,L,'*CP'),COLORF0F000;
小秘密:=CROSS(BB,AAAA);
DRAWTEXT(小秘密,L-0.15,'跟进'),COLORF00FF0;
MA1:=MA(CLOSE,5);
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
TJ1:=BARSLAST(CROSS(DIF,DEA));
TJ2:=REF(H,TJ1);
{IF(TJ1<30,TJ2,DRAWNULL),COLORGREEN,LINETHICK1;
IF(CROSS(DIF,DEA),H*1.005,DRAWNULL),CIRCLEDOT,COLORYELLOW,LINETHICK;}
STICKLINE(CROSS(DIF,DEA),H*1.0005,H*0.9995,100,0),COLORBLUE;
MA2:=MA(CLOSE,9),LINETHICK2;
MA3:=MA(CLOSE,14),LINETHICK2;
条件:=CROSS(MA2,INDEXC) AND MA3>REF(MA3,1) AND MA1<REF(MA1,1);
DRAWTEXT(条件,H*1.015,'↙大跌开始');
N:=POW(2,P);
FF:=CONST(REF(C,1));
AA:=IF((FF < 100),FF,(FF / 100));
A:=INTPART(((N * (LOG(AA) / LOG(2))) + 1));
Y1:=(A/N);
Y2:=((A+1 ) / N);
Y3:=((A+2 ) / N);
Z1:=((A-1) / N);{第一个支撑}
Z2:=((A-2) / N);
Z3:=((A-3) / N);
ZC1:=IF((FF > 100),(POW(2,Z1) * 100),POW(2,Z1));
ZC2:=IF((FF > 100),(POW(2,Z2) * 100),POW(2,Z2));
ZC3:=IF((FF > 100),(POW(2,Z3) * 100),POW(2,Z3));
YL1:=IF((FF > 100),(POW(2,Y1) * 100),POW(2,Y1));
YL2:=IF((FF > 100),(POW(2,Y2) * 100),POW(2,Y2));
YL3:=IF((FF > 100),(POW(2,Y3) * 100),POW(2,Y3));
支撑一:IF(CURRBARSCOUNT<=50,ZC1,DRAWNULL),COLOR00F24F;
支撑二:IF(CURRBARSCOUNT<=50,ZC2,DRAWNULL),COLORWHITE,POINTDOT,LINETHICK4;
{支撑三:IF(CURRBARSCOUNT<=50,ZC3,DRAWNULL),COLORWHITE,POINTDOT;}
压力一:IF(CURRBARSCOUNT<=50,YL1,DRAWNULL),COLOR05DDFC;
压力二:IF(CURRBARSCOUNT<=50,YL2,DRAWNULL),COLORWHITE,POINTDOT,LINETHICK4;
{压力三:IF(CURRBARSCOUNT<=50,YL3,DRAWNULL),COLORWHITE,POINTDOT;}
均价线:=AMOUNT/V/100;
C2:=REF(C,1);
涨停:=IF(REF(C,1)*1.1-C<0.01 ,1,0);
STICKLINE(涨停,OPEN,CLOSE,4,0),COLORRED;
STICKLINE(涨停,OPEN,CLOSE,3,0),COLORYELLOW;
STICKLINE(涨停,H,L,0,0),COLORYELLOW;
支撑线:=(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,12)+MA(CLOSE,24))/4;
LC:=REF(CLOSE,1);
操作线:=SMA(MAX(CLOSE-LC,0),2,1)/SMA(ABS(CLOSE-LC),2,1)*100;
趋势线:=SMA(MAX(CLOSE-LC,0),14,1)/SMA(ABS(CLOSE-LC),14,1)*100;
震仓线:=45;
震仓线2:=50;
逃命线:=80;
抄底线:=20;
绝底线:=5;
PP2:=操作线<震仓线2 AND REF(操作线,1)>震仓线2 ;
PP:=操作线<震仓线 AND REF(操作线,1)>震仓线 ;
PP3:=操作线<抄底线 AND REF(操作线,1)>抄底线;
HH:=COUNT(涨停,13)>=1;
STICKLINE(PP2 AND HH,OPEN,CLOSE,0.8,0),COLORBLUE;
STICKLINE(PP AND HH,OPEN,CLOSE,0.8,0),COLORBLUE;
STICKLINE(PP3 AND HH,OPEN,CLOSE,0.8,0),COLORBLUE;
A8:=SMA(L,4,3) ;
STICKLINE(A8 AND REF(PP,1) AND HH ,A8*0.9999,A8*0.9979,5,0);
DRAWICON(A8 AND REF(PP,1) AND HH,L*0.98,1);
STICKLINE(A8 AND REF(PP3,1) AND HH ,A8*0.9999,A8*0.9979,5,0);
DRAWICON(A8 AND REF(PP3,1) AND HH,L*0.98,1);
HD:=COUNT(涨停,21)>=1;
A1:=SMA(H,4,3);
STICKLINE(A1 AND HD ,A1,A1*1.001,0.3,0);
ZT:=C/REF(C,1)>1.097;
DRAWTEXT(ZT,L*0.98,'涨停'),COLORGRAY;
VARZT:=BARSLAST(C/REF(C,1)>1.097);
STICKLINE(VARZT=2,L*0.97,L*0.98,3.5,0),COLOR0000FF;
DRAWTEXT(VARZT=2,L*0.95,'3'),COLORYELLOW;
STICKLINE(VARZT=4,H*1.03,H*1.02,3.5,0),COLOR9966FF;
DRAWTEXT(VARZT=4,H*1.06,'5'),COLORYELLOW;
STICKLINE(VARZT=7,L*0.97,L*0.98,3.5,0),COLOR00FFFF;
DRAWTEXT(VARZT=7,L*0.95,'8'),COLORYELLOW;
STICKLINE(VARZT=12,H*1.03,H*1.02,3.5,0),COLORFF33FF;
DRAWTEXT(VARZT=12,H*1.06,'13'),COLORYELLOW;
MA9.98:=MA(CLOSE,9.98);
{UPPER:MA9.98+3*STD(CLOSE,9.98),,COLORFF9900;
LOWER:MA9.98-3*STD(CLOSE,9.98),,COLORYELLOW;}
STICKLINE(CLOSE>=OPEN AND CLOSE>=MA9.98,OPEN,CLOSE,2,0),COLOR000077;
STICKLINE(CLOSE>=OPEN AND CLOSE>=MA9.98,H,L,0,0),COLOR000077;
STICKLINE(OPEN>CLOSE AND CLOSE>=MA9.98,OPEN,CLOSE,2,0),COLOR777700;
STICKLINE(OPEN>CLOSE AND CLOSE>=MA9.98,H,L,0,0),COLOR777700;
STICKLINE(CROSS(CLOSE,MA9.98),CLOSE,OPEN,0.5,0),COLOR0080FF;
AAW:MA9.98,COLORFFAA00;
IF(AAW>REF(AAW,1),MA9.98,DRAWNULL),COLORRED;
天60:MA(CLOSE,60),LINETHICK2,COLORE6E8FA;
攻防价位:(REF((H-L)*0.618+L,1)),NODRAW,COLORYELLOW;
STICKLINE(ISLASTBAR,攻防价位-0.01,攻防价位,6,0),COLORYELLOW;
C幼马:=CROSS(C,MA(C,25));
DRAWTEXT(C幼马 ,L,'*潜'),COLORYELLOW;
C操盘线:=CROSS(C,EMA(C,144));
DRAWTEXT(C操盘线,L,'*CP'),COLORF0F000;
九号线99:MA(CLOSE,99),COLORGREEN,LINETHICK2;
MA7:=EMA(CLOSE,7),COLORRED,LINETHICK2;
MID:=MA(CLOSE,20),COLORYELLOW,LINETHICK2;
{UPR:MID+2*STD(CLOSE,20),COLORRED,DOTLINE;
LOR:=MID-2*STD(CLOSE,20),COLORGREEN,DOTLINE;
STICKLINE(ISLASTBAR,HHV(C,5),HHV(C,5),218,1)COLORBLUE;
STICKLINE(ISLASTBAR,HHV(C,5)*0.97,HHV(C,5)*0.97,218,1)COLORRED;}
AAAA:=BARSLAST(CROSS(EMA(C,8),EMA(C,3)) AND C>MA(C,25));
DRAWTEXT(C操盘线,L,'*CP'),COLORF0F000;
小秘密:=CROSS(BB,AAAA);
DRAWTEXT(小秘密,L-0.15,'跟进'),COLORF00FF0;
MA1:=MA(CLOSE,5);
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
TJ1:=BARSLAST(CROSS(DIF,DEA));
TJ2:=REF(H,TJ1);
{IF(TJ1<30,TJ2,DRAWNULL),COLORGREEN,LINETHICK1;
IF(CROSS(DIF,DEA),H*1.005,DRAWNULL),CIRCLEDOT,COLORYELLOW,LINETHICK;}
STICKLINE(CROSS(DIF,DEA),H*1.0005,H*0.9995,100,0),COLORBLUE;
MA2:=MA(CLOSE,9),LINETHICK2;
MA3:=MA(CLOSE,14),LINETHICK2;
条件:=CROSS(MA2,INDEXC) AND MA3>REF(MA3,1) AND MA1<REF(MA1,1);
DRAWTEXT(条件,H*1.015,'↙大跌开始');
