指标有很高参考价值  顺便哀悼一下舟曲遇难同胞!!!!!!!!您的回帖是我最大的动力!!!!! 
源码1: 
VAR2:=(2*CLOSE+HIGH+LOW)/4;  
VAR3:=IF(YEAR>=2099 AND MONTH>2,0,1);  
VAR4:=LLV(LOW,5);  
VAR5:=HHV(HIGH,4);  
庄家:= EMA((VAR2-VAR4)/(VAR5-VAR4)*100,4)*VAR3{, ,COLORFF9933};  
小股民:= EMA(0.667*REF(庄家,1)+0.333*庄家,2)*VAR3{, ,COLORWHITE};  
VAR6:=(HHV(HIGH,4)-VAR2)/(HHV(HIGH,4)-LLV(LOW,4))*100-72;  
VAR7:=(VAR2-LLV(LOW,4))/(HHV(HIGH,4)-LLV(LOW,4))*100;  
VAR8:=SMA(VAR7,2,1); 
减磅:IF(CROSS(小股民,庄家) AND 庄家>70,89,76),STICK,LINETHICK2,COLORRED; 76,STICK,LINETHICK2,COLOR000000; 
短出:IF(CROSS(小股民,庄家) AND 庄家>40 AND 71>庄家,75,62),STICK,LINETHICK2,COLOR00FF00;62,STICK,LINETHICK2,COLOR000000;  
短进:IF(CROSS(庄家,小股民) AND 庄家<50 AND 29<庄家,61,49),STICK,LINETHICK2,COLORF000FF;49,STICK,LINETHICK2,COLOR000000; 
低吸:IF(CROSS(庄家,小股民) AND 庄家<30,48,35),STICK,LINETHICK2,COLORYELLOW;35,STICK,LINETHICK2,COLOR000000; 
80, ,POINTDOT,COLORFFFF00;  
20, ,POINTDOT ,COLOR9933FF; 
12, ,POINTDOT,COLORFF3399;  
庄家线:庄家,,COLORWHITE; 
小股民线:小股民,,COLORFFF000; 
{DRAWICON(CROSS(庄家,小股民) AND 庄家<30,20,1);  
DRAWICON(CROSS(小股民,庄家) AND 庄家>70,80,2); } 
VAR9:=CLOSE-REF(CLOSE,5);  
VARA:=EMA(EMA(VAR9,5),5)/EMA(EMA(ABS(VAR9),5),5)*100;  
VARB:=EMA(EMA(VAR9,10),10)/EMA(EMA(ABS(VAR9),10),10)*100;  
VARC:=EMA(EMA(VAR9,20),20)/EMA(EMA(ABS(VAR9),20),20)*100;  
警戒: IF(VARA>0 AND CROSS(VARC,VARA),10,0),LINETHICK1,COLORRED;  
{DRAWTEXT(警戒,6,'!'),LINETHICK1,COLORRED;  
DRAWICON(警戒<0,25,2); }; 
选股:IF(CROSS(庄家,小股民) AND 小股民<30,1,0);  
DRAWICON(CROSS(庄家,小股民) AND 小股民<30,50,1); 
DRAWTEXT(CROSS(庄家,小股民) AND 小股民<30,35,'吸 '), COLORMAGENTA,;  
选股2:IF(CROSS(小股民,庄家) AND 庄家>75,1,0);  
DRAWICON(CROSS(小股民,庄家) AND 庄家>75,80,2); 
DRAWTEXT(CROSS(小股民,庄家) AND 庄家>75,75,'抛 '), COLORYELLOW,; 
 
 
源码2: 
{出局减仓} 
VAR2:=LLV(LOW,10);  
VAR3:=HHV(HIGH,25);  
减仓线: 3.2 ;  
卖出线: 3.5;  
动力线: EMA((CLOSE-VAR2)/(VAR3-VAR2)*4,4);   
DRAWTEXT(CROSS(动力线,减仓线),2.8,'减仓 '),COLORGREEN ,;  
DRAWTEXT(CROSS(动力线,卖出线),3.5,'出局 '), COLORYELLOW, ;  
DRAWICON(CROSS(动力线,减仓线),3.4,2);  
DRAWICON(CROSS(动力线,卖出线),3.9,2);   
选股:IF(CROSS(动力线,1.5),1,0);  
DRAWICON((CROSS(动力线,1.5) ),1,1); 
DRAWTEXT(CROSS(动力线,1.5),0.5,'低吸 '), COLORRED,;  
  
 
  |