RM3线一线阴线(通达信公式 主图 源码 测试图)

[复制链接]
查看17 | 回复0 | 2022-6-27 18:48:48 | 显示全部楼层 |阅读模式
RM3线一线法法:    
       1  上RM3线,当天线向下,下一天线向上(打46键预测),当天收盘RM3线乖离率小于3.5,可收盘进或下一天开盘进,当天线向上,开始做。
         2  线向上,一律开盘线乖离率小于2进,  收盘线乖离率小于3.5可进, 卖出股后阴线极近RM3可以收盘收回。
         3  线向上,涨五天后,涨第六天开始、只要上一天开在线下当天就只卖不买,涨第六天开始,  线向上,只要开在线上下一天继续做下去。
         4  卖日是阴线 做阴线法,线向下一样做


MA5:=MA(CLOSE,5)COLORGREEN;

MA5角度:=ATAN((MA5/REF(MA5,1)-1)*100)*180/3.1416,NODRAW,COLORWHITE;
一:C*1.012,NODRAW,COLORRED;
二:C*1.022,NODRAW,COLOR00FFFF;
三:C*1.032,NODRAW,COLORGREEN;
四:C*1.042,NODRAW,COLOR00FFFF;
五:C*1.052,NODRAW,COLORGREEN;
六:C*1.062,NODRAW,COLORWHITE;
七:C*1.072,NODRAW,COLOR00FFFF;
八:C*1.082,NODRAW,COLORGREEN;
九:C*1.092,NODRAW;
十:C*1.102,NODRAW,COLORFF00FF;
十一:C*1.112,NODRAW,COLORRED;
十二:C*1.122,COLORYELLOW,NODRAW;
十五:C*1.152,NODRAW;
二十:C*1.202,NODRAW;
三十:C*1.302,NODRAW,COLORRED;
F:=100*(C-REF(C,1))/REF(C,1);
STICKLINE(F>4.9,C,O,2.2,0),COLORFFFFFF;
今小昨:=IF(C<REF(O,1) AND F<0,1,0);
P1:=今小昨;
今小前:=IF(C<REF(O,2) AND F<0,1,0);
P2:=今小前;
STICKLINE(P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,OPEN,CLOSE,1,0),COLORMAGENTA;
 
A1:=CLOSE;
A2:=OPEN;
 
STICKLINE(A1<A2 AND F<=-9.9,A2,A1,3,0),COLOR00FF00;
 
STICKLINE(P1=1 AND REF(P1,1)=0 AND P2=1  AND REF(P2,1)=0,OPEN,CLOSE,1,0),COLORAAAAAA;
STICKLINE(A1<A2 AND F<-2.9 AND F>-5,A1+(A2-A1)/3,A1+(A2-A1)/3,1,0),COLORRED;
STICKLINE(A1<A2 AND F<-2.9 AND F>-5,A1+2*(A2-A1)/3,A1+2*(A2-A1)/3,1,0),COLORRED;
STICKLINE(A1<A2 AND F<=-5 AND F>-7,A1+(A2-A1)/2,A1+(A2-A1)/2,1,0),COLORRED;
STICKLINE(A1<A2 AND F<=-7 AND F>-10,A1+2*(A2-A1)/3,A1+(A2-A1)/3,3,1),COLORRED;
STICKLINE(A1>A2 AND F>2.9 AND F<5,A2+(A1-A2)/3,A2+(A1-A2)/3,1,0),COLORYELLOW;
STICKLINE(A1>A2 AND F>2.9 AND F<5,A2+2*(A1-A2)/3,A2+2*(A1-A2)/3,1,0),COLORYELLOW;
STICKLINE(A1>A2 AND F>=5.5 AND F<7,A2+(A1-A2)/2,A2+(A1-A2)/2,1,0),COLORYELLOW;
STICKLINE(A1>A2 AND F>=7 AND F<9.8,A2+2*(A1-A2)/3,A2+(A1-A2)/3,1,1),COLORYELLOW; 
{STICKLINE(P1=1 AND REF(P1,1)=0 AND P2=1  AND REF(P2,1)=0,OPEN,CLOSE,1,0),COLORAAAAAA;}
{出标志}
  F1:=100*(C-REF(C,1))/REF(C,1);
  HT:=(H>REF(C,1)*1.032) AND C>=O ;
BZ1A:=HT AND H>REF(H,2);
BZ1:=BZ1A AND COUNT(BZ1A,4)=1;
一字:=C=O AND C=L  AND C=H AND F1>9.4;
BZ2:=((BZ1 AND  REF(BZ1,1)=0) OR REF(一字,1)=1)
AND 一字=0 ;
DRAWTEXT(BZ2,L*0.99, '标'),COLORYELLOW;
{出黄头}
  STICKLINE(H>(REF(C,1)*1.032),(O+C)/2,H,0.1,0),COLOR00FFFF;
