跟佛有缘.ALG

STICKLINE(c>0,300,0,10,0),Color006010;
业罪去无灾:(c-ref(ma(c,5),5))*finance(1),colorred,LINETHICK2;
慈悲广化:CAPITAL/100*CLOSE/10000,coloR00ff00,LINETHICK2;
圣德昭彰:ema(amount,3)/finance(7),colorff00ff,LINETHICK2;
获利90:EMA(COST(90),5),LINETHICK2,colorFFFFFF;
A:=(3*c+l+o+h)/6;
X:=WMA(A,20);
主力成本:eMA(X,13),color0099FF,LINETHICK0;
rcc:=DYNAINFO(3);
s2:=sma(c,3,1);
s6:=sma(c,5,1);
dk:=2*(s2-s6);
STICKLINE(dk>0,rcc,rcc+dk,0,1),COLORRED,LINETHICK2;
STICKLINE(dk<0,rcc,rcc+dk,0,1),COLORffff00,LINETHICK2;
短期底部:LLV(HIGH,30),LINETHICK2,COLORFFff00;
STICKLINE(open>=close,close,low,1,0),COLORcccccc,LINETHICK2;
STICKLINE(open>=close,open,HIGH,1,0),COLORcccccc,LINETHICK2;
STICKLINE(open>=close,O,C,6,0),COLORaaaaaa;
STICKLINE(open>=close,O,C,5,0),COLORbbbbbb;
STICKLINE(open>=close,O,C,4,0),COLORcccccc;
STICKLINE(open>=close,O,C,3,0),COLORdddddd;
STICKLINE(open>=close,O,C,2,0),COLOReeeeee;
STICKLINE(open>=close,O,C,1,0),COLORffffff;
STICKLINE(close>open,open,low,1,0),COLOR1199ff,LINETHICK2;
STICKLINE(close>open,close,HIGH,1,0),COLOR1199ff,LINETHICK2;
STICKLINE(close>open,O,C,6,0),COLOr5555aa;
STICKLINE(close>open,O,C,5,0),COLOR5555bb;
STICKLINE(close>open,O,C,4,0),COLOr6666cc;
STICKLINE(close>open,O,C,3,0),COLOR7777dd;
STICKLINE(close>open,O,C,2,0),COLOR8888ee;
STICKLINE(close>open,O,C,1,0),COLOR9999ff;
rc:rcc,COLOR559999;
ma(c,9);
STICKLINE(cross(ma(c,1),ma(c,9)),HIGH,LOW,1,0),COLORred,LINETHICK2;
STICKLINE(cross(ma(c,1),ma(c,9)),CLOSE,OPEN,6,0),color000077;
STICKLINE(cross(ma(c,1),ma(c,9)),CLOSE,OPEN,5,0),color000088;
STICKLINE(cross(ma(c,1),ma(c,9)),CLOSE,OPEN,4,0),color000099;
STICKLINE(cross(ma(c,1),ma(c,9)),CLOSE,OPEN,3,0),color0000bb;
STICKLINE(cross(ma(c,1),ma(c,9)),CLOSE,OPEN,2,0),color0000dd;
STICKLINE(cross(ma(c,1),ma(c,9)),CLOSE,OPEN,1,0),color0000ff;
STICKLINE(cross(ma(c,1),ma(c,55)),HIGH,LOW,1,0),COLORff99ff,LINETHICK2;
STICKLINE(cross(ma(c,1),ma(c,55)),CLOSE,OPEN,6,0),COLORff22ff;
STICKLINE(cross(ma(c,1),ma(c,55)),CLOSE,OPEN,5,0),COLORff44ff;
STICKLINE(cross(ma(c,1),ma(c,55)),CLOSE,OPEN,4,0),COLORff66ff;
STICKLINE(cross(ma(c,1),ma(c,55)),CLOSE,OPEN,3,0),COLORff88ff;
STICKLINE(cross(ma(c,1),ma(c,55)),CLOSE,OPEN,2,0),COLORffaaff;
STICKLINE(cross(ma(c,1),ma(c,55)),CLOSE,OPEN,1,0),COLORffccff;
STICKLINE(cross(ma(c,1),ma(c,23.5)),HIGH,LOW,1,0),COLORyellow,LINETHICK2;
STICKLINE(cross(ma(c,1),ma(c,23.5)),CLOSE,OPEN,6,0),COLOR0055ff;
STICKLINE(cross(ma(c,1),ma(c,23.5)),CLOSE,OPEN,5,0),COLOR0077ff;
STICKLINE(cross(ma(c,1),ma(c,23.5)),CLOSE,OPEN,4,0),COLOR0099ff;
STICKLINE(cross(ma(c,1),ma(c,23.5)),CLOSE,OPEN,3,0),COLOR00bbff;
STICKLINE(cross(ma(c,1),ma(c,23.5)),CLOSE,OPEN,2,0),COLOR00ddff;
STICKLINE(cross(ma(c,1),ma(c,23.5)),CLOSE,OPEN,1,0),COLOR00ffff;
STICKLINE(cross(ma(c,1),ma(c,120)),HIGH,LOW,1,0),COLOR0088ee,LINETHICK2;
STICKLINE(cross(ma(c,1),ma(c,120)),CLOSE,OPEN,6,0),COLOR004455;
STICKLINE(cross(ma(c,1),ma(c,120)),CLOSE,OPEN,5,0),COLOR005577;
STICKLINE(cross(ma(c,1),ma(c,120)),CLOSE,OPEN,4,0),COLOR006699;
STICKLINE(cross(ma(c,1),ma(c,120)),CLOSE,OPEN,3,0),COLOR0077bb;
STICKLINE(cross(ma(c,1),ma(c,120)),CLOSE,OPEN,2,0),COLOR0088dd;
STICKLINE(cross(ma(c,1),ma(c,120)),CLOSE,OPEN,1,0),COLOR0099ff;
M3:ma(c,3),coloryellow,linethick2;
M9:ma(c,9),COLORff00ff,linethick2;
M23:ma(c,23.5),colorffffff;
ma5:=ma(c,5);
ma10:=ma(c,10);
ma30:=ma(c,30);
fa:=barslast(cross(ma10,ma5)) and cross(ma5,ma10);
fb:=fa and ma5>ma30 and ma10>ma30  and ma10>ref(ma10,1);
STICKLINE(fb,l,l-0.09,4,0),colorred;
DRAWTEXT(fb,l-0.58,'★福田'),colorred;
v1:=ema(close,5);
v2:=ema(ema(close,90)*1.01,10);
DRAWTEXT(cross(v1,v2),v1*0.988,'柳枝'),color00ff00,LINETHICK0;
VAR1:=LLV(LOW,21);
VAR2:=HHV(HIGH,21);
AK1:=EMA((((CLOSE-VAR1)/(VAR2-VAR1))*100),5);
AK:=EMA((((CLOSE-VAR1)/(VAR2-VAR1))*50),13);
AB:=CROSS(AK1,AK);
DRAWICON(cross(v1,v2),v2,4);
DRAWTEXT((AB = 1),(LOW*0.99),'○宝瓶'),colorYELLOW;
AA1:=AMOUNT/V;
BB1:=L<AA1*0.9;
CC1:=(C-REF(C,1))/REF(C,1)*100>1.2;
DD1:=L<MA(C,5)*0.921;
EE1:=V<MA(V,5)*1.5;
甘露:BB1 AND CC1 AND DD1 AND EE1,LINETHICK0,COLOR0099ff;
DRAWTEXT(甘露,l*0.99,'甘露 '),COLOR0099ff;
STICKLINE(甘露,H,L,0,0),COLORaaaa00,LINETHICK2;
STICKLINE(甘露,O,C,6,0),COLOR555500;
STICKLINE(甘露,O,C,5,0),COLOR777700;
STICKLINE(甘露,O,C,4,0),COLOR999900;
STICKLINE(甘露,O,C,3,0),COLORbbbb00;
STICKLINE(甘露,O,C,2,0),COLORdddd00;
STICKLINE(甘露,O,C,1,0),COLORffff00;
BIAS2:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
STICKLINE(BIAS2<-6,H,L,1,0),COLOR00aa00,LINETHICK2;
STICKLINE(BIAS2<-6,C,O,6,0),COLOR007700;
STICKLINE(BIAS2<-6,C,O,5,0),COLOR008800;
STICKLINE(BIAS2<-6,C,O,4,0),COLOR009900;
STICKLINE(BIAS2<-6,C,O,3,0),COLOR00bb00;
STICKLINE(BIAS2<-6,C,O,2,0),COLOR00dd00;
STICKLINE(BIAS2<-6,C,O,1,0),COLOR00ff00;
var666:=REF(C,1);
var777:=SMA(MAX(C-var666,0),6,1)/SMA(ABS(C-var666),6,1)*100;
DRAWTEXT(CROSS(82,var777),H*1.01,'▼勿贪心'),COLORYELLOW;
vvv1:=ref(c,ref(hhvbars(v,21),0));
mmm1:=ma(close,1);
aaaa:=V>1*ref(V,1) and (c/ref(C,1)-1)*100>9.5 and mmm1>=vvv1;
DRAWICON(cross(a,1),l*0.98,6),COLORRED;
DRAWTEXT(aaaa,l*0.93,'涨停'),LINETHICK1,COLORRED;