绝有新春版 通达信副图指标 源码 贴图

{公式名称: 绝有新春版}
VAR1:=DYNAINFO(11);
VAR2:=DYNAINFO(17);
VAR3:=(COUNT(CLOSE>0,FROMOPEN)-1-MOD(COUNT(CLOSE>0,FROMOPEN)-1,10))/10+1;
VAR4:=EMA(LOG(SMA(SUM(DYNAINFO(37),FROMOPEN)*2400000/VAR3,3,1)),240);
VAR5:=(CLOSE/DYNAINFO(11)-(MA(CLOSE/DYNAINFO(11),55)+MA(CLOSE/DYNAINFO(11),21)+MA(CLOSE/DYNAINFO(11),34))/3)/MA(CLOSE/DYNAINFO(11),3)*1200;
VAR6:=2*((EMA(CLOSE,12)-EMA(CLOSE,26))*600/DYNAINFO(11)-EMA((EMA(CLOSE,12)-EMA(CLOSE,26))*600/DYNAINFO(11),9))*10;
VAR7:=CEILING(MAX(HHV(ABS(VAR5),0),HHV(ABS(VAR6),0))/40);
VAR8:=1.2/VAR7;
VAR9:=SUM(AMOUNT,40)/(AMOUNT/VOL/100)/100;
VAR10:=SUM(AMOUNT,80)/(AMOUNT/VOL/100)/100;
VAR11:=(CLOSE-DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/VAR9))/DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/VAR9)*(9000/VAR4);
VAR12:=(CLOSE-DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/VAR10))/DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/VAR10)*(9000/VAR4);
VAR13:=CEILING(MAX(HHV(ABS(VAR11),0),HHV(ABS(VAR12),0))/38);
VAR14:=2/VAR13;
VAR15:=3*SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1),3,1);
VAR16:=IF(VAR12>0,VAR12*VAR14-100,(-100));
VAR17:=IF(VAR12<0,VAR12*VAR14+100,100);
VAR18:=IF(VAR11>0,VAR11*VAR14-100,(-100));
VAR19:=IF(VAR11<0,VAR11*VAR14+100,100);
VAR20:=EMA((-100)*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),3);
VAR21:=EMA(100-3*SMA((LLV(LOW,75)-CLOSE)/(HHV(HIGH,75)-LLV(LOW,75))*100,18,1)+2*SMA(SMA((LLV(LOW,75)-CLOSE)/(HHV(HIGH,75)-LLV(LOW,75))*100,18,1),15,1)-100,3);
VAR22:=100*(HHV(HIGH,55)-CLOSE)/(HHV(HIGH,55)-LLV(CLOSE,55));
VAR23:=(EXPMA(CLOSE,500)-REF(EXPMA(CLOSE,500),1))/REF(EXPMA(CLOSE,500),1)*61800;
VAR24:=(VAR20+VAR21-VAR22+50)/135;
DRAWBAND(VAR5*VAR8,RGB(255,20,107),0,RGB(34,139,34));
DRAWBAND(VAR6*VAR8,RGB(175,255,47),0,RGB(106,90,205));
DRAWBAND(VAR16,RGB(255,0,0),(-100),RGB(0,0,0));
DRAWBAND(100,RGB(0,255,0),VAR17,RGB(0,0,0));
DRAWBAND(VAR18,RGB(255,255,0),(-100),RGB(0,0,0));
DRAWBAND(100,RGB(0,0,255),VAR19,RGB(0,0,0));
STICKLINE((-(EMA(VAR15,3)-50))*1.2>39*1.2,39*1.2,(-(EMA(VAR15,3)-50))*1.2,0,0),COLORLICYAN;
STICKLINE((-(EMA(VAR15,3)-50))*1.2<(-39)*1.2,(-39)*1.2,(-(EMA(VAR15,3)-50))*1.2,0,0),COLORLIMAGENTA;
必卖:IF(VAR24>0.8,VAR24,DRAWNULL),NODRAW,COLORRED;
必买:IF(VAR24<(-0.8),-VAR24,DRAWNULL),NODRAW,COLORGREEN;
危险:IF(0<=VAR24 AND VAR24<=0.8,VAR24,DRAWNULL),NODRAW,COLORYELLOW;
机遇:IF(VAR24>(-0.8) AND VAR24<0,-VAR24,DRAWNULL),NODRAW,COLORBLUE;
卖:IF(CLOSE>COST(86),COST(95),DRAWNULL),NODRAW,COLORLIRED;
买:IF(CLOSE<COST(14),COST(5),DRAWNULL),NODRAW,COLORLIGREEN;
点:IF(VAR23<(-1.2) OR VAR23>1.2,VAR23*0.382,DRAWNULL),NODRAW,COLORLIBLUE;
趋势:(VAR21*2-100)/1.2,COLORWHITE,LINETHICK2;
VAR25:=((CLOSE/(SUM(VOL*CLOSE,FROMOPEN)/SUM(VOL,FROMOPEN))-1)*61.799999+(CLOSE/(SUM(VOL*CLOSE,0)/SUM(VOL,0))-1)*38.200001)*((CLOSE/VAR1-1)*68.199997+(CLOSE/EMA(CLOSE,480)-1)*38.200001);
IF(VAR25>0.618 AND CLOSE>VAR1,SQRT(VAR25)*19.1-100,(-100)),COLORCYAN,LINETHICK5;
IF(VAR25>0.618 AND CLOSE<VAR1,100-SQRT(VAR25)*19.1,100),COLORMAGENTA,LINETHICK5;
VAR26:=(COUNT(CLOSE>0,FROMOPEN)-1-MOD(COUNT(CLOSE>0,FROMOPEN)-1,10))/10+1;
VAR27:=LOG(SMA(SUM(DYNAINFO(37),FROMOPEN)*2400000/VAR26,3,1))-1;
VAR28:=IF(VAR27>REF(VAR27,1),12,IF(VAR27=REF(VAR27,1),13,14));
VAR29:=STRCAT(CON2STR(VAR13,0),IF(VAR27>3.6,2018,IF(VAR27>2.7,2019,IF(VAR27>1.8,2020,IF(VAR27>0.9,2021,2022)))));
VAR30:=STRCAT(CON2STR(VAR7,0),IF(VAR2>10,2018,IF(VAR2>5,2019,IF(VAR2>1.5,2020,IF(DYNAINFO(17)>0.8,2021,2022)))));
VAR31:=IF(DYNAINFO(17)-REF(DYNAINFO(17),1)>REF(DYNAINFO(17)-REF(DYNAINFO(17),1),1),12,IF(DYNAINFO(17)-REF(DYNAINFO(17),1)=REF(DYNAINFO(17)-REF(DYNAINFO(17),1),1),13,14));
VAR32:=IF(COUNT(CLOSE>0,FROMOPEN)>119,40,1);
DRAWTEXT(CURRBARSCOUNT=VAR32,90,STRCAT(2023,STRCAT(VAR30,VAR31))),COLORRED;
DRAWTEXT(CURRBARSCOUNT=VAR32,(-90),STRCAT(2024,STRCAT(VAR29,VAR28))),COLORGREEN;