通达信牛回头主图源码
开盘:=(O-REF(C,1))/REF(C,1)*100,NODRAW,COLORLIGREEN;
现价:REFDATE(C,DATE),DOTLINE,COLORLIGRAY;
半分:(O+C)/2,NODRAW,COLORWHITE;
H2:=MAX(H,REF(H,1));
L2:=MIN(L,REF(L,1));
两日半:=(H2+L2)/2,NODRAW;
STICKLINE(ISLASTBAR AND 两日半,两日半,两日半,18,1),COLOREED28E;
MA5角:ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*180/3.1416,NODRAW,COLOR5588FF;
高:=REF(HHV(H,72),5);
龙门:REFDATE(高,DATE),COLORWHITE,LINETHICK2;
封成比:=DYNAINFO(58)/DYNAINFO(8),NODRAW,COLORYELLOW;
N:=100;
高1:=REFDATE(HHV(H,N),DATE);
低1:=REFDATE(LLV(L,N),DATE);
MA5:=MA(C,5),COLORWHITE;
MA10:=MA(C,10),COLORYELLOW;
MA20:=MA(C,20);
MA30:=MA(C,30);
MA60:=MA(C,60),COLORFF00FF,LINETHICK2;
H3:=高1-(高1-低1)*0.5;
分水岭:REFDATE(H3,DATE),COLORFF99DD,DOTLINE;
DRAWTEXT(分水岭 AND ISLASTBAR,分水岭,'界'),COLORFF99DD;
昨半:=REF((O+C)/2,1);
STICKLINE(ISLASTBAR,昨半,昨半,8,2),COLORLIRED;
TM:=1200823;
涨停:IF(DATE<TM,ZTPRICE(REF(C,1),IF(CODELIKE('688'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),ZTPRICE(REF(C,1),IF(CODELIKE('688') OR CODELIKE('300'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))),NODRAW,COLORRED;
跌停:IF(DATE<TM,DTPRICE(REF(C,1),IF(CODELIKE('688'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1))),DTPRICE(REF(C,1),IF(CODELIKE('688') OR CODELIKE('300'),0.2,IF(NAMEINCLUDE('S'),0.05,0.1)))),NODRAW,COLORGREEN;
明涨停:IF(DATE<TM,C*IF(CODELIKE('688'),1.2,IF(NAMEINCLUDE('S'),1.05,1.1)),C*(IF(CODELIKE('688') OR CODELIKE('300'),1.2,IF(NAMEINCLUDE('S'),1.05,1.1)))),NODRAW,COLORLIMAGENTA;
明跌停:IF(DATE<TM,C*IF(CODELIKE('688'),0.8,IF(NAMEINCLUDE('S'),0.45,0.9)),C*(IF(CODELIKE('688') OR CODELIKE('300'),0.8,IF(NAMEINCLUDE('S'),0.45,0.9)))),NODRAW,COLORFFFF00;
ZT:=C=涨停 AND PERIOD=5 AND H=C;
ZT1:=H=涨停 AND PERIOD=5 AND H>C;
DT:=C=跌停 AND PERIOD=5 AND L=C;
DT1:=L=跌停 AND PERIOD=5 AND L<C;
DRAWTEXT(DT1,L-0.09,'撬板'),COLORCC00CC;{从涨停到跌停};
DRAWTEXT(ZT1,H+0.03,'炸板'),COLOR00CC00;{从涨停到跌停};
LB:=REF(EVERY(ZT,3),2) AND REF(H=HHV(H,20),1) AND H<REF(H,1);
LBQ:=BARSLAST(LB);
打折:REF(H,LBQ+1)*0.7,NODRAW,COLORWHITE;
金线:=1;
SLB:=EVERY(ZT,3);
K2:=SUMBARS(REFX(SLB,1),1);
STICKLINE(K2 AND 金线=1,REF(C,K2-1),REF(C,K2-1),5,0),COLORFFCC99;
龙回头天数:SUMBARS(REFX(SLB,1),1)-2,NODRAW,COLORFF00FF;
DRAWTEXT(REFX(NOT(ZT),1) AND SLB,REF(C,1),'回头线');
跟庄线:DMA(AMOUNT/(100*V),V/CAPITAL),COLORFC9F99;
妖股:=EVERY(REF(ZT,1),2) AND ZT AND COUNT(ZT,4)=3;
DRAWTEXT(妖股,L*0.98,'妖'),COLOR55FF99;
妖线:EMA(EMA(C,9),5),COLORLIMAGENTA,LINETHICK2;
阴线:=C<O;
STICKLINE(阴线,O,C,2.8,0),COLOR009933;
STICKLINE(阴线,H,L,0,0),COLOR009933;
阳线:=C>O;
STICKLINE(阳线,O,C,2.8,1),COLOR0000CC;
STICKLINE(阳线,C,H,0,1),COLOR0000CC;
STICKLINE(阳线,O,L,0,1),COLOR0000CC;
十字线:=C=O AND H>L;
STICKLINE(十字线,O,C,2.8,1),COLORWHITE;
STICKLINE(十字线,L,H,0,1),COLORWHITE;
低K:=O<MA5 AND O<MA10 AND O<MA20 AND L<MA30 AND L<MA60;
高K:=C>MA5 AND C>MA10 AND H>MA20 AND H>MA30 AND H>MA60;
选股:=低K AND 高K;
STICKLINE(选股,CLOSE,OPEN,3,0),COLOR000099;
STICKLINE(选股,CLOSE,OPEN,2.2,0),COLOR0000CC;
STICKLINE(选股,CLOSE,OPEN,1.5,0),COLOR0000FF;
STICKLINE(选股,CLOSE,OPEN,0.5,0),COLORCC66FF;
STICKLINE(选股,OPEN,CLOSE,0.5,0),COLORYELLOW;
DRAWTEXT(选股,L*0.99,'一穿五'),COLORYELLOW;
STICKLINE(打折,打折,打折,5,0),COLORFFFF44;
Q3:=STRCAT(CON2STR(打折,2),'打折线');
DRAWTEXT(ISLASTBAR,打折,VARCAT(VARCAT('打折价',VAR2STR(打折,2)),'元'))COLORFFFF00;
STICKLINE(CURRBARSCOUNT=4,C,C,25,0),COLORWHITE;
DRAWTEXT(CURRBARSCOUNT=5,REF(L-0.05,1),' ◇'),COLORWHITE;
DRAWNUMBER(CURRBARSCOUNT=4,L*0.99,C),COLORWHITE;
假阴:=REF(C>=O,1) AND AMOUNT/V/100>REF(C,1) AND C<O;
假阳:=REF(C<=O,1) AND H<REF(O,1) AND C<(REF(O-C,1))/3+REF(C,1) AND AMOUNT/V/100<REF(C,1) AND C>O;
STICKLINE(假阴,O,C,0.2,0),COLORRED;{假阴柱};
STICKLINE(假阳,O,C,0.7,0),COLORLIGREEN;{假阳柱};
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
板块所属:DRAWTEXT_FIX(1,0,0.21,0,'板块所属：'),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0.055,0.21,0,STRCAT(Z3,GNBLOCK)),COLOR00CC99;
DRAWTEXT_FIX(1,0.00,0.00,0,'主题投资：')COLORWHITE;
DRAWTEXT_FIX(1,0.054,0.00,0,EXTERNSTR(0,1))COLOR00CC99;
DRAWTEXT_FIX(1,0.00,0.08,0,'主营业务：')COLORWHITE;
DRAWTEXT_FIX(1,0.055,0.08,0,EXTERNSTR(0,2))COLOR00CC99;
DRAWTEXT_FIX(1,0,0.15,0,'股票风格：')COLORWHITE;
DRAWTEXT_FIX(1,0.055,0.15,0,FGBLOCK),COLOR00CC99;
DRAWTEXT_FIX(ISLASTBAR,0,1,0,STRCAT('牛股形态：',ZDBLOCK)),COLORFFFF00;
DRAWTEXT_FIX(1,0.75,0.99,0,'概念：'),COLORWHITE;
DRAWTEXT_FIX(1,0.79,0.99,0,EXTERNSTR(0,3))COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=1,L*0.995,EXTERNSTR(0,4)); { 涨停原因}
首板:=ZT AND COUNT(ZT,2)=1;
二板:=REF(首板,1) AND ZT;
三板:=REF(二板,1) AND ZT;
四板:=REF(三板,1) AND ZT;
五板:=REF(四板,1) AND ZT;
六板:=REF(五板,1) AND ZT;
七板:=REF(六板,1) AND ZT;
八板:=REF(七板,1) AND ZT;
九板:=REF(八板,1) AND ZT;
十板:=REF(九板,1) AND ZT;
DRAWTEXT(首板,0.1+(C+O)/2,'1'),COLORWHITE;
DRAWTEXT(二板,0.1+(C+O)/2,'2'),COLORYELLOW;
DRAWTEXT(三板,0.1+(C+O)/2,'3'),COLOR00CC99;
DRAWTEXT(四板,0.1+(C+O)/2,'4'),COLORGREEN;
DRAWTEXT(五板,0.1+(C+O)/2,'5'),COLORLIGRAY;
DRAWTEXT(六板,0.1+(C+O)/2,'6'),COLORLIRED;
DRAWTEXT(七板,0.1+(C+O)/2,'7'),COLORLIBLUE;
DRAWTEXT(八板,0.1+(C+O)/2,'8'),COLORBLUE;
DRAWTEXT(九板,0.1+(C+O)/2,'9'),COLORWHITE;
DRAWTEXT(十板,0.1+(C+O)/2,'10'),COLORYELLOW;
收阴:=(C<REF(C,1) OR L<REF(L,1) OR AMOUNT/V/100<REF((C+O)/2,1)) AND O<=REF(C,1);
多阴:=EVERY(收阴,2);
小阳:=O-L<=0.03 AND H>C AND C>O AND O<REF(C,1) AND C<REF(MAX(C,O),1) AND V<REF(V,1);
宝莲灯:=REF(多阴,1) AND 小阳;
STICKLINE(宝莲灯,O,C,2.5,0),COLORCC22FF;
STICKLINE(宝莲灯,(O+C)/2-0.02,(O+C)/2+0.02,2,0),COLORWHITE;
A1:=ABS(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,23))/EMA(CLOSE,23));
A2:=DMA(((2.15*CLOSE+LOW+HIGH)/4),A1);
金线王:EMA(A2,200)*1.118,LINETHICK2,COLORYELLOW;
金线王2:EMA(A2,200)*1.118,LINETHICK1,COLORRED;
{金线王3:EMA(A2,20)*1.108,LINETHICK1,COLORRED;}
条件:=(C-REF(C,1))/REF(C,1)*100>5;
金K线:=CROSS(C,金线王) AND 条件;
DRAWTEXT(金K线,L*0.98,'↖=金K线'),COLORRED;
DRAWTEXT(金K线,L*0.98,' K '),COLORYELLOW ;
{涨停K线颜色设置}
STICKLINE(ZT,C,(O+C)/2,3,0),COLOR000099;
STICKLINE(ZT,C,(O+C)/2,2.2,0),COLOR0000CC;
STICKLINE(ZT,C,(O+C)/2,1.5,0),COLOR0000FF;
STICKLINE(ZT,C,(O+C)/2,0.5,0),COLORCC66FF;
STICKLINE(ZT,O,(O+C)/2,3,0),COLOR999999;
STICKLINE(ZT,O,(O+C)/2,2.2,0),COLORBBBBBB;
STICKLINE(ZT,O,(O+C)/2,1.5,0),COLORDDDDDD;
STICKLINE(ZT,O,(O+C)/2,0.5,0),COLORFFFFFF;
STICKLINE(DT,O,(O+C)/2,3,0),COLOR999999;
STICKLINE(DT,O,(O+C)/2,2.2,0),COLORBBBBBB;
STICKLINE(DT,O,(O+C)/2,1.5,0),COLORDDDDDD;
STICKLINE(DT,O,(O+C)/2,0.5,0),COLORFFFFFF;
STICKLINE(DT,C,(O+C)/2,3,0),COLOR009900;
STICKLINE(DT,C,(O+C)/2,2.2,0),COLOR00BB00;
STICKLINE(DT,C,(O+C)/2,1.5,0),COLOR00DD00;
STICKLINE(DT,C,(O+C)/2,0.5,0),COLOR00FF00;
{曾涨跌停打开K线颜色设置}
STICKLINE(ZT1,C,(O+C)/2,3,0),COLORFF00FF;
STICKLINE(ZT1,C,(O+C)/2,2.2,0),COLORFF00FF;
STICKLINE(ZT1,C,(O+C)/2,1.5,0),COLOR0000FF;
STICKLINE(ZT1,O,(O+C)/2,3,0),COLOR999999;
STICKLINE(ZT1,O,(O+C)/2,2.2,0),COLORBBBBBB;
STICKLINE(ZT1,O,(O+C)/2,1.5,0),COLORDDDDDD;
STICKLINE(DT1,O,(O+C)/2,3,0),COLOR888888;
STICKLINE(DT1,O,(O+C)/2,2.2,0),COLORBBBBBB;
STICKLINE(DT1,O,(O+C)/2,1.5,0),COLORDDDDDD;
STICKLINE(DT1,C,(O+C)/2,3,0),COLOR009900;
STICKLINE(DT1,C,(O+C)/2,2.2,0),COLOR00BB00;
STICKLINE(DT1,C,(O+C)/2,1.5,0),COLOR00DD00;
STICKLINE(DT1,C,(O+C)/2,0.5,0),COLOR00FF00;
DRAWTEXT(ZT AND DT1 AND PERIOD=5,L-0.03,'地天板'),COLORCC00CC;{从跌停到涨停}
DRAWTEXT(DT AND ZT1 AND PERIOD=5,H+0.03,'天地板'),COLOR00CC00;{从涨停到跌停};
来函数检测结果如下：
该公式包含未来函数:CAPITAL
该公式包含未来函数:REFX
定制、编写指标公式请联系QQ或微信同号：88652583
输出 现价:日期日收盘价,DOTLINE,画淡灰色
H2赋值:最高价和1日前的最高价的较大值
两日半赋值:(H2+L2)/2,NODRAW
输出MA5角:(收盘价的5日简单移动平均/1日前的收盘价的5日简单移动平均-1)*100的反正切*180/3.1416,NODRAW,COLOR5588FF
输出龙门:日期日高,画白色,线宽为2
N赋值:100
低1赋值:日期日N日内最低价的最低值
MA10赋值:收盘价的10日简单移动平均,画黄色
MA30赋值:收盘价的30日简单移动平均
H3赋值:高1-(高1-低1)*0.5
当满足条件分水岭ANDISLASTBAR时,在分水岭位置书写文字,COLORFF99DD
当满足条件是否最后一个周期时,在昨半和昨半位置之间画柱状线,宽度为8,2不为0则画空心柱.,画淡红色
输出 涨停:如果日期输出明涨停:如果日期ZT1赋值:最高价=涨停 AND 周期类型=5 AND 最高价>收盘价
DT1赋值:最低价=跌停 AND 周期类型=5 AND 最低价<收盘价
当满足条件ZT1时,在最高价+0.03位置书写文字,COLOR00CC00
LBQ赋值:上次LB距今天数
金线赋值:1
K2赋值:1日后的SLB累加至1的天数
输出龙回头天数:1日后的SLB累加至1的天数-2,NODRAW,COLORFF00FF
输出跟庄线:以成交量(手)/当前流通股本(手)为权重成交额(元)/(100*成交量(手))的动态移动平均,COLORFC9F99
当满足条件妖股时,在最低价*0.98位置书写文字,COLOR55FF99
当满足条件阴线时,在开盘价和收盘价位置之间画柱状线,宽度为2.8,0不为0则画空心柱.,COLOR009933
阳线赋值:收阳线
当满足条件阳线时,在收盘价和最高价位置之间画柱状线,宽度为0,1不为0则画空心柱.,COLOR0000CC
十字线赋值:平盘AND 最高价>最低价
当满足条件十字线时,在最低价和最高价位置之间画柱状线,宽度为0,1不为0则画空心柱.,画白色
高K赋值:收盘价>MA5 AND 收盘价>MA10 AND 最高价>MA20 AND 最高价>MA30 AND 最高价>MA60
当满足条件选股时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR000099
当满足条件选股时,在收盘价和开盘价位置之间画柱状线,宽度为1.5,0不为0则画空心柱.,COLOR0000FF
当满足条件选股时,在开盘价和收盘价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,画黄色
Q3赋值:字符串相加
当满足条件到最后交易的周期=4时,在收盘价和收盘价位置之间画柱状线,宽度为25,0不为0则画空心柱.,画白色
当满足条件到最后交易的周期=4时,在最低价*0.99位置书写数字,画白色
假阳赋值:1日前的收盘价<=开盘价 AND 最高价<1日前的开盘价 AND 收盘价<(1日前的开盘价-收盘价)/3+1日前的收盘价 AND 成交额(元)/成交量(手)/100<1日前的收盘价 AND 收阳线
当满足条件假阳时,在开盘价和收盘价位置之间画柱状线,宽度为0.7,0不为0则画空心柱.,画淡绿色
Z2赋值:字符串相加
输出板块所属:当满足条件1时,在横轴0纵轴0.21位置书写文字,画白色
当满足条件1时,在横轴0.00纵轴0.00位置书写文字画白色
当满足条件1时,在横轴0.00纵轴0.08位置书写文字画白色
当满足条件1时,在横轴0纵轴0.15位置书写文字画白色
当满足条件是否最后一个周期时,在横轴0纵轴1位置书写文字,COLORFFFF00
当满足条件1时,在横轴0.79纵轴0.99位置书写文字画黄色
首板赋值:ZT AND 统计2日中满足ZT的天数=1
三板赋值:1日前的二板 AND ZT
五板赋值:1日前的四板 AND ZT
七板赋值:1日前的六板 AND ZT
九板赋值:1日前的八板 AND ZT
当满足条件二板时,在0.1+(收盘价+开盘价)/2位置书写文字,画黄色
当满足条件四板时,在0.1+(收盘价+开盘价)/2位置书写文字,画绿色
当满足条件六板时,在0.1+(收盘价+开盘价)/2位置书写文字,画淡红色
当满足条件八板时,在0.1+(收盘价+开盘价)/2位置书写文字,画蓝色
当满足条件十板时,在0.1+(收盘价+开盘价)/2位置书写文字,画黄色
多阴赋值:最近2日一直存在收阴
宝莲灯赋值:1日前的多阴 AND 小阳
当满足条件宝莲灯时,在(开盘价+收盘价)/2-0.02和(开盘价+收盘价)/2+0.02位置之间画柱状线,宽度为2,0不为0则画空心柱.,画白色
A2赋值:以A1为权重((2.15*收盘价+最低价+最高价)/4)的动态移动平均
输出 金线王2:A2的200日指数移动平均*1.118,线宽为1,画红色
条件赋值:(收盘价-1日前的收盘价)/1日前的收盘价*100>5
当满足条件金K线时,在最低价*0.98位置书写文字,画红色
当满足条件ZT时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR000099
当满足条件ZT时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为1.5,0不为0则画空心柱.,COLOR0000FF
当满足条件ZT时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,COLORBBBBBB
当满足条件ZT时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLORFFFFFF
当满足条件DT时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,COLORBBBBBB
当满足条件DT时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLORFFFFFF
当满足条件DT时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,COLOR00BB00
当满足条件DT时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR00FF00
当满足条件ZT1时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLORFF00FF
当满足条件ZT1时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为1.5,0不为0则画空心柱.,COLOR0000FF
当满足条件ZT1时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,COLORBBBBBB
当满足条件DT1时,在开盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,COLORBBBBBB
当满足条件DT1时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为2.2,0不为0则画空心柱.,COLOR00BB00
当满足条件DT1时,在收盘价和(开盘价+收盘价)/2位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR00FF00
当满足条件DTANDZT1ANDPERIOD=5时,在最高价+0.03位置书写文字,COLOR00CC00
