大智慧炒股要顺势而为乐在其中 源码 主图

我们炒股就是要顺势而为，能赚钱也就乐在其中，图面已清楚的美妙的告诉你买卖阶段.还有比千股千评好的多的股评，信不信由你，再不赚钱恐怕也是咎由自取，不要别怨天怨地！！
 {0顺势598}
 DRAWGBKLAST(C>0,STRIP(RGB(0,0,0),RGB(0,0,180),1));
 {K线}
 STICKLINE(CLOSE>OPEN,HIGH,LOW,0.5,0 ),COLOR0000FF;    
 STICKLINE(OPEN>=CLOSE,HIGH,LOW,0.5 ,0 ),COLOR00FF00;    
 STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR006600;
 STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLOR009900;
 STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00;
 STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00;
 STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLOR000466;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000499;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR0003bb;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0002dd;
 STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0001ff;
 

{卖黄金,RSI=80}
 LC:=REF(C,1);
 卖黄金:((SMA(MAX((C - LC),0),3,1) / SMA(ABS((C - LC)),3,1)) * 100),LINETHICK0;
 STICKLINE(CROSS(80,卖黄金) AND C  STICKLINE(CROSS(80,卖黄金) AND C  STICKLINE(CROSS(80,卖黄金) AND C  STICKLINE(CROSS(80,卖黄金) AND C  STICKLINE(CROSS(80,卖黄金) AND C  STICKLINE(CROSS(80,卖黄金) AND C ma5:EMA(C,5),LINETHICK0;
 PARTLINE(ma5,(ma5>REF(ma5,1))-1,rgb(0,255,0),1,rgb(255,0,0) ),LINETHICK2,LAYER6;
 
VAR1:=(3*CLOSE+HIGH+LOW+OPEN)/6;   
A1: (EMA(VAR1,2)+EMA(VAR1,3)+EMA(VAR1,5)+EMA(VAR1,8)+EMA(VAR1,13))/5,COLORff9900;   
A2: EMA(A1,2),COLORff9900;   
A3: EMA(A2,2),COLORff9900;   
A4: EMA(A3,2),COLORff9900; 
 A5: EMA(A4,2),COLORff9900; 
 A6: EMA(A5,2),COLORff9900;
A7: EMA(A6,2),COLORff9900; 
 A8: EMA(A7,2),COLORff9900;  
 A9: EMA(A8,2),COLORff9900; 
 A10: EMA(A9,2),COLORff9900,LINETHICK2;;  
 PARTLINE(A1,A1>REF(A1,1)),COLOR00ffff;   
PARTLINE(A2,A2>REF(A2,1)),COLOR00ffff;   
PARTLINE(A3,A3>REF(A3,1)),COLOR00ffff;   
PARTLINE(A4,A4>REF(A4,1)),COLOR00ffff;
 PARTLINE(A5,A5>REF(A5,1)),COLOR00ffff;;   
PARTLINE(A6,A6>REF(A6,1)),COLOR0ffff0;   
PARTLINE(A7,A7>REF(A7,1)),COLOR0ffff0;   
PARTLINE(A8,A8>REF(A8,1)),COLOR0ffff0;
PARTLINE(A9,A9>REF(A9,1)),COLOR0ffff0;   
PARTLINE(A10,A10>REF(A10,1)),COLOR0ffff0;;
      
五日乖离率:=(c-MA(C,5))/MA(C,5)*100;
 拾八日乖离率:=(c-MA(C,18))/MA(C,18)*100;
 JC:=cross(0,五日乖离率) and 拾八日乖离率ref(EMA(C,10),1) ;
 减仓:=filter(JC,10);
 drawtext(减仓,high*1.03,'←减仓'),color00ffff,linethick2;
      
 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);   

IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN    
 DRAWTEXTABS(12,10,'该股的量能理想，有明显走强迹象，可以考虑中线进场参与，仓位在2/3左右。   '),color0000FF,LINETHICK3;    
 IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN    
 DRAWTEXTABS(12,10,'该股虽然走势趋强，但量能还显不足，可以考虑短线进场，仓位在1/2左右。   '),color0000FF,LINETHICK3;   
IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 > V2)) AND (DSLX < DSLX1)) THEN    
 DRAWTEXTABS(12,10,'该股量价配合良好，但相对其它股票并没有明显走强，可以考虑短线进场，仓位1/2左右。   '),color0000FF,LINETHICK3;   
IF BARSTATUS=2 and c<200 and ((CROSS(AVX,1) AND (V1 <= V2)) AND (DSLX < DSLX1)) THEN    
 DRAWTEXTABS(12,40,'该股形态尚可，但量能不足，股票也未完全走强，可以短线参与，仓位1/3左右。   '),color0000FF,LINETHICK3;   
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN    
 DRAWTEXTABS(12,10,'该股形态变坏，但走势相对其它股票尚可，重仓者减持大半，清仓者可以观望。   '),color00FF00,LINETHICK3;   
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN    
 DRAWTEXTABS(12,10,'该股随大盘一起下跌，程明显缩量走势，考虑到大盘风险，减持或清仓。   '),color00FF00,LINETHICK3;   
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN    
 DRAWTEXTABS(12,10,'该股放量下跌，走势明显偏弱，离场观望。   '),color00FF00,LINETHICK3;   
IF BARSTATUS=2 and c<200 and ((CROSS(1,AVX) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN    
 DRAWTEXTABS(12,10,'该股缩量下跌，走势偏弱，离场观望。   '),color00FF00,LINETHICK3;   
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN    
 DRAWTEXTABS(12,10,'该股形态良好，强势明显，量能充足，可以继续持有。   '),color00FFFF,LINETHICK3;   
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN    
 DRAWTEXTABS(12,10,'该股上行趋势不变，强势依然，但量能开始转弱，注意风险。   '),color00FFFF,LINETHICK3;   
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN    
 DRAWTEXTABS(12,10,'该股仍然具备上涨潜力，但股性偏弱，可考虑减仓。   '),color00FFFF,LINETHICK3;   
IF BARSTATUS=2 and c<200 and ((((AVX >= 1) AND (REF(AVX,1) > 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN    
 DRAWTEXTABS(12,10,'该股走势趋弱，量能不足，减持大部分筹码。   '),color00FFFF,LINETHICK3;   
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX >= DSLX1)) THEN    
 DRAWTEXTABS(12,10,'该股形态不佳，注意成交量的变化，但目前不适合参与。   '),COLOR00FF00,LINETHICK3;   
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX >= DSLX1)) THEN    
 DRAWTEXTABS(12,10,'该股趋势不明，股价偏弱，注意量能变化，目前不宜参与。   '),COLOR00FF00,LINETHICK3;   
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 >= V2)) AND (DSLX < DSLX1)) THEN    
 DRAWTEXTABS(12,10,'该股有走强迹象，但量能不足，趋势不明，不适合操作。   '),COLOR00FF00,LINETHICK3;   
IF BARSTATUS=2 and c<200 and ((((AVX < 1) AND (REF(AVX,1) < 0)) AND (V1 < V2)) AND (DSLX < DSLX1)) THEN    
 DRAWTEXTABS(12,10,'该股走势太弱，没有参与价值。   '),COLOR00FF00,LINETHICK3;   
IF BARSTATUS=2 and c>200 and (CROSS(AVX,1) AND (V1 >= V2)) THEN    
 DRAWTEXT