通达信绝无仅有分时指标公式

DI11:=DYNAINFO(11);DI17:=DYNAINFO(17);
RCB:=(COUNT(C>0FROMOPEN)-1-MOD(COUNT(C>0FROMOPEN)-110))/10+1;
RCD:=EMA(LOG(SMA(SUM(DYNAINFO(37)FROMOPEN)*2400000/RCB31))240);
RCA:=(C/DYNAINFO(11)-(MA(C/DYNAINFO(11)55)+MA(C/DYNAINFO(11)21)+MA(C/DYNAINFO(11)34))/3)/MA(C/DYNAINFO(11)3)*1200;
RCC:=2*((EMA(C12)-EMA(C26))*600/DYNAINFO(11)-EMA((EMA(C12)-EMA(C26))*600/DYNAINFO(11)9))*10;
RAA:=SUM(AMOUNT40)/(AMOUNT/VOL/100)/100;
RAB:=SUM(AMOUNT80)/(AMOUNT/VOL/100)/100;
RAC:=(CLOSE-DMA((3*H+L+O+2*C)/7VOL/RAA))/DMA((3*H+L+O+2*C)/7VOL/RAA)*(9000/RCD);
RAD:=(CLOSE-DMA((3*H+L+O+2*C)/7VOL/RAB))/DMA((3*H+L+O+2*C)/7VOL/RAB)*(9000/RCD);
RBA:=3*SMA((C-LLV(L55))/(HHV(H55)-LLV(L55))*10051)-2*SMA(SMA((C-LLV(L55))/(HHV(H55)-LLV(L55))*10051)31);
JXA:=IF(RAD>0RAD-100-100);
JXB:=IF(RAD<0RAD+100100);
JXC:=IF(RAC>0RAC-100-100);
JXD:=IF(RAC<0RAC+100100);
REA:=EMA(-100*(HHV(H34)-C)/(HHV(H34)-LLV(L34))3);
REB:=EMA(100-3*SMA((LLV(L75)-C)/(HHV(H75)-LLV(L75))*100181)+2*SMA(SMA((LLV(L75)-C)/(HHV(H75)-LLV(L75))*100181)151)-1003);
REC:=100*(HHV(H55)-C)/(HHV(H55)-LLV(C55));
RED:=(EXPMA(C500)-REF(EXPMA(C500)1))/REF(EXPMA(C500)1)*61800;
REE:=(REA+REB-REC+50)/135;
{以上为计算区}
DRAWBAND(RCARGB(25520107)0RGB(3413934));
DRAWBAND(RCCRGB(17525547)0RGB(10690205));
DRAWBAND(JXARGB(25500)-100RGB(000));
DRAWBAND(100RGB(02550)JXBRGB(000));
DRAWBAND(JXCRGB(2552550)-100RGB(000));
DRAWBAND(100RGB(00255)JXDRGB(000));
STICKLINE(-(EMA(RBA3)-50)*1.2>39*1.239*1.2-(EMA(RBA3)-50)*1.200)COLORLICYAN;
STICKLINE(-(EMA(RBA3)-50)*1.2<-39*1.2-39*1.2-(EMA(RBA3)-50)*1.200)COLORLIMAGENTA;
{以上为绘图区}
必卖:IF(REE>0.8REEDRAWNULL)NODRAWCOLORRED;
必买:IF(REE<-0.8-REEDRAWNULL)NODRAWCOLORGREEN;
危险:IF(0<=REE AND REE<=0.8REEDRAWNULL)NODRAWCOLORYELLOW;
机遇:IF(REE>-0.8 AND REE<0-REEDRAWNULL)NODRAWCOLORBLUE;
卖:IF(C>COST(86)COST(95)DRAWNULL)NODRAWCOLORLIRED;
买:IF(C<COST(14)COST(5)DRAWNULL)NODRAWCOLORLIGREEN;
点:IF(RED<-1.2 OR RED>1.2RED*0.382DRAWNULL)NODRAWCOLORLIBLUE;
趋势:(REB*2-100)/1.2COLORWHITELINETHICK2;
LRX:=((C/(SUM(V*CFROMOPEN)/SUM(VFROMOPEN))-1)*61.8+(C/(SUM(V*C0)/SUM(V0))-1)*38.2)*((C/DI11-1)*68.2+(C/EMA(C480)-1)*38.2);
IF(LRX>0.618 AND C>DI11SQRT(LRX)*19.1-100-100)COLORCYANLINETHICK5;
IF(LRX>0.618 AND C<DI11100-SQRT(LRX)*19.1100)COLORMAGENTALINETHICK5;
HQV1:=(COUNT(C>0FROMOPEN)-1-MOD(COUNT(C>0FROMOPEN)-110))/10+1;
HQV2:=LOG(SMA(SUM(DYNAINFO(37)FROMOPEN)*2400000/HQV131))-1;
TS9:=IF(HQV2>REF(HQV21)' +'IF(HQV2=REF(HQV21)' ='' -'));
TSA:=IF(HQV2>3.6'A级'IF(HQV2>2.7'B级'IF(HQV2>1.8'C级'IF(HQV2>0.9'D级''E级'))));
TSB:=IF(DI17>10'A级'IF(DI17>5'B级'IF(DI17>1.5'C级'IF(DYNAINFO(17)>0.8'D级''E级'))));
TSC:=IF(DYNAINFO(17)-REF(DYNAINFO(17)1)>REF(DYNAINFO(17)-REF(DYNAINFO(17)1)1)' +'IF(DYNAINFO(17)-REF(DYNAINFO(17)1)=REF(DYNAINFO(17)-REF(DYNAINFO(17)1)1)' ='' -'));
TIM:=IF(COUNT(C>0FROMOPEN)>119301);
DRAWTEXT(CURRBARSCOUNT=TIM90STRCAT('能：'STRCAT(TSBTSC)))COLORRED;
DRAWTEXT(CURRBARSCOUNT=TIM-90STRCAT('量：'STRCAT(TSATS9)))COLORGREEN;