|
通達信號稱【鎮(zhèn)店之寶主圖】有量化評分、風(fēng)口啟動一體等等 源碼：摘自：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,':婧琪創(chuàng)意信息!'); 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,'●準(zhǔn)備'),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,'★:婧琪創(chuàng)意信息'),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('創(chuàng)業(yè)板') OR INBLOCK('科創(chuàng)板')) 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,'風(fēng)口啟動'),COLORRED; DRAWTEXT_FIX(1,0.88,5,0,'~☆~:婧琪創(chuàng)意信息~☆~'),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); {風(fēng)口啟動} 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('創(chuàng)業(yè)板') OR INBLOCK('科創(chuàng)板')) 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;     |
|
|
