通达信红宝石寻龙主图源码分享
DRAWGBK(C>0,RGB(0,10,10),RGB(88,0,0),0,'0',0);
DRAWGBK(C>0,RGB(40,120,20),RGB(00,00,00),0,'0',1);
DRAWGBK(C>0,RGB(80,100,120),RGB(00,00,00),0,'0',1);
强弱分界:=EMA(COST(85),10){,PRECISION2,LINEDOT},COLORRED,DOTLINE;
分界:=EMA(COST(99),10){,PRECISION2,LINEDOT},COLORGREEN,DOTLINE;
DRAWBAND(强弱分界,RGB(20,20,20), 分界,RGB(60,60,8));
DRAWKLINE(H,O,L,C);
涨跌:=REF(C,1);
涨停:=IF((C-涨跌)*100/涨跌>=(10-0.01*100/涨跌),1,0);
STICKLINE(涨停,OPEN,CLOSE,2,0),COLORRED;
跌停:=IF((涨跌-C)*100/涨跌>=(10-0.01*100/涨跌),1,0);
STICKLINE(跌停,OPEN,CLOSE,2,0),COLOR808000;
明日涨停:ZTPRICE(C,0.1),NODRAW,COLORRED;
FLAG:=ABS(C-O)/IF((H-L) = 0,100,H-L);
ZHANGF:=ABS(C-O)/O;
WEI21:=IF(CODELIKE('9999'),(H-L)*0.5+L,IF(C>O,(C-O)*0.5+O,(O-C)*0.5+C)),NODRAW;
STICKLINE((ZHANGF>=0.03 && FLAG >= 0.03) OR C>1000,WEI21,WEI21,-1,0),COLORLIRED;
昨二一位:(REF(O,1)+REF(C,1))/2,COLORRED,NODRAW;
今二一位: (O+C)/2,COLORLIRED,NODRAW;
上三一位:(MAX(O,C)-MIN(O,C))*2/3+MIN(O,C),NODRAW;
下三一位:(MAX(O,C)-MIN(O,C))/3+MIN(O,C),NODRAW;
高开:=O>REF(C,1) AND MIN(C,O)>REF(C,1);
STICKLINE(高开,MIN(C,O),MIN(C,O)*1.001,-1,0),COLORYELLOW;
ZF:=H>=INTPART(REF(C,1)*1.1*100+0.5)/100 AND H>C;
DT:=L<=INTPART(REF(C,1)*0.9*100+0.5)/100 AND L<C;
上影线幅度:=((H-REF(C,1))/REF(C,1)-(MAX(O,C)-REF(C,1))/REF(C,1))*100;
下影线幅度:=((REF(C,1)-L)/REF(C,1)-(REF(C,1)-MIN(O,C))/REF(C,1))*100;
上影线长:=H-MAX(O,C);
下影线长:=MIN(O,C)-L;
长度比较:=上影线长/下影线长;{上下影线长度比}
STICKLINE((MIN(O,C)=L OR 长度比较>1) AND ZF,H-上影线长*1,H,0.01,0),COLORRED;
STICKLINE((MAX(O,C)=H OR 长度比较<1) AND DT,L+下影线长*1,L,0.01,0),COLORBLUE;
S1:=LOW>(REF(HIGH,1)+0.001);
S2:=BARSLAST(S1);
S3:=COUNT(L>REF(H,S2+1),S2+1)=S2+1;
S4:=CROSS(BACKSET(S3>0 AND ISLASTBAR,S2+1),0.5);
S5:=BARSLAST(S4);
上:=IF(CURRBARSCOUNT<=CONST(S5+1),CONST(LLV(L,S5+1)),DRAWNULL),COLORGRAY;
下:=IF(CURRBARSCOUNT<=CONST(S5+1),REF(H,S5+1),DRAWNULL),COLORGRAY;
STICKLINE( CURRBARSCOUNT<=CONST(S5+1),上,下,5,0),COLORGRAY;
RC1:=REF(C,1);
大阴线:=C<0.96*O OR C<=RC1*0.96 OR C>1000 AND C<=RC1*0.98;
大阴T:=BARSLAST(FILTER(大阴线,3));{调整显示密度}
大阴实顶: REF(O,大阴T),COLORLIGREEN,POINTDOT;{显示大阴K线的开盘价O};
大阴二一: REF((L+H)/2,大阴T),COLORLIGREEN,NODRAW;
未来函数检测结果如下：
该公式包含未来函数:BACKSET
该公式包含未来函数:COST
解密、编写股票、期货策略请联系QQ或微信同号：88652583
相关股票指标公式
原理解析：
填充背景(C>0,RGB(0,10,10),RGB(88,0,0),0,'0',0)
填充背景(C>0,RGB(40,120,20),RGB(00,00,00),0,'0',1)
填充背景(C>0,RGB(80,100,120),RGB(00,00,00),0,'0',1)
强弱分界赋值:EMA(获利盘为85%的成本分布,10){,PRECISION2,LINEDOT},画红色,DOTLINE
分界赋值:EMA(获利盘为99%的成本分布,10){,PRECISION2,LINEDOT},画绿色,DOTLINE
DRAWBAND(强弱分界,RGB(20,20,20), 分界,RGB(60,60,8))
DRAWKLINE(H,O,L,C)
涨跌赋值:1日前的C
涨停赋值:IF((C-涨跌)*100/涨跌>=(10-0.01*100/涨跌),1,0)
当满足条件涨停时,在开盘价和收盘价之间画柱状线
跌停赋值:IF((涨跌-C)*100/涨跌>=(10-0.01*100/涨跌),1,0)
当满足条件跌停时,在开盘价和收盘价之间画柱状线
明日输出涨停:ZTPRICE(C,0.1),NODRAW,画红色
FLAG赋值:C-O的绝对值/IF((H-L) = 0,100,H-L)
ZHANGF赋值:C-O的绝对值/O
WEI21赋值:IF(CODELIKE('9999'),(H-L)*0.5+L,IF(C>O,(C-O)*0.5+O,(O-C)*0.5+C)),NODRAW
STICKLINE((ZHANGF>=0.03 && FLAG >= 0.03) OR C>1000,WEI21,WEI21,-1,0),COLORLIRED
输出昨二一位:(1日前的O+1日前的C)/2,画红色,NODRAW
输出今二一位: (O+C)/2,COLORLIRED,NODRAW
输出上三一位:(O和C较大值-O和C的较小值)*2/3+O和C的较小值,NODRAW
输出下三一位:(O和C较大值-O和C的较小值)/3+O和C的较小值,NODRAW
高开赋值:O>1日前的C AND C和O的较小值>1日前的C
STICKLINE(高开,C和O的较小值,C和O的较小值*1.001,-1,0),画黄色
ZF赋值:H>=INTPART(1日前的C*1.1*100+0.5)/100 AND H>C
DT赋值:L<=INTPART(1日前的C*0.9*100+0.5)/100 AND L上影线幅度赋值:((H-1日前的C)/1日前的C-(O和C较大值-1日前的C)/1日前的C)*100
下影线幅度赋值:((1日前的C-L)/1日前的C-(1日前的C-O和C的较小值)/1日前的C)*100
上影线长赋值:H-O和C较大值
下影线长赋值:O和C的较小值-L
长度比较赋值:上影线长/下影线长
{上下影线长度比}STICKLINE((O和C的较小值=L OR 长度比较>1) AND ZF,H-上影线长*1,H,0.01,0),画红色
STICKLINE((O和C较大值=H OR 长度比较<1) AND DT,L+下影线长*1,L,0.01,0), 画蓝色
S1赋值:最低价>(1日前的最高价+0.001)
S2赋值:上次S1距今天数
S3赋值:COUNT(L>S2+1日前的H,S2+1)=S2+1
S4赋值:CROSS(BACKSET(S3>0 AND ISLASTBAR,S2+1),0.5)
S5赋值:上次S4距今天数
上赋值:IF( 到最后交易的周期<=CONST(S5+1),CONST(S5+1日内L最低值),DRAWNULL),COLORGRAY
下赋值:IF( 到最后交易的周期<=CONST(S5+1),S5+1日前的H,DRAWNULL),COLORGRAY
STICKLINE( 到最后交易的周期<=CONST(S5+1),上,下,5,0),COLORGRAY
RC1赋值:1日前的C
大阴线赋值:C<0.96*O OR C<=RC1*0.96 OR C>1000 AND C<=RC1*0.98
大阴T赋值:上次大阴线的3过滤距今天数
输出{调整显示密度}大阴实顶: 大阴T日前的O,COLORLIGREEN,POINTDOT
{显示大阴K线的开盘价O}
输出大阴二一: REF((L+H)/2,大阴T),COLORLIGREEN,NODRAW
