HJ_1:=(2*CLOSE+HIGH+LOW+OPEN)/5;HJ_2:=EMA(EMA(EMA(HJ_1,4),4),4);HJ_3:=(HJ_2-REF(HJ_2,1))/REF(HJ_2,1)*100;HJ_4:=MA(HJ_3,2);HJ_5:=(HJ_3-HJ_4)*30000+40000;资金:(HJ_3-HJ_4)>0,volSTICK NODRAW;资金2:(HJ_3-HJ_4)<0,VOLSTICK NODRAW;HJ_6:=EMA(CLOSE,5)-EMA(CLOSE,55);HJ_7:=EMA(HJ_6,10);HJ_8:=(HJ_6-HJ_7)*20000+20000;资金3:(HJ_6-HJ_7)>0,VOLSTICK NODRAW;资金4:(HJ_6-HJ_7)<0,VOLSTICK NODRAW;STICKLINE(资金3 AND 资金,0,100,3,0), COLORYELLOW;STICKLINE(资金3 AND 资金,0,100,2.6,0), COLORRED;STICKLINE(资金2,0,100,3,0), COLORGREEN;STICKLINE(资金4,0,100,3,0), COLORGREEN;机构资金:(HJ_3-HJ_4)*30000+40000,COLORYELLOW NODRAW;DRAWTEXT(ISLASTBAR,90,' 红加'),COLOR7800FF ;敢死队资金:(HJ_6-HJ_7)*20000+20000,COLORMAGENTA NODRAW;DRAWTEXT(ISLASTBAR,40,' 机构'),COLOR7800FF ;AAV:=VOL/((H-L)*2-Abs(C-O))NODRAW;KKPU1:=IF(C>OPEN,AAV*(HIGH-LOW),IF(C<OPEN,AAV*((HIGH-OPEN)+(C-LOW)),VOL/2)),NODRAW;KKPU2:=IF(C>OPEN,0-AAV*((HIGH-C)+(OPEN-LOW)),IF(C<OPEN,0-AAV*(HIGH-LOW),0-VOL/2)),NODRAW;净流入:=(KKPU1+KKPU2)/99,NODRAW;KKPU3:=(C/REF(C,1)-1)*100;A进:DRAWTEXT(净流入>=200 AND KKPU3>=3,L*0.995,VARCAT(VARCAT('净买:',VAR2STR(净流入,0)),'万')),COLORYELLOW NODRAW;B出:DRAWTEXT(净流入<-200 AND KKPU3<=-2,H*1.01,VARCAT(VARCAT('流出:',VAR2STR(净流入,0)),'万')),COLORGREEN NODRAW;STICKLINE(A进,0,60,3,0),COLORRED;STICKLINE(A进,0,60,2.5,0),COLORYELLOW;STICKLINE(B出,0,100,3,0),COLORGREEN;VAR2:=(CLOSE-LLV(LOW,24))/(HHV(HIGH,24)-LLV(LOW,24))*200*10 NODRAW;能量: SMA(VAR2,5,1)/100,COLORRED NODRAW;DRAWBAND(能量>REF(能量,1),RGB(250,0,120),0,RGB(0,180,180))NODRAW;STICKLINE(能量>REF(能量,1),0,30,3.2,0),COLOR7800FF; STICKLINE(能量<REF(能量,1),0,30,3.2,0),COLORFF7800; X_1:=(CLOSE-EMA(CLOSE,5))/EMA(CLOSE,5)*100;X_2:=(CLOSE-EMA(CLOSE,10))/EMA(CLOSE,10)*100;X_3:=(CLOSE-EMA(CLOSE,20))/EMA(CLOSE,20)*100;X_4:=(CLOSE-EMA(CLOSE,60))/EMA(CLOSE,60)*100;X_5:=(CLOSE-EMA(CLOSE,120))/EMA(CLOSE,120)*100;X_6:=X_1>1 AND X_2>2 AND X_3>3 AND X_4>4;X_7:=X_1>2 AND X_2>4 AND X_3>6 AND X_4>8;X_8:=X_1>3 AND X_2>5 AND X_3>7 AND X_4>9;X_9:=X_1>4 AND X_2>6 AND X_3>8 AND X_4>10 AND X_5>12;X_10:=BArslASTCOUNT(X_7)=1 AND crOSS(CLOSE,EMA(CLOSE,50)*3.19) AND HIGH/CLOSE<1.05;小鱼:BARSLASTCOUNT(X_6)*3.5,NODRAW,COLORWHITE;红鱼:BARSLASTCOUNT(X_7)*3.5,NODRAW,COLORRED;紫鱼:BARSLASTCOUNT(X_8)*3.5,NODRAW,COLORMAGENTA;黄鱼:BARSLASTCOUNT(X_9)*3.5,NODRAW,COLORYELLOW;DRAWBAND(0,RGB(0,235,235),0,RGB(0,0,0));STICKLINE(X_6,0,小鱼*3,(-3),(-3)),COLORCYAN;STICKLINE(X_7,0,红鱼*3.5,(-3),0),COLORRED;STICKLINE(X_8,0,紫鱼*3.5,(-3),0),COLORMAGENTA;STICKLINE(X_8,0,黄鱼*3.5,(-3),0),COLOR00AAAA;STICKLINE(X_8,0,黄鱼*3.5,1,0),COLORYELLOW;STICKLINE(X_10,小鱼*3.5+1,小鱼*3.5+2,(-3),0),COLOR00AA00;STICKLINE(X_10,小鱼*3.5+1,小鱼*3.5+2,1,0),COLORGREEN;A5:=34;B5:=3;RRR1:=EMA(100*(CLOSE-LLV(LOW,A5))/(HHV(HIGH,A5)-LLV(LOW,A5)),B5)/4,COLORFFFF00,LINETHICK2;分界线:RRR1, NODRAW;STICKLINE((CROSS(21.5,分界线)),0,100,3,0), COLORGREEN NODRAW;DRAWICON(CROSS(21.5,分界线),21.H*2.8,8);STICKLINE((CROSS(23.16,分界线)),0,45,3,0), COLORGREEN;STICKLINE((CROSS(23.16,分界线)),0,45,1.5,0), COLORBLUE;DRAWICON(CROSS(23.16,分界线),23.L*3.5,15);B:DRAWICON(RANGE(topRANGE(V),87,50000) AND C<O,100,2)DRAWAbovE,COLORRED;STICKLINE(B,0,45,3,0),COLORBLUE;B2:DRAWICON(RANGE(TOPRANGE(V),87,50000) AND C<O,100,2)DRAWABOVE,COLORRED;沪A涨家数:="999999$ADVANCE",COLORRED,NODRAW;沪A跌家数:="999999$DECLINE",COLORGREEN,NODRAW;深A涨家数:="399001$ADVANCE",COLORRED,NODRAW;深A跌家数:="399001$DECLINE",COLORGREEN,NODRAW;上涨总家数:=沪A涨家数+深A涨家数,COLORRED,NODRAW;下跌总家数:=沪A跌家数+深A跌家数,COLORGREEN,NODRAW;上涨总家数比:=上涨总家数/(上涨总家数+下跌总家数)*100,COLORRED,NODRAW;下跌总家数比:=下跌总家数/(上涨总家数+下跌总家数)*100,COLORGREEN,NODRAW;AAA1B:=STRCAT(STRCAT('上涨总家数比 ',CON2STR(上涨总家数比,0)),' %');DRAWTEXT_FIX(ISLASTBAR,0.01,0.69,0,AAA1B),COLORWHITE;AAA2B:=STRCAT(STRCAT('下跌总家数比 ',CON2STR(下跌总家数比,0)),' %');DRAWTEXT_FIX(ISLASTBAR,0.01,0.89,0,AAA2B),COLORBLUE;A:=C/REF(C,1)>1.048 AND C=H AND BETWEEN(FORCAST(V,4),0.2*FORCAST(V,12),2.1*FORCAST(V,12));首板:FILTER(A,28);A00:=SUM(IF((CLOSE> REF(CLOSE,1.000)),VOL,IF((CLOSE<REF(CLOSE,1.000)),(0-VOL),0)),0);A01:=SUMBARS(VOL,CAPITAL);A02:=IF((CLOSE>LLV(CLOSE,A01)),1.000,(0-1.000))*IF((A00 >LLV(A00,A01)),1.000,(0-1.000));A03:=(COUNT((IF((A02=(0-1.000)),1.000,0)=1.000),8.000)>2.000);A04:=((CLOSE-DMA((((3.000 * HIGH + LOW)+OPEN)+2.000 * CLOSE)/7.000,VOL/SUM(AMOUNT,13.000)/AMOUNT/VOL/100.000/100.000))/DMA((((3.000*HIGH+LOW)+OPEN)+2.000*CLOSE)/7.000,VOL/SUM(AMOUNT,13.000)/AMOUNT/VOL/100.000/100.000)*100.000<(0-18.000));A05:=((CLOSE-MIN(REF(CLOSE,5.000)*0.865,REF(CLOSE,21.000)*0.772))/CLOSE<0.009);A06:=((A03 AND A04) AND A05)NODRAW;STICKLINE(A06,0,100,8,0),COLORMAGENTA;
