{莊家吸籌}
MA15:=EMA(CLOSE,21);
VAR11:=IF(YEAR>=2038 AND MONTH>=1,0,1);
VAR21:=REF(LOW,1)*VAR11;
VAR31:=SMA(ABS(LOW-VAR21),3,1)/SMA(MAX(LOW-VAR21,0),3,1)*100*VAR11;
VAR41:=EMA(IF(CLOSE*1.3,VAR31*10,VAR31/10),3)*VAR11;
VAR51:=LLV(LOW,30)*VAR11;
VAR61:=HHV(VAR41,30)*VAR11;
VAR71:=IF(MA(CLOSE,58),1,0)*VAR11;
VAR81:=EMA(IF(LOW<=VAR51,(VAR41+VAR61*2)/2,0),3)/618*VAR71*VAR11;
主力吸籌22:IF(VAR81>100,100,VAR81)*VAR11,COLORFF00FF;
莊家吸籌22:STICKLINE(主力吸籌22>-150,0,主力吸籌22,1,0),COLORFF00FF;
A1:=3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,2)-2*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,2);
牛線:EMA(A1,5),LINETHICK1,COLORYELLOW;
熊線:100-EMA(A1,5),LINETHICK1,COLOR00FF00;
A2:=(牛線-REF(牛線,1))/REF(牛線,1)*100;
A3:=EMA(C,5);
A4:=((C-LLV(L,21))/(HHV(H,21)-LLV(L,21)))*100;
猴線:(EMA(4*SMA(A4,6,1)-3*SMA(SMA(A4,5,1),5,1),2)),LINETHICK1,COLORRED;
莊家吸籌1:STICKLINE(猴線>100,100,猴線,1,0),COLORGREEN;
莊家吸籌2:STICKLINE(猴線<0,0,猴線,1,0),COLORGREEN;
A5:=(HHV(H,60)-C)/(HHV(H,60)-LLV(L,60))*100;
DRAWTEXT(FILTER(REF(牛線,1)>90 AND A2<0,7),牛線,'跑'),COLOR00FF00;
DRAWTEXT(CROSS(猴線,牛線)AND 牛線>20 AND 牛線 DRAWTEXT(CROSS(猴線,0)AND 牛線<40,5,'大黑馬');
底部:(A2<-10 AND A2>REF(A2,1))*25,COLORRED;
機會來臨:REF(IF((MA(C,5)-C)/C>0.04 AND (MA(C,10)-MA(C,5))/MA(C,5)>0.04,30,0),1),LINETHICK2,COLORE66878;
大勢已去:IF(CROSS(牛線,A1)AND 牛線>70 AND 猴線>80,90,100),LINETHICK2,COLORE66878;
DRAWTEXT(CROSS(猴線,牛線)AND 牛線>20 AND 牛線 A:=CROSS(猴線,牛線) AND CROSS(猴線,熊線);
B:=CROSS(猴線,牛線) AND CROSS(牛線,熊線);
DRAWTEXT(A AND B,牛線,’騎馬找牛’);
50,LINETHICK3,COLORE66878,POINTDOT;
牛市開始:=CROSS(牛線,熊線);
DRAWTEXT(牛市開始,熊線,’牛市’);
馬市開始:=CROSS(猴線,熊線);
DRAWTEXT(馬市開始,熊線,’馬市’);
猴市開始:=CROSS(猴線,牛線);
DRAWTEXT(猴市開始,牛線,’猴市’);
DRAWTEXT(ISLASTBAR,牛線,’ 牛線’),COLORYELLOW;
DRAWTEXT(ISLASTBAR,熊線,’ 熊線’),COLORYELLOW;
DRAWTEXT(ISLASTBAR,猴線,’ 猴線’),COLORYELLOW;
-6,,LINETHICK0;