M1:=5;M2:=13;M3:=25;M4:=56;M5:=120;M6:=233; 
MA1:MA(CLOSE,5); 
MA2:MA(CLOSE,13); 
MA3:MA(CLOSE,25); 
MA4:MA(CLOSE,56); 
MA5:MA(CLOSE,120); 
A:=AMOUNT/V/100;VARA:=EMA((((A-EMA(A,13))/EMA(A,13))*(0-100)),5); 
X1:=EMA(((VARA/10)+EMA(A,10)),3);Y1:=EMA(A,3); 
Y2:=(C+0.618*REF(C,1)+0.382*REF(C,2)+0.236*REF(C,3)+0.146*REF(C,4))/2.382; 
X2:EMA(((SLOPE(C,22)*20)+C),55); 
压力:MA(REF(HHV(C,30),1),2); 
支撑:MA(REF(LLV(C,30),1),2);  
N1:=7;  
VAR1:=REF(C,1);  
VAR2:=SMA(MAX(C-VAR1,0),N1,1)/SMA(ABS(C-VAR1),N1,1)*1000;  
VAR3:=DRAWLINE(VAR2>=HHV(VAR2,N1),VAR2,VAR2<=LLV(VAR2,N1),VAR2,1); 
VAR4:=VAR2=VAR3; 
VAR5:=VAR2<REF(VAR2,1); 
RSV:=(C-LLV(L,25))/(HHV(HIGH,25)-LLV(L,25))*100; 
K:=SMA(RSV,3,1); 
D:=SMA(K,3,1); 
J:=3*K-2*D; 
VAR6:=(2*C+H+L)/3;{可将3该为4,信号少点} 
VAR7:=EMA(EMA(EMA(VAR6,4),4),4);{可将3该为4,信号少点} 
VAR8:=(VAR7-REF(VAR7,1))/REF(VAR7,1)*100; 
VAR9:=MA(VAR8,3)+0.03; 
VAR10:=MA(VAR8,1); 
KB:=EMA(C,3)-EMA(C,18); 
DB:=EMA(KB,3); 
AA:=BARSCOUNT(C); 
AH:=HHV(H,120); 
AL:=LLV(L,120); 
A0:=(AH-AL)/30; 
VAR2S:=(2*CLOSE+HIGH+LOW)/4;  
VAR3S:=IF(YEAR>=2099 AND MONTH>2,0,1);  
VAR4S:=LLV(LOW,5); VAR5S:=HHV(HIGH,4);  
散户:=EMA((VAR2S-VAR4S)/(VAR5S-VAR4S)*100,4)*VAR3S;  
庄家:=EMA(0.667*REF(散户,1)+0.333*散户,2)*VAR3S; 
STICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,3.2,0),COLOR004400; 
STICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,2.7,0),COLOR006600; 
STICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,2.1,0),COLOR008800; 
STICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,1.5,0),COLOR00AA00; 
STICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,0.9,0),COLOR00CC00; 
STICKLINE(KB<DB AND DB<REF(DB,1),C,OPEN,0.3,0),COLOR00EE00; 
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,3.2,0),COLOR000055; 
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,2.7,0),COLOR000077; 
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,2.1,0),COLOR000099; 
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,1.5,0),COLOR0000BB; 
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,0.9,0),COLOR0000DD; 
STICKLINE(KB>DB AND DB>REF(DB,1),C,OPEN,0.3,0),COLOR0000FF; 
STICKLINE(CROSS(VAR9,VAR10) AND J>65,H,OPEN,3.15,0),COLORAA1100; 
STICKLINE(CROSS(VAR9,VAR10) AND J>65,H,OPEN,2.45,0),COLORAA3300; 
STICKLINE(CROSS(VAR9,VAR10) AND J>65,H,OPEN,1.75,0),COLORAA5500; 
STICKLINE(CROSS(VAR9,VAR10) AND J>65,H,OPEN,1.05,0),COLORAA7700; 
STICKLINE(CROSS(VAR9,VAR10) AND J>65,H,OPEN,0.35,0),COLORAA9900; 
STICKLINE(VAR4 AND VAR5,L,OPEN,3.15,0),COLOR1111FF; 
STICKLINE(VAR4 AND VAR5,L,OPEN,2.45,0),COLOR3333FF; 
STICKLINE(VAR4 AND VAR5,L,OPEN,1.75,0),COLOR5555FF; 
STICKLINE(VAR4 AND VAR5,L,OPEN,1.05,0),COLOR7777FF; 
STICKLINE(VAR4 AND VAR5,L,OPEN,0.35,0),COLOR9999FF; 
STICKLINE(CROSS(散户,庄家) AND 散户<30,L,OPEN,3.15,0),COLOR770077; 
STICKLINE(CROSS(散户,庄家) AND 散户<30,L,OPEN,2.45,0),COLOR990099; 
STICKLINE(CROSS(散户,庄家) AND 散户<30,L,OPEN,1.75,0),COLORBB00BB; 
STICKLINE(CROSS(散户,庄家) AND 散户<30,L,OPEN,1.05,0),COLORDD00DD; 
STICKLINE(CROSS(散户,庄家) AND 散户<30,L,OPEN,0.35,0),COLORFF00FF; 
STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L,OPEN,3.15,0),COLOR337777; 
STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L,OPEN,2.45,0),COLOR339999; 
STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L,OPEN,1.75,0),COLOR33BBBB; 
STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L,OPEN,1.05,0),COLOR33DDDD; 
STICKLINE(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L,OPEN,0.35,0),COLOR33FFFF; 
STICKLINE((AA+0)/34=FLOOR((AA+0)/34),L,OPEN,3.15,1),COLORFFFFFF; 
DRAWTEXT((AA+0)/34=FLOOR((AA+0)/34),L*1,'时间窗'),COLORFFFFFF;  
DRAWTEXT(CROSS(散户,庄家) AND 散户<30,L*1,'吸'),COLORFF00FF;                     
DRAWICON(CROSS(VAR9,VAR10) AND J>65,H*1,15),COLORGREEN; 
DRAWTEXT(CROSS(VAR9,VAR10) AND J>65,H*1,'   卖'),COLORYELLOW; 
DRAWICON(VAR4 AND VAR5,L*1,9); 
DRAWTEXT(VAR4 AND VAR5,L*1,'   买')COLORFFFFFF; 
DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L*1,'地量买点'),COLOR33FFFF; 
DA:=(EMA(C,1)+EMA(C,2)+EMA(C,3)+EMA(C,4))/4; 
DRAWTEXT(60*(40*(EMA((EMA(CLOSE,12)-EMA(CLOSE,26)),9)<0 AND COUNT(COUNT(CROSS 
((EMA(CLOSE,12)-EMA(CLOSE,26)),EMA((EMA(CLOSE,12)-EMA(CLOSE,26)),9)),BARSLAST 
(EMA((EMA(CLOSE,12)-EMA(CLOSE,26)),9)>=0))=2,21)=1)  
AND SLOPE(MA(C,5),2)>0) AND  
MA(C,55)>REF(MA(C,55),1) AND  
REF(MA(C,55),1)<=REF(MA(C,55),2),L*0.95,'买入'),COLOR0080FF; 
JH:=SMA(MAX(C-REF(C,1),0),5,1)/SMA(ABS(C-REF(C,1)),5,1)*100; 
DRAWICON(60*(40*(EMA((EMA(CLOSE,12)-EMA(CLOSE,26)),9)<0  
AND COUNT(COUNT(CROSS((EMA(CLOSE,12)-EMA(CLOSE,26)), 
EMA((EMA(CLOSE,12)-EMA(CLOSE,26)),9)),BARSLAST 
(EMA((EMA(CLOSE,12)-EMA(CLOSE,26)),9)>=0))=2,21)=1)  
AND SLOPE(MA(C,5),2)>0) AND MA(C,55)>REF(MA(C,55),1) AND  
REF(MA(C,55),1)<=REF(MA(C,55),2),LOW,5); 
 
 
选股公式,满足“买点”“地量买点”的选股公式  
 
N1:=7;  
VAR1:=REF(C,1);  
VAR2:=SMA(MAX(C-VAR1,0),N1,1)/SMA(ABS(C-VAR1),N1,1)*1000;  
VAR3:=DRAWLINE(VAR2>=HHV(VAR2,N1),VAR2,VAR2<=LLV(VAR2,N1),VAR2,1); 
VAR4:=VAR2=VAR3; 
VAR5:=VAR2<REF(VAR2,1);                     
买:(VAR4 AND VAR5),COLOR00FFFF; 
地量买点:(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0)),COLOR00FF00;  
   |