{m3:2,100,3: 

m4:2,100,4;

m13:2,100,13;

m20:2,100,20;

m30:2,100,30;

m60:2,100,60}

 

 

MA3:MA(CLOSE,M3),COLORWHITE,LINETHICK2;
MA4:MA(CLOSE,M4),COLORGREEN,LINETHICK2;
MA13:MA(CLOSE,M13),COLORFF75FF,LINETHICK2;
MA20:MA(CLOSE,M20),COLORRED,LINETHICK1;
MA30:MA(CLOSE,M30),COLORYELLOW,LINETHICK1;
MA60:MA(CLOSE,M60),COLORBLUE,LINETHICK1;

 

 WW1:=FILTER(OPEN<REF(LOW,1) AND CLOSE>OPEN AND VOL>REF(VOL,1),13);
LC:=REF(CLOSE,1);
JH:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
SZ:=FILTER(CROSS(JH,35),13);
SX:=FILTER(CROSS(JH,30),7);
SQ:=FILTER(CROSS(71,JH)<0,74);
SD:=FILTER(CROSS(80,JH)<0,74);
AA:=IF(CAPITAL<1,SZ,SX);
BB:=IF(CAPITAL<1,SQ,SD);
W10:=BARSLAST(AA);
W11:=BARSLAST(BB);
W12:=IF(W10>0 AND W10<W11,W10,0);
W13:=IF(W11>0 AND W11<W10,W11,0);
{VERTLINE(AA),LINEDOT,COLOR0000FF;
VERTLINE(BB),LINEDOT,COLOR00FB00;}
STICKLINE(CLOSE>REF(CLOSE,1),HIGH,LOW,0,1),COLORRED;
STICKLINE(CLOSE>REF(CLOSE,1),CLOSE,OPEN,3,1),COLORRED;
STICKLINE(CLOSE<REF(CLOSE,1),HIGH,LOW,0,1),COLORGREEN;
STICKLINE(CLOSE<REF(CLOSE,1),CLOSE,OPEN,3,1),COLORGREEN;
STICKLINE(CLOSE=REF(CLOSE,1),HIGH,LOW,0,1),COLORFFFFFF;
STICKLINE(CLOSE=REF(CLOSE,1),CLOSE,OPEN,3,1),COLORBBBBBB;
STICKLINE(WW1,HIGH,LOW,0,0),COLOR00CCFF;{黃}
STICKLINE(WW1,CLOSE,OPEN,3,0),COLOR00CCFF;
STICKLINE(AA,HIGH,LOW,0,0),COLOR9900FF;{粉}
STICKLINE(AA,CLOSE,OPEN,3,0),COLORFF99FF;
{紅柱牛股.粉柱買(mǎi)入.黃柱洗盤(pán).綠柱賣(mài)出}
{解盤(pán)}
AAA:=CONST(HHV(H,90));
A74:=MA(CLOSE,20);
A75:=(CLOSE > MA(CLOSE,5));
A76:=(MA(CLOSE,5) > MA(CLOSE,10));
A77:=(CLOSE > MA(CLOSE,10));
A78:=(MA(CLOSE,5) > MA(CLOSE,20));
A79:=(CLOSE > MA(CLOSE,20));
A710:=REF(A74,1);
A711:=(A74 > A710);
AVX:=(((((IF(A75,10,(0 - 10)) + IF(A76,10,(0 - 10))) + IF(A77,10,(0 - 10)))
+ IF(A78,10,(0 - 10))) + IF(A79,10,(0 - 10))) + IF(A711,10,(0 - 10)));
DSLX:=(CLOSE / INDEXC);
DSLX1:=MA(DSLX,5);
DSLX2:=MA(DSLX,10);
V1:=MA(VOL,5);
V2:=MA(VOL,10);
T1:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
T2:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
T3:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)),1,0));
T4:=CONST(IF(C<200 AND ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)),1,0));
T5:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
T6:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
T7:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));
T8:=CONST(IF(C<200 AND ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));
T9:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
T10:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
T11:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));
T12:=CONST(IF(C<200 AND ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));
T13:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)),1,0));
T14:=CONST(IF( C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)),1,0));
T15:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)),1,0));
T16:=CONST(IF(C<200 AND ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)),1,0));
T17:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0));
T18:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 >= V2)),1,0));
T19:=CONST(IF(C>200 AND (CROSS(AVX,1) AND (V1 < V2)),1,0));
T20:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 >= V2)),1,0));
T21:=CONST(IF(C>200 AND (CROSS(1,AVX) AND (V1 < V2)),1,0));
T22:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)),1,0));
T23:=CONST(IF(C>200 AND (((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)),1,0));
T24:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)),1,0));
T25:=CONST(IF(C>200 AND (((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)),1,0));
DRAWTEXT(T1=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)
,'量能理想,明顯走強(qiáng),中線(xiàn)參與，倉(cāng)位在2/3左右'),COLORFF00FF  ;
DRAWTEXT(T2=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)
,'走勢(shì)趨強(qiáng),還顯不足,短線(xiàn)進(jìn)場(chǎng)，倉(cāng)位在1/2左右'),COLORFF00FF  ;
DRAWTEXT(T3=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)
,'量?jī)r(jià)良好,沒(méi)有明顯走強(qiáng)，短線(xiàn)進(jìn)場(chǎng)，倉(cāng)位1/2左右'),COLORFF00FF  ;
DRAWTEXT(T4=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)
,'形態(tài)尚可，量能不足，未完全走強(qiáng)，短線(xiàn)參與，倉(cāng)位1/3左右'),COLORFF00FF  ;
DRAWTEXT(T5=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)
,'形態(tài)變壞，重倉(cāng)者減持大半，清倉(cāng)者觀望'),COLORFF00FF  ;
DRAWTEXT(T6=1 AND CURRBARSCOUNT=60,AAA*0.98
,'隨大盤(pán)一起下跌，明顯縮量走勢(shì)，考慮到風(fēng)險(xiǎn)，減持或清倉(cāng)'),COLORFF00FF  ;
DRAWTEXT(T7=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)
,'該股放量下跌，走勢(shì)明顯偏弱，離場(chǎng)觀望'),COLORFF00FF  ;
DRAWTEXT(T8=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)
,'該股縮量下跌，走勢(shì)偏弱，離場(chǎng)觀望。'),COLORFF00FF  ;
DRAWTEXT(T9=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)
,'該股形態(tài)良好，強(qiáng)勢(shì)明顯，量能充足，可以繼續(xù)持有'),COLORFF00FF  ;
DRAWTEXT(T10=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)
,'上行趨勢(shì)不變，強(qiáng)勢(shì)依然，量能開(kāi)始轉(zhuǎn)弱，注意風(fēng)險(xiǎn)'),COLORFF00FF  ;
DRAWTEXT(T11=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)
,'該股仍然具備上漲潛力，但股性偏弱，可考慮減倉(cāng)'),COLORFF00FF  ;
DRAWTEXT(T12=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)
,'該股走勢(shì)趨弱，量能不足，減持大部分籌碼'),COLORFF00FF  ;
DRAWTEXT(T13=1 AND CURRBARSCOUNT=60,AAA-(AAA*0.03)
,'該股形態(tài)不佳，注意成交量的變化，目前不適合參與'),COLORFF00FF  ;