[通达信指标]筹码变色主图公式

P1:=10;

N:=10;

M:=3;

AA:=EMA(C,3) > EMA(C,21);

BB:=EMA(C,3) < EMA(C,21);

CC:= EMA(C,3) > EMA(C,8);

CC1:=EMA(C,3) < EMA(C,8);

STICKLINE(AA,L,H,0,0),COLOR0088EE;

STICKLINE(AA,L,H,0,0),COLOR0000AA;

STICKLINE(AA,H,L,0,0),COLOR0000FF;

STICKLINE(AA,C,O,3,0),COLOR000099;

STICKLINE(AA,C,O,2,0),COLOR0000BB;

STICKLINE(AA,C,O,1,0),COLOR0000DD;

STICKLINE(AA,C,O,0.3,0),COLOR0000FF;

STICKLINE(BB,H,L,0,1),COLORGREEN;

STICKLINE(BB,C,O,3.2,0),COLOR006600;

STICKLINE(BB,C,O,2.6,0),COLOR008800;

STICKLINE(BB,C,O,1.9,0),COLOR00AA00;

STICKLINE(BB,C,O,1.1,0),COLOR00CC00;

STICKLINE(BB,C,O,0.3,0),COLOR00FF00;

STICKLINE(BB AND CC,H,L,0,1),COLORFF55FF;

STICKLINE(BB AND CC,C,O,3.2,0),COLOR880088;

STICKLINE(BB AND CC,C,O,2.6,0),COLORAA00AA;

STICKLINE(BB AND CC,C,O,1.9,0),COLORCC00CC;

STICKLINE(BB AND CC,C,O,1.1,0),COLOREE00EE;

STICKLINE(BB AND CC,C,O,0.3,0),COLORFF44FF;

STICKLINE(AA AND CC1,H,L,0,1),COLORFF8800;

STICKLINE(AA AND CC1,C,O,3.2,0),COLORFF2200;

STICKLINE(AA AND CC1,C,O,2.6,0),COLORFF4400;

STICKLINE(AA AND CC1,C,O,1.9,0),COLORFF6600;

STICKLINE(AA AND CC1,C,O,1.1,0),COLORFF8800;

STICKLINE(AA AND CC1,C,O,0.3,0),COLORFFAA00;

ZT:=(C/REF(C,1)-1)*100>9.5;

STICKLINE(ZT,OPEN,CLOSE,0.5,0),COLORYELLOW;

C3:=REF(C,1);

跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);

STICKLINE(跌停,OPEN,CLOSE,0.5,0),COLORRED;

筹码80:COST(80),NODRAW,COLORYELLOW,LINETHICK2;

筹码90:COST(90),NODRAW,COLORFF00FF,LINETHICK2;

底:COST(0.2),NODRAW,COLOR00FF00, LINETHICK2;

获利比例:WINNER(CLOSE)*100,COLORRED,NODRAW;

A:=P1+(100-P1)/2;

B:=(100-P1)/2;

CCC:=COST(A);

DD:=COST(B);

筹码集中度:(CCC-DD)/(CCC+DD)*100,COLORYELLOW,NODRAW;

振幅:DYNAINFO(13)*100,NODRAW,COLORWHITE;

K:=1;

箱顶:IF(K=1 ,MA(REF(HHV(C,30),1),2),DRAWNULL)COLORYELLOW;

箱底:IF(K=1 ,MA(REF(LLV(C,30),1),2),DRAWNULL)COLORCYAN;

AAA:=C>REF(HHV(H,2),1);

BBB:=C<REF(LLV(L,2),1);

ENTERLONG:=TFILTER(AAA,BBB,1);

EXITLONG:=TFILTER(AAA,BBB,2);

IF(EXITLONG,HIGH*1.01,DRAWNULL),POINTDOT,COLORGREEN,LINETHICK5;{3K卖点标注}

IF(ENTERLONG,LOW*0.99,DRAWNULL),POINTDOT,COLORRED,LINETHICK5;{3K买点标注}

实收价:=IF((FRACPART((C * 100)) > 0.46),(CEILING((C * 100)) / 100),(FLOOR((C * 100)) / 100));

柒%阳:=(实收价 >= IF((FRACPART(((REF(实收价,1) * 1.07) * 100)) > 0.46),(CEILING(((REF(实收价,1) * 1.07) * 100)) / 100),(FLOOR(((REF(实收价,1) * 1.07) * 100)) / 100)));

DRAWTEXT(柒%阳,HIGH*1.01,’7%’),COLORYELLOW;

DIR:=ABS(CLOSE-REF(CLOSE,22));

VIR:=SUM(ABS(CLOSE-REF(CLOSE,1)),22);

