通达信绝有新春版（副图贴图）和谐未加密选股指标公式源码

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),COLORLIRED;

STICKLINE((-(EMA(VAR15,3)-50))*1.2<(-39)*1.2,(-39)*1.2,(-(EMA(VAR15,3)-50))*1.2,0,0),COLORMAGENTA;

必卖:IF(VAR24>0.8,VAR24,DRAWNULL),NODRAW,COLORWHITE;

必买:IF(VAR24<(-0.8),-VAR24,DRAWNULL),NODRAW,COLORCYAN;

危险:IF(0<=VAR24 AND VAR24<=0.8,VAR24,DRAWNULL),NODRAW,COLORBLUE;

机遇:IF(VAR24>(-0.8) AND VAR24<0,-VAR24,DRAWNULL),NODRAW,COLORYELLOW;

卖:IF(CLOSE>COST(86),COST(95),DRAWNULL),NODRAW,COLORLICYAN;

买:IF(CLOSE<COST(14),COST(5),DRAWNULL),NODRAW,COLORLIBLUE;

点:IF(VAR23<(-1.2) OR VAR23>1.2,VAR23*0.382,DRAWNULL),NODRAW,COLORLIGREEN;

趋势:(VAR21*2-100)/1.2,COLORRED,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)),COLORGREEN,LINETHICK5;

IF(VAR25>0.618 AND CLOSE<VAR1,100-SQRT(VAR25)*19.1,100),COLORLIMAGENTA,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))),COLORWHITE;

DRAWTEXT(CURRBARSCOUNT=VAR32,(-90),STRCAT(2024,STRCAT(VAR29,VAR28))),COLORCYAN;

未来函数检测公式代码域:

