指标源码：VAR1:=REF(HHV(H,20),1)<REF(LLV(L,20),1)*(1+5/100) AND C>REF(HHV(H,20),1); VAR2:=MA(C,20); VAR3:=VAR2+2*STD(C,20); VAR4:=VAR2-2*STD(C,20); VAR5:=(VAR3-VAR4)/VAR2; VAR6:=REF(VAR5,1)<0.05 AND C>REF(VAR3,1); VAR7:=HHV(H,15)/LLV(L,15)<1.1; VAR8:=V/MA(V,5)>1.5; VAR9:=C>REF(HHV(H,15),1)*(1+3/100); VAR10:=VAR7 AND VAR8 AND VAR9; VAR11:=EMA(C,12)-EMA(C,26); VAR12:=Abs(VAR11)<0.2; VAR13:=HHV(H,13)/LLV(L,13)<1.08; VAR14:=C>REF(HHV(H,13),1) AND VAR11>REF(VAR11,1); VAR15:=VAR12 AND VAR13 AND VAR14; VAR16:=MA(C,5); VAR17:=MA(C,10); VAR18:=MA(C,20); VAR19:=MAX(VAR16,MAX(VAR17,VAR18))/MIN(VAR16,MIN(VAR17,VAR18)); VAR20:=VAR19<1.03; VAR21:=C>MAX(VAR16,MAX(VAR17,VAR18)) AND V>MA(V,5)*1.2; VAR22:=VAR20 AND VAR21; VAR23:=REF(HHV(H,30),1); VAR24:=REF(LLV(L,30),1); VAR25:=VAR23/VAR24<1.15; VAR26:=COUNT(BETWEEN(C,VAR24,VAR23),30)>=30*0.8; VAR27:=C>VAR23 AND V>REF(MA(V,5),1)*1.5; VAR28:=VAR25 AND VAR26 AND VAR27; VAR29:=(C-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K:=SMA(VAR29,3,1); D:=SMA(K,3,1); J:=3*K-2*D; VAR30:=J<30 AND K<40 AND D<40; VAR31:=HHV(H,10)/LLV(L,10)<1.1; VAR32:=C>REF(HHV(H,10),1) AND J>REF(J,1); VAR33:=VAR30 AND VAR31 AND VAR32; VAR34:=LLV(L,30/2); VAR35:=LLV(L,30/2); VAR36:=REF(HHV(H,30/2),30/2); VAR37:=ABS(VAR34-VAR35)/VAR34<0.03; VAR38:=C>VAR36 AND V>MA(V,5)*1.5; VAR39:=VAR37 AND VAR38; VAR40:=crOSS(VAR1 OR VAR6 OR VAR10 OR VAR15 OR VAR22 OR VAR28 OR VAR33 OR VAR39,0.5); DRAWICON(VAR40,L*0.98,1); STICKLINE(VAR40,O,C,1,0),COLORYELLOW; DRAWTEXT(VAR1 AND VAR40,L*0.99,'↖横盘突破'),COLOR0000FF; DRAWTEXT(VAR6 AND VAR40,L,'↖布林突破'),COLOR00FF00; DRAWTEXT(VAR10 AND VAR40,L*0.98,'↖量价突破'),COLORMAGENTA; DRAWTEXT(VAR15 AND VAR40,L*0.97,'↖macd零轴突破'),COLOR00FFFF; DRAWTEXT(VAR22 AND VAR40,L*0.96,'↖均线粘合突破'),COLORFFFFFF; DRAWTEXT(VAR28 AND VAR40,L*0.93,'↖箱体震荡突破'),COLORFF0000; DRAWTEXT(VAR33 AND VAR40,L*0.95,'↖kdj低位突破'),COLOR0080FF; DRAWTEXT(VAR39 AND VAR40,L*0.94,'↖双底形态突破颈线'),COLORFF80FF; M5:MA(C,5);M10:MA(C,10);M20:MA(C,20); {风险系数Z} XX1:=(FINANCE(11)-FINANCE(15))/FINANCE(10)*1.2; XX2:=(FINANCE(31)+FINANCE(17))/FINANCE(10)*1.4;{盈余公积用资本公积金代替} XX3:=FINANCE(23)/FINANCE(10)*3.3; XX4:=FINANCE(19)/FINANCE(15)*0.6;{缺长期负债或负债总额} XX5:=FINANCE(20)/FINANCE(15)*0.999;Z值:=XX1+XX2+XX3+XX4+XX5; DRAWTEXT_FIX(1,0.07,0.94,1,'财务预警：'),COLORYELLOW; DRAWTEXT_FIX(Z值<1.2,0.1,0.94,1,' ●重 警●'),COLORRED; DRAWTEXT_FIX( BETWEEN(Z值,1.2,2.6),0.1,0.94,1,' ○轻 警○'),COLOR0099FF; DRAWTEXT_FIX(Z值>2.6,0.1,0.94,1,' ◎无 警◎'),COLORLIGREEN; {阻力与支撑、评分显示Z} E:=(HIGH+LOW+OPEN+2*CLOSE)/5;阻力:=2*E-LOW;支撑:=2*E-HIGH; DRAWTEXT_FIX(C!=0,0.90,0.90,0,STRCAT('参考阻力：',STRCAT(CON2STR(阻力,2),' '))),COLORFFFF00; DRAWTEXT_FIX(C!=0,0.90,0.96,0,STRCAT('参考支撑：',STRCAT(CON2STR(支撑,2),' '))),COLORGREEN; X1:=IF(MA(C,5)>MA(C,10),20,0);X2:=IF(MA(C,20)>MA(C,60),10,0); X3:=IF(kdJ.J>KDJ.K,10,0);X4:=IF(MACD.DIF>MACD.DEA,10,0); X5:=IF(MACD.MACD>0,10,0);X6:=IF(V>MA(V,60),10,0); X7:=IF(WINNER(C)>0.5,10,0);X8:=IF(C/REF(C,1)>1.03,10,0); XX:=X1+X2+X3+X4+X5+X6+X7+X8; DRAWTEXT_FIX(V>O,0.90,0.84,0,STRCAT('量化评分：',STRCAT(CON2STR(XX,2),' '))),COLORYELLOW; {九转序列Z} B:=C<REF(C,4);N1:=CURRBARSCOUNT; B8:=(N1>=1 AND COUNT(B,8)=8); DRAWNUMBER(B8 AND REF(B,8)=0,L,8),COLORMAGENTA; B9:=(N1>=1 AND COUNT(B,9)=9); DRAWNUMBER(B9 AND REF(B,9)=0,L,9),COLORYELLOW; A:=C>REF(C,4);A_8:=(N1>=1 AND COUNT(A,8)=8); DRAWNUMBER(A_8 AND REF(A,8)=0,H*1.02,8),COLORMAGENTA; A_9:=(N1>=1 AND COUNT(A,9)=9); DRAWNUMBER(A_9 AND REF(A,9)=0,H*1.02,9),COLORYELLOW; {卖点Z} M:=5;N:=12; VAR50:=H=HHV(H,N) AND L!=LLV(L,N); VAR51:=VAR50*250; VAR52:=BARSLASTCOUNT(VAR51=250)=M; VAR53:=(C-REF(C,1))/REF(C,1)*100>9.88 AND C=H; VAR54:=IF(VAR53,0,VAR52); VAR55:=CROSS(VAR53,0.5); VAR56:=BARSLAST(VAR55);VAR57:=CROSS(0.5,VAR53) ; VAR58:=COUNT(VAR52,VAR56+1)>0; VAR59:=VAR57 AND VAR58; 卖:=VAR54 OR VAR59,NODRAW;DRAWICON(卖,H*1.03,8); STICKLINE(卖,OPEN,CLOSE,1,0),COLORGREEN;DRAWTEXT(卖,H*1.01,' ★卖'),COLORGREEN; {炸板率和连板率Z/F} 炸板率:SCJYVALUE(3,2,0)/(SCJYVALUE(3,1,0)+SCJYVALUE(3,2,0))*100,COLORGREEN,NODRAW; 连板率:SCJYVALUE(23,1,0)/SCJYVALUE(3,1,0)*100,COLORYELLOW,NODRAW; {昨天涨幅Z} 昨天涨幅:=(REF(C,1)-REF(C,2))/REF(C,2)*100; DRAWTEXT_FIX(1,0.01,0.10,0,STRCAT(STRCAT('昨天涨幅：',CON2STR(昨天涨幅,2)),' ％')),COLORGREEN;
|
发表于 
