通达信红宝石寻龙主图指标公式

　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;{21位画线}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;