绝无仅有通达信分时副图 源码 贴图
DI11:=DYNAINFO(11);DI17:=DYNAINFO(17);
RCB:=(COUNT(C>0,FROMOPEN)-1-MOD(COUNT(C>0,FROMOPEN)-1,10))/10+1;
RCD:=EMA(LOG(SMA(SUM(DYNAINFO(37),FROMOPEN)*2400000/RCB,3,1)),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(C,12)-EMA(C,26))*600/DYNAINFO(11)-EMA((EMA(C,12)-EMA(C,26))*600/DYNAINFO(11),9))*10;
RAA:=SUM(AMOUNT,40)/(AMOUNT/VOL/100)/100;
RAB:=SUM(AMOUNT,80)/(AMOUNT/VOL/100)/100;
RAC:=(CLOSE-DMA((3*H+L+O+2*C)/7,VOL/RAA))/DMA((3*H+L+O+2*C)/7,VOL/RAA)*(9000/RCD);
RAD:=(CLOSE-DMA((3*H+L+O+2*C)/7,VOL/RAB))/DMA((3*H+L+O+2*C)/7,VOL/RAB)*(9000/RCD);
RBA:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
{股票指标网}
JXA:=IF(RAD>0,RAD-100,-100);
JXB:=IF(RAD<0,RAD+100,100);
JXC:=IF(RAC>0,RAC-100,-100);
JXD:=IF(RAC<0,RAC+100,100);
REA:=EMA(-100*(HHV(H,34)-C)/(HHV(H,34)-LLV(L,34)),3);
REB:=EMA(100-3*SMA((LLV(L,75)-C)/(HHV(H,75)-LLV(L,75))*100,18,1)+2*SMA(SMA((LLV(L,75)-C)/(HHV(H,75)-LLV(L,75))*100,18,1),15,1)-100,3);
REC:=100*(HHV(H,55)-C)/(HHV(H,55)-LLV(C,55));
RED:=(EXPMA(C,500)-REF(EXPMA(C,500),1))/REF(EXPMA(C,500),1)*61800;
REE:=(REA+REB-REC+50)/135;
{以上为计算区}
DRAWBAND(RCA,RGB(255,20,107),0,RGB(34,139,34));
DRAWBAND(RCC,RGB(175,255,47),0,RGB(106,90,205));
DRAWBAND(JXA,RGB(255,0,0),-100,RGB(0,0,0));
DRAWBAND(100,RGB(0,255,0),JXB,RGB(0,0,0));
DRAWBAND(JXC,RGB(255,255,0),-100,RGB(0,0,0));
DRAWBAND(100,RGB(0,0,255),JXD,RGB(0,0,0));
STICKLINE(-(EMA(RBA,3)-50)*1.2>39*1.2,39*1.2,-(EMA(RBA,3)-50)*1.2,0,0),COLORLICYAN;
STICKLINE(-(EMA(RBA,3)-50)*1.2<-39*1.2,-39*1.2,-(EMA(RBA,3)-50)*1.2,0,0),COLORLIMAGENTA;
{以上为绘图区}
必卖:IF(REE>0.8,REE,DRAWNULL),NODRAW,COLORRED;
必买:IF(REE<-0.8,-REE,DRAWNULL),NODRAW,COLORGREEN;
危险:IF(0<=REE AND REE<=0.8,REE,DRAWNULL),NODRAW,COLORYELLOW;
机遇:IF(REE>-0.8 AND REE<0,-REE,DRAWNULL),NODRAW,COLORBLUE;
卖:IF(C>COST(86),COST(95),DRAWNULL),NODRAW,COLORLIRED;
买:IF(C<COST(14),COST(5),DRAWNULL),NODRAW,COLORLIGREEN;
点:IF(RED<-1.2 OR RED>1.2,RED*0.382,DRAWNULL),NODRAW,COLORLIBLUE;
趋势:(REB*2-100)/1.2,COLORWHITE,LINETHICK2;
LRX:=((C/(SUM(V*C,FROMOPEN)/SUM(V,FROMOPEN))-1)*61.8+(C/(SUM(V*C,0)/SUM(V,0))-1)*38.2)*((C/DI11-1)*68.2+(C/EMA(C,480)-1)*38.2);
IF(LRX>0.618 AND C>DI11,SQRT(LRX)*19.1-100,-100),COLORCYAN,LINETHICK5;
IF(LRX>0.618 AND C<DI11,100-SQRT(LRX)*19.1,100),COLORMAGENTA,LINETHICK5;
HQV1:=(COUNT(C>0,FROMOPEN)-1-MOD(COUNT(C>0,FROMOPEN)-1,10))/10+1;
HQV2:=LOG(SMA(SUM(DYNAINFO(37),FROMOPEN)*2400000/HQV1,3,1))-1;
TS9:=IF(HQV2>REF(HQV2,1),' +',IF(HQV2=REF(HQV2,1),' =',' -'));
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>0,FROMOPEN)>119,30,1);
DRAWTEXT(CURRBARSCOUNT=TIM,90,STRCAT('能：',STRCAT(TSB,TSC))),COLORRED;
DRAWTEXT(CURRBARSCOUNT=TIM,-90,STRCAT('量：',STRCAT(TSA,TS9))),COLORGREEN;
未来函数检测结果如下：
该公式包含未来函数:COST
该公式包含未来函数:DYNAINFO
解密、编写股票、期货策略请联系QQ或微信同号：88652583
相关股票指标公式
原理解析：
DI11赋值:均价
DI17赋值:DYNAINFO(17)
RCB赋值:(统计FROM开盘价日满足C>0的天数-1-MOD(统计FROM开盘价日满足C>0的天数-1,10))/10+1
RCD赋值:EMA(LOG(SMA(SUM(DYNAINFO(37),FROM开盘价)*2400000/RCB,3,1)),240)
RCA赋值:(C/均价-(MA(C/均价,55)+MA(C/均价,21)+MA(C/均价,34))/3)/MA(C/均价,3)*1200
RCC赋值:2*((C的12日指数移动平均-C的26日指数移动平均)*600/均价-EMA((C的12日指数移动平均-C的26日指数移动平均)*600/均价,9))*10
RAA赋值:40的成交额日累和/(成交额/成交量/100)/100
RAB赋值:80的成交额日累和/(成交额/成交量/100)/100
RAC赋值:(收盘价-DMA((3*H+L+O+2*C)/7,成交量/RAA))/DMA((3*H+L+O+2*C)/7,成交量/RAA)*(9000/RCD)
RAD赋值:(收盘价-DMA((3*H+L+O+2*C)/7,成交量/RAB))/DMA((3*H+L+O+2*C)/7,成交量/RAB)*(9000/RCD)
RBA赋值:3*SMA((C-55日内L最低值)/(55日内H最高值-55日内L最低值)*100,5,1)-2*SMA(SMA((C-55日内L最低值)/(55日内H最高值-55日内L最低值)*100,5,1),3,1)
如果RAD>0返回RAD-100否则返回-100
如果RAD<0返回RAD+100否则返回100
如果RAC>0返回RAC-100否则返回-100
如果RAC<0返回RAC+100否则返回100
REA赋值:EMA(-100*(34日内H最高值-C)/(34日内H最高值-34日内L最低值),3)
REB赋值:EMA(100-3*SMA((75日内L最低值-C)/(75日内H最高值-75日内L最低值)*100,18,1)+2*SMA(SMA((75日内L最低值-C)/(75日内H最高值-75日内L最低值)*100,18,1),15,1)-100,3)
REC赋值:100*(55日内H最高值-C)/(55日内H最高值-55日内C最低值)
RED赋值:(C的500日指数移动平均-1日前的C的500日指数移动平均)/1日前的C的500日指数移动平均*61800
REE赋值:(REA+REB-REC+50)/135
{以上为计算区}
DRAWBAND(RCA,RGB(255,20,107),0,RGB(34,139,34))
DRAWBAND(RCC,RGB(175,255,47),0,RGB(106,90,205))
DRAWBAND(JXA,RGB(255,0,0),-100,RGB(0,0,0))
DRAWBAND(100,RGB(0,255,0),JXB,RGB(0,0,0))
DRAWBAND(JXC,RGB(255,255,0),-100,RGB(0,0,0))
DRAWBAND(100,RGB(0,0,255),JXD,RGB(0,0,0))
STICKLINE(-(RBA的3日指数移动平均-50)*1.2>39*1.2,39*1.2,-(RBA的3日指数移动平均-50)*1.2,0,0),COLORLICYAN
STICKLINE(-(RBA的3日指数移动平均-50)*1.2<-39*1.2,-39*1.2,-(RBA的3日指数移动平均-50)*1.2,0,0),COLORLIMAGENTA
如果REE>0.8返回REE否则返回DRAWNULL
如果REE<-0.8返回-REE否则返回DRAWNULL
如果0<=REE AND REE<=0.8返回REE否则返回DRAWNULL
如果REE>-0.8 AND REE<0返回-REE否则返回DRAWNULL
输出
卖:IF(C>获利盘为86%的成本分布,COST(95),DRAWNULL),NODRAW,COLORLIRED
输出
买:IF(C<获利盘为14%的成本分布,COST(5),DRAWNULL),NODRAW,COLORLIGREEN
如果RED<-1.2 OR RED>1.2返回RED*0.382否则返回DRAWNULL
输出
趋势:(REB*2-100)/1.2,画白色, 线宽为2
LRX赋值:((C/(FROM开盘价的V*C日累和/FROM开盘价的V日累和)-1)*61.8+(C/(0的V*C日累和/0的V日累和)-1)*38.2)*((C/DI11-1)*68.2+(C/C的480日指数移动平均-1)*38.2)
IF(LRX>0.618 AND C>DI11,SQRT(LRX)*19.1-100,-100),画青色,LINETHICK5
IF(LRX>0.618 AND C
HQV1赋值:(统计FROM开盘价日满足C>0的天数-1-MOD(统计FROM开盘价日满足C>0的天数-1,10))/10+1
HQV2赋值:LOG(SMA(SUM(DYNAINFO(37),FROM开盘价)*2400000/HQV1,3,1))-1
TS9赋值:IF(HQV2>1日前的HQV2,' +',IF(HQV2=1日前的HQV2,' =',' -'))
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(统计FROM开盘价日满足C>0的天数>119,30,1)
DRAWTEXT( 到最后交易的周期=TIM,90,STRCAT('能：',STRCAT(TSB,TSC))),画红色
DRAWTEXT( 到最后交易的周期=TIM,-90,STRCAT('量：',STRCAT(TSA,TS9))),画绿色
