编程思路破译输出EMA13:收盘价的13日指数移动平均,画黄色,线宽为2 输出EMA34:收盘价的34日指数移动平均,画白色 输出EMA55:收盘价的55日指数移动平均,COLORFF00FF 输出EMA120:收盘价的120日指数移动平均,COLORFFCC66 AR1赋值:EMA55>EMA34 AND EMA34>EMA13 AR2赋值:上次(收盘价-EMA13)/EMA13*100<-6距今天数 AR3赋值:EMA13>=2日前的EMA13 AR4赋值:统计AR2日中满足收盘价上穿EMA13的天数=1 AR5赋值:AR1 AND AR2 AND AR3 AND AR4 AR6赋值:AR5 AND AR5的10日过滤 当满足条件AR6时,在最低价-0.09位置书写文字,画黄色 当满足条件AR6时,在最高价和最低价位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,画黄色 当满足条件AR6时,在开盘价和收盘价位置之间画柱状线,宽度为6,1不为0则画空心柱.,线宽为2,画黄色 BR1赋值:统计5日中满足(收盘价-1日前的收盘价)/1日前的收盘价*100位于0和5之间的天数=5 BR2赋值:(EMA13-EMA34)+(EMA34-EMA55)的绝对值/收盘价<0.2 BR3赋值:收盘价>EMA55 AND (1日前的收盘价<1日前的EMA55 OR 2日前的收盘价<2日前的EMA55 OR 3日前的收盘价<3日前的EMA55 OR 4日前的收盘价<4日前的EMA55 OR 5日前的收盘价<5日前的EMA55) BR4赋值:BR1 AND BR2 AND BR3 当满足条件BR4ANDFILTER(BR4,10)时,在最低价-0.09位置书写文字,COLOR00C5FF 当满足条件BR4ANDFILTER(BR4,10)时,在最高价和最低价位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,COLOR00C5FF 当满足条件BR4ANDFILTER(BR4,10)时,在开盘价和收盘价位置之间画柱状线,宽度为6,1不为0则画空心柱.,线宽为2,COLOR00C5FF CR1赋值:(收盘价-1日前的收盘价)/1日前的收盘价*100>0.5 CR2赋值:成交量(手)>成交量(手)的5日简单移动平均*0.6 CR3赋值:统计3日中满足EMA13上穿EMA55的天数=1 CR4赋值:EMA34-EMA55的绝对值/EMA55<0.03 CR5赋值:EMA55<=EMA120 AND EMA55>=1日前的EMA55 CR6赋值:CR1ANDCR2ANDCR3ANDCR4ANDCR5的2日过滤 当满足条件CR6时,在最高价和最低价位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,COLORF00FF0 当满足条件CR6时,在开盘价和收盘价位置之间画柱状线,宽度为6,1不为0则画空心柱.,线宽为2,COLORF00FF0 当满足条件CR6时,在最低价-0.09位置书写文字,COLORF00FF0 DR1赋值:EMA13>EMA34 AND EMA34<EMA55 DR2赋值:上次收盘价上穿EMA55距今天数 DR3赋值:最高价=DR2日内最高价的最高值 DR4赋值:上次DR3距今天数 DR5赋值:统计DR4日中满足开盘价>CANDC<1日前的收盘价ANDC>EMA55ANDBETWEEN((收盘价-EMA55)/EMA55,0,0.02)的天数=1 DR6赋值:收盘价>1日前的收盘价 DR7赋值: DR1 AND DR5 AND DR6 DR8赋值:DR7 AND DR7的10日过滤 当满足条件DR8时,在最低价-0.09位置书写文字,COLORD6BA63 当满足条件DR8时,在最高价和最低价位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,COLORD6BA63 当满足条件DR8时,在开盘价和收盘价位置之间画柱状线,宽度为6,1不为0则画空心柱.,线宽为2,COLORD6BA63 ER赋值:上次1日前的EMA55上穿EMA34距今天数 AND EMA34上穿EMA55 当满足条件ER时,在最低价-0.09位置书写文字,COLOR0099FF 当满足条件ER时,在最高价和最低价位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,COLOR0099FF 当满足条件ER时,在开盘价和收盘价位置之间画柱状线,宽度为6,1不为0则画空心柱.,线宽为2,COLOR0099FF FR赋值:上次1日前的EMA34上穿EMA13距今天数 AND EMA13上穿EMA34 当满足条件FR时,在最低价-0.09位置书写文字,画白色 当满足条件FR时,在最高价和最低价位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,画白色 当满足条件FR时,在开盘价和收盘价位置之间画柱状线,宽度为6,1不为0则画空心柱.,线宽为2,画白色 GR1赋值:上次"乖离率的BIAS2"(6,13,24)位于0和5之间距今天数 GR2赋值:EMA13>EMA34 AND EMA34>EMA55 AND EMA13>1日前的EMA13 GR3赋值:统计GR1日中满足"乖离率的BIAS2"(6,13,24)>10ANDH=GR1日内最高价的最高值的天数 GR4赋值:最高价=GR1日内最高价的最高值 GR5赋值:"平滑异同平均线的MACD"(12,26,9)<1日前的"平滑异同平均线的MACD"(12,26,9) GR6赋值:GR2 AND GR3 AND GR4 GR7赋值:GR2 AND GR3 AND GR4 AND GR5 当满足条件GR6ANDGR7时,在最高价+0.13位置书写文字,COLOR00FF00 当满足条件GR6ANDGR7时,在最高价和最高价+0.09位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR00FF00 HR2赋值:EMA13>=3日前的EMA13 AND EMA34>=1日前的EMA34 AND EMA55>=1日前的EMA55 AND 收盘价上穿EMA13 AND 收盘价上穿EMA34 AND 收盘价上穿EMA55 当满足条件HR2ANDFILTER(HR2,10)时,在最低价-0.09位置书写文字,COLORFFC8FF 当满足条件HR2ANDFILTER(HR2,10)时,在最高价和最低价位置之间画柱状线,宽度为0.5,1不为0则画空心柱.,COLORFFC8FF 当满足条件HR2ANDFILTER(HR2,10)时,在开盘价和收盘价位置之间画柱状线,宽度为6,1不为0则画空心柱.,线宽为2,COLORFFC8FF 程序源码EMA13:EMA(C,13),COLORYELLOW,LINETHICK2; EMA34:EMA(C,34),COLORWHITE; EMA55:EMA(C,55),COLORFF00FF; EMA120:EMA(C,120),COLORFFCC66; AR1:=EMA55>EMA34 AND EMA34>EMA13; AR2:=BARSLAST((C-EMA13)/EMA13*100<-6); AR3:=EMA13>=REF(EMA13,2); AR4:=COUNT(CROSS(C,EMA13),AR2)=1; AR5:=AR1 AND AR2 AND AR3 AND AR4; AR6:=AR5 AND FILTER(AR5,10); DRAWTEXT(AR6,L-0.09,'红杏出墙'),COLORYELLOW; STICKLINE(AR6,H,L,0.5,1),COLORYELLOW; STICKLINE(AR6,O,C,6,1),LINETHICK2,COLORYELLOW; BR1:=COUNT(BETWEEN((C-REF(C,1))/REF(C,1)*100,0,5) ,5)=5; BR2:=ABS((EMA13-EMA34)+(EMA34-EMA55))/C<0.2; BR3:=C>EMA55 AND (REF(C,1)<REF(EMA55,1) OR REF(C,2)<REF(EMA55,2) OR REF(C,3)<REF(EMA55,3) OR REF(C,4)<REF(EMA55,4) OR REF(C,5)<REF(EMA55,5)); BR4:=BR1 AND BR2 AND BR3; DRAWTEXT(BR4 AND FILTER(BR4,10),L-0.09,'蚂蚁上树'),COLOR00C5FF; STICKLINE(BR4 AND FILTER(BR4,10),H,L,0.5,1),COLOR00C5FF; STICKLINE(BR4 AND FILTER(BR4,10),O,C,6,1),LINETHICK2,COLOR00C5FF; CR1:=(C-REF(C,1))/REF(C,1)*100>0.5; CR2:=V>MA(V,5)*0.6; CR3:=COUNT(CROSS(EMA13,EMA55),3)=1; CR4:=ABS(EMA34-EMA55)/EMA55<0.03; CR5:=EMA55<=EMA120 AND EMA55>=REF(EMA55,1); CR6:=FILTER(CR1 AND CR2 AND CR3 AND CR4 AND CR5,2); STICKLINE(CR6,H,L,0.5,1),COLORF00FF0; STICKLINE(CR6,O,C,6,1),LINETHICK2,COLORF00FF0; DRAWTEXT(CR6,L-0.09,'红衣侠女'),COLORF00FF0; DR1:=EMA13>EMA34 AND EMA34<EMA55; DR2:=BARSLAST(CROSS(C,EMA55) ); DR3:=H=HHV(H,DR2); DR4:=BARSLAST(DR3); DR5:=COUNT(O>C AND C<REF(C,1) AND C>EMA55 AND BETWEEN((C-EMA55)/EMA55,0,0.02),DR4)=1; DR6:=C>REF(C,1) ; DR7:= DR1 AND DR5 AND DR6 ; DR8:=DR7 AND FILTER(DR7 ,10); DRAWTEXT(DR8,L-0.09,'黑客点击'),COLORD6BA63; STICKLINE(DR8,H,L,0.5,1),COLORD6BA63; STICKLINE(DR8,O,C,6,1),LINETHICK2,COLORD6BA63; ER:=BARSLAST(REF(CROSS(EMA55,EMA34),1)) AND CROSS(EMA34,EMA55); DRAWTEXT(ER,L-0.09,'均线互换'),COLOR0099FF; STICKLINE(ER,H,L,0.5,1),COLOR0099FF; STICKLINE(ER,O,C,6,1),LINETHICK2,COLOR0099FF; FR:=BARSLAST(REF(CROSS(EMA34,EMA13),1)) AND CROSS(EMA13,EMA34); DRAWTEXT(FR,L-0.09,'梅开二度'),COLORWHITE; STICKLINE(FR,H,L,0.5,1),COLORWHITE; STICKLINE(FR,O,C,6,1),LINETHICK2,COLORWHITE; GR1:=BARSLAST(BETWEEN("BIAS.BIAS2"(6,13,24),0,5) ); GR2:=EMA13>EMA34 AND EMA34>EMA55 AND EMA13>REF(EMA13,1); GR3:=COUNT("BIAS.BIAS2"(6,13,24)>10 AND H=HHV(H,GR1),GR1); GR4:=H=HHV(H,GR1); GR5:="MACD.MACD"(12,26,9)<REF("MACD.MACD"(12,26,9),1); GR6:=GR2 AND GR3 AND GR4; GR7:=GR2 AND GR3 AND GR4 AND GR5; DRAWTEXT(GR6 AND GR7,H+0.13,'见好就收!'),COLOR00FF00; STICKLINE(GR6 AND GR7,H,H+0.09,4,0),COLOR00FF00; HR2:=EMA13>=REF(EMA13,3) AND EMA34>=REF(EMA34,1) AND EMA55>=REF(EMA55,1) AND CROSS(C,EMA13) AND CROSS(C,EMA34) AND CROSS(C,EMA55); DRAWTEXT(HR2 AND FILTER(HR2,10),L-0.09,'三线推进'),COLORFFC8FF; STICKLINE(HR2 AND FILTER(HR2,10),H,L,0.5,1),COLORFFC8FF; STICKLINE(HR2 AND FILTER(HR2,10),O,C,6,1),LINETHICK2,COLORFFC8FF; |
|
|
