通达信强势主升副图指标公式源码

cxh1:=HHV(HIGH,21);
cxh2:=LLV(LOW,21);
cxh3:=REF(CLOSE,2);
cxh4:=((SMA(MAX(CLOSE-cxh3,0),7,1))/(SMA(ABS(CLOSE-cxh3),7,1)))*(100);
DRAWTEXT((cxh4< REF(cxh4,1)) AND (cxh4>79),135,'高位'),COLOR00F200;
cxh5:=((CLOSE-LLV(LOW,80))/(HHV(HIGH,80)-LLV(LOW,80)))*(200);
cxhA:=SMA(cxh5,3,1);
cxhB:=SMA(cxhA,3,1);
cxhC:=(3)*(cxhA)-(2)*(cxhB);
cxhD:=LLV(LOW,5);
cxhE:=HHV(HIGH,5);
cxhF:=(EMA(((CLOSE-cxhD)/(cxhE-cxhD))*(100),4))*(2);
cxh6:=EMA((0.66699999)*(REF(cxhF,1))+(0.333)*(cxhF),2);
cxh7:=(3)*(cxhF)-(2)*(cxh6);
cxh8:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
cxh9:=POW(MA(LOW,5),2)+MA(LOW,5);
cxh10:=POW(MA(HIGH,5),2)+MA(HIGH,5);
cxh11:=((cxh8-LLV(cxh9,64))/(HHV(cxh10,64)-LLV(cxh9,64)))*(150)+65-10;
cxh12:=(SMA(cxh11,3,1))*(1.5)-100;
cxh13:=SMA(cxh12,3,1);
cxh14:=(3)*(cxh12)-(2)*(cxh13);
cxh15:=(HIGH+LOW+(CLOSE)*(2))/(4);
cxh1A:=EMA(cxh15,13);
cxh1B:=STD(cxh15,13);
cxh1C:=((cxh15-cxh1A)*(100))/(cxh1B);
cxh1D:=EMA(cxh1C,5);
cxh1E:=EMA(cxh1D,13);
cxh1F:=EMA(cxh1D,13)+200-100;
cxh16:=EMA(cxh1F,10);
cxh17:=(3)*(cxh1F)-(2)*(cxh16);
cxh18:=cxhA+cxhF+cxh12+cxh1F;
cxh19:=cxhB+cxh6+cxh13+cxh16;
cxh20:=cxhC+cxh7+cxh14+cxh17;
cxh21:=(HIGH+LOW+CLOSE)/(3);
cxh22:=((AMOUNT)/(VOL))/(100);
cxh23:=((SUM(AMOUNT,5))/(SUM(VOL,5)))/(100);
cxh24:=(cxh21-MA(cxh21,34))/((0.015)*(AVEDEV(cxh21,34)));
cxh25:=DMA(((AMOUNT)/(VOL))/(100),(VOL)/(CAPITAL));
cxh2A:=(HIGH+LOW+CLOSE+cxh21)/(4);
cxh2B:=EMA(cxh2A,24);
cxh2C:=STD(cxh2A,24);
cxh2D:=((cxh2A-cxh2B)/(cxh2C))*(100);
cxh2E:=(cxh21-MA(cxh21,24))/((0.015)*(AVEDEV(cxh21,24)));
cxh2F:=EMA(cxh2D,5);
cxh26:=((cxh2F+cxh2E+cxh24)/(3)+165)/(4);
cxh27:=(EMA(EMA(EMA(cxh26,15),10),5)-25)*(2)+cxh25;
cxh28:=((cxh18+cxh19+(cxh20)*(30))/(32))/(5)-15;
cxh29:=EMA(cxh28,13);
cxh30:=EMA(CLOSE,8);
cxh31:=EMA(cxh30,20);
cxh3A:=CROSS(cxh30,cxh31);
cxh3B:=(cxh30< EMA(CLOSE,120));
cxh3C:=(3)*(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100),5,1))-(2)*(SMA(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100),5,1),3,1));
cxh3D:=EMA(cxh3C,3);
cxh3E:=EMA((cxh27+cxh29)/(2),2);
STICKLINE((cxh3E-REF(cxh3E,1)>0),cxh3E,0,10,0),COLOR00007B;
STICKLINE((cxh3E-REF(cxh3E,1)>0),cxh3E,0,9,0),COLOR000088;
STICKLINE((cxh3E-REF(cxh3E,1)>0),cxh3E,0,8,0),COLOR00009B;
STICKLINE((cxh3E-REF(cxh3E,1)>0),cxh3E,0,7,0),COLOR0000AE;
STICKLINE((cxh3E-REF(cxh3E,1)>0),cxh3E,0,6,0),COLOR0000BB;
STICKLINE((cxh3E-REF(cxh3E,1)>0),cxh3E,0,5,0),COLOR0000CC;
STICKLINE((cxh3E-REF(cxh3E,1)>0),cxh3E,0,4,0),COLOR0000DD;
STICKLINE((cxh3E-REF(cxh3E,1)>0),cxh3E,0,3,0),COLOR0000EC;
STICKLINE((cxh3E-REF(cxh3E,1)>0),cxh3E,0,2,0),COLOR0000E9;
STICKLINE((cxh3E-REF(cxh3E,1)< 0),cxh3E,0,10,0),COLOR00007B;
STICKLINE((cxh3E-REF(cxh3E,1)< 0),cxh3E,0,9,0),COLOR007B00;
STICKLINE((cxh3E-REF(cxh3E,1)< 0),cxh3E,0,8,0),COLOR008800;
STICKLINE((cxh3E-REF(cxh3E,1)< 0),cxh3E,0,7,0),COLOR009900;
STICKLINE((cxh3E-REF(cxh3E,1)< 0),cxh3E,0,6,0),COLOR00AA00;
STICKLINE((cxh3E-REF(cxh3E,1)< 0),cxh3E,0,5,0),COLOR00BB00;
STICKLINE((cxh3E-REF(cxh3E,1)< 0),cxh3E,0,4,0),COLOR00CE00;
STICKLINE((cxh3E-REF(cxh3E,1)< 0),cxh3E,0,3,0),COLOR00E100;
STICKLINE((cxh3E-REF(cxh3E,1)< 0),cxh3E,0,2,0),COLOR00F200;
STICKLINE((cxh3E-REF(cxh3E,1)< 0),cxh3E,0,1,0),COLORFFFF00;
DRAWTEXT(FILTER(CROSS(cxh3D,10),34),(-2),'←底'),COLORYELLOW;
cxh3F:=((CLOSE-MA(CLOSE,6))/(MA(CLOSE,6)))*(100);
cxh32:=((CLOSE-MA(CLOSE,12))/(MA(CLOSE,12)))*(100);
cxh33:=((CLOSE-MA(CLOSE,24))/(MA(CLOSE,24)))*(100);
cxh34:=(cxh3F+(2)*(cxh32)+(3)*(cxh33))/(6);
DRAWICON(cxh3A AND cxh3B,10,85);
DRAWTEXT(cxh3A AND cxh3B,10,'←主升'),COLORYELLOW;