RSV:=(CLOSE-LLV(LOW,40))/(HHV(HIGH,40)-LLV(LOW,40))*100; K:SMA(RSV,11,1);
D:SMA(K,2,1);
J:3*K-2*D,colorred;
STICKLINE(J<10,0,0,88,501),colorgreen;
STICKLINE(J>95,100,100,88,501),coloryellow;
50,COLORFF00FF;
买: IF(TROUGHBARS(3,17,1)=0 AND HIGH>LOW+0.01,20,-10);
卖: IF(PEAKBARS(3,14,1)=1,80,110);
VARC:=(ZIG(3,7)>=REF(ZIG(3,7),1)) AND (REF(ZIG(3,7),1)<=REF(ZIG(3,7),2)) AND (REF(ZIG
(3,7),2)<=REF(ZIG(3,7),3))AND (REF(ZIG(3,7),3)<=REF(ZIG(3,7),4));
VARD:=(ZIG(3,6)<=REF(ZIG(3,6),1)) AND (REF(ZIG(3,6),1)>=REF(ZIG(3,6),2)) AND (REF(ZIG
(3,6),2)>=REF(ZIG(3,6),3))AND (REF(ZIG(3,6),3)>=REF(ZIG(3,6),4));
STICKLINE((VARC=1),(J),J+50,4,0),COLOR0000FF;
DRAWTEXT((VARC=1),(J-0),'买'),COLOR0000FF;
STICKLINE((VARD=1),(J),20,4,0),COLOR00FF00;
DRAWTEXT((VARD=1),(J+5),'卖'),COLOR00FF00;
VARE:=MA(100*(CLOSE-LLV(CLOSE,34))/(HHV(HIGH,34)-LLV(LOW,34)),5)-20;
VARF:=100-3*SMA((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA
((CLOSE-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR10:=100-3*SMA((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1)+2*SMA(SMA
((OPEN-LLV(LOW,75))/(HHV(HIGH,75)-LLV(LOW,75))*100,20,1),15,1);
VAR11:=VARF<REF(VAR10,1) AND VOL>REF(VOL,1) AND CLOSE>REF(CLOSE,1);
DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,50,'大资金活动'),LINETHICK1,COLORFF00FF;
STICKLINE(VAR11 AND COUNT(VAR11,30)=1,1,50,8,0),COLORFF00FF;
VAR12:=(HIGH+LOW+CLOSE)/3;
VAR13:=(VAR12-MA(VAR12,14))/(0.015*AVEDEV(VAR12,14));
VAR14:=(VAR12-MA(VAR12,70))/(0.015*AVEDEV(VAR12,70));
VAR15:=IF(VAR13>=150 AND VAR13<200 AND VAR14>=150 AND VAR14<200,10,0);
VAR16:=IF(VAR13<=-150 AND VAR13>-200 AND VAR14<=-150 AND VAR14>-200,-10,VAR15);
VAR17:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*100;
VAR18:=100-ABS(VAR17);
VAR19:=IF(VAR18<90,VAR18,100);
VAR1A:=IF(VARE>0,VARE,0);
VAR1B:=IF(VAR14>=200 AND VAR13>=150,15,IF(VAR14<=-200 AND VAR13<=-150,-15,VAR16))+60;
VAR1C:=VAR1A>48 AND VAR1B>60 AND VAR19<100;
DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,50,'大笔出货'),LINETHICK1,COLORFFCC66;
STICKLINE(VAR1C AND COUNT(VAR1C,30)=1,0,50,8,0),COLORFFCC66;
80, POINTDOT,LINETHICK2;
20, POINTDOT,LINETHICK2;
P1:=11;
P2:=3;
VAR1:=LLV(LOW,P1);
VAR2:=HHV(HIGH,P1);
K1: EMA((CLOSE-VAR1)/(VAR2-VAR1)*100,P2),colorred,LINETHICK2 , ;
D1: EMA(0.667*REF(K1,1)+0.333*K1,3),LINETHICK1 ,;
VARC1:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1);
VARD1:=EMA(IF(C< EMA(C,250),VARC1*1000,VARC1*10),3);
火焰山:EMA(IF(L<=LLV(L,40),VARD1/2+HHV(VARD1,40),0),3)/618;
STICKLINE(火焰山>100,0,火焰山*1.2,8,0);
STICKLINE(火焰山>100,0,火焰山,4,1);
抄底: IF(TROUGHBARS(2,5,1)=0 AND HIGH>LOW+0.01,20,0),coloryellow ,LINETHICK2 ;
VAR3:=PEAKBARS(3,14,1)<10;
VAR5:=IF(VAR3=1,2,0);
顶:= IF(VAR5=2,2,0);
顶A:IF(顶>REF(顶,1),45,0),colorgreen,LINETHICK2;
DRAWTEXT(顶A=45,45,'逃顶'),COLOR00FF00;
.......
部分源码省略,公式没加密,下载公式导入可看源码
|
