知足常赚分时(通达信)

源码正文：

A1:=AMOUNT/vol/100{XG51};
A2:=(3*HIGH+LOW+OPEN+2*CLOSE)/7{XG51};
A3:=SUM(AMOUNT,40)/A1/100{XG51};
A4:=SUM(AMOUNT,80)/A1/100{XG51};
B1:=dma(A2,VOL/A3){XG51};
B2:=Dma(A2,VOL/A4){XG51};
B3:=(CLOSE-B1)/B1*100{XG51};
B4:=(CLOSE-B2)/B2*100{XG51};
控盘:1,COLORBLUE,LINETHICK1{XG51};
高点:5,,COLORFF6600{XG51};
风险:-1,COLORCYAN,LINETHICK2{XG51};
低点:-4,COLORCCFF33{XG51};
现价:C,NODRAW{XG51};
分时确认:MA(REF(HHV(C,60),1),2),NODRAW{XG51};
均价:SUM(现价*V,240)/SUM(V,240),COLORBLUE,NODRAW{XG51};
回调认同:ema(expma(C,20),13),NODRAW{XG51};
分时压力:MA(REF(HHV(C,30),1),2),NODRAW{XG51};
分时支撑:MA(REF(LLV(C,30),1),2),NODRAW{XG51};
stICKLINE(FILTER(C,60)>0,高点,低点,0.5,0),COLORWHITE{XG51};
STICKLINE(B4>0,0,B4,1,0),COLORBLUE{XG51};
STICKLINE(B3>0,0,B3,1,0),COLORWHITE{XG51};
STICKLINE(B3<=0,0,B3,1,0),COLORCYAN{XG51};
RSV:=(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100{XG51};
K:=SMA(RSV,5,1){XG51};
D:=SMA(K,3,1){XG51};
J:=3*K-2*D{XG51};
VAR2:=EMA(J,6){XG51};
VAR3:=(CLOSE-LLV(LOW,21))/(HHV(HIGH,21)-LLV(LOW,21))*100{XG51};
VAR4:=SMA(VAR3,13,8){XG51};
VAR5:=CEILING(SMA(VAR4,13,8)){XG51};
VAR6:="SSRP.MA1"{XG51};
VAR7:="SSRP.MA2"{XG51};
SIGnaL1:=crOSS(VAR5,VAR2) AND C>=均价{XG51};
SIGNAL2:=(CROSS(VAR5,VAR2) AND B3>0.6 AND C>=均价){XG51};
SIGNAL3:=(CROSS(VAR6,VAR7) AND B3>0.6 AND C>=均价){XG51};
DRAWTEXT(SIGNAL1,-1,'卖'),COLOR0000BB{XG51};
DRAWTEXT(SIGNAL2 AND VAR6>VAR7,-2,'入'),COLORFF00FF{XG51};
DRAWTEXT(SIGNAL2 AND VAR6>VAR7,-2.8,'袋'),COLORFF00FF{XG51};
DRAWTEXT(SIGNAL3 AND VAR5>VAR2,-2,'入'),COLORWHITE{XG51};
DRAWTEXT(SIGNAL3 AND VAR5>VAR2,-2.8,'袋'),COLORWHITE{XG51};
Q:=BETWEEN(C/(SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C))),1.05,0.95){XG51};
天:=IF(Q=0,MA(C,BARSCOUNT(C)),(SUM(AMOUNT,BARSCOUNT(C))/SUM(VOL*100,BARSCOUNT(C)))){XG51};
DRAWICON(CROSS((C/天),1.03),5,9){X!G-5^1!C!N!{};

源码正文：

F:=100*(C-REF(C,1))/REF(C,1){XG51};
今小昨:=IF(C<REF(O,1) AND F<0,1,0){XG51};
S1:=今小昨{XG51};
今小前:=IF(C<REF(O,2) AND F<0,1,0),LINETHICK0{XG51};
S2:=今小前{XG51};
A1:=S1=0 AND REF(S1,1)=1 AND S2=0 AND REF(S2,1)=1 AND crOSS(zig(3,3) ,REF(ZIG(3 ,3),1)){XG51};
A2:=S1=0 AND REF(S1,1)=1 AND S2=0 AND REF(S2,1)=1 AND CROSS(ZIG(3,5) ,REF(ZIG(3 ,5),1)){XG51};
A3:=S1=0 AND REF(S1,1)=1 AND S2=0 AND REF(S2,1)=1 AND CROSS(ZIG(3,10) ,REF(ZIG(3 ,10),1)){XG51};
stICKLINE(A1 AND A2 ,0,3,3,0)COLORCYAN{XG51};
STICKLINE(A1 AND A2 ,0,1,3,0)COLORYELLOW{XG51};
STICKLINE(A1 AND A2 AND A3,0,5,3,0)COLORBLUE{XG51};
STICKLINE(A1 AND A2 AND A3,0,3,3,0)COLORFF00FF{XG51};
STICKLINE(A1 AND A2 AND A3,0,1,3,0)COLORYELLOW{XG51};
DRAWTEXT(A3=1,4.8,'长攻!'),COLORBLUE{XG51};
智勇出击: ZIG(3,6)>REF(ZIG(3,6),1)AND REF(ZIG(3,6),1)<REF(ZIG
(3,6),2),COLORRED,LINETHICK2{XG51};
DRAWTEXT(智勇出击=1,0.8,'突袭!'),COLORRED{XG51};
小获且退: ZIG(3,10)<REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)>REF(ZIG
(3,10),2),COLORBLUE,LINETHICK2{XG51};
DRAWTEXT(小获且退=1,1.3,'退!'),COLORBLUE{XG51};
VAR3:=PEAKBARS(2,15,1)<10{XG51};
VAR5:=IF(VAR3=1,2,0){XG51};
顶:= IF(VAR5=2,2,0){XG51};
大胜且归:IF(顶>REF(顶,1),2,0),COLORWHITE,LINETHICK2{XG51};
DRAWTEXT(大胜且归=2,2,'撤!'),COLORWHITE{X!G=5+1!C!N!{};