股价在压力黄线上的选股公式

编写条件：

求助老师改一个股价在压力黄线上的选股公式： 源码如下：DRAWBAND(MA(CLOSE,60),RGB(55,0,0),MA(CLOSE,120),RGB(0,91,0)); DRAWBAND(MA(CLOSE,5),RGB(155,50,50),MA(CLOSE,10),RGB(83,123,68)); DRAWKLINE(H,O,L,C); MA5:MA(CLOSE,5),COLORWHITE; MA10:MA(CLOSE,10),COLORYELLOW; MA20:MA(CLOSE,20),COLORMAGENTA; MA60:MA(CLOSE,60),COLORGREEN; MA120:MA(CLOSE,120),COLORLIMAGENTA; MA240:MA(CLOSE,240),COLORBLUE; DRAWICON(CROSS(MA10,MA20),MA20,1); {10日上穿20日做记号} DRAWICON(CROSS(MA20,MA60),MA60,1); {20日上穿60日做记号} DRAWICON(CROSS(MA20,MA120),MA120,1); {20日上穿60日做记号} DRAWICON(CROSS(MA20,MA240),MA240,1);{20日上穿120日做记号} DRAWICON(CROSS(MA60,MA120),MA60,23); {60日上穿120日做记号} DRAWICON(CROSS(MA60,MA240),MA240,23); {60日上穿240日做记号} DRAWICON(CROSS(MA120,MA240),MA240,23);{120日上穿240日做记号} DRAWICON(CROSS(MA10,MA5),MA10,2); {5日下穿10日做记号} DRAWICON(CROSS(MA20,MA10),MA20,2); {10日下穿20日做记号} DRAWICON(CROSS(MA60,MA20),MA60,2); {20日下穿60日做记号} DRAWICON(CROSS(MA120,MA60),MA60,2); {60日下穿120日做记号} 月价托:=MA5>MA20 AND MA20>MA60 AND MA60>MA120 AND MA5>MA20 AND CROSS(MA10,MA20); 季价托:=MA20>MA60 AND MA20>MA60 AND CROSS(MA20,MA60); 短长价托:=MA5>MA60 AND MA5>MA10 AND CROSS(MA10,MA60); 半年托:=MA60>MA120 AND MA60>MA120 AND CROSS(MA60,MA120); 熊来:=MA60MA240 AND MA120>MA240 AND CROSS(MA120,MA240); 月蜘蛛:=MA5>MA10 AND MA10>MA20 AND CROSS(MA5,MA20)AND CROSS(MA10,MA20); 死蜘蛛:=MA5MA10 AND MA20>MA60 AND CROSS(MA20,MA10); DRAWTEXT(压,MA20+0.012,'压'),COLORYELLOW; VOL5:=MA(VOL,5),COLORWHITE; VOL10:=MA(VOL,10),COLORYELLOW; VOL40:=MA(VOL,40),COLORFF00FF ; 量托:=VOL5>=VOL40 AND CROSS(VOL10,VOL40) AND REF(VOL10,1)MA20 AND (MA20=MA10 OR MA20>MA10)); BB1:=REF(COUNT(CMA(VOL,5) AND (C-REF(C,1))/REF(C,1)*100>3; 芙蓉出水:=BB AND CC1,COLOR00FF00; DRAWTEXT(芙蓉出水,H+0.12,'芙蓉出水'),COLORFF00FF; STICKLINE(芙蓉出水,H,L,0.5,1),COLORFF00FF; STICKLINE(芙蓉出水,O,C,4,1),LINETHICK2,COLORFF00FF; MA1:=MA(CLOSE,5); MA2:=MA(CLOSE,10); MA3:=MA(CLOSE,20); ZJ:=AMOUNT/10000;{资金} TM:=V-MA(V,10);{量填满} 一穿三:=MA1>O AND MA2>O AND MA3>O AND MA1OPEN ; DRAWTEXT(一穿三,L-0.012,'穿'),COLORFF00FF; 铡刀:=MA5C AND MA10>MA20 AND MA20>MA60 AND CLOSEBARSLAST(CD) AND NOT(CD); IF(T3,E,E),COLORFF00FF,POINTDOT; STICKLINE(T3,E,E,10,0),COLORFF00FF; 不会贴图请老师谅解 谢谢

编写方法：

 TY:=C;

A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BacKSET(B1,10+1); HD:=FILTER(C1,10);

前期高位:=REF(C,BArslAst(HD));

C>前期高位;