自用分时附图组合
{n:1 100 20 m:1 100 40}
DRAWGBK(C>0, RGB(0,10,10),RGB(48,0,0),0,'11',0);
VAR1:=((CLOSE - LLV(LOW,50))/(HHV(HIGH,50) - LLV(LOW,50)))*(100);
VAR2:=REVERSE(VAR1);
VAR3:=SMA(VAR1,6,1);
K:=SMA(VAR3,4,1);
D:=SMA(K,4,1);
STICKLINE((K >= D),K,D,6,0),COLOR0000A8;
STICKLINE((K >= D),K,D,5,0),COLOR0000C0;
STICKLINE((K >= D),K,D,4,0),COLOR0000E0;
STICKLINE((K >= D),K,D,3,0),COLOR0000F0;
STICKLINE((K >= D),K,D,2,0),COLOR0000D0;
STICKLINE((K >= D),K,D,1,0),COLOR8080FF;
STICKLINE((K <= D),K,D,6,0),COLOR008800;
STICKLINE((K <= D),K,D,5,0),COLOR009900;
STICKLINE((K <= D),K,D,4,0),COLOR00AA00;
STICKLINE((K <= D),K,D,3,0),COLOR00BB00;
STICKLINE((K <= D),K,D,2,0),COLOR00CC00;
STICKLINE((K <= D),K,D,1,0),COLOR00DD00;
顶:90;
底:10;
敢死队:=
(EXPMA(CLOSE,500)-REF(EXPMA(CLOSE,500),1))/REF(EXPMA(CLOSE,500),1)
*100, COLORSTICK;
主
力:=EXPMA( (EXPMA(CLOSE,500)-REF(EXPMA(CLOSE,500),1))/REF(EXPMA(C
LOSE,500),1)*100,120)-0.0004,LINETHICK2,COLORMAGENTA;
散
户:=EXPMA( (EXPMA(CLOSE,500)-REF(EXPMA(CLOSE,500),1))/REF(EXPMA(C
LOSE,500),1)*100,200),LINETHICK2,COLORGREEN;
DRAWICON(CROSS(EXPMA(敢死队,120)-0.0004,EXPMA(敢死队,200)),45,11);
DRAWTEXT(CROSS(EXPMA(敢死队,120)-0.0004,EXPMA(敢死队,200)),40,'敢死
队'),COLORRED;
A11:=(DVOL/CLOSE)/2;
A21:=SUM(IF(A11>100 AND CLOSE>REF(CLOSE,1),A11,0),0);
A31:=SUM(IF(A11>100 AND CLOSE<REF(CLOSE,1),A11,0),0);
A41:=SUM(IF(A11<100 AND CLOSE>REF(CLOSE,1),A11,0),0);
A51:=SUM(IF(A11<100 AND CLOSE<REF(CLOSE,1),A11,0),0);
A61:=A21+A31+A41+A51;
机买:=(A21/A61)*100,LINETHICK2,COLORRED;
机卖:=(A31/A61)*100,LINETHICK2,COLORGREEN;