{智能主图源码如下}
MID:=(3*CLOSE+OPEN+LOW+HIGH)/6;
牛线:(20*MID+19*REF(MID,1)+18*REF(MID,2)+
17*REF(MID,3)+16*REF(MID,4)+15*REF(MID,5)+
14*REF(MID,6)+13*REF(MID,7)+12*REF(MID,8)+
11*REF(MID,9)+10*REF(MID,10)+9*REF(MID,11)+
8*REF(MID,12)+7*REF(MID,13)+6*REF(MID,14)+
5*REF(MID,15)+4*REF(MID,16)+3*REF(MID,17)+
2*REF(MID,18)+REF(MID,20))/210,COLORRED;
马线:MA(牛线,5),COLORGREEN;
五日线:MA(CLOSE,5),POINTDOT,COLORLIBLUE;
日线:=MA(CLOSE,60),COLORBLUE;
STICKLINE((C-REF(C,1))/REF(C,1)>0.095 AND C=H,C,O,3,0),COLORMAGENTA;
STICKLINE((C-REF(C,1))/REF(C,1)>0.07 AND (C-REF(C,1))/REF(C,1)<0.095,C,O,3,0),COLORYELLOW;
STICKLINE((REF(C,1)-C)/ REF(C,1) >0.097 AND C=L,C,O,3,0),COLORGREEN;
STT:=COUNT(ABS((C-REF(C,1)))/REF(C,1)>0.054,120)=0;
STICKLINE(RANGE((C-REF(C,1))/REF(C,1),0.046,0.053) AND STT AND C=H,C,O,3,0), COLORMAGENTA;
STICKLINE(RANGE((REF(C,1)-C)/ REF(C,1),0.047,0.052) AND STT AND C=L,C,O,3,0),COLORGREEN;
水平面:MA(CLOSE,60),POINTDOT,COLORYELLOW;
买:=CROSS(牛线,马线);
卖:=CROSS(马线,牛线);
DRAWICON(买,L*0.97,1);
DRAWTEXT(买,L*0.95,'B'),COLORYELLOW;
DRAWICON(卖,H*1.03,2);
DRAWTEXT(卖,H*1.05,'S'),COLORWHITE;
{主力追踪源码如下}
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
主力:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+
16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+
13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+
10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+
7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+
4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED;
{捕捞季节源码如下}
DRAWTEXT_FIX(1,0.0,0.00,0,'');
WY1001:=(2*CLOSE+HIGH+LOW)/4;
WY1002:=EMA(WY1001,4);
WY1003:=EMA(WY1002,4);
WY1004:=EMA(WY1003,4);
XYS0:=(WY1004-REF(WY1004,1))/REF(WY1004,1)*100;
STICKLINE(XYS0>=0,XYS0,0,2,0),COLORRED;
STICKLINE(XYS0<0,XYS0,0,2,0),COLORGREEN;
PJGJ:=AMOUNT/VOL/100;
SSRYDJX:=MA(PJGJ,13);
SSRCJL:=EMA(VOL,13);
SSRCJE:=EMA(AMOUNT,13);
SSRCBJX:=SSRCJE/SSRCJL/100;
CYS13:=(CLOSE-SSRCBJX)/SSRCBJX*100;
XYSHSL:=EMA(VOL/CAPITAL*100,13);
ZZX:=0;
STICKLINE(XYSHSL>6.1 AND CYS13>5 ,2 ,0 ,2 ,0 ),COLORGREEN;
STICKLINE(XYSHSL>3.8 AND CYS13>5 ,1.5 ,0 ,2 ,0 ),COLORYELLOW;
STICKLINE(XYSHSL>2.1 AND CYS13>5 ,1 ,0 ,2 ,0 ),COLORCYAN;
STICKLINE(XYSHSL>1.8 AND CYS13>5 ,0.5 ,0 ,2 ,0 ),COLORBLUE;
XYS1:MA(XYS0,1),COLORMAGENTA;
XYS2:MA(XYS0,2),COLORADFF2F;
DRAWICON(CROSS(XYS1,XYS2),XYS2,7);
DRAWICON(CROSS(XYS2,XYS1),XYS1,8);
{空转强源码如下}
VAR1:=REF(LOW,1);
VAR2:=SMA(ABS(LOW-VAR1),3,1)/SMA(MAX(LOW-VAR1,0),3,1)*100;
VAR3:=EMA(IF(CLOSE*1.2,VAR2*10,VAR2/10),3);
VAR4:=LLV(LOW,38);
VAR5:=HHV(VAR3,38);
VAR6:=IF(LLV(LOW,90),1,0);
VAR7:=EMA(IF(LOW<=VAR4,(VAR3+VAR5*2)/2,0),3)/618*VAR6;
底部吸筹: STICKLINE(VAR7,0,VAR7,6,1),COLORYELLOW ;
V1:=LLV(H,240); 飞鱼:100*(C-V1)/V1,COLORRED,LINETHICK1;
V2:=HHV(H,240); 海洋:100*(V2-C)/C,COLORGREEN,LINETHICK1;
V3:=SUM(VOL,5)/CAPITAL;
CYF5:=100-(100/(1+V3));
{主力控盘度源码如下}
B1:=(HHV(H,N)-C)/(HHV(H,N)-LLV(LOW,N))*100- M;
B2:=SMA(B1,N,1)+100;
B3:=(C-LLV(L,N))/(HHV(H,N)- LLV(L,N))*100;
B4:=SMA(B3,3,1);
B5:=SMA(B4,3,1)+100;
B6:=B5-B2;
控盘程度:(IF(B6>N1,B6-N1,0))*2.5,COLORYELLOW;
控盘度:100,COLORRED;
STICKLINE( 控盘程度,0,控盘程度 ,1,0 ),COLOR00FFFF;
STICKLINE( 控盘程度 AND 控盘程度>100,100,控盘程度 ,1,0 ),COLORRED;
