【原】风险系数参考主图指标公式

程序源码

DRAWGBK(CLOSE>0,RGB(21,20,44),RGB(61,35,54),0,0,1);

LI:=1230927;

X:=IF(DATE<LI,1,DRAWNULL);

DRAWTEXT_FIX(DATE>=LI,0.9,0.9,0,'TIME OUT');

S:=2.7*X;

BK1:=STRCAT(HYBLOCK,' ');

BK2:=STRCAT(BK1,DYBLOCK);

BK3:=STRCAT(BK2,' ');

BK4:=STRCAT(BK3,GNBLOCK);

DRAWTEXT_FIX(ISLASTBAR,0.0,0.01,0,STRCAT('所属板块：',BK4)),COLORFFFF00;

STICKLINE(C>O,H,L,0,0),COLORRED;

STICKLINE(C>O,O,C,S,0),COLOR000088;

STICKLINE(C>O,O,C,S/2,0),COLOR0000AA;

STICKLINE(C>O,O,C,S/3,0),COLOR0000CC;

STICKLINE(C>O,O,C,S/6,0),COLOR0000FF;

STICKLINE(C<O,H,L,0,0),COLOR888800;

STICKLINE(C<O,O,C,S,0),COLOR888800;

STICKLINE(C<O,O,C,S/2,0),COLORAAAA00;

STICKLINE(C<O,O,C,S/3,0),COLORCCCC00;

STICKLINE(C<O,O,C,S/6,0),COLORFFFF00;

STICKLINE(C=O,H,L,0,0),COLORWHITE;

STICKLINE(C=O,O,C,S,0),COLORWHITE;

STICKLINE(C=O,H,L,0,0),COLORWHITE;

RR:=EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3)/4*X;

趋势线:EMA((MA(C,3)+MA(C,5)+MA(C,8)*2+MA(C,13)*3+MA(C,21)*5)/12,8)*X,COLORLIRED,LINETHICK2;

空:IF(C<趋势线,趋势线,DRAWNULL),COLORGREEN,LINETHICK2;

ZT:=100*(C-REF(C,1))/REF(C,1)>10-0.01/REF(C,1);

DRAWTEXT(crOSS(RR,2),L*0.99,'底'),COLORYELLOW;

{DRAWICON(CROSS(RR,2),L*0.99,11);}

DRAWICON(CROSS(RR,5),L*0.99,7);

DRAWICON(CROSS(23.16,RR),H*1.015,8);

X_2:=CROSS(RR,5);

STICKLINE(X_2,LOW,HIGH,0,0),COLOR0088EE;

STICKLINE(X_2,CLOSE,OPEN,S,0),COLOR0055AA;

STICKLINE(X_2,CLOSE,OPEN,S/2,0),COLOR0099EE;

STICKLINE(X_2,CLOSE,OPEN,S/3,0),COLOR00AAFF;

STICKLINE(X_2,CLOSE,OPEN,S/6,0),COLORYELLOW;

VAR2:=LLV(LOW,33);

VAR3:=HHV(HIGH,21);

VAR4:=EMA((CLOSE-VAR2)/(VAR3-VAR2)*100,10)*-1+100;

风险系数:100-EMA(0.191*REF(VAR4,1)+0.809*VAR4,1)*X,NODRAW;

换手:=DYNAINFO(37)*100;

macd共振:=MacD.MACD>=REF(MACD.MACD,1) AND REF(MACD.MACD,1)<REF(MACD.MACD,2);

SCORE1:=IF(LLV(V,3)=LLV(V,10),1,0);{3天内出现地量}

SCORE2:=IF(LLV(L,5)/MA(C,5)<=0.921,1,0); {超跌偏离5日线较远或者刚站上5日线}

SCORE3:=IF(COUNT(MACD共振 OR CROSS(MACD.DIF,MACD.DEA),3)>=1,1,0);{3天内MACD共振}

SCORE4:=IF(C>=REF(C,1)*1.03 AND REF(C,1)<REF(C,2),1,0);{收盘价底分型}

SCORE5:=IF(COUNT(EVERY(C<REF(C,4),9),5)>=1,1,0);{5天存在9转序列}

SCORE:=SCORE1+SCORE2+SCORE3+SCORE4+SCORE5*X;

{反转星级:SCORE,NODRAW;}

反转评分:=IF(SCORE=5,'☆☆☆☆☆',IF(SCORE=4,'☆☆☆☆',IF(SCORE=3,'☆☆☆',IF(SCORE=2,'☆☆',IF(SCORE=1,'☆',DRAWNULL)))));

{底分型:=H>REF(H,1) AND L>REF(L,1) AND REF(H,1)<REF(H,2) AND REF(L,1)<REF(L,2);

DRAWTEXT(REF(EVERY(C<REF(C,4),9),1) AND C>=REF(C,4),L*0.99,'←9转'),COLORYELLOW;

DRAWTEXT(底分型 AND MACD共振 AND C/REF(C,1)>=1.05,L*0.99,'←底分型'),COLORFF00FF;}

DRAWTEXT_FIX(V>O,0.888,0.80,0,STRCAT('风险系数:',STRCAT(CON2STR(风险系数,2),' '))),COLORFFFFFF;

DRAWTEXT_FIX(V>O,0.888,0.85,0,STRCAT('参考:',STRCAT(CON2STR(LLV(风险系数,250),2),STRCAT('~',CON2STR(HHV(风险系数,250),2))))),COLORA6E500;

{DRAWTEXT_FIX(V>O,0.888,0.90,0,STRCAT('反转星级:',反转评分)),COLORLIRED;};

注：

       馆内各种公式为学习编程而保存，实战使用前一定要看其中是否有未来函数并自己亲自测试成功率，决不能依据公式名称的描述和形容去投资，据此入市造成投资损失由投资者自己承担。

       发文不易，如获益，欢迎赞赏，赞赏必复！