五日金叉十日七档黄金分割“天元修罗版“（通达信 主图 源码 贴图）
{1.以最近一次的5日和10日金叉点，为原点。
2.以均线的金叉点胃零点 向上和向下画 0.198， 0.382， 0.5的黄金分割线（正负都有）
这是”天元修罗“提出的理念。直接上图
{主图}
M5:MA(C,5);
M10:MA(C,10);
A:=BARSLAST(CROSS(M5,M10));
T:=BARSLAST(CURRBARSCOUNT=CONST(A)+1);
D:=MIN(M5,M10);
STICKLINE(T>=0,REF(D,T),REF(D,T),6,0),COLORRED,LINETHICK2;
STICKLINE(T>=0,REF(D+D*0.198,T),REF(D+D*0.198,T),6,-1),COLORLIMAGENTA;
STICKLINE(T>=0,REF(D-D*0.198,T),REF(D-D*0.198,T),6,-1),COLORLIMAGENTA;
STICKLINE(T>=0,REF(D+D*0.382,T),REF(D+D*0.382,T),6,-1),COLORGREEN;
STICKLINE(T>=0,REF(D-D*0.382,T),REF(D-D*0.382,T),6,-1),COLORGREEN;
STICKLINE(T>=0,REF(D+D*0.5,T),REF(D+D*0.5,T),6,-1),COLORYELLOW;
STICKLINE(T>=0,REF(D-D*0.5,T),REF(D-D*0.5,T),6,-1),COLORYELLOW;
DRAWTEXT(T=0,REF(D,T)*1.02,VARCAT(VARCAT('中心价：',VAR2STR(REF(D,T),2)),'元')),COLORWHITE;
DRAWTEXT(T=0,REF(D+D*0.198,T)*1.02,VARCAT(VARCAT('压力1：',VAR2STR(REF(D+D*0.198,T),2)),'元'))COLORYELLOW;
DRAWTEXT(T=0,REF(D+D*0.382,T)*1.02,VARCAT(VARCAT('压力2：',VAR2STR(REF(D+D*0.382,T),2)),'元'))COLORYELLOW;
DRAWTEXT(T=0,REF(D+D*0.5,T)*1.02,VARCAT(VARCAT('压力3：',VAR2STR(REF(D+D*0.5,T),2)),'元'))COLORYELLOW;
DRAWTEXT(T=0,REF(D-D*0.198,T)*1.02,VARCAT(VARCAT('支撑1：',VAR2STR(REF(D-D*0.198,T),2)),'元')),COLORMAGENTA;
DRAWTEXT(T=0,REF(D-D*0.380,T)*1.02,VARCAT(VARCAT('支撑2：',VAR2STR(REF(D-D*0.382,T),2)),'元')),COLORMAGENTA;
DRAWTEXT(T=0,REF(D-D*0.5,T)*1.02,VARCAT(VARCAT('支撑3：',VAR2STR(REF(D-D*0.5,T),2)),'元')),COLORMAGENTA;
{主图}
M5:MA(C,5);
M10:MA(C,10);
A:=BARSLAST(CROSS(M5,M10));
T:=BARSLAST(CURRBARSCOUNT=CONST(A)+1);
D:=MIN(M5,M10);
STICKLINE(T>=0,REF(D,T),REF(D,T),6,0),COLORRED,LINETHICK2;
STICKLINE(T>=0,REF(D+D*0.198,T),REF(D+D*0.198,T),6,-1),COLORLIMAGENTA;
STICKLINE(T>=0,REF(D-D*0.198,T),REF(D-D*0.198,T),6,-1),COLORLIMAGENTA;
STICKLINE(T>=0,REF(D+D*0.382,T),REF(D+D*0.382,T),6,-1),COLORGREEN;
STICKLINE(T>=0,REF(D-D*0.382,T),REF(D-D*0.382,T),6,-1),COLORGREEN;
STICKLINE(T>=0,REF(D+D*0.5,T),REF(D+D*0.5,T),6,-1),COLORYELLOW;
STICKLINE(T>=0,REF(D-D*0.5,T),REF(D-D*0.5,T),6,-1),COLORYELLOW;
DRAWTEXT(T=0,REF(D,T)*1.02,VARCAT(VARCAT('中心价：',VAR2STR(REF(D,T),2)),'元')),COLORWHITE;
DRAWTEXT(T=0,REF(D+D*0.198,T)*1.02,VARCAT(VARCAT('压力1：',VAR2STR(REF(D+D*0.198,T),2)),'元'))COLORYELLOW;
DRAWTEXT(T=0,REF(D+D*0.382,T)*1.02,VARCAT(VARCAT('压力2：',VAR2STR(REF(D+D*0.382,T),2)),'元'))COLORYELLOW;
DRAWTEXT(T=0,REF(D+D*0.5,T)*1.02,VARCAT(VARCAT('压力3：',VAR2STR(REF(D+D*0.5,T),2)),'元'))COLORYELLOW;
DRAWTEXT(T=0,REF(D-D*0.198,T)*1.02,VARCAT(VARCAT('支撑1：',VAR2STR(REF(D-D*0.198,T),2)),'元')),COLORMAGENTA;
DRAWTEXT(T=0,REF(D-D*0.380,T)*1.02,VARCAT(VARCAT('支撑2：',VAR2STR(REF(D-D*0.382,T),2)),'元')),COLORMAGENTA;
DRAWTEXT(T=0,REF(D-D*0.5,T)*1.02,VARCAT(VARCAT('支撑3：',VAR2STR(REF(D-D*0.5,T),2)),'元')),COLORMAGENTA;
- 上一篇：大底买入（源码 选股 通达信 贴图） 2015/7/20
- 下一篇：主力副图指标（源码 副图 通达信 贴图） 2015/7/20
