MA3:MA(CLOSE,3),COLOR9000F5; 
MA18:MA(CLOSE,18),COLOR0099FF,LINETHICK2; 
{融胜通道} 
M10:=EMA(C,10); 
融胜:=M10,COLORRED,LINETHICK2; 
FF:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20); 
DD:=DMA(CLOSE,FF); 
高抛:(1+14/100)*DD,DOTLINE,COLORGREEN; 
压力:(1+7/100)*DD,DOTLINE,COLORFFFF00; 
支撑:(1-7/100)*DD,DOTLINE,COLORBLUE; 
低吸:(1-14/100)*DD,DOTLINE,COLORRED; 
中轨:(压力+支撑)/2,DOTLINE,COLORMAGENTA; 
DRAWTEXT(CURRBARSCOUNT=1,高抛,'高抛'),COLORGREEN;     
DRAWTEXT(CURRBARSCOUNT=1,压力,'压力'),COLORFFFF00;        
DRAWTEXT(CURRBARSCOUNT=1,中轨,'中轨'),COLORMAGENTA;        
DRAWTEXT(CURRBARSCOUNT=1,支撑,'支撑'),COLORBLUE;     
DRAWTEXT(CURRBARSCOUNT=1,低吸,'低吸'),COLORRED;  
IF(MA3>=REF(MA3,1) AND MA3>支撑,MA3,DRAWNULL),COLORRED,LINETHICK4; 
{【平均成本】} 
平均成本:((COST(18)+COST(8))/2+COST(13))/2,COLORYELLOW,LINETHICK2;{本句含有未来函数COST,自己决定去留本句吧} 
{【追+加+抛+出货】} 
A:=(REF(EMA(CLOSE,5),1)); 
B:=CROSS(EMA(CLOSE,5),EMA(SLOPE(CLOSE,21)*20+CLOSE,42)); 
DRAWTEXT(B,LOW*0.995,'追'),COLORFFFF00,LINETHICK2; 
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; 
K:=SMA(RSV,3,1); 
D:=SMA(K,3,1); 
J:=3*K-2*D; 
DRAWTEXT(CROSS(J,D),LOW*0.98,'加'),COLOR00FFFF,LINETHICK2; 
VAR29:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100; 
VAR2A:=SMA(VAR29,5,1); 
VAR2B:=SMA(VAR2A,10,1); 
VAR2C:=CROSS(VAR2B,VAR2A); 
VAR2D:=VAR2B>80 OR VAR2A>80; 
VAR2E:=VAR2C AND VAR2D; 
VAR33:=HIGH; 
VAR34:=LOW; 
逃顶:=STICKLINE(VAR2E,VAR33,VAR34,4,0); 
DRAWTEXT(CROSS((REF(HIGH,1)+REF(LOW,1))/2,MA(CLOSE,20)+2*STD(CLOSE,20)),HIGH*1.01,'抛'),COLORGREEN; 
X6:=REF(CLOSE,1); 
X7:=SMA(MAX(CLOSE-X6,0),7,1)/SMA(ABS(CLOSE-X6),7,1)*100; 
X8:=CROSS(79,X7); 
X9:=FILTER(X8,4);DRAWTEXT(X9,HIGH*1.03,'出货'),COLOR9000F5; 
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; 
DRAWTEXT(CROSS(0.9,1/VOL*1000>0.01 AND "KDJ.J"<0),L*0.99,'地量买点'),COLOR33FFFF; 
DRAWTEXT(CROSS(88,RSI),(HIGH*1.01),'R背'),COLOR00FF00; 
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(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; 
DRAWTEXT(CROSS(散户,庄家) AND 散户<30,L*0.99,'吸'),COLORFF00FF; 
  
 
  |