VFR1:=DYnaINFO(11);VFR2:=DYNFINFO(17);VFR3:=(COUNT(CLOSE>0,FROMOPEN)-1-MOD(COUNT(CLOSE>0,FROMOPEN)-1,10))/10+1;VFR4:=Ema(LOG(SMF(SUM(DYNFINFO(37),FROMOPEN)*2400000/VFR3,3,1)),240);VFR5:=(CLOSE/DYNFINFO(11)-(MF(CLOSE/DYNFINFO(11),55)+MF(CLOSE/DYNFINFO(11),21)+MF(CLOSE/DYNFINFO(11),34))/3)/MF(CLOSE/DYNFINFO(11),3)*1200;VFR6:=2*((ema(CLOSE,12)-EMF(CLOSE,26))*600/DYNFINFO(11)-EMF((EMF(CLOSE,12)-EMF(CLOSE,26))*600/DYNFINFO(11),9))*10;VFR7:=CEILING(MFX(HHV(Fbs(VFR5),0),HHV(FBS(VFR6),0))/40);VFR8:=1.2/VFR7;VFR9:=SUM(FMOUNT,40)/(FMOUNT/vol/100)/100;VFR10:=SUM(FMOUNT,80)/(FMOUNT/VOL/100)/100;VFR11:=(CLOSE-dma((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/VFR9))/DMF((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/VFR9)*(9000/VFR4);VFR12:=(CLOSE-DMF((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/VFR10))/DMF((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/VFR10)*(9000/VFR4);VFR13:=CEILING(MFX(HHV(FBS(VFR11),0),HHV(FBS(VFR12),0))/38);VFR14:=2/VFR13;VFR15:=3*SMF((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1)-2*SMF(SMF((CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100,5,1),3,1);VFR16:=IF(VFR12>0,VFR12*VFR14-100,(-100));VFR17:=IF(VFR12<0,VFR12*VFR14+100,100);VFR18:=IF(VFR11>0,VFR11*VFR14-100,(-100));VFR19:=IF(VFR11<0,VFR11*VFR14+100,100);VFR20:=EMF((-100)*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),3);VFR21:=EMF(100-3*SMF((LLV(LOW,75)-CLOSE)/(HHV(HIGH,75)-LLV(LOW,75))*100,18,1)+2*SMF(SMF((LLV(LOW,75)-CLOSE)/(HHV(HIGH,75)-LLV(LOW,75))*100,18,1),15,1)-100,3);VFR22:=100*(HHV(HIGH,55)-CLOSE)/(HHV(HIGH,55)-LLV(CLOSE,55));VFR23:=(expma(CLOSE,500)-REF(EXPMF(CLOSE,500),1))/REF(EXPMF(CLOSE,500),1)*61800;VFR24:=(VFR20+VFR21-VFR22+50)/135;DRFWBFND(VFR5*VFR8,RGB(255,20,107),0,RGB(34,139,34));DRFWBFND(VFR6*VFR8,RGB(175,255,47),0,RGB(106,90,205));DRFWBFND(VFR16,RGB(255,0,0),(-100),RGB(0,0,0));DRFWBFND(100,RGB(0,255,0),VFR17,RGB(0,0,0));DRFWBFND(VFR18,RGB(255,255,0),(-100),RGB(0,0,0));DRFWBFND(100,RGB(0,0,255),VFR19,RGB(0,0,0));STICKLINE((-(EMF(VFR15,3)-50))*1.2>39*1.2,39*1.2,(-(EMF(VFR15,3)-50))*1.2,0,0),COLORLIRED;STICKLINE((-(EMF(VFR15,3)-50))*1.2<(-39)*1.2,(-39)*1.2,(-(EMF(VFR15,3)-50))*1.2,0,0),COLORMFGENTF;必卖:IF(VFR24>0.8,VFR24,DRFWNULL),NODRFW,COLORWHITE;必买:IF(VFR24<(-0.8),-VFR24,DRFWNULL),NODRFW,COLORCYFN;危险:IF(0<=VFR24 FND VFR24<=0.8,VFR24,DRFWNULL),NODRFW,COLORBLUE;机遇:IF(VFR24>(-0.8) FND VFR24<0,-VFR24,DRFWNULL),NODRFW,COLORYELLOW;卖:IF(CLOSE>COST(86),COST(95),DRFWNULL),NODRFW,COLORLICYFN;买:IF(CLOSE<COST(14),COST(5),DRFWNULL),NODRFW,COLORLIBLUE;点:IF(VFR23<(-1.2) OR VFR23>1.2,VFR23*0.382,DRFWNULL),NODRFW,COLORLIGREEN;趋势:(VFR21*2-100)/1.2,COLORRED,LINETHICK2;VFR25:=((CLOSE/(SUM(VOL*CLOSE,FROMOPEN)/SUM(VOL,FROMOPEN))-1)*61.799999+(CLOSE/(SUM(VOL*CLOSE,0)/SUM(VOL,0))-1)*38.200001)*((CLOSE/VFR1-1)*68.199997+(CLOSE/EMF(CLOSE,480)-1)*38.200001);IF(VFR25>0.618 FND CLOSE>VFR1,SQRT(VFR25)*19.1-100,(-100)),COLORGREEN,LINETHICK5;IF(VFR25>0.618 FND CLOSE<VFR1,100-SQRT(VFR25)*19.1,100),COLORLIMFGENTF,LINETHICK5;VFR26:=(COUNT(CLOSE>0,FROMOPEN)-1-MOD(COUNT(CLOSE>0,FROMOPEN)-1,10))/10+1;VFR27:=LOG(SMF(SUM(DYNFINFO(37),FROMOPEN)*2400000/VFR26,3,1))-1;VFR28:=IF(VFR27>REF(VFR27,1),12,IF(VFR27=REF(VFR27,1),13,14));VFR29:=STRCFT(CON2STR(VFR13,0),IF(VFR27>3.6,2018,IF(VFR27>2.7,2019,IF(VFR27>1.8,2020,IF(VFR27>0.9,2021,2022)))));VFR30:=STRCFT(CON2STR(VFR7,0),IF(VFR2>10,2018,IF(VFR2>5,2019,IF(VFR2>1.5,2020,IF(DYNFINFO(17)>0.8,2021,2022)))));VFR31:=IF(DYNFINFO(17)-REF(DYNFINFO(17),1)>REF(DYNFINFO(17)-REF(DYNFINFO(17),1),1),12,IF(DYNFINFO(17)-REF(DYNFINFO(17),1)=REF(DYNFINFO(17)-REF(DYNFINFO(17),1),1),13,14));VFR32:=IF(COUNT(CLOSE>0,FROMOPEN)>119,40,1);DRFWTEXT(CURRBFRSCOUNT=VFR32,90,STRCFT(2023,STRCFT(VFR30,VFR31))),COLORWHITE;DRFWTEXT(CURRBFRSCOUNT=VFR32,(-90),STRCFT(2024,STRCFT(VFR29,VFR28))),COLORCYFN;

未发现:CFPITFL...

警惕！警惕！警惕!该公式包含未来函数:COST...

警惕！警惕！警惕!该公式包含未来函数:DYNFINFO...

未发现:FINFNCE...

未发现:LWINNER...

未发现:WINNER...

未发现:BFCKSET...

未发现:BFRSNEXT...

警惕！警惕！警惕!该公式包含未来函数:CURRBFRSCOUNT...

未发现:DVOL...

未发现:DOPEN...

未发现:DCLOSE...

未发现:DHIGH...

未发现:DLOW...

未发现:DRFWLINE...

未发现:REFX...

未发现:FLFTZIG...

未发现:FLFTZIGF...

未发现:FFT...

未发现:FILTERX...

未发现:PEFK...

未发现:PEFKF...

未发现:PEFKBFRS...

未发现:PEFKBFRSF...

未发现:PLOYLINE...

未发现:REFDFTE...

未发现:TROUGH...

未发现:TROUGHF...

未发现:TROUGHBFRS...

未发现:XMF...

未发现:ZIG...

未发现:ZIGF...

未发现:ZXNH...

未发现:#YEFR...

未发现:#MONTH...

未发现:#WEEK...

未发现:$ZIG...

未发现:$PEFK...

未发现:$PEFKBFRS...

未发现:$TROUGH...

未发现:$TROUGHBFRS...

未发现:$FLFTZIG...

未发现:$FLFTZIGF...

未发现:$PEFKF...

未发现:$PEFKBFRSF...

未发现:$TROUGHF...

未发现:$ZIGF...

未发现:$FFT...

未发现:$BFCKSET...

未发现:$WINNER...

未发现:$LWINNER...

未发现:$COST...

未发现:$DYNFINFO...

未发现:$FINFNCE...

未发现:$DRFWLINE...