M3:=MA(CLOSE,3)COLORGREEN;
{RM3}
RM3: (REF(MA(C,3),1))  ,COLOR00FFFF;
M5:=MA(CLOSE,5),COLOR00FFFF;
IF(M5<REF(M5,1),RM3,DRAWNULL),COLORFFF000;
K9:=((EMA(KDJ.K,3)-50)*2);
IF(K9>REF(K9,1),RM3,DRAWNULL),COLORF000FF;
IF(K9>REF(K9,1),RM3,DRAWNULL),POINTDOT,COLOR0000FF,LINETHICK5;
线买最高涨:100*(H-REF(RM3,1))/REF(RM3,1),NODRAW,COLOR00FFFF;
{线买赚四点:RM3*1.042,NODRAW,COLORWHITE;}
RM3角度:ATAN((RM3/REF(RM3,1)-1)*100)*180/3.1416,NODRAW,COLORWHITE;
BIAS5:=((CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*100),NODRAW,COLOR00FFFF;
{昨CC半,上一天实体一半偏上一点位置}
{分析家公式网 WWW.70822.COM整理}
DA:=MAX(C,O);
DB:=MIN(C,O);
CC半A:=(DA-(DA-DB)/2.5);
CC半:=IF(C>O,CC半A,C),NODRAW;
昨CC半:=REF(CC半,1),COLORYELLOW,NODRAW;
昨CC半买涨:100*(H-REF(昨CC半,1))/REF(昨CC半,1),COLOR88AAFF,NODRAW;
STICKLINE(ISLASTBAR,昨CC半,昨CC半,10,-1),COLORFF66CC;
明线乖3点5:M3*1.02 ,NODRAW,COLORWHITE;
昨线乖高赚:100*(H-REF(明线乖3点5,2))/REF(明线乖3点5,2),COLOR00FFFF,NODRAW;
收线乖:((CLOSE-RM3)/RM3*100),NODRAW,COLOR00FFFF;
最底线乖:((L-RM3)/RM3*100),NODRAW,COLOR00FFFF;
开线乖:((O-RM3)/RM3)*100,NODRAW,COLOR00FFFF;
 
FH:=100*(H-REF(C,1))/REF(C,1),COLOR88AAFF,NODRAW;
F4:=(C/REF(C,1)-1)*100;
今小昨1:=IF(C<REF(O,1) AND F4<0,1,0);
P11:=今小昨1;
今小前1:=IF(C<REF(O,2) AND F4<0,1,0);
P21:=今小前1;
ZY1:=P11=0 AND REF(P11,1)=1 AND P21=0 AND REF(P21,1)=1;
ZY11:=REF(L,BARSLAST(ZY1));
ZY2:=CROSS(ZY11,C) AND ZY1=0;
 
STICKLINE(ISLASTBAR ,REF(C,1)*1.042,REF(C,1)*1.042,0,-1),COLOR00FFFF;{把前面第一个C改成 ISLASTBAR 就只有最后一天有黄虚线}
DRAWNUMBER(ISLASTBAR,REF(C,1)*1.03-0.03,REF(C,1)*1.042),COLOR00FFFF;
 
A3:=C>REF(C,4);
NT:=BARSLASTCOUNT(A3);
TJ11:=NT=9;
TJ13:=ISLASTBAR AND BETWEEN(NT,5,8);
AY:=(BACKSET(TJ11>0,9) OR   BACKSET(TJ13>0,NT))*NT;
DRAWTEXT(AY>0,H*1.02,VAR2STR(AY,0)),COLORFF00FF;
DRAWTEXT(NT=9,H*1.02,'9'),COLORGREEN;
B1:=C<REF(C,4);
NT0:=BARSLASTCOUNT(B1);
TJ21:=NT0=9 ;
WWW70822COM:=NT0=9;
TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8);
AY1:=(BACKSET(TJ21>0,9)  OR  BACKSET(TJ23>0,NT0))*NT0;
DRAWTEXT(AY1>0,L*0.98,VAR2STR(AY1,0)),COLORFF00FF;
DRAWTEXT(NT0=9,L*0.98,'9'),COLORGREEN;
 
 
 
所属板块:=STRCAT('【所属板块】',STRCAT(STRCAT(STRCAT(' [行业]—',HYBLOCK),STRCAT(' [地域]—',DYBLOCK)),STRCAT(' [概念]—',GNBLOCK)));
总股本:=STRCAT(STRCAT(' 总股本:',CON2STR(TOTALCAPITAL/1000000,2)),'亿');
流通盘:=STRCAT(STRCAT(' 流通盘:',CON2STR(CAPITAL/1000000,2)),'亿');
全流通:=STRCAT(STRCAT(' 流通比:',CON2STR(CAPITAL/TOTALCAPITAL*100,2)),'%');
市值:=STRCAT(STRCAT(' 流通市值:',CON2STR((CAPITAL/1000000)*C,2)),'亿');
上市日期:=STRCAT(' 上市日期: ',CON2STR(HHV((BARSCOUNT(C)=0)*(DATE+19000000),0),0));
股本市值:=STRCAT('【股本市值】',STRCAT(STRCAT(STRCAT(STRCAT(总股本,流通盘),全流通),市值),上市日期));
市盈率:=STRCAT(' 市盈率:',CON2STR(C/FINANCE(33),2));
市销率:=STRCAT(' 市销率:',CON2STR(C/(FINANCE(20)/FINANCE(1)),2));
市净率:=STRCAT(' 市净率:',CON2STR(C/FINANCE(34),2));
净资收益率:=STRCAT(' 净资收益率:',CON2STR(FINANCE(33)/FINANCE(34)*100,2));
毛利率:=STRCAT(' 毛利率:',CON2STR((FINANCE(20)-FINANCE(21))/FINANCE(20)*100,2));
净利润率:=STRCAT(' 净利率:',CON2STR(FINANCE(30)/FINANCE(20)*100,2));
主营利润率:=STRCAT(' 主营利润率:',CON2STR(FINANCE(23)/FINANCE(20)*100,2));
当前业绩:=STRCAT('【当前业绩】',STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(STRCAT(市盈率,市销率),市净率),净资收益率),毛利率),净利润率),主营利润率));
DRAWTEXT_FIX(ISLASTBAR,0.005,0.02,0,所属板块),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.07,0,股本市值),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.12,0,当前业绩),COLORMAGENTA;
DRAWTEXT_FIX(1,0.005,0.17,0,'莸利比例:'),COLORYELLOW;
DRAWNUMBER_FIX(1,0

20204270263996750.rar

9.55 KB, 下载次数: 0

售价: 3 金钱  [记录]  [购买]

20204270263996750.rar

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则