通达信号称【镇店之宝主图】有量化评分、风口启动一体等等 源码:摘自:https://zhuanlan.zhihu.com/p/680957618?share_code=2qTHqL73t4Ht&utm_psn=1909778058371630638 ![]() ![]() DRAWGBK((CLOSE > 1),RGB(0,0,0),RGB(0,0,2),0,0,0); DRAWTEXT_FIX(CURRBARSCOUNT=1,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; DRAWTEXT_FIX(1,0.980,0,1,'★:婧琪创意信息'),COLOR666666; 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_FIX(1,0.88,5,0,'~☆~:婧琪创意信息~☆~'),COLORGRAY; 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); {风口启动} N:=150; 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; ![]() ![]() ![]() ![]() |
|