通達信分時牛熊圖

　　{分時牛熊}

　　買賣:=((sum(if(time>93000,transactvol(1,0),0),0)-sum(if(time>93000,transactvol(2,0),0),0))/(sum(if(time>93000,transactvol(1,0),0),0)+sum(if(time>93000,transactvol(2,0),0),0)));

　　k8:=barslast(sum(if(time>93000,transactnum(1,0)-transactnum(2,0),0),0)>llv(sum(if(time>93000,transactnum(1,0)-transactnum(2,0),0),0),0))<3 and barslast(sum(if(time>93000,ORDERNUM(2,0)-ORDERNUM(1,0),0),0)>llv(sum(if(time>93000,ORDERNUM(2,0)-ORDERNUM(1,0),0),0),0))<3;

　　k11:=barslast(sum(if(time>93000,transactnum(1,0)-transactnum(2,0),0),0)>0)<3 and barslast(sum(if(time>93000,ORDERNUM(2,0)-ORDERNUM(1,0),0),0)>0)<3;

　　k14:=barslast(sum(if(time>93000,transactnum(1,0)-transactnum(2,0),0),0)>=hhv(sum(if(time>93000,transactnum(1,0)-transactnum(2,0),0),0),0))<3 and barslast(sum(if(time>93000,ORDERNUM(2,0)-ORDERNUM(1,0),0),0)>=hhv(sum(if(time>93000,ORDERNUM(2,0)-ORDERNUM(1,0),0),0),0))<3;

　　k17:=high/dynainfo(4)<(1+3/100);

　　k22:=barslast(cross(買賣,0))<3 and LAST(買賣>0)>1;

　　k23:=barslast(cross(sum(if(time>93000,transactnum(1,0)-transactnum(2,0),0),0),sum(if(time>93000,ORDERNUM(2,0)-ORDERNUM(1,0),0),0)))<3;

　　k25:=k17 and k22 and k23 and k14 and k8 and k11;

　　vertline(k25,0),LINETHICK5,coloryellow;

　　主動率:(SUM(TRANSACTNUM(1,0),0)-SUM(TRANSACTNUM(2,0),0))/(SUM(TRANSACTNUM(1,0),0)+SUM(TRANSACTNUM(2,0),0)),LINETHICK3,coloryellow;

　　FILLRGN(0,主動率,主動率>0,rgb(80,0,0),主動率<=0,rgb(0,55,55)),LINETHICK2,PRECIS0;

　　VAR1:=EMA(EMA(CLOSE,13),13);

　　控盤:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1000;

　　JJ:=DYNAINFO(11);

　　P:=55;

　　S:=8;

　　M1:=3;

　　財:=(EMA(CLOSE,S)-EMA(CLOSE,P))*10;

　　神:=EMA(財,M1);

　　BTJ11:=(C-JJ)/JJ<-0.03;

　　BTJ2:=控盤>REF(控盤,1) AND 控盤<-0.2;

　　BTJ3:=CROSS(財,神) AND 財<-0.3;

　　BTJ811:=FILTER(BTJ11 AND BTJ2 AND BTJ3,13);

　　莊:= BTJ11 AND BTJ2 AND BTJ3;

　　有莊:FILTER(莊,55);

　　DRAWTEXT(BTJ811,有莊,'有莊'),COLORMAGENTA,ALIGN1;

　　A1:=DYNAINFO(23) / DYNAINFO(22);

　　A2:=DYNAINFO(17);

　　DRAWTEXTREL(220,520,IFS((A1 >= 1),'能量:'+NUMTOSTRN(A1,2)+' 量比: '+NUMTOSTRN(A2,2),'')),linethick7,colorRED;

　　DRAWTEXTREL(220,520,IFS((A1 < 1),'能量:'+NUMTOSTRN(A1,2)+' 量比: '+NUMTOSTRN(A2,2),'')),linethick7,colorRED;

　　{分時秘密}

　　K1:=EMA(CLOSE,21)-EMA(CLOSE,453);

　　多:K1*10,COLORFFFFFF,PRECIS1;

　　空:EMA(K1*10,55),COLOR00FFFF,PRECIS1;

　　界:2,COLORFFFF00,PRECIS1;

　　軸:0,COLORFF0000,PRECIS1;

　　K3:=CROSS(K1*10,空) AND 空>=0;

　　K4:=K3 AND CLOSE>DYNAINFO(3);

　　K5:=(K1*10)+5;

　　DRAWTEXT(K4,K5,'買'),COLOR00FF00;

　　K6:=CROSS(K1*10,2) AND CLOSE>DYNAINFO(3);

　　DRAWTEXT(K6,4,'追'),COLOR00FFFF;

　　K7:=EMA(CLOSE,500)-REF(EMA(CLOSE,500),1);

　　K8:=K7/REF(EMA(CLOSE,500),1);

　　K9:=(K7/REF(EMA(CLOSE,500),1))*100;

　　K10:=EMA(K8*100,120)-0.0004;

　　K11:=EMA(K8*100,200);

　　K12:=CROSS(K10,K11) AND CLOSE>DYNAINFO(3);

　　K13:=K12 AND K1*10>0.6;

　　DRAWICON(K13,5,12),COLORFFFFFF;

　　K14:=SUM(AMOUNT,BARSCOUNT(CLOSE))/SUM(VOL*100,BARSCOUNT(CLOSE));

　　K15:=BETWEEN(CLOSE/K14,1.05,0.95)=0;

　　K16:=MA(CLOSE,BARSCOUNT(CLOSE));

　　K17:=CROSS(CLOSE/IF(K15,K16,K14),1.03);

　　STICKLINE(K17,2,5,6,0),COLORFF00FF;

　　K18:=((DYNAINFO(6)-LOW)+0.01)/((HIGH-LOW)+0.01);

　　K19:=IF(HIGH

　　K20:=IF(LOW>DYNAINFO(6),0,K19);

　　K21:=100*(CLOSE-REF(LLV(CLOSE,120),1))/(REF(HHV(CLOSE,120),1)-REF(LLV(CLOSE,120),1));

[1] [2] 下一頁