当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：红帆君主，自动划线公式（通达信公式 主图 源码 测试图）
软件名称：[B]红帆君主，自动划线公式（通达信公式 主图 源码 测试图）[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：免费版
软件大小：7.00 KB
官方主页：Home Page
更新时间：2021-12-05 00:15:11
软件简介:
红帆君主
AAA:=(3*C+H+L+O)/6;
VAR1:=(8*AAA+7*REF(AAA,1)+6*REF(AAA,2)+5*REF(AAA,3)+4*REF(AAA,4)+3*REF(AAA,5)+2*REF(AAA,6)+REF(AAA,8))/36;
VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3;
VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3;
VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3;
VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3;
VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;
短:VAR1,COLORWHITE;
中:VAR6,COLORYELLOW;
跌:IF(VAR1=VAR6,VAR6, DRAWNULL),COLORGREEN;
买:IF(中>=REF(中,1),中,DRAWNULL),LINETHICK1,COLORRED;
DRAWBAND(短,RGB(125,50,50),中,RGB(0,100,50));
支:IF(CLOSE>SAR(4,2,20),SAR(4,2,20),DRAWNULL),COLORFF00FF,LINETHICK2;
转:IF(CLOSE=SAR(4,2,20),SAR(4,2,20),DRAWNULL),COLORFF00FF,LINETHICK2;
短,VAR1,COLORWHITE;
中,VAR6,COLORYELLOW;
跌,IF(VAR1=VAR6,VAR6, DRAWNULL),COLORGREEN;
{红 分析家公式网}
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0),COLOR000099;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0),COLOR0000BB;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0),COLOR0000DD;
STICKLINE(CLOSE>OPEN,H,L,0,0),COLOR0000FF;
{绿}
STICKLINE(CLOSE<OPEN,OPEN,CLOSE,3,0),COLOR009900;
STICKLINE(CLOSE<OPEN,OPEN,CLOSE,2,0),COLOR00BB00;
STICKLINE(CLOSE<OPEN,OPEN,CLOSE,1,0),COLOR00DD00;
STICKLINE(CLOSE<OPEN,H,L,0,0),COLOR00DD00;
买线:=EMA(C,2);
卖线:=EMA((C+H+L+O)/4,7) ;
BU:=CROSS(买线,卖线);
SEL:=CROSS(卖线,买线);
DRAWICON(BU,L-0.1,7);
DRAWICON(SEL,H+0.1,8);
HIGHN:=10;LOWN:=10;HIGHDISPLAY:=0;LOWDISPLAY:=0;ZGDISPLAY:=0;MADISPLAY:=0;
AA:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);
QY:=BACKSET(AA,HIGHN+1);
CC:=FILTER(QY,HIGHN) AND H=HHV(H,HIGHN+1);
DRAWICON(CC,H*1.02,2);
DDD:=BARSLAST(CC);
GDTS:=IF(CC,CURRBARSCOUNT,0);
DINGBU:=IF(DDD,REF(H,DDD),H);{顶部}
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
DINGBU1:=REF(DINGBU,DDD+1);
GDCS1:=CONST(DINGBUTS);
DINGBUTS1:=REF(DINGBUTS,DDD+1);
GDCS2:=CONST(DINGBUTS1);
DINGBU2:=REF(DINGBU1,DDD+1);
MM:=IF(CURRBARSCOUNT>GDCS2,0,1);
高点压力:DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H,1) COLORGREEN,LINETHICK1;
DRAWLINE(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),COLOR0055FF,POINTDOT;
DRAWLINE(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COLORYELLOW,POINTDOT;
AA1:=REF(L,LOWN)=LLV(L,2*LOWN+1);
QY1:=BACKSET(AA1,LOWN+1);
CC1:=FILTER(QY1,LOWN) AND L=LLV(L,LOWN+1);
DRAWICON(CC1,L*0.98,1);
DD1:=BARSLAST(CC1);
DDTS:=IF(CC1,CURRBARSCOUNT,0);
YDB:=IF(DD1,REF(L,DD1),L);
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
DDCS1:=CONST(DDTS1);
ZDB:=REF(YDB,DD1+1);
DDTS2:=REF(DDTS1,DD1+1);
DDCS2:=CONST(DDTS2);
低点支撑:DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L,1) COLORRED,LINETHICK1;
ZGSTAR:=(高点压力+低点支撑)/2;
ZGEND:=CONST((高点压力+低点支撑)/2);
STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2);
中轨:DRAWLINE(CURRBARSCOUNT=STARDAY,ZGSTAR,ISLASTBAR,ZGEND,1),COLORFF55BB,LINETHICK1;
DRAWLINE(CURRBARSCOUNT=DDCS1,L,ISLASTBAR,REF(L,DDCS1-1),1),COLORMAGENTA,POINTDOT,;
DRAWLINE(CURRBARSCOUNT=DDCS2,L,ISLASTBAR,REF(L,DDCS2-1),1),COLORCYAN,POINTDOT;
A1F:=BACKSET(ISLASTBAR,PEAKBARS(1,5,1)+1);
A2F:=A1F>REF(A1F,1);
B1F:=BACKSET(ISLASTBAR,PEAKBARS(1,5,2)+1);
B2F:=B1F>REF(B1F,1);
C1F:=BACKSET(ISLASTBAR,PEAKBARS(1,5,3)+1);
C2F:=C1F>REF(C1F,1);
DRAWLINE(B2F,H,A2F,H,1),COLOR0000FF;
IF(A1F,PEAK(1,5,1),DRAWNULL),COLORFFFFFF;
A11F:=BACKSET(ISLASTBAR,TROUGHBARS(2,5,1)+1);
A21F:=A11F>REF(A11F,1);
B11F:=BACKSET(ISLASTBAR,TROUGHBARS(2,5,2)+1);
B21F:=B11F>REF(B11F,1);
C11F:=BACKSET(ISLASTBAR,TROUGHBARS(2,5,3)+1);
C21F:=C11F>REF(C11F,1);
DRAWLINE(B21F,L,A21F,L,1),COLORFF00FF;
V2L:=IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1);
STICKLINE(V2L>=1,O,C,1,0),COLORYELLOW;
TYP := (HIGH + LOW + CLOSE)/3;
CCI1:=(TYP-MA(TYP,6))/(0.015*AVEDEV(TYP,6));
差值1:=ABS(REF(CCI1,1)-CCI1),LINETHICK0;
CCI2:=(TYP-MA(TYP,10))/(0.015*AVEDEV(TYP,10));
差值2:=ABS(REF(CCI2,1)-CCI2),LINETHICK0;
CCI3:=(TYP-MA(TYP,20))/(0.015*AVEDEV(TYP,20));
差值3:=ABS(REF(CCI3,1)-CCI3),LINETHICK0;
CCI4:=(TYP-MA(TYP,30))/(0.015*AVEDEV(TYP,30));
差值4:=ABS(REF(CCI4,1)-CCI4),LINETHICK0;
CCI5:=(TYP-MA(TYP,60))/(0.015*AVEDEV(TYP,60));
差值5:=ABS(REF(CCI5,1)-CCI5),LINETHICK0;
CCI:=CCI1+CCI2+CCI3+CCI4+CCI5;
WZ:=50=CURRBARSCOUNT;
DRAWTEXT(WZ=1,HHV(C,100)*0.80,''),COLOR808080;
DRAWTEXT_FIX(1,0.06,0.06,0,EXTERNSTR(0,1))COLOR0000FF;
DRAWTEXT_FIX(1,0.00,0.12,0,EXTERNSTR(0,2))COLORFF00FF;
DRAWTEXT_FIX(1,0.00,0.18,0,EXTERNSTR(0,3))COLORFF88FF;
DRAWTEXT_FIX(1,0.00,0.24,0,EXTERNSTR(0,5)),COLORLICYAN;
DRAWTEXT_FIX(1,0.20,0.88,0,HYBLOCK);
DRAWTEXT_FIX(1,0.20,0.91,0,EXTERNSTR(0,1))COLOR00FF00;
DRAWTEXT_FIX(1,0.20,0.94,0,EXTERNSTR(0,3))COLORFF88FF;
DRAWTEXT_FIX(1,0.12,0.97,0,EXTERNSTR(0,2))COLORFFFFFF;
现价:DYNAINFO(7),COLORYELLOW;DRAWTEXT_FIX(ISLASTBAR,0,0,0,ZDBLOCK),COLORYELLOW;DRAWTEXT_FIX(ISLASTBAR,0.65,0.8,0,HYBLOCK),COLOR00FF00;
DRAWTEXT_FIX(ISLASTBAR,0.75,0.8,0,DYBLOCK),COLOR00FFFF;
DRAWTEXT_FIX(ISLASTBAR,0.65,0.9,0,GNBLOCK),COLORYELLOW;
{以上为显示所属板块，地域，概念等};
DRAWTEXT_FIX(ISLASTBAR,0.65,0.8,0,HYBLOCK),COLOR00FF00;
DRAWTEXT_FIX(ISLASTBAR,0.75,0.8,0,DYBLOCK),COLOR00FFFF;
DRAWTEXT_FIX(ISLASTBAR,0.65,0.9,0,GNBLOCK),COLORYELLOW;
{以上为显示所属板块，地域，概念等};
{DRAWTEXT_FIX(ISLASTBAR,0,0,0,ZDBLOCK),COLORYELLOW;{营业部名称显示主图}}
{DRAWTEXT_FIX(ISLASTBAR,0,0,0,GNBLOCK),COLORYELLOW;}
ZT:=C/REF(C,1)>1.095;
STICKLINE(ZT,O,C,0.8,0),COLORYELLOW;
LHB:=SIGNALS_USER(100,0) < 0 OR SIGNALS_USER(100,0) > 0;{100:龙虎榜}
JGZY:=SIGNALS_USER(101,0) < 0 OR SIGNALS_USER(101,0) > 0;{101:机构专用}
DZJY:=SIGNALS_USER(102,0) < 0 OR SIGNALS_USER(102,0) > 0;{102:大宗交易}
HZLS:=SIGNALS_USER(103,0) < 0 OR SIGNALS_USER(103,0) > 0;{103:汇智历史}
YHSX:=SIGNALS_USER(104,0) < 0 OR SIGNALS_USER(104,0) > 0;{104:银河绍兴}
HTCDSJL:=SIGNALS_USER(105,0) < 0 OR SIGNALS_USER(105,0) > 0;{华泰成都蜀金路：105}
SWSHLJZ:=SIGNALS_USER(106,0) < 0 OR SIGNALS_USER(106,0) > 0;{申银万国上海陆家嘴环路：106}
GTJASHFSL:=SIGNALS_USER(107,0) < 0 OR SIGNALS_USER(107,0) > 0;{国泰君安上海福山路：107}
ZXSHLYL:=SIGNALS_USER(108,0) < 0 OR SIGNALS_USER(108,0) > 0;{中信上海溧阳路：108}
DRAWICON(LHB,L*0.95,1);
STICKLINE(LHB,O,C,0.8,0),COLORYELLOW;