v5:=ma(vol,5); v10:=ma(vol,10); v20:=ma(vol,20); lday1:=barslast(cross(v5,v10)); lday2:=barslast(cross(v5,v20)); lday3:=barslast(cross(v10,v20)); ltj1:=(lday1>lday2 or lday1=lday2) {and count(cross(v5,v20),lday1)=1} and lday2=0 and v10<v20; ltj2:=(c>o and ref(c,1)<ref(o,1) and ref(c,2)>ref(o,2) and c>ref(c,2)); ltj:=ltj1 and ltj2; ltj0:=ltj1 and v10>ref(v10,1); ma5:ma(c,5),colorwhite; ma10:ma(c,10); ma20:ma(c,20),colorred; ma40:ma(c,40),linethick2,pointdot,colorblue; ma60:ma(c,60),linethick2,POINTDOT,colorgreen; pday1 := barslast(cross(ma5,ma60));{5日均线上穿60日均线} pday2 := barslast(cross(ma10,ma60));{10日均线上穿60日均线,至此形成鸭颈部} pday3 := barslast(ref(high=hhv(high,pday2),1));{形成头部,要下跌} pday4 := barslast(cross(ma10,ma5){ or (ref(ma10,1)<ref(ma5,1) and ma5=ma10)});{下跌后,5日均线和10日均线死叉} pday5 := barslast(cross(ma5,ma10){ or (ref(ma5,1)=ref(ma10,1) and ma5>ma10)});{回落不久,5日均线和10日均线形成金叉,形成部} a1:= pday1>pday2 and pday2>pday3 and pday3>pday4 and pday4>pday5 and pday5<5; a2:= count(cross(ma10,ma5),pday2)=1; a3:=ma5>ma60 and ma10>ma60; {jt:=cross(ma20,ma60) and c>o and ref(c,1)<ref(o,1) and ref(c,2)>ref(o,2); csfr:=cross(c,ma20) and cross(c,ma40) and cross(c,ma60); stickline(jt,h,l,1,0),coloryellow; stickline(jt,o,c,8,0),coloryellow; stickline(csfr,h,l,1,0),colorwhite; stickline(csfr,o,c,8,0),colorwhite; DRAWTEXT(CSFR,H,'出水芙蓉'),coloryellow; DRAWTEXT(jt ,l, '价托'),colorred;} csfr:=cross(c,ma20) and cross(c,ma40) and cross(c,ma60); yday1:=barslast(cross(ma5,ma10)); yday2:=barslast(cross(ma5,ma20)); yday3:=barslast(cross(ma10,ma20)); yjzz:=(yday1=yday2 yjzz1:=yday1=yday2 yjt:=yday1>=yday2 and yday2=0 and ma10<ma20; day1:=barslast(cross(ma20,ma40)); day2:=barslast(cross(ma20,ma60)); day3:=barslast(cross(ma40,ma60)); tj0:=day1>=day2 and day3<5; 短顶:ma(ref(hhv(h,40),1),1); 头顶:ma(ref(hhv(h,60),1),1); 年顶:ma(ref(hhv(h,0),1),1),linethick2,pointdot,colorwhite; jzz:=day1=day2 tj1:=day1>=day2 and count(cross(ma20,ma60),day1)=1{and (day1-day2)<10}; tj2:=c>o and cross(c,头顶); tj21:=c>o and cross(c,短顶); {tj22:=c>o and cross(c,年顶) and vol<v5;换手率小12%} tj3:=vol>ref(vol,1); tj4:=ma20>ma60 and ma40>ref(ma40,1) and ma40<ma60; tj5:=day1>=day2 and day2=0 and ma40<ma60; {tj:=(tj2 and tj3) or (tj21 and tj3);} tj:=DYNAINFO(4)>0 and hhv(high,10)/llv(low,10)<1.25 and ref(close,1)<(llv(low,15)+(hhv(high,15)-llv(low,15))*0.85) and close>open and close>=hhv(high,10); stickline(ltj0,h,l,1,0),colorgreen; stickline(ltj0,o,c,8,0),colorgreen; stickline(tj,h,l,1,0),coloryellow; stickline(tj,o,c,8,0),coloryellow; {stickline(tj22,h,l,1,0),coloryellow; stickline(tj22,o,c,8,0),coloryellow;} stickline(ltj,h,l,1,0),colorred; stickline(ltj,o,c,8,0),colorred; stickline(csfr,h,l,1,0),colorwhite; stickline(csfr,o,c,8,0),colorwhite; DRAWTEXT(CSFR,H,'出水芙蓉'),coloryellow; DRAWTEXT(tj,l-0.2, '放量突破'),colorred; {DRAWTEXT(tj22,h+0.2, '轻松过顶'),colorwhite;} DRAWTEXT(ltj,h+0.5,'量托+多方炮'),COLORYELLOW; DRAWTEXT(ltj0,h+0.5,'量托'),COLORYELLOW; DRAWTEXT(TJ5,MA60-0.2,'季价托'),coloryellow; DRAWTEXT(yjt,MA20-0.5,'月价托'),coloryellow; DRAWTEXT(jzz,MA60-0.2,'金蜘蛛'),coloryellow; DRAWTEXT(yjzz or yjzz1,MA20-0.2,'月金蜘蛛'),coloryellow; 老鸭头:=(A1 AND A2 and a3) and FILTER(A1 AND A2 and a3 ,5); drawtext(老鸭头,l,'老鸭头'),colorgreen; stickline(老鸭头,h,l,0.5,0),colorgreen; stickline(老鸭头,o,c,6,1),colorgreen,linethick3;{转} |
|