AA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN))/5000;
買(mǎi)量:=IF(CLOSE>OPEN,AA*(HIGH-LOW),IF(CLOSE<OPEN,AA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2));
賣(mài)量:=IF(CLOSE>OPEN,0-AA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AA*(HIGH-LOW),0-VOL/2));
進(jìn)出量:=買(mǎi)量+賣(mài)量;
今DDX:進(jìn)出量,COLORRED,NODRAW,LINETHICK1;
昨DDX:REF(今DDX,1),COLORGREEN,NODRAW,LINETHICK1;
倍DDX:今DDX/昨DDX,COLOR00FFFF,NODRAW,LINETHICK1;
STICKLINE(進(jìn)出量<0,0,進(jìn)出量,1.9,0),COLORFF6600;
STICKLINE(進(jìn)出量<0,0,進(jìn)出量,1.4,0),COLORFF9900;
STICKLINE(進(jìn)出量<0,0,進(jìn)出量,0.9,0),COLORFFCC00;
STICKLINE(進(jìn)出量<0,0,進(jìn)出量,0.4,0),COLORCYAN;
{仿指南針 機(jī)構(gòu)}
DC:=(2*CLOSE+HIGH+LOW+OPEN)/5;
EMDC:=EMA(EMA(EMA(DC,4),4),4);
AA3:= (EMDC-REF(EMDC,1))/REF(EMDC,1)*100, ;
BA:= MA(AA3,2);
機(jī)構(gòu):(AA3-BA)*30000,COLORRED,NODRAW;
昨機(jī):REF(機(jī)構(gòu),1),COLORGREEN,NODRAW,LINETHICK1;
前機(jī):REF(昨機(jī),1),COLOR00FFFF,NODRAW,LINETHICK1;
STICKLINE(進(jìn)出量>0,0,進(jìn)出量,1.9,0),COLOR000099;
STICKLINE(進(jìn)出量>0,0,進(jìn)出量,1.4,0),COLOR0000CC;
STICKLINE(進(jìn)出量>0,0,進(jìn)出量,0.9,0),COLOR0000FF;
STICKLINE(進(jìn)出量>0,0,進(jìn)出量,0.4,0),COLORCC66FF;
{仿指南針 散戶(hù)}
CC3:=EMA(CLOSE,5)-EMA(CLOSE,55);
DD3:=EMA(CC3,10);
散戶(hù):(CC3-DD3)*20000,COLORRED,NODRAW;
昨散:REF(散戶(hù),1),COLORGREEN,NODRAW,LINETHICK1;
前散:REF(昨散,1),COLOR00FFFF,NODRAW,LINETHICK1;
{用法:雙方資金流向一致看漲}
{滿(mǎn)倉(cāng)}
MA2:=EMA(C,2);
MA5:=EMA(C,5);
EMA13:=EMA(C,13);
EMA30:=EMA(C,30);
YCX:=MA5>=REF(MA5,1);
H5:=MAX(MAX(MA5,EMA13),EMA30);
L5:=MIN(MIN(MA5,EMA13),EMA30);
一陽(yáng)穿三線:= H5<C AND O<L5 AND YCX AND MA2>REF(MA2,1);
IF(一陽(yáng)穿三線,18,0),COLORFFFF00,DOTLINE,LINETHICK1;
DRAWTEXT(一陽(yáng)穿三線,10,'滿(mǎn)倉(cāng)'),COLORFFFF00;
{青云}
AA05:=MA(C,5);
五日乖離率:=(C-AA05)/AA05*100;
AA30:=MA(C,30);
三拾日乖離率:=(C-AA30)/AA30*100;
MR:=COUNT(CROSS(五日乖離率,0),3)>=1 AND 三拾日乖離率>REF(三拾日乖離率,1) AND AA05>REF(AA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<AA30;
IF(FILTER(MR,10),-18,0),COLOR00FFFF,DOTLINE,LINETHICK1;
DRAWTEXT(FILTER(MR,10),-10,'青云'),COLOR00FFFF;
0,COLORCBCBC0;
{
選股公式:
MA2:=EMA(C,2);
MA5:=EMA(C,5);
EMA13:=EMA(C,13);
EMA30:=EMA(C,30);
YCX:=MA5>=REF(MA5,1);
H5:=MAX(MAX(MA5,EMA13),EMA30);
L5:=MIN(MIN(MA5,EMA13),EMA30);
一陽(yáng)穿三線:H5<C AND O<L5 AND YCX AND MA2>REF(MA2,1);
}