把通达信的附图"百发百中"做出一个选股公式

编写要求：

请老师把通达信的附图“百发百中”中的青云直上出现的位置做出一个选股+预警公式 BIAS1W :=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100; BIAS2W :=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100; BIAS3W :=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100; MM:=(BIAS1W+2*BIAS2W+3*BIAS3W)/6; MN:=MA(MM,3); VAR24:=LLV(LOW,36); VAR25:=HHV(HIGH,30); VAR26:=EMA((CLOSE-VAR24)/(VAR25-VAR24)*4,4)*25; 底背离:IF(MN90),17,0), COLOR6B238E,LINETHICK3; IF(MN90),12,0), COLORBLACK,LINETHICK3; DRAWTEXT(底背离,6,'底背离'),COLORA67D3D; DRAWTEXT(顶背离,6,'顶背离'),COLORGREEN; N:=20; MID:=MA(C,N); VART1:=POW((C-MID),2); VART2:=MA(VART1,N); VART3:=SQRT(VART2);[localimg=129,186]1[/localimg] UPPER:=MID+2*VART3; LOWER:=MID-2*VART3; BOLL:=REF(MID,1); UB:=REF(UPPER,1); LB:=REF(LOWER,1); LOWER1:=MID-VART3; LB1:=REF(LOWER1,1); 股价线:(C-LB1)/(UB-LB)*100,COLORGREEN, LINETHICK1; 趋势线:MA(股价线,6),COLORRED, LINETHICK3; 90,COLORGREEN, LINETHICK1; 50,COLORWHITE, LINETHICK1; 0,COLORWHITE, LINETHICK1; VARC:=SMA(ABS(L-REF(L,1)),3,1)/SMA(MAX(L-REF(L,1),0),3,1); 准备建仓:EMA(IF(L 0) AND (HD > LD)),HD,0),5) ); DMM:=SUM(IF(((LD > 0) AND (LD > HD)),LD,0),5); 神偷线:=(((DMP ) * 100) / TRJ); 辅助线:=((DMM * 100) / TRJ); 动向趋势线:=(MA(((ABS((辅助线 - 神偷线)) / (辅助线 + 神偷线)) * 100),3)); ADXR:=((动向趋势线 + REF(动向趋势线,3)) / 2); VAR3:=MA(CLOSE,2); VAR7:=REF(VAR3,1); 【强弱】:=((SMA(MAX((VAR3 - VAR7),0),5,1) / SMA(ABS((VAR3 - VAR7)),5,1)) * 100); 快买:( IF(((动向趋势线 > 88) AND (神偷线 88) AND (神偷线 =REF(MA5,1);H1:=MAX(MAX(MA5,MA13),MA30);L1:=MIN(MIN(MA5,MA13),MA30);一阳穿三线:= H1REF(MA2,1);满仓选股:IF(一阳穿三线,88,0),COLORFFFF00,LINETHICK2; IF(一阳穿三线,58,0),COLORFFFF00,LINETHICK2; DRAWTEXT(一阳穿三线,88,'满仓'),COLORYELLOW; VAR2:=0.0001*AMOUNT,; MA1:=0.0001*MA(AMOUNT,5); M2:=0.0001*MA(AMOUNT,10); 百日地量:LLV(VAR2,100)=VAR2,STICK,COLORRED,LINETHICK0; DRAWTEXT(百日地量,-10,'地量'),COLORRED; DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26); {选股设JC=10即可} DEA:=EMA(DIFF,9); MACD:=2*(DIFF-DEA); A:=IF(CROSS(0,DEA),1,0); A1:=IF(DIFFREF(SSS,1),-22,0),LINETHICK2,COLORFFFF00; IF(SSS-SSB=2 AND SSS>REF(SSS,1),-12,0),LINETHICK2,COLORFFFF00; DRAWTEXT(A1,-10,'W底'),COLORYELLOW; VAR1:=(CLOSE*2+HIGH+LOW)/4; SK:= EMA(VAR1,13)-EMA(VAR1,73); SD:= EMA(SK,2); V1:(CROSS(SK,SD) AND SK=0.03) OR (CROSS(SK,SD) AND SK2 OR C/REF(C,1)>0.035)); IF(V1,28,0),COLORYELLOW,LINETHICK2; IF(V1,18,0),COLORYELLOW,LINETHICK2; DRAWTEXT(V1,28,'买点'),COLORRED; AA05:=MA(C,5); 五日乖离率:=(C-AA05)/AA05*100; BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416; 速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1); 加速度5:=EMA((速度5-REF(速度5,1)),3); AA10:=MA(C,10);AA20:=MA(C,20); BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416; AA30:=MA(C,30); 三拾日乖离率:=(C-AA30)/AA30*100; (AA20-AA30)>REF((AA20-AA30),1) AND AA20>REF(AA20,1) AND AA30>REF(AA30,1); (AA30-AA20)30 AND BB10>45 AND CROSS(BB05,60),10); 加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND AA05>REF(AA05,1) AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA10>REF(AA10,1) AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) ; MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA05>REF(AA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1) (LOW * 1.051)) AND (COUNT((HIGH > (LOW * 1.051)),5) > 1)) AND ((((CLOSE / MA(CLOSE,40)) * 100) REF(SMA((CLOSE-LLV(LOW,8))/(HHV(HIGH,8)-LLV(LOW,8))*100,2,1),1) AND REF(SMA((CLOSE-LLV(LOW,8))/ (HHV(HIGH,8)-LLV(LOW,8))*100,2,1),1)0.02 OR C>REF(C,1)*1.01) AND V1.1,5)>3),3) ; DRAWTEXT(QUAN,88,'弱市百发百中'),COLORFFFF00; IF(QUAN,88,0),COLORFFFF00,LINETHICK2; IF(QUAN,60,0),COLORFFFF00,LINETHICK2; AA:=1; BB:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100; CC:=IF(AMOUNT/C/HHV(AMOUNT,9)/HHV(C,9)*100>100,100,AMOUNT/C/HHV(AMOUNT,9)/HHV(C,9)*100); DD:=CC/BB; 顶部雷达:CROSS(80,RSI)*88,LINETHICK2 ,COLORGREEN; CROSS(80,RSI)*58,LINETHICK2 ,COLORGREEN; DRAWTEXT(CROSS(80,RSI),88,'逃顶 '),COLORGREEN;

股票网解答：

AA05:=MA(C,5);

五日乖离率:=(C-AA05)/AA05*100;

AA30:=MA(C,30);

三拾日乖离率:=(C-AA30)/AA30*100;

MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA05>REF(AA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<AA30;

青云直上选股:=IF(FILTER(MR,10),30,0);

XG:FILTER(MR,10);

>