TS:=130;
N:=99;
M:=3;
MT:=3;
M1:=5;
M2:=7;
M3:=21;
M4:=12;
M5:=50;
DA1:=IF(TS>TOTALBARSCOUNT,TOTALBARSCOUNT,TS);
DA:=IF(CURRBARSCOUNT>DA1,0,DA1);
HI:=REFDATE(HHV(H,DA),DATE);
LO:=REFDATE(LLV(L,DA),DATE);
C1:=IF(CURRBARSCOUNT<=DA,C,DRAWNULL);
GZ:=EXP(LN(HI/LO)/10);
LH1:=SUM(IF(C1>=(HI/GZ),V,0),DA);
LH2:=SUM(IF(C1>=(HI/POW(GZ,2)) AND C1<(HI/GZ),V,0),DA);
LH3:=SUM(IF(C1>=(HI/POW(GZ,3)) AND C1<(HI/POW(GZ,2)),V,0),DA);
LH4:=SUM(IF(C1>=(HI/POW(GZ,4)) AND C1<(HI/POW(GZ,3)),V,0),DA);
LH5:=SUM(IF(C1>=(HI/POW(GZ,5)) AND C1<(HI/POW(GZ,4)),V,0),DA);
LH6:=SUM(IF(C1>=(HI/POW(GZ,6)) AND C1<(HI/POW(GZ,5)),V,0),DA);
LH7:=SUM(IF(C1>=(HI/POW(GZ,7)) AND C1<(HI/POW(GZ,6)),V,0),DA);
LH8:=SUM(IF(C1>=(HI/POW(GZ,8)) AND C1<(HI/POW(GZ,7)),V,0),DA);
LH9:=SUM(IF(C1>=(LO*GZ) AND C1<LO*POW(GZ,2),V,0),DA);
LH10:=SUM(IF(C1>=LO AND C1<LO*GZ,V,0),DA);
L1:=REFDATE(HHV(LH1,DA),DATE),LINETHICK0;
L2:=REFDATE(HHV(LH2,DA),DATE),LINETHICK0;
L3:=REFDATE(HHV(LH3,DA),DATE),LINETHICK0;
L4:=REFDATE(HHV(LH4,DA),DATE);
L5:=REFDATE(HHV(LH5,DA),DATE);
L6:=REFDATE(HHV(LH6,DA),DATE);
L7:=REFDATE(HHV(LH7,DA),DATE);
L8:=REFDATE(HHV(LH8,DA),DATE);
L9:=REFDATE(HHV(LH9,DA),DATE);
L10:=REFDATE(HHV(LH10,DA),DATE);
SS:=(L1+L2+L3+L4+L5+L6+L7+L8+L9+L10);
STICKLINE(CEILING(DA*L1/SS)*3>=CURRBARSCOUNT,HI*N/100,(HI/GZ),1,1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L2/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,1)*N/100,HI/POW(GZ,2),1,1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L3/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,2)*N/100,HI/POW(GZ,3),1,1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L4/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,3)*N/100,HI/POW(GZ,4),1,1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L5/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,4)*N/100,HI/POW(GZ,5),1,1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L6/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,5)*N/100,HI/POW(GZ,6),1,1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L7/SS)*3>=CURRBARSCOUNT,HI/POW(GZ,6)*N/100,HI/POW(GZ,7),1,1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L8/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,2),LO*POW(GZ,3)*N/100,1,1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L9/SS)*3>=CURRBARSCOUNT,LO*POW(GZ,1),LO*POW(GZ,2)*N/100,1,1),COLOR454545,LINETHICK1;
STICKLINE(CEILING(DA*L10/SS)*3>=CURRBARSCOUNT,LO,LO*POW(GZ,1)*N/100,1,1),COLOR454545,LINETHICK1;
DRAWKLINE(H,O,L,C);JJ:=(CLOSE+HIGH+LOW)/3;
今日保護(hù)價(jià):(REF(C,2)+REF(C,1)+O)/3 ,COLOR8080FF,NODRAW;
DRAWBAND(MA(C,2),RGB(250,125,50),MA(C,7),RGB(0,150,250));
DRAWTEXT_FIX(1,0.00,0,0,'所屬行業(yè):'),COLOR00FFFF;
DRAWTEXT_FIX(1,0.06,0,0,HYBLOCK),COLOR8080FF;
DRAWTEXT_FIX(1,0.10,0,0,'所屬地區(qū):'),COLOR00FFFF;
DRAWTEXT_FIX(1,0.16,0,0,DYBLOCK),COLOR8080FF;
DRAWTEXT_FIX(1,0.00,0.06,0,'主營業(yè)務(wù):'),COLOR00FFFF;
DRAWTEXT_FIX(1,0.06,0.06,0,EXTERNSTR(0,1)),COLOR8080FF;
量能飽和度:IF((AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100>100,100,(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20))*100),NODRAW;
MA6一號(hào)線:MA(C,6),COLOR00FFFF,LINETHICK3;
A12二號(hào)線:MA(C,12),COLORFF26FF;
A24三號(hào)線:MA(C,24),COLOR0080FF;
A50四號(hào)線:MA(C,50),COLOR00D2D2,LINETHICK3;
DK:=A24三號(hào)線;
STICKLINE(DK<=C AND CLOSE>=OPEN,HIGH,LOW,0,1),COLORRED;
STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,3.2,0),COLOR6600FF;
STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,2.7,0),COLORDD33FF;
STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,2.1,0),COLORFF55FF;
STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,1.5,0),COLORFF88FF;
STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,0.9,0),COLORFFAAFF;
STICKLINE(DK<=C AND CLOSE>=OPEN,CLOSE,OPEN,0.3,0),COLORFFCCFF;
STICKLINE(DK<=C AND CLOSE<OPEN,HIGH,LOW,0,1),COLORRED;
STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,3.2,0),COLOR000033;
STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,2.7,0),COLOR000066;
STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,2.1,0),COLOR000099;
STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,1.5,0),COLOR0000CC;
STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,0.9,0),COLOR0000FF;
STICKLINE(DK<=C AND CLOSE<OPEN,CLOSE,OPEN,0.3,0),COLORCC66FF;
STICKLINE(DK>C AND CLOSE>=OPEN,HIGH,LOW,0,1),COLORFFFF00;
STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,3.2,0 ),COLOR990000;
STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,2.7,0 ),COLORCC0000;
STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,2.1,0),COLORFF4400;
STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,1.5,0 ),COLORFF8800;
STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,0.9,0 ),COLORFFCC00;
STICKLINE(DK>C AND CLOSE>=OPEN,CLOSE,OPEN,0.3,0 ),COLORCYAN;
STICKLINE(DK>C AND CLOSE<OPEN,HIGH,LOW,0,1),COLORWHITE;
STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,3.2,0 ),COLOR555555;
STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,2.7,0 ),COLOR777777;
STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,2.1,0 ),COLOR999999;
STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,1.5,0 ),COLOR999999;
STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,0.9,0 ),COLORDDDDDD;
STICKLINE(DK>C AND CLOSE<OPEN,CLOSE,OPEN,0.3,0 ),COLORFFFFFF;
買:IF(MA6一號(hào)線>REF(MA6一號(hào)線,1),MA6一號(hào)線,DRAWNULL),COLORRED,LINETHICK3;
賣:IF(MA6一號(hào)線<REF(MA6一號(hào)線,1),MA6一號(hào)線,DRAWNULL),COLORFFFF00,LINETHICK3;
TT:=IF(ISLASTBAR,240/FROMOPEN,1);
NN:=120;
HH:=HHV(V*TT,NN);
LL:=LLV(V,NN);
最高:=CONST(HH);
最低:=CONST(LL);
最高2:=CONST(HHV(H,NN));
最低2:=CONST(LLV(L,NN));
PP:=IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,20)),0.9,IF((最高2*0.9-(最高2-最低2)*0.5)>CONST(LLV(L,50)),0.7,0.6)),NODRAW;
RCC1:=最高2*0.9-(最高2-最低2)*PP;
最低3:=MIN(RCC1,最低2);
AA:=最低3;
MA20:MA(C,20)NODRAW,COLORRED,LINETHICK1;
MA55:MA(C,55)NODRAW,COLORRED;
IF(MA20<REF(MA20,1),MA20,DRAWNULL)NODRAW,COLOR00FF00,LINETHICK1;
IF(MA55<REF(MA55,1),MA55,DRAWNULL)NODRAW,COLOR408000;
BB:MA(MA(CLOSE,3),1)NODRAW,LINETHICK1,COLORFFFF00;
IF(BB>=REF(BB,1),BB,DRAWNULL)NODRAW,COLOR0000FF,LINETHICK1;
STICKLINE(BB>=REF(BB,1),AA-0.000*AA,AA-0.050*AA,3,0),COLOR000074;
STICKLINE(BB<REF(BB,1),AA-0.010*AA,AA-0.040*AA,3,1),COLORFFFF00;
三日最低:=EMA((REF(L,4)+REF(L,3)+REF(L,2))/3,3);
三日最高:=EMA((REF(H,4)+REF(H,3)+REF(H,2))/3,3),COLORWHITE;
S:=CROSS(CROSS(三日最高,C),0.6);
B:=CROSS(CROSS(C,三日最低),0.5);
DRAWICON(B,LOW*0.99,34);
DRAWICON(S,H*1.00,35);
ARE4:=MA(C,20); ARE5:=(C>MA(C,5)); ARE6:=(MA(C,5)>MA(C,10)); ARE7:=(C>MA(C,10));
ARE8:=(MA(C,5)>MA(C,20)); ARE9:=(C>MA(C,20)); ARE10:=REF(ARE4,1); ARE11:=(ARE4>ARE10);
AVX:=(((((IF(ARE5,10,(0-10))+IF(ARE6,10,(0-10)))+IF(ARE7,10,(0-10)))+IF(ARE8,10,(0-10)))+IF(ARE9,10,(0-10)))+IF(ARE11,10,(0-10)));
DSLX:=(C/INDEXC); DSLX1:=MA(DSLX,5); DSLX2:=MA(DSLX,10); VRE1:=MA(V,5); VRE2:=MA(V,10);
阻力位:=IF((C>200),(C*1.01),(C*1.07)); 阻力位1:=IF((C<10),(C*1.05),阻力位);
止損位:=IF((C>200),(C*0.99),(C*0.93)); 止損位1:=IF((C<10),(C*0.95),止損位);
TJTS1:=ISLASTBAR AND C<500; TJTS2:=ISLASTBAR AND C>500;
KDAT:=REFDATE(HHV(H,45)/1.01,DATE);{解盤位置}
解盤1:=CONST(IF(TJTS1 AND ((CROSS(AVX,1) AND (VRE1 >= VRE2)) AND (DSLX >= DSLX1)) ,1,0));
解盤2:=CONST(IF(TJTS1 AND ((CROSS(AVX,1) AND (VRE1 < VRE2)) AND (DSLX >= DSLX1)) ,1,0));
解盤3:=CONST(IF(TJTS1 AND ((CROSS(AVX,1) AND (VRE1 > VRE2)) AND (DSLX < DSLX1)) ,1,0));
解盤4:=CONST(IF(TJTS1 AND ((CROSS(AVX,1) AND (VRE1 <= VRE2)) AND (DSLX < DSLX1)) ,1,0));
解盤5:=CONST(IF(TJTS1 AND ((CROSS(1,AVX) AND (VRE1 >= VRE2)) AND (DSLX >= DSLX1)) ,1,0));
解盤6:=CONST(IF(TJTS1 AND ((CROSS(1,AVX) AND (VRE1 < VRE2)) AND (DSLX >= DSLX1)) ,1,0));
解盤7:=CONST(IF(TJTS1 AND ((CROSS(1,AVX) AND (VRE1 >= VRE2)) AND (DSLX < DSLX1)) ,1,0));
解盤8:=CONST(IF(TJTS1 AND ((CROSS(1,AVX) AND (VRE1 < VRE2)) AND (DSLX < DSLX1)) ,1,0));
解盤9:=CONST(IF(TJTS1 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 >= VRE2)) AND (DSLX >= DSLX1)) ,1,0));
解盤10:=CONST(IF(TJTS1 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 < VRE2)) AND (DSLX >= DSLX1)) ,1,0));
解盤11:=CONST(IF(TJTS1 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 >= VRE2)) AND (DSLX < DSLX1)) ,1,0));
解盤12:=CONST(IF(TJTS1 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 < VRE2)) AND (DSLX < DSLX1)) ,1,0));
解盤13:=CONST(IF(TJTS1 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 >= VRE2)) AND (DSLX >= DSLX1)) ,1,0));
解盤14:=CONST(IF(TJTS1 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 < VRE2)) AND (DSLX >= DSLX1)) ,1,0));
解盤15:=CONST(IF(TJTS1 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 >= VRE2)) AND (DSLX < DSLX1)) ,1,0));
解盤16:=CONST(IF(TJTS1 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 < VRE2)) AND (DSLX < DSLX1)) ,1,0));
解盤17:=CONST(IF(TJTS2 AND (CROSS(AVX,1) AND (VRE1 >= VRE2)) ,1,0));
解盤18:=CONST(IF(TJTS2 AND (CROSS(AVX,1) AND (VRE1 >= VRE2)) ,1,0));
解盤19:=CONST(IF(TJTS2 AND (CROSS(AVX,1) AND (VRE1 < VRE2)) ,1,0));
解盤20:=CONST(IF(TJTS2 AND (CROSS(AVX,1) AND (VRE1 < VRE2)) ,1,0));
解盤21:=CONST(IF(TJTS2 AND (CROSS(1,AVX) AND (VRE1 >= VRE2)) ,1,0));
解盤22:=CONST(IF(TJTS2 AND (CROSS(1,AVX) AND (VRE1 < VRE2)) ,1,0));
解盤23:=CONST(IF(TJTS2 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 >= VRE2)) ,1,0));
解盤24:=CONST(IF(TJTS2 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (VRE1 < VRE2)) ,1,0));
解盤25:=CONST(IF(TJTS2 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 >= VRE2)) ,1,0));
解盤26:=CONST(IF(TJTS2 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (VRE1 < VRE2)) ,1,0));
解盤文字1:=IF(解盤1=1,'該股的量能理想,有明顯走強(qiáng)跡象,可以考慮中線進(jìn)場參與,倉位在2/3左右',
IF(解盤2=1,'該股雖然走勢趨強(qiáng),但量能還顯不足,可以考慮短線進(jìn)場,倉位在1/2左右',
IF(解盤3=1,'該股量價(jià)配合良好,但相對(duì)其它股票并沒有明顯走強(qiáng),可以考慮短線進(jìn)場,倉位1/2左右',
IF(解盤4=1,'該股形態(tài)尚可,但量能不足,股票也未完全走強(qiáng),可以短線參與,倉位1/3左右',
IF(解盤5=1,'該股形態(tài)變壞,但走勢相對(duì)其它股票尚可,重倉者減持大半,清倉者可以觀望',
IF(解盤6=1,'該股隨大盤一起下跌,程明顯縮量走勢,考慮到大盤風(fēng)險(xiǎn),減持或清倉',
IF(解盤7=1,'該股放量下跌,走勢明顯偏弱,離場觀望',
IF(解盤8=1,'該股縮量下跌,走勢偏弱,離場觀望',
IF(解盤9=1,'該股形態(tài)良好,強(qiáng)勢明顯,量能充足,可以繼續(xù)持有',
IF(解盤10=1,'該股上行趨勢不變,強(qiáng)勢依然,但量能開始轉(zhuǎn)弱,注意風(fēng)險(xiǎn)',
IF(解盤11=1,'該股仍然具備上漲潛力,但股性偏弱,可考慮減倉',
IF(解盤12=1,'該股走勢趨弱,量能不足,減持大部分籌碼',
IF(解盤13=1,'該股形態(tài)不佳,注意成交量的變化,但目前不適合參與',
IF(解盤14=1,'該股趨勢不明,股價(jià)偏弱,注意量能變化,目前不宜參與',
IF(解盤15=1,'該股有走強(qiáng)跡象,但量能不足,趨勢不明,不適合操作',
IF(解盤17=1,'大盤量能理想,有明顯走強(qiáng)跡象,可以考慮中線進(jìn)場參與,倉位在2/3左右',
IF(解盤19=1,'大盤雖然走勢趨強(qiáng),但量能還顯不足,如果前期經(jīng)過一輪下跌 ',
IF(解盤21=1,'大盤形態(tài)走壞,重倉者可以減去大部分倉位 ',
IF(解盤22=1,'大盤縮量調(diào)整,注意風(fēng)險(xiǎn),短線清倉觀望',
IF(解盤23=1,'大盤走勢良好,量能理想,可以繼續(xù)持有強(qiáng)勢股',
IF(解盤24=1,'大盤形態(tài)良好,但量能稍顯不足,隨時(shí)準(zhǔn)備減倉',
IF(解盤25=1,'大盤趨勢不明,注意成交量變化,目前不適宜進(jìn)場',
IF(解盤26=1,'大盤趨勢向下,量能萎縮,不適合進(jìn)場',DRAWNULL)))))))))))))))))))))));
解盤文字2:=IF(解盤16=1,'該股走勢太弱,沒有參與價(jià)值',IF(解盤18=1,' 如前期經(jīng)過一輪下跌,此時(shí)為最佳買點(diǎn),但如果前期有過一段漲幅則介入需謹(jǐn)慎',
IF(解盤20=1,' 可以考慮短線進(jìn)場,倉位在1/2左右,一旦量能放大可以加倉買入',DRAWNULL)));
DRAWTEXT(CURRBARSCOUNT=75{位置} AND (解盤1=1 OR 解盤2=1 OR 解盤3=1 OR 解盤4=1 OR 解盤5=1 OR 解盤6=1 OR 解盤7=1 OR
解盤8=1 OR 解盤9=1 OR 解盤10=1 OR 解盤11=1 OR 解盤12=1 OR 解盤13=1 OR 解盤14=1 OR 解盤15=1 OR 解盤17=1 OR
解盤19=1 OR 解盤21=1 OR 解盤22=1 OR 解盤23=1 OR 解盤24=1 OR 解盤25=1 OR 解盤26=1),(KDAT*0.99),解盤文字1),COLOR00FFFF;
DRAWTEXT(CURRBARSCOUNT=75{位置} AND (解盤16=1 OR 解盤18=1 OR 解盤20=1),IF(解盤18=1 OR 解盤20=1,KDAT*0.98,KDAT*0.96),解盤文字2),COLOR00FFFF;
DRAWRECTREL(0,500,147,999.4,IF(120,RGB(10,0,0),0));
超B:=L2_AMO(0,2)/10000.0;
大B:=L2_AMO(1,2)/10000.0;
中B:=L2_AMO(2,2)/10000.0;
小B:=L2_AMO(3,2)/10000.0;
超S:=L2_AMO(0,3)/10000.0;
大S:=L2_AMO(1,3)/10000.0;
中S:=L2_AMO(2,3)/10000.0;
小S:=L2_AMO(3,3)/10000.0;
TESTSKIP(NOT(超B OR 大B OR 中B OR 小B OR 超S OR 大S OR 中S OR 小S)!=0);
大宗進(jìn):=(超B)+(大B),NODRAW;
大宗出:=(超S)+(大S),NODRAW;
非大宗進(jìn):=(中B)+(小B),NODRAW;
非大宗出:=(中S)+(小S),NODRAW;
大宗進(jìn)限制:=IF((超B+大B)=0,0,大宗進(jìn));
大宗出限制:=IF((超S+大S)=0,0,大宗出);
非大宗進(jìn)限制:=IF(中B+小B=0,0,非大宗進(jìn));
非大宗出限制:=IF(中S+小S=0,0,非大宗出);
主力凈流入:=(超B+大B)-(超S+大S),COLORRED,NODRAW;
散戶凈流入:=(中B+小B)-(中S+小S),COLORRED,NODRAW;
凈流入:=(超B+大B+中B+小B)-(超S+大S+中S+小S),COLORRED,NODRAW;
大單流入:=(超B+大B)/(超B+大B+超S+大S)*100,NODRAW;
大單流入限制:=IF((超B+大B+超S+大S)=0,0,大單流入);
大單流出比:=(超S+大S)/(超B+大B+超S+大S)*100,NODRAW;
大單流出限制:=IF((超B+大B+超S+大S)=0,0,大單流出比);
總流入比:=(超B+大B+中B+小B)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW;
總流出比:=(超S+大S+中S+小S)/(超B+大B+中B+小B+超S+大S+中S+小S)*100,NODRAW;
成交總量:=(超B+大B+中B+小B+超S+大S+中S+小S),NODRAW;
機(jī)構(gòu)參與度:=(超B+超S+大B+大S)/成交總量*100,COLORYELLOW,NODRAW;
大單強(qiáng)度:=(超B+大B-超S-大S)/成交總量*100,COLORYELLOW,NODRAW;
大單強(qiáng)度限制:=IF(大單強(qiáng)度=0,-100,大單強(qiáng)度);
大單強(qiáng)度比:=IF(大單強(qiáng)度>=0,(大單強(qiáng)度限制+100)/2,100-ABS((大單強(qiáng)度限制-100)/2)),NODRAW;
超單強(qiáng)度:=(超B-超S)/(超B+超S)*100,COLORYELLOW,NODRAW;
超單強(qiáng)度限制:=IF(超單強(qiáng)度=0,-100,超單強(qiáng)度);
超單強(qiáng)度比:=IF(超單強(qiáng)度>0,(超單強(qiáng)度限制+100)/2,IF(超單強(qiáng)度<0,100-ABS((超單強(qiáng)度限制-100)/2),0)),NODRAW;
DAZHIV:=CONST(MAX(ABS(大宗進(jìn)),MAX(ABS(大宗出),MAX(ABS(非大宗進(jìn)),ABS(非大宗出))))),NODRAW;
DRAWRECTREL(0,CONST(930-(ABS(大宗進(jìn))*250/DAZHIV)),35,950,IF(CONST(大宗進(jìn)>0),RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(37,CONST(930-(ABS(大宗出)*250/DAZHIV)),72,950,IF(CONST(大宗出>0),RGB(23,125,255),RGB(255,0,0)));
DRAWRECTREL(75,CONST(930-(ABS(非大宗進(jìn))*250/DAZHIV)),110,950,IF(CONST(非大宗進(jìn)>0),RGB(255,0,0),RGB(23,125,255)));
DRAWRECTREL(112,CONST(930-(ABS(非大宗出)*250/DAZHIV)),147,950,IF(CONST(非大宗出>0),RGB(23,125,255),RGB(255,0,0)));
DRAWRECTREL(150,CONST(940-(ABS(凈流入)*250/DAZHIV))-20,190,950,IF(CONST(凈流入>0),RGB(200,0,0),RGB(0,125,50)));
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.0001,0.9,0,STRCAT('',CON2STR(大宗進(jìn)/1,0))),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.036,0.9,0,STRCAT('',CON2STR(大宗出/1,0))),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.074,0.9,0,STRCAT('',CON2STR(非大宗進(jìn)/1,0))),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.111,0.9,0,STRCAT('',CON2STR(非大宗出/1,0))),COLORYELLOW;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.150,0.9,0,STRCAT('',CON2STR(凈流入/1,0))),COLORYELLOW;
DRAWTEXT_FIX(1,0.000,0.99,0,STRCAT(STRCAT('主力 ',CON2STR(主力凈流入,0)),'萬')),COLORMAGENTA;
DRAWTEXT_FIX(1,0.078,0.99,0,STRCAT(STRCAT('散戶 ',CON2STR(散戶凈流入,0)),'萬')),COLORCYAN;
DRAWTEXT_FIX(CURRBARSCOUNT=1,0.145,0.99,0,'凈流入:(萬)'),COLORYELLOW;
主力買力度:=LARGEINTRDVOL*1000/VOL;
主力賣力度:=LARGEOUTTRDVOL*1000/VOL;
AAD:=CONST(MAX(ABS(主力買力度),ABS(主力賣力度)))*4,NODRAW;
DRAWRECTREL(0,515,CONST(ABS(主力買力度)*560/AAD),568,IF(CONST(主力買力度)>0,RGB(255,0,0),RGB(0,50,0)));
DRAWRECTREL(0,570,CONST(ABS(主力賣力度)*560/AAD),623,IF(CONST(主力賣力度)>0,RGB(0,50,0),RGB(255,0,0)));
DRAWTEXT_FIX(1,0,0.524,0,STRCAT('主買力度:',CON2STR(主力買力度,0))),COLORYELLOW;
DRAWTEXT_FIX(1,0,0.576,0,STRCAT('主賣力度:',CON2STR(主力賣力度,0))),COLORYELLOW;
聯(lián)系客服