昨晚很晚了,正在赶制“含苞待放选股”,收到“华星股票”同学求助,需要写一个小阳小阴围绕均线攀爬,均线就是一棵树,K线就像蚂蚁,顺着这棵树往上爬。特意还例举2个票,002300和002003的走势。等我忙完公式,更你回复,要求你提供量化数据。你一直没回信,我只好根据自己的理解写了一个“蚂蚁上树”也没经过你同意,拿来和论坛同学共享。相信你也是大度的,不会怪我,对吧。估计你还会有更好的量化标准。我抛砖引玉吧。再次鸣谢“华星股票”同学。 主图 E13:EXPMA(C,13),,COLORGREEN; ZF:=(C-REF(C,1))/REF(C,1)*100; TJ:=EVERY(RANGE(ZF,-2.22,2.55),15); TJ1:=C>O AND C/REF(C,1)>1.03; TJ2:=COUNT(E13>=REF(E13,1),15); JD:=(ATAN((E13/REF(E13,15)-1)*100)*180/3.1415926); A:=IF(MIN(C,O)>E13,MAX(C,O)/E13*100-100,IF(MAX(C,O)<E13,E13/MIN(C,O),E13)); B:=MAX(C,O)/MIN(C,O)*100-100; LL:=LLV(A,15); HH:=HHV(A,15); HB:=COUNT(B>3,15)<2; XG:=REF(TJ,1) AND TJ1 AND TJ2>13 AND JD>72 AND REF(LL,1)<1.37 AND REF(HH,1)<11.15; STICKLINE(XG,C,O,2,0),COLORGREEN; STICKLINE(XG,L,H,2,0),COLORGREEN; DRAWTEXT(XG,L*0.95,'上树'),COLORYELLOW; 幅图 E13:=EXPMA(C,13); ZF:=(C-REF(C,1))/REF(C,1)*100; TJ:=EVERY(RANGE(ZF,-2.22,2.55),15); TJ1:=C>O AND C/REF(C,1)>1.03; TJ2:=COUNT(E13>=REF(E13,1),15); JD:=(ATAN((E13/REF(E13,15)-1)*100)*180/3.1415926); A:=IF(MIN(C,O)>E13,MAX(C,O)/E13*100-100,IF(MAX(C,O)<E13,E13/MIN(C,O),E13)); B:=MAX(C,O)/MIN(C,O)*100-100; LL:=LLV(A,15); HH:=HHV(A,15); HB:=COUNT(B>3,15)<2; XG:=REF(TJ,1) AND TJ1 AND TJ2>13 AND JD>72 AND REF(LL,1)<1.37 AND REF(HH,1)<11.15 AND REF(B,1); STICKLINE(XG,0,8,1.8,0),COLORGREEN; 选股 E13:=EXPMA(C,13); ZF:=(C-REF(C,1))/REF(C,1)*100; TJ:=EVERY(RANGE(ZF,-2.22,2.55),15); TJ1:=C>O AND C/REF(C,1)>1.03; TJ2:=COUNT(E13>=REF(E13,1),15); JD:=(ATAN((E13/REF(E13,15)-1)*100)*180/3.1415926); A:=IF(MIN(C,O)>E13,MAX(C,O)/E13*100-100,IF(MAX(C,O)<E13,E13/MIN(C,O),E13)); B:=MAX(C,O)/MIN(C,O)*100-100; LL:=LLV(A,15); HH:=HHV(A,15); HB:=COUNT(B>3,15)<2; XG:REF(TJ,1) AND TJ1 AND TJ2>13 AND JD>72 AND REF(LL,1)<1.37 AND REF(HH,1)<11.15; |
