|
主图公式:
DRAWGBK((CLOSE > 1),RGB(0,0,0),RGB(0,0,2),0,0,0); L1A:=LLV(L,10); 章鱼点:=(REF(C,1))/REF(C,1)*100; 章鱼:=CROSS(章鱼点,20) OR CROSS(章鱼点,18); L3:=IF(章鱼,O,L1A*0.999)LINETHICK5,COLORYELLOW; STICKLINE(章鱼,L3,L3,40,0),COLOR00FFFF,LINETHICK6; M5:=MA(C,5); M10:=MA(C,10); MA4:=MA(CLOSE,60),COLORGREEN; 试盘:=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); 平衡线:MA(CLOSE,163),COLORGREEN; 通达信指标公式:=DATE< 1870508; 主章鱼线: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 通达信指标公式,H,L,0,0),COLORRED; STICKLINE(AA AND 通达信指标公式,O,C,3,1),COLORRED; STICKLINE(AA AND 通达信指标公式 AND DD,O,C,3,0),COLORRED; STICKLINE(BB AND 通达信指标公式,H,L,0,0),COLORGREEN; STICKLINE(BB AND 通达信指标公式,O,C,3,1),COLORGREEN; STICKLINE(BB AND 通达信指标公式 AND DD,O,C,3,0),COLORGREEN; STICKLINE(BB AND 通达信指标公式,H,L,0,0),COLORGREEN; STICKLINE(BB AND 通达信指标公式,O,C,3,1),COLORGREEN; STICKLINE(BB AND 通达信指标公式 AND DD,O,C,3,0),COLORGREEN; STICKLINE(BB AND 通达信指标公式 AND CC,H,L,0,1),COLORWHITE; STICKLINE(BB AND 通达信指标公式 AND CC,O,C,3,1),COLORWHITE; STICKLINE(BB AND 通达信指标公式 AND CC AND DD,O,C,3,0),COLORWHITE; STICKLINE(AA AND 通达信指标公式 AND CC1,H,L,0,0),COLORWHITE; STICKLINE(AA AND 通达信指标公式 AND CC1,O,C,3,1),COLORWHITE; STICKLINE(AA AND 通达信指标公式 AND CC1 AND DD,O,C,3,0),COLORWHITE; ZYG3:=MA(REF(HHV((C+L+O+H)/4,30),1),3); ZYG4:=MA((C+L+O+H)/4,13); ZYG5:=EMA((C+L+O+H)/4,21); STICKLINE(C< ZYG5 AND C< O,H,L,0,0),COLOR007700; STICKLINE(C< ZYG5 AND C< O,C,O,3,0),COLOR005500; STICKLINE(C< ZYG5 AND C< O,C,O,2,0),COLOR006600; STICKLINE(C< ZYG5 AND C< O,C,O,1,0),COLOR007700; STICKLINE(C>ZYG5 AND C>O,H,L,0,0 ),COLOR00EEFF; STICKLINE(C>ZYG5 AND C>O,C,O,3,0 ),COLOR00AAFF; STICKLINE(C>ZYG5 AND C>O,C,O,2,0 ),COLOR00CCFF; STICKLINE(C>ZYG5 AND C>O,C,O,1,0 ),COLOR00EEFF; STICKLINE(C>ZYG3 AND C>O,H,L,0,0),COLOR0000DD; STICKLINE(C>ZYG3 AND C>O,C,O,3,0),COLOR000099; STICKLINE(C>ZYG3 AND C>O,C,O,2,0),COLOR0000BB; STICKLINE(C>ZYG3 AND C>O,C,O,1,0),COLOR0000DD; N:=150; 判断高低:=3; 涨跌:=REF(C,1); 涨停:=IF((C-涨跌)*100/涨跌>=(10-0.01*100/涨跌),1,0); 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.66,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),L,'买入'),COLOR00FFFF; DRAWTEXT(CROSS(M5,M10),M5*0.96,'●准备'),LINETHICK2,COLORMAGENTA; 买线:=MA(CLOSE,9),LINETHICK2; 卖线:=MA(CLOSE,20); BU:=CROSS(买线,卖线); SEL:=CROSS(卖线,买线); DIF:=EMA(CLOSE,12)-EMA(CLOSE,26); DEA:=EMA(DIF,9); MACD:=(DIF-DEA)*2; AAAB:=(DIF-DEA)*2*60; 章鱼0:=CROSS(AAAB-REF(AAAB,1),15); STICKLINE(章鱼0,O,C,2.5,0),COLORYELLOW; DRAWTEXT(章鱼0,(O+H)/2,'★爆涨'),COLORGRAY,LINETHICK2; 启爆线:DRAWLINE(CURRBARSCOUNT=T3+1, T3HIGH, ISLASTBAR, T3HIGH, 1),LINETHICK1,COLORFF0099 DOTLINE; 警示:=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; 鱼哥0:=NOT(NAMELIKE('ST') OR NAMELIKE('*ST') OR NAMELIKE('S') OR INBLOCK('创业板') OR INBLOCK('科创板')) OR BARSCOUNT(C)>1; 鱼哥1:=流通市值>0 AND 流通市值< 80; 鱼哥2:=涨幅>9.8 AND 涨幅< 10.07 AND C=H; 鱼哥3:=价格>2 AND 价格< 22; 鱼哥4:=COUNT(鱼哥2,2)=1; 章鱼1:=金叉 AND 鱼哥0 AND 鱼哥1 AND 鱼哥2 AND 鱼哥3 AND 鱼哥4; STICKLINE(章鱼1,H,L,0,0),COLOR0000FF; STICKLINE(章鱼1,C,O,3,0),COLOR000099; STICKLINE(章鱼1,C,O,2,0),COLOR0000BB; STICKLINE(章鱼1,C,O,1,0),COLOR0000DD; STICKLINE(章鱼1,C,O,0.3,0),COLOR0000FF; DRAWTEXT(章鱼1,L*0.99,'风口启动'),COLORRED; DRAWTEXT(章鱼,L3,'【章鱼】'),COLORRED,LINETHICK5; DRAWICON(涨停,H*0.97,23); DRAWICON(CROSS(FF,MA15),L*0.96,9);
副图公式: A1:=EMA((C - REF(C,1)) / REF(C,3),10) * 100; A2:=EMA(EMA(EMA(EMA(A1,2),2),2),3); A3:=(C - MA(C,26)) / MA(C,26) * 100; 0,LINETHICK2; A4:=1; A5:IF(MA((C - MA(C,28)) / MA(C,28),3) * 100 > 0 AND MA(C,5) > MA(C,10) AND A3 > EMA(MA((C - MA(C,28)) / MA(C,28),3) * 100,5) AND A2 > REF(A2,1),MA((C - MA(C,28)) / MA(C,28),3) * 100,0) * A4; 持股线:(MA((C - MA(C,28)) / MA(C,28),3) * 100 > 0 AND MA(C,5) > MA(C,10) AND A3 > EMA(MA((C - MA(C,28)) / MA(C,28),3) * 100,5)) * A5 * A4,LINETHICK1,COLORRED; VARD1:=MA((C - MA(C,28)) / MA(C,28),3) * 100; A6:=(MA(C,3) + MA(C,6) + MA(C,12) + MA(C,24)) / 4; A7:=A6 + 3 * STD(A6,10); A8:=MA(C,26) + 2 * STD(C,26); 卖点:(V > 0 AND CROSS(0.5,持股线)) * REVERSE(MA((C - MA(C,28)) / MA(C,28),3) * 100) * A4,COLORGREEN; STICKLINE(卖点,卖点,0,3,0),COLOR009900; 鱼哥1:=(V > 0 AND A5 > 0 AND A2 > REF(A2,1)) * EMA(A5,5),COLOR005999; STICKLINE(鱼哥1,鱼哥1,0,2,0),COLORRED; 鱼哥2:=(V > 0 AND BARSLASTCOUNT(A5>0)=1 AND CROSS(EMA(C,2),HHV(EMA(C,5),26))) * EMA(A5,2),COLOR000999; STICKLINE(鱼哥2,鱼哥2,0,3,0),COLORWHITE; 鱼哥3:=(V > 0 AND BARSLASTCOUNT(A5>0)=1 AND CROSS(EMA(C,2),HHV(EMA(C,5),26))) * -3,COLOR009999; STICKLINE(鱼哥3,鱼哥3,0,6,0),COLORYELLOW; STICKLINE(鱼哥3,鱼哥3,0,2,0),COLOR005555; STICKLINE(鱼哥3,鱼哥3,0,1,0),COLOR007777; STICKLINE(鱼哥3,鱼哥3,0,0.2,0),COLOR009999; 短线章鱼:(V > 0 AND BARSLASTCOUNT(A5>0)=1 AND CROSS(EMA(C,2),HHV(EMA(C,5),26))) * 10 * A4,; 鱼哥4:=(V > 0 AND EMA((C - MA(C,28)) / MA(C,28),2) > MA((C - MA(C,28)) / MA(C,28),4) AND MA((C - MA(C,28)) / MA(C,28),4) > REF(MA((C - MA(C,28)) / MA(C,28),4),1) AND SMA(MAX(C - REF(C,1),0),14,1) / SMA(ABS(C - REF(C,1)),14,1) * 100 > 64.5 AND EMA(C,1) > (A7 OR A8)) * EMA(A5,5) / 2.5 * A4,COLORRED; STICKLINE(鱼哥4,鱼哥4,0,3,0),COLORYELLOW; 章鱼:=BARSLASTCOUNT(鱼哥1 AND 鱼哥4)=1; DRAWICON(章鱼,MA((C - MA(C,28)) / MA(C,28),3) * 100 * 2,9); 鱼哥5:=(V > 0 AND EMA((C - MA(C,28)) / MA(C,28),2) > MA((C - MA(C,28)) / MA(C,28),4) AND MA((C - MA(C,28)) / MA(C,28),4) > REF(MA((C - MA(C,28)) / MA(C,28),4),1) AND (V > 0 AND A5 > 0 AND A2 > REF(A2,1)) * EMA(A5,5) = 0) * A3 * A4,COLORADA899; IF(EMA(C,2) > HHV(EMA(C,5),26) AND A5 > 0 * A4,持股线,DRAWNULL),LINETHICK3,COLORMAGENTA; A9:=EMA((EMA(C * V,3) / EMA(V,3) + EMA(C * V,6) / EMA(V,6) + EMA(C * V,12) / EMA(V,12) + EMA(C * V,24) / EMA(V,24)) / 4,13); A10:=1.06 * A9 * A4; A11:=(C - REF(C,1)) / REF(C,1) * 100; DRAWTEXT(A11 > 8.5 AND CROSS(MA(C,1),EMA(H,10) * (1 + 5 / 100)) AND CROSS(MA(C,1),A10) > 0,MA((C - MA(C,28)) / MA(C,28),3) * 100 * 2,'追'),COLORYELLOW; DRAWICON(A11 > 8.5 AND CROSS(MA(C,1),EMA(H,10) * (1 + 5 / 100)) AND CROSS(MA(C,1),A10) > 0,MA((C - MA(C,28)) / MA(C,28),3) * 100 * 2,23); DRAWICON(短线章鱼,短线章鱼,23);
选谷公式: 短线章鱼: A1:=EMA((C - REF(C,1)) / REF(C,3),10) * 100; A2:=EMA(EMA(EMA(EMA(A1,2),2),2),3); A3:=(C - MA(C,26)) / MA(C,26) * 100; A4:=1; QXS:=NOT(CODELIKE('4')); QKC:=NOT(CODELIKE('688')); QST:=IF(NAMELIKE('S'),0,1); QXX:=IF(NAMELIKE('*'),0,1); QBJ:=NOT(CODELIKE('8')); TTXD:=QXS AND QST AND QKC AND QXX AND QBJ; A5:=IF(MA((C - MA(C,28)) / MA(C,28),3) * 100 > 0 AND MA(C,5) > MA(C,10) AND A3 > EMA(MA((C - MA(C,28)) / MA(C,28),3) * 100,5) AND A2 > REF(A2,1),MA((C - MA(C,28)) / MA(C,28),3) * 100,0) * A4; 短线章鱼: TTXD AND(V > 0 AND BARSLASTCOUNT(A5>0)=1 AND CROSS(EMA(C,2) ,HHV(EMA(C,5),26))) * 10 * A4,;
追板信号: A4:=1; A9:=EMA((EMA(C * V,3) / EMA(V,3) + EMA(C * V,6) / EMA(V,6) + EMA(C * V,12) / EMA(V,12) + EMA(C * V,24) / EMA(V,24)) / 4,13); A10:=1.06 * A9 * A4; A11:=(C - REF(C,1)) / REF(C,1) * 100; QXS:=NOT(CODELIKE('4')); QKC:=NOT(CODELIKE('68')); QST:=IF(NAMELIKE('S'),0,1); QXX:=IF(NAMELIKE('*'),0,1); QBJ:=NOT(CODELIKE('8')); QJJ:=NOT(CODELIKE('9')); TTXD:=QXS AND QST AND QKC AND QXX AND QBJ AND QJJ; 追板:A11 > 8.5 AND CROSS(MA(C,1),EMA(H,10) * (1 + 5 / 100)) AND CROSS(MA(C,1),A10) > 0 AND TTXD;
|