总共四个指标: 引用MACD: DIF:=(EMA(CLOSE,4)-EMA(CLOSE,12)); DEA:=EMA(DIF,7); MACD:=(DIF-DEA)*2; TS:BARSLASTCOUNT(EXIST(CROSS(DIF,DEA),12) AND (DIF>0 OR CROSS(DIF,0))); 主升MACD(副图): DRAWGBK(O>C,RGB(40,40,40),RGB(0,0,10),0,'01',0); 周DB:="MACD.DIF#WEEK",COLORRED; 周AB:="MACD.DEA#WEEK",COLORRED; 月DB:="MACD.DIF#MONTH",COLOR0080FF; 月AB:="MACD.DEA#MONTH",COLOR0080FF; NOTEXTDIF5:=EMA(CLOSE,12)-EMA(CLOSE,26); NOTEXTDEA5:=EMA(NOTEXTDIF5,9); NOTEXTMACD:=2*(NOTEXTDIF5-NOTEXTDEA5),COLORSTICK; 月金叉3红箭:CROSS(月DB,月AB),NODRAW,COLORMAGENTA; DRAWGBK_DIV(月金叉3红箭,RGB(0,0,0),RGB(140,10,30),0,0); SBL:= STRCAT(STRCAT(STRCAT(HYBLOCK,DYBLOCK),GNBLOCK),ZDBLOCK); DRAWTEXT_FIX(1,0,0,0,SBL),COLOR0090FF; DIF:EMA(CLOSE,12)-EMA(CLOSE,26) COLORRED; DEA:EMA(DIF,9) COLORGREEN; MACD:(DIF-DEA)*2,COLORSTICK; 买线1:=LLV(MA(((C+L+O+H)/4),10),5); 卖线:=HHV(MA(((C+L+O+H)/4),5),5); 倍:=(卖线+买线1)/2; 涨停价:=ZTPRICE(REF(C,1),0.1) NODRAW; 跌停价:=DTPRICE(REF(C,1),0.1) NODRAW; 注:=CROSS(C,倍) NODRAW; 试:=H>=倍 AND C<倍 AND (C>=O OR C>=REF(CLOSE,1)) NODRAW; 价:(卖线+买线1)/2 NODRAW; 涨停:=CLOSE/REF(CLOSE,1)>=1.095; DIF4:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA4:=EMA(DIF4,9); ZTB:=C>INTPART(REF(C,1)*(1+10/100)/0.01+0.5)*0.01-0.006 AND C=H; 启动版:=DIF4>-0.2 AND DIF4<0.35 AND ZTB AND REF(ZTB,1)<1 AND COUNT(DIF>=-0.01,5)=5; 启动版1:=DIF4>-0.25 AND DIF4<0.25 AND ZTB AND REF(ZTB,1)<1 AND COUNT(DIF>=-0.01 OR DIF<=0.01,5)=5; DRAWICON(启动版1,0,1); {MACD量王线} 总量:=AMOUNT,VOLSTICK; 量比:=V/REF(MA(V,5),1),COLORBROWN,NODRAW; 几倍:=1.9; 倍量:=总量 >=REF(总量,1)*几倍 AND (IF(C<O,C>REF(C,1),1)),COLORYELLOW,NODRAW; 天量:=总量=HHV(总量,120), COLORRED; 量王:=天量&&倍量&&量比>2&&(BARSCOUNT(C)+1)>120,COLORGREEN, NODRAW; 量王线:DRAWLINE(量王,MACD,REF(量王,1),REF(MACD,1),1),COLORGREEN,DOTLINE; A111:=C>REF(C,4); NT:=BARSLASTCOUNT(A111); TJ11:=NT=9; TJ13:=ISLASTBAR AND BETWEEN(NT,5,8); AY:=(BACKSET(TJ11>0,9) OR BACKSET(TJ13>0,NT))*NT; DRAWTEXT(AY>0,MACD*1.02,VAR2STR(AY,0)),COLORA67D3D; DRAWTEXT(NT=9,MACD*1.02,'9'),COLORGREEN; B1:=C<REF(C,4); NT0:=BARSLASTCOUNT(B1); TJ21:=NT0=9 ; TJ23:=ISLASTBAR AND BETWEEN(NT0,5,8); AY1:=(BACKSET(TJ21>0,9) OR BACKSET(TJ23>0,NT0))*NT0; DRAWTEXT(AY1>0,MACD*0.98,VAR2STR(AY1,0)),COLORA67D3D ; DRAWTEXT(NT0=9,MACD*0.98,'9'),COLORRED; MACD120:REF(MACD/2,BARSLAST(MACD=HHV(MACD,120))),COLORA67D3D ,LINETHICK1; MACD250:=REF(MACD/2,BARSLAST(MACD=HHV(MACD,250))),COLOR545454 ,NODRAW; XG:=NOT(REF(MACD120,1)=MACD120); STICKLINE(XG,0,MACD,0,0),COLORYELLOW; STICKLINE(MACD>=MACD250,MACD250,MACD,0,0),COLORMAGENTA; 大行情:=NOT(REF(MACD120,1)=REF(MACD250,1)) AND MACD120=MACD250; DRAWICON(大行情,0,11); 分界:=EMA(COST(85),10){,PRECISION2,LINEDOT},COLORRED; ZTB2:=C>INTPART(REF(C,1)*(1+10/100)/0.01+0.5)*0.01-0.006 AND C=H; 启动:=DIF>-0.2 AND DIF<0.35 AND ZTB2 AND REF(ZTB2,1)<1 AND COUNT(DIF>=-0.01,5)=5;VAB0:=13; {梯量3} 涨幅:=(C-REF(C,1))/REF(C,1)*100; 梯量9:=EVERY(C>O,3) AND EVERY(C>REF(C,1),2) AND EVERY(V>REF(V,1),2) AND SUM(涨幅,3)<15; 梯量4:=REF(梯量9,1) AND C>=REF(C,1); BK:=BARSLAST(CURRBARSCOUNT=CONST(BARSLAST(FILTER(梯量9,2)))+1),LINETHICK1,COLORD355BA; BK1:=REF(BK,1); T3:REF(H,BK),LINETHICK1,COLORD355BA,NODRAW; FK:=BARSLAST(CURRBARSCOUNT=CONST(BARSLAST(REF(FILTER(梯量4,3),3)))+1),NODRAW; T7:=REF(L,FK),COLORC0C0C0 ; AA:=FILTER(梯量9,2),NODRAW; ZT:=(C-REF(C,1))/REF(C,1)>0.092; AB:=COUNT(梯量9=1,50 )>=1 AND (REF(C,1)<T3 OR REF(C,2)<T3 OR REF(C,3)<T3 ) AND ZT AND( CROSS(C,T3) OR C>T3) AND DIF>0 AND DEA>0 AND C>分界; XG15:AB*0.1,COLORGREEN,LINETHICK2; T33:=REF(H,BARSLAST(FILTER(梯量9,2))); 墨轩首板:=T33 AND 启动; XG16:墨轩首板*0.05,COLORRED,LINETHICK2; DIFF:=( EMA(CLOSE,12) - EMA(CLOSE,26)); 日金叉:=IF(CROSS(DIF,DEA),1,0); 日零轴上:=IF(DEA>0,1,0); 日MACD买点:=(日金叉*日零轴上)>0; A:="MACD.DIF#WEEK"; B:="MACD.DEA#WEEK"; 周金叉:=IF(CROSS(A,B),1,0); 周零轴上:=IF(B>0,1,0); 周MACD买点:=(周金叉*周零轴上)>0,COLORYELLOW,LINETHICK2; DRAWTEXT(周MACD买点,0,'金'),COLORGREEN; 股东占流通比:=FINVALUE(244)/FINVALUE(239),NODRAW;{十大流通股东/流通} 历史衰退系数:1/(1-股东占流通比),NODRAW; NE:=IF(FINANCE(3)=3 OR FINANCE(3)=4,0.2,0.1); ZT5:=C+0.01>=ZTPRICE(REF(C,1),NE) AND C=H; BS:=BARSLASTCOUNT(ZT5); MTS:=引用MACD.TS#MONTH; WTS:=引用MACD.TS#WEEK; ZF:=(C/REF(C,1)-1)*100; 周金叉达标:=FILTER(WTS>=1 AND BS<=3 AND ZF>9,5); 月金叉达标:=FILTER(MTS>=1 AND BS<=3 AND ZF>9,5); DRAWICON(月金叉达标,0,23); DRAWICON(周金叉达标,0.1,41); 抓牛2024(主图): 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); XA_188:=EMA(CLOSE,9); 主升浪1:=EMA(XA_188*1.14,5),COLORGREEN; 主升浪4:=EMA(CLOSE,2),COLORRED; STICKLINE(主升浪4>=主升浪1,REFDATE(HHV(H,130),DATE),REFDATE(LLV(L,130),DATE),5,0), COLOR4F4F2F ; {强弱线} COST85:=EMA(COST(85),10); COST99:=EMA(COST(99),10); COST85向上:=COST85>REF(COST85,1); COST99向上:=COST99>REF(COST99,1); 腰:=COST85向上 AND COST99向上;{8599双上区} DRAWBAND(COST85,RGB(50,50,50),COST99,RGB(50,50,50)); 云里2:=COST85向上 AND MA(C,10)>REF(MA(C,10),2) AND (C>COST85 OR C>MA(C,10)); COUNT(H=HHV(H,120),10)>=1 AND 腰 AND 云里2; {后补的粉飘带} 最强趋势:=CCI#MONTH>200 {AND 月红区 AND 云里2}; 粉飘带:=IF(最强趋势,EMA(COST(88),10),EMA(COST(85),10)); 变红:=IF(最强趋势 AND 腰,EMA(COST(99),10),EMA(COST(85),10)); DRAWBAND(变红,RGB(80,0,0),EMA(COST(85),10),RGB(50,50,50)); DRAWKLINE(H,O,L,C); {取消遮挡} STICKLINE(C>=O,H,L,0,1),COLOR0000FF; STICKLINE(C>O,C,O,2.8,0),COLOR000066; STICKLINE(C>O,C,O,1.5,0),COLOR000088; STICKLINE(C>O,C,O,1,0),COLOR0000AA; STICKLINE(C>O,C,O,0,0),COLOR0000CC; STICKLINE(C<O,H,L,0,1),COLORCYAN; STICKLINE(O>=C,C,O,2.8,0),COLORFF8800; STICKLINE(O>=C,C,O,1.5,0),COLORFFAA00; STICKLINE(O>=C,C,O,1,0),COLORFFCC00; DRAWTEXT_FIX(1,0.01,0.05,0,'板块:')COLOR0066BB; DRAWTEXT_FIX(1,0.03,0.05,0,STRCAT(STRCAT(STRCAT(STRCAT(HYBLOCK,'_____'),GNBLOCK),'__'),DYBLOCK))COLOR0066BB; DRAWTEXT_FIX(1,0.03,0.90,0,EXTERNSTR(0,9885))COLOR70DB93 ; DRAWTEXT_FIX(1,0.03,0.25,0,EXTERNSTR(0,9601))COLOR70DB93 ; DRAWTEXT_FIX(1,0.01,0.15,0,'游资:')COLOR0000FF; DRAWTEXT_FIX(1,0.03,0.15,0,EXTERNSTR(0,9701))COLOR0000FF; DRAWTEXT_FIX(1.0,0.50,0.100,0,'流通市值:'),COLORGREEN; DRAWNUMBER_FIX(1.0,0.55,0.100,0, FINANCE(40)/100000000),COLORGREEN; DRAWTEXT_FIX(CURRBARSCOUNT=1,0.25,0.95,1,EXTERNSTR(0,9997)); ZE:=昨额.A#DAY; KZEB:=DYNAINFO(15)/ZE*100; EB:=STRCAT('开盘昨比:',STRCAT(CON2STR(KZEB,2),' %')); DRAWTEXT_FIX(1,0.61,0.10,0,EB),COLORRED; DRAWTEXT_FIX(ISLASTBAR,0.5,0.97,0,CODE),COLORYELLOW; DRAWTEXT_FIX(ISLASTBAR,0.55,0.97,0,STKNAME)COLORYELLOW; DRAWTEXT_FIX(ISLASTBAR,0.6,0.97,0,HYBLOCK),COLORCYAN; 流通市值:(FINANCE(40)/100000000),NODRAW,COLORRED; 利润%:FINANCE(43),NODRAW,COLORMAGENTA; YVDAY:=HHVBARS(AMOUNT*((C>O AND C>=REF(C,1)) OR (C<O AND C>REF(MAX(C,O),1))),100); YKH:REF(L,YVDAY)COLORRED,DOTLINE; 无量停板7:=MA(C,5)>REF(MA(C,5),1) AND C/REF(C,1)>1.099 AND V<MA(V,5); STICKLINE(无量停板7,C,O,2.8,0) ,COLOR7210CD; ZT:=C=ZTPRICE(REF(C,1),0.1) AND C=H; ZT1:=C=ZTPRICE(REF(C,1),0.2) AND C=H; DT:=C=DTPRICE(REF(C,1),0.1) AND C=L; DT1:=C=DTPRICE(REF(C,1),0.2) AND C=L; STICKLINE(DT OR DT1,O,C,-1,0),COLORBLUE; STICKLINE(DT OR DT1,H,L,0,0),COLORBLUE; MA5:=MA(C,5); MA10:=MA(C,10); MA20:=MA(C,20); MA60:=MA(C,60); 涨停1:=C/REF(C,1)>1.095; STICKLINE(涨停1,H,L,0,1),COLORFFFFFF; STICKLINE( 涨停1,C,O,3.0,0),COLOR555555; STICKLINE( 涨停1,C,O,2.6,0),COLOR777777; STICKLINE( 涨停1,C,O,1.9,0),COLOR999999; STICKLINE( 涨停1,C,O,1.1,0),COLORCCCCCC; STICKLINE( 涨停1,C,O,0.3,0),COLORCCDDBB; DIF:=EMA(CLOSE,12)-EMA(CLOSE,26); DEA:=EMA(DIF,9); MACD:=(DIF-DEA)*2; VAR03:=(2*CLOSE+HIGH+LOW)/4; B9:=XMA((VAR03-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100,12); DUO:=EMA(B9,3),LINETHICK1,COLOR2C2CEE; KONG:=EMA(DUO,18),COLORCYAN,LINETHICK1; DIF4:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA4:=EMA(DIF4,9); ZTB:=C>INTPART(REF(C,1)*(1+10/100)/0.01+0.5)*0.01-0.006 AND C=H; 启动版:=DIF4>-0.2 AND DIF4<0.35 AND ZTB AND REF(ZTB,1)<1 AND COUNT(DIF>=-0.01,5)=5; STICKLINE(启动版,O+(C-O)/4,O,2.0,0),COLORRED; STICKLINE(启动版,O+(C-O)/4,O,3.0,0),COLOR0066BB; STICKLINE(启动版,O+(C-O)/4,O,1.9,0),COLOR0077CC; STICKLINE(启动版,O+(C-O)/4,O,1.2,0),COLOR0088DD; STICKLINE(启动版,O+(C-O)/4,O,0.6,0),COLOR0099EE; LS:=C/REF(C,1)>1.03 AND C=H AND BETWEEN(FORCAST(V,4),0.2*FORCAST(V,12),2.1*FORCAST(V,12)); YZB:=C/REF(C,1)>1.0991 AND O=H AND C=H; XG9: FILTER(LS,28) AND NOT(YZB) AND DUO>KONG; STICKLINE(XG9,O+(C-O)/2,O,1,0),COLOR0066BB; GK1:=O>REF(C,1); FD:=O/REF(C,1); ZT33:=C/REF(C,1)>1.09 OR C/REF(C,1)>1.19; GK2:=IF(GK1>0 AND FD>REF(FD,1) AND REF(ZT33,1)>0 AND REF(GK1,1)>0,1,0); GK3:=GK2>0 AND GK1>0 AND ZT33>0 AND COUNT(ZT33 >0,4)<4; DRAWTEXT(GK3,L*0.985,'竞'),COLORRED; X_1:=150; X_2:=3; X_3:=REF(HHV(HIGH,X_1),X_2); X_4:=REF(LLV(LOW,X_1),X_2); X_5:=X_3-(X_3-X_4)*0.618; X_6:=REFDATE(X_5,DATE); 横盘天数:=BARSLASTCOUNT(CLOSE<X_6),COLORGREEN; X_7:=CROSS(CLOSE,X_6); X_8:=横盘天数>100; X_9:=REF(X_8,1); X_10:=X_9 AND X_7; X11:=BARSLAST(X_10>0); X12:REF(H,X11)COLOR0066BB,LINETHICK1; ; X13:=CROSS(C,X12) AND C/REF(C,1)>1.07 AND X11>2; X14:=C>X12 AND REF(L,1)<X12 AND C/REF(C,1)>1.07 AND X11>2; X15:=X13 OR X14; X16:=FILTER(X15,3); X17:=C>X12 AND C/REF(C,1)>1.09; X18:=FILTER(X17,20); DRAWICON(X_10,L*0.99,16); AA:=((CLOSE/REF(CLOSE,1))>=1.099);AB:=(VOL/REF(VOL,1)); 龙头第一买点:=IF((AA AND (AB<1)),1,0);龙头第二买点:=IF((((CLOSE/REF (CLOSE,1))>=1.07) AND (AB<1)),1,0); STICKLINE(龙头第二买点,O+(C-O)/4,O,0.4,0),COLORRED; {梯量3} 涨幅:=(C-REF(C,1))/REF(C,1)*100; 梯量9:=EVERY(C>O,3) AND EVERY(C>REF(C,1),2) AND EVERY(V>REF(V,1),2) AND SUM(涨幅,3)<15; 梯量4:=REF(梯量9,1) AND C>=REF(C,1); DRAWTEXT(FILTER(梯量9,2),H,'T3'),COLOR888888; {炸板} KCBB:=IF(CODELIKE('68') OR CODELIKE('30'),1,0); ZF0:=IF(KCBB=1,1.195,1.093); 炸板1:=H>REF(C,1)*ZF0 AND C<H; 涨停10:=C>REF(C,1)*ZF0; 炸板2:=IF(炸板1 AND NOT(涨停10),1,0); LX11:=BARSLAST(炸板2>0); 炸板3:IF(炸板1 AND NOT(涨停10),H*1,DRAWNULL),CIRCLEDOT,COLORFF00FF,LINETHICK1; 炸板:=IF(CURRBARSCOUNT<=CONST(LX11)+1,CONST(REF(H,LX11)),DRAWNULL); STICKLINE(炸板,炸板,炸板,-1,0),,COLOR7CAE39; DRAWTEXT(ISLASTBAR,炸板,'炸板'),COLOR7CAE39; ZB:=炸板1 AND NOT(涨停10); Z16:=BARSLAST(ZB>0); Z26:=REF(HHV(H,2),Z16); Z36:=CROSS(C,Z26 )AND 涨停10; H3:IF(BARSLAST(ZB)>0 AND BARSLAST(ZB)<190,REF(H,BARSLAST(ZB)),DRAWNULL),COLOR7DAACD; STICKLINE(Z36,C,O,0,0),COLORYELLOW; 启432:=DYNAINFO(3)*1.0432; STICKLINE(启432 AND ISLASTBAR,启432,启432,3,1),COLORFF9933; DRAWTEXT(ISLASTBAR,启432,STRCAT(' ',CON2STR(启432,2))),COLORFF9933; 三阴:=REF(DOWNNDAY(CLOSE,3),1); 收阳:=C>REF(C,1) AND C>=O; 止跌:=三阴 AND 收阳; D4:REF(H,BARSLAST(CONST(BARSLAST(止跌))+4=CURRBARSCOUNT)),COLORCYAN,DOTLINE; {计算涨停价} XM_1:=IF(FINANCE(3)!=1,0.1998,IF(NAMELIKE('ST') OR NAMELIKE('*ST'),0.0495,0.0998)); 涨停价:=ZTPRICE(REF(C,1),XM_1); ZT77:= C>=涨停价 AND C=H; {百日高量} BRGL:=HHV(V,100)=V; 突破前一天:=REF(BRGL,1) AND ZT77; BRGLD:=BARSLAST(BRGL); 百高顶:=REF(REF(H,BRGLD),1); 百高上涨停:=ZT77 AND C>百高顶 AND REF(EVERY(C<百高顶*1.2,BRGLD),1); DRAWTEXT(FILTER(百高上涨停 OR 突破前一天,5),L*0.96,'百'),COLORGREEN; LT:=LLVBARS(L,60); LTT:=BARSLAST(CURRBARSCOUNT=CONST(LT)+1); HT:=FINDHIGHBARS(H,LT+1,60,1); EXT1:DRAWLINE(CURRBARSCOUNT=CONST(HT)+1,H,ISLASTBAR,REF(H,HT),0),COLOR7CAE39,LINETHICK1; TT:=BARSLAST(CURRBARSCOUNT=CONST(HT)+1); EXT2:=DRAWLINE(LTT=0,(EXT1-L)*0.618+L,ISLASTBAR,REF((EXT1-L)*0.618+L,LTT),0)DOTLINE,COLORLIMAGENTA; V1:=IF(C>O OR (C=O AND C>=REF(C,1)),VOL,0); V2:=IF(C<O OR (C=O AND C<REF(C,1)),VOL,0); LJ:=SUM(V1,LTT)/SUM(V2,LTT); XGG:=COUNT(CROSS(C>=EXT1,0.5),LTT+1)=1 AND CROSS(C>=EXT1,0.5) AND LJ>1.5; STICKLINE(XGG,C,O,0,0),COLORYELLOW; STICKLINE(XGG,H,L,0,0),COLORYELLOW; DRAWTEXT(LTT=0,L*0.98,'←底'),COLORYELLOW; DRAWTEXT(TT=0,REF(H,TT)*1.03,VARCAT(VARCAT('撑:',VAR2STR(REF(H,TT),2)),'元'))COLOR7CAE39; 十日排名:INSORT(HYBLOCK,'十日涨',1,0),NODRAW; {突破九转} A111:=C>REF(C,4); NT9:=BARSLASTCOUNT(A111); AS1:=NT9=9; AS2:=BARSLAST(AS1>0); AS3:=REF(H,AS2); H11:IF(BARSLAST(AS1)>=0 AND BARSLAST(AS1)<260,REF(H,BARSLAST(AS1)),DRAWNULL),COLORA67D3D ,LINETHICK1; F101:=100*(H-O)/O; F202:=100*(H-REF(C,1))/REF(C,1); F10:=100*(C-O)/O; F20:=100*(C-REF(C,1))/REF(C,1); 振幅:=(H-L)/REF(C,1)*100; RQ:=IF(DATE>=1200824,1,0); KCB:=IF(INBLOCK('科创板'),1,0); CYB:=IF(INBLOCK('创业板') AND RQ,1,0); ZT16:=F20>=9.5 AND C=H AND NOT(KCB OR CYB); ZT2:=F20>=19.5 AND C=H AND (KCB OR CYB);{20%涨停} ZT3:=C=O AND C=L AND C=H AND (ZT16 OR ZT2);{一字板} ZT4:=(ZT16 OR ZT2 OR ZT3) OR C/REF(C,1)>1.19; XJ5:=BARSLAST(ZT4>0); XJ6:REF(L,XJ5-1)COLOR7CAE39,DOTLINE ; XJ7:REF(H,XJ5-1)COLOR7CAE39,DOTLINE ; {量王} 总量:=AMOUNT,VOLSTICK; 量比:=V/REF(MA(V,5),1),COLORBROWN,NODRAW; 几倍:=1.9; 倍量量王:= 总量 >=REF(总量,1)*几倍 AND (IF(C<O,C>REF(C,1),1)),COLORYELLOW,NODRAW; 天量:=总量=HHV(总量,120), COLORRED; 量王:=天量&&倍量量王&&量比>2&&(BARSCOUNT(C)+1)>120,COLORGREEN; STICKLINE(量王,C,O,0.1,0),COLORGREEN; 昨额(引用): A:REF(AMO,1); |
|