DI11:=DYNAINFO(11);DI17:=DYNAINFO(17)*SQRT(SQRT(SQRT(FINANCE(1)*FINANCE(46)/(FINANCE(7)*FINANCE(7)))));

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;

{以上为计算区BUYHAOGU.COM}

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,80,1);

DRAWTEXT(CURRBARSCOUNT=TIM,100,STRCAT('能：',STRCAT(TSB,TSC))),COLORRED;

DRAWTEXT(CURRBARSCOUNT=TIM,0,STRCAT('量：',STRCAT(TSA,TS9))),COLORGREEN;