ER:=DIR/VIR;

CS:=ER*(2/3-2/14)+2/14;

CQ:=CS*CS;

EMMA:EMA(DMA(CLOSE,CQ),2),COLORCYAN,LINETHICK3;

IF(EMMA>=REF(EMMA,1),EMMA,DRAWNULL),COLORMAGENTA,LINETHICK3;

FIL:=STD(EMMA-REF(EMMA,1),20);

KXZT:=IF(CURRBARSCOUNT=1 AND PERIOD=5 AND NOT(C>1500 OR DYNAINFO(7)=0) AND C>=O,REF(CLOSE,1)*1.1,DRAWNULL),NODRAW;

STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,KXZT,MAX(OPEN,CLOSE),-1,-1),COLOR00C0C0;

KXDT:=IF(CURRBARSCOUNT=1 AND PERIOD=5 AND NOT(C>1500) AND C<O,REF(CLOSE,1)*0.9,DRAWNULL),NODRAW;

STICKLINE(CURRBARSCOUNT=1 AND PERIOD=5,KXDT,MIN(OPEN,CLOSE),-1,-1),COLORLIBLUE;

TTS36:=COST(1);

TTS37:=COST(10);

TTS38:=COST(20);

TTS39:=COST(30);

TTS40:=COST(40);

TTS41:=COST(50);

TTS42:=COST(60);

TTS43:=COST(70);

TTS44:=COST(80);

TTS45:=COST(90);

TTS46:=COST(99);

TTS47:=COST(5);

TTS48:=COST(15);

TTS49:=COST(25);

TTS50:=COST(35);

TTS51:=COST(45);

TTS52:=COST(55);

TTS53:=COST(65);

TTS54:=COST(75);

TTS55:=COST(85);

TTS56:=COST(95);

TTS57:=TTS47-TTS36;

TTS58:=TTS37-TTS47;

TTS59:=TTS48-TTS37;

TTS60:=TTS38-TTS48;

TTS61:=TTS49-TTS38;

TTS62:=TTS39-TTS49;

TTS63:=TTS50-TTS39;

TTS64:=TTS40-TTS50;

TTS65:=TTS51-TTS40;

TTS66:=TTS41-TTS51;

TTS67:=TTS52-TTS41;

TTS68:=TTS42-TTS52;

TTS69:=TTS53-TTS42;

TTS70:=TTS43-TTS53;

TTS71:=TTS54-TTS43;

TTS72:=TTS44-TTS54;

TTS73:=TTS55-TTS44;

TTS74:=TTS45-TTS55;

TTS75:=TTS56-TTS45;

TTS76:=TTS46-TTS56;

TTS77:=MIN(TTS57,MIN(TTS58,MIN(TTS59,MIN(TTS60,MIN(TTS61,MIN(TTS62,MIN(TTS63,MIN(TTS64,MIN(TTS65,MIN(TTS66,MIN(TTS67,MIN(TTS68,MIN(TTS69,MIN(TTS70,MIN(TTS71,MIN(TTS72,MIN(TTS73,MIN(TTS74,MIN(TTS75,TTS76)))))))))))))))))));

TTS78:=IF(TTS57=TTS77,(TTS47+TTS36)/2,IF(TTS58=TTS77,(TTS47+TTS37)/2,IF(TTS59=TTS77,(TTS48+TTS37)/2,IF(TTS60=TTS77,(TTS48+TTS38)/2,IF(TTS61=TTS77,(TTS49+TTS38)/2,IF(TTS62=TTS77,(TTS49+TTS39)/2,IF(TTS63=TTS77,(TTS50+TTS39)/2,IF(TTS64=TTS77,(TTS50+TTS40)/2,IF(TTS65=TTS77,(TTS51+TTS40)/2,IF(TTS66=TTS77,(TTS51+TTS41)/2,IF(TTS67=TTS77,(TTS52+TTS41)/2,IF(TTS68=TTS77,(TTS52+TTS42)/2,IF(TTS69=TTS77,(TTS53+TTS42)/2,IF(TTS70=TTS77,(TTS53+TTS43)/2,IF(TTS71=TTS77,(TTS54+TTS43)/2,IF(TTS72=TTS77,(TTS54+TTS44)/2,IF(TTS73=TTS77,(TTS55+TTS44)/2,IF(TTS74=TTS77,(TTS55+TTS45)/2,IF(TTS75=TTS77,(TTS56+TTS45)/2,(TTS56+TTS46)/2)))))))))))))))))));

筹码峰线:TTS78,NODRAW,COLOR00EEEE;

STICKLINE(ISLASTBAR,筹码峰线,筹码峰线*1.001,20,0),COLORYELLOW;