通达信号称【镇店之宝主图】有量化评分、风口启动一体等等 源码附图
DRAWGBK((CLOSE > 1),RGB(0,0,0),RGB(0,0,2),0,0,0);
L1A:=LLV(L,10);
起爆点:=(DCLOSE-REF(C,1))/REF(C,1)*100;
XG:=CROSS(起爆点,20) OR CROSS(起爆点,18);
L3:=IF(XG,O,L1A*0.999)LINETHICK5,COLORYELLOW;
STICKLINE(XG,L3,L3,40,0),COLOR00FFFF,LINETHICK6;
M5:=MA(C,5);
M10:=MA(C,10);
MA4:=MA(CLOSE,60),COLORGREEN;
DRAWTEXT(CROSS(M5,M10),M5,'●准备'),LINETHICK2, COLORRED;
DRAWTEXT(CROSS(M10,M5),M10,'◎'),LINETHICK2, COLORBLUE;
DRAWTEXT(CROSS(M5,MA4),MA4,'●注意'),LINETHICK2, COLORYELLOW;
试盘:=MA(REF(HHV((C+L+O+H)/4,8),1),3);
攻击:=MA(REF(HHV((C+L+O+H)/4,13),1),3),COLORWHITE;
突破:=MA(REF(HHV((C+L+O+H)/4,21),1),3),COLOR00AAFF;
冲顶:=MA(REF(HHV((C+L+O+H)/4,34),1),3);
CCI:="CCI";
CCI3:=MA(CCI,3);
CCI7:=MA(CCI,7);
头:=CROSS(CCI3,CCI) AND (CCI>130);
STICKLINE(头,H*1.005,H*1.01,4,0),COLOR00FF00;
卖出警报:=(头 AN),COLOR00FF00;
STICKLINE(卖出警报,H*1.016,H*1.025,4,0),COLORRED;
DRAWTEXT(卖出警报,H*1.038,'下探'),COLORRED;
DRAWICON(卖出警报,H*1,15);
DRAWTEXT(卖出警报,H*1,''),COLORYELLOW;
平衡线:MA(CLOSE,163),COLORGREEN;
SJTJ:=DATE<1870508;
{主趋势线:EMA(EMA(C,10),10),COLORBLUE,LINETHICK3;
B:=主趋势线<REF(主趋势线,1);
IF(B-1,主趋势线,DRAWNULL)COLORRED,LINETHICK3;}
主趋势线:EMA(EMA(C,10),10),COLORRED,LINETHICK3;
B:=主趋势线>REF(主趋势线,1);
IF(B-1,主趋势线,DRAWNULL)COLORBLUE,LINETHICK3;
AA:=EMA(C,5) > EMA(C,20);
BB:=EMA(C,5) < EMA(C,20);
CC:= EMA(C,5) > EMA(C,10);
CC1:=EMA(C,5) < EMA(C,10);
DD:=CLOSE<OPEN;
STICKLINE(AA AND SJTJ,H,L,0,0),COLORRED;
STICKLINE(AA AND SJTJ,O,C,3,1),COLORRED;
STICKLINE(AA AND SJTJ AND DD,O,C,3,0),COLORRED;
STICKLINE(BB AND SJTJ,H,L,0,0),COLORGREEN;
STICKLINE(BB AND SJTJ,O,C,3,1),COLORGREEN;
STICKLINE(BB AND SJTJ AND DD,O,C,3,0),COLORGREEN;
STICKLINE(BB AND SJTJ,H,L,0,0),COLORGREEN;
STICKLINE(BB AND SJTJ,O,C,3,1),COLORGREEN;
STICKLINE(BB AND SJTJ AND DD,O,C,3,0),COLORGREEN;
STICKLINE(BB AND SJTJ AND CC,H,L,0,1),COLORWHITE;
STICKLINE(BB AND SJTJ AND CC,O,C,3,1),COLORWHITE;
STICKLINE(BB AND SJTJ AND CC AND DD,O,C,3,0),COLORWHITE;
STICKLINE(AA AND SJTJ AND CC1,H,L,0,0),COLORWHITE;
STICKLINE(AA AND SJTJ AND CC1,O,C,3,1),COLORWHITE;
STICKLINE(AA AND SJTJ AND CC1 AND DD,O,C,3,0),COLORWHITE;
{彩色K线}
TYX3:=MA(REF(HHV((C+L+O+H)/4,30),1),3);
TYX4:=MA((C+L+O+H)/4,13);
TYX5:=EMA((C+L+O+H)/4,21);
{深绿}
STICKLINE(C<TYX5 AND C<O,H,L,0,0),COLOR007700;
STICKLINE(C<TYX5 AND C<O,C,O,3,0),COLOR005500;
STICKLINE(C<TYX5 AND C<O,C,O,2,0),COLOR006600;
STICKLINE(C<TYX5 AND C<O,C,O,1,0),COLOR007700;
{蓝}
{黄}
STICKLINE(C>TYX5 AND C>O,H,L,0,0 ),COLOR00EEFF;
STICKLINE(C>TYX5 AND C>O,C,O,3,0 ),COLOR00AAFF;
STICKLINE(C>TYX5 AND C>O,C,O,2,0 ),COLOR00CCFF;
STICKLINE(C>TYX5 AND C>O,C,O,1,0 ),COLOR00EEFF;
{深红}
STICKLINE(C>TYX3 AND C>O,H,L,0,0),COLOR0000DD;
STICKLINE(C>TYX3 AND C>O,C,O,3,0),COLOR000099;
STICKLINE(C>TYX3 AND C>O,C,O,2,0),COLOR0000BB;
STICKLINE(C>TYX3 AND C>O,C,O,1,0),COLOR0000DD;
N:=150;判断高低:=3;
涨跌:=REF(C,1);
涨停:=IF((C-涨跌)*100/涨跌>=(10-0.01*100/涨跌),1,0);
DRAWICON(涨停,H*0.97,23);
LAST3K:=CURRBARSCOUNT>4;
T1:=CONST(LLVBARS(LOW,10));
T1HIGH:=CONST(REF(HIGH,T1));
CCVV:=CONST(CURRBARSCOUNT);
T2:=CONST(BARSLAST((CURRBARSCOUNT >(CCVV+T1)) AND (HIGH>T1HIGH)));
T2HIGH:=CONST(REF(HIGH,T2));
T3:=CONST(BARSLAST((CURRBARSCOUNT >(CCVV+T2)) AND (HIGH>T2HIGH)));
T3HIGH:=CONST(REF(HIGH,T3));
X1:=IF(MA(C,5)>MA(C,10),20,0);
X2:=IF(MA(C,20)>MA(C,60),10,0);
X3:=IF(KDJ.J>KDJ.K,10,0);
X4:=IF(MACD.DIF>MACD.DEA,10,0);
X5:=IF(MACD.MACD>0,10,0);
X6:=IF(V>MA(V,60),10,0);
X8:=IF(C/REF(C,1)>1.03,10,0);
XX:=X1+X2+X3+X4+X5+X6+X8;
DRAWTEXT_FIX(V>O,0.01,0.10,0,STRCAT('【量化评分】:',STRCAT(CON2STR(XX,2),' '))),COLOR0000FF;
STICKLINE(REF(COUNT(C<试盘,5)=5,1) AND C>试盘 AND C>O,C,O,3,0),COLORWHITE;
STICKLINE(REF(COUNT(C<突破,5)=5,1) AND C>突破 AND C>O,C,O,3,0),COLORYELLOW;
STICKLINE(REF(COUNT(C<冲顶,5)=5,1) AND C>冲顶 AND C>O,C,O,3,0),COLORMAGENTA;
LC:=REF(CLOSE,1);
RSI:=((SMA(MAX((CLOSE - LC),0),3,1) / SMA(ABS((CLOSE - LC)),3,1)) * 100);
FF:=EMA(CLOSE,3);
MA15:=EMA(CLOSE,21);
波动提示:=MA(CLOSE,10000);
DRAWTEXT(CROSS(FF,MA15),(LOW * 0.99),'(上探)'),COLOR00FFFF;
DRAWTEXT(CROSS(MA15,FF),(HIGH * 1.02),'(下拐)'),COLOR00FF00;
买线:=MA(CLOSE,9),LINETHICK2;
卖线:=MA(CLOSE,20);
BU:=CROSS(买线,卖线);
SEL:=CROSS(卖线,买线);
DRAWTEXT(BU,L-0.1,'建仓')COLORYELLOW;
DRAWTEXT(SEL,H+0.1,'空仓');
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);
MACD:=(DIF-DEA)*2;
AAAB:=(DIF-DEA)*2*60;
起爆:=CROSS(AAAB-REF(AAAB,1),15);
STICKLINE(起爆,O,C,2.5,0),COLORYELLOW;
DRAWTEXT(起爆,(O+H)/2,'{爆涨}'),COLORGRAY,LINETHICK2;
AQ1:=REF(V,1);AQ2:=DVOL;AQ3:=AQ2/AQ1;
LNX:=AQ3-REF(AQ3,1);
E1:=REF(C,1);E2:=DCLOSE;E3:=(E2-E1)/E1*100;
QMX:=E3-REF(E3,1);
XXG:=CROSS(LNX,500) AND CROSS(QMX,10);DRAWTEXT(XXG=1,L*0.955,'{--启动点}'),COLORMAGENTA;DRAWICON(XXG=1,L*0.993,25);
启爆线:DRAWLINE(CURRBARSCOUNT=T3+1, T3HIGH, ISLASTBAR, T3HIGH, 1),LINETHICK2,COLORFF0099;
警示:=NAMEINCLUDE('S');
ZT:=C>=ZTPRICE(REF(C,1),IF(警示,0.05,0.099)),NODRAW,COLORRED;
首板:=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;
N0:=9;
M1:=3;
M2:=3;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N0))*100;
K:=SMA(RSV,M1,1);
D:=SMA(K,M2,1);
J:=3*K-2*D;
金叉:=KDJ.K>KDJ.D AND KDJ.J>KDJ.D AND KDJ.J>KDJ.K;
流通市值:=CAPITAL*C/1000000;
涨幅:=(C-REF(C,1))/REF(C,1)*100;
价格:=C;
VAR0:=NOT(NAMELIKE('ST') OR NAMELIKE('*ST') OR NAMELIKE('S') OR DYNAINFO(4)=0 OR INBLOCK('创业板') OR INBLOCK('科创板')) OR BARSCOUNT(C)>1;
VAR1:=流通市值>0 AND 流通市值<80;
VAR2:=涨幅>9.8 AND 涨幅<10.07 AND C=H;
VAR3:=价格>2 AND 价格<22;
VAR4:=COUNT(VAR2,2)=1;
XG1:=金叉 AND VAR0 AND VAR1 AND VAR2 AND VAR3 AND VAR4;
STICKLINE(XG1,H,L,0,0),COLOR0000FF;
STICKLINE(XG1,C,O,3,0),COLOR000099;
STICKLINE(XG1,C,O,2,0),COLOR0000BB;
STICKLINE(XG1,C,O,1,0),COLOR0000DD;
STICKLINE(XG1,C,O,0.3,0),COLOR0000FF;
DRAWTEXT(XG1,L*0.99,'风口启动'),COLORRED;
DRAWTEXT(XG,L3,'【起爆】'),COLORRED,LINETHICK5;
DRAWTEXT(REF(COUNT(C<试盘,5)=5,1) AND C>试盘 AND C>O,L*0.9999,'试盘'),COLORWHITE;
DRAWTEXT(REF(COUNT(C<冲顶,5)=5,1) AND C>冲顶 AND C>O,C*0.999,'拉升'),COLORMAGENTA;
DRAWTEXT(REF(COUNT(C<突破,5)=5,1) AND C>突破 AND C>O,C*0.999,'突破'),COLORYELLOW;
DRAWTEXT(REF(COUNT(C<攻击,5)=5,1) AND C>攻击 AND C>O,C*0.9999,'攻击'),COLORLIRED;
DRAWICON(CROSS(C,启爆线),启爆线*1,11);