|
{主力吸货}
VARF2:=(((CLOSE - MA(CLOSE,6)) / MA(CLOSE,6)) * 100);
VARF3:=(((CLOSE - MA(CLOSE,12)) / MA(CLOSE,12)) * 100);
VARF4:=(((CLOSE - MA(CLOSE,24)) / MA(CLOSE,24)) * 100);
VARF5:=(((VARF2 + (2 * VARF3)) + (3 * VARF4)) / 6);
VARF6:=MA(VARF5,3);
开始控盘:=STICKLINE((VARF6 <= (0 - 10)),0,(0 - 20),3.5,0),COLOR00AAFF;
STICKLINE((VARF6 <= (0 - 10)),0,(0 - 20),3.5,0),COLOR0044FF;
STICKLINE((VARF6 <= (0 - 10)),0,(0 - 20),2.5,0),COLOR0088FF;
STICKLINE((VARF6 <= (0 - 10)),0,(0 - 20),3,0),COLOR00AAFF;
VARF1:=EMA(EMA(CLOSE,3),1); 控盘:=(VARF1-REF(VARF1,1))/REF(VARF1,1)*1000;
STICKLINE(控盘<0,控盘,0,3.5,0),COLORFFAA00;
STICKLINE(控盘<0,控盘,0,3.5.2,0),COLORFF4400;
STICKLINE(控盘<0,控盘,0,2.5,0),COLORFF8800;
STICKLINE(控盘<0,控盘,0,0,0),COLORFFAA00;
主力出货:0,COLORFFAA00; STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,3.5,0),COLOR000088;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,2.5,0),COLOR0000AA;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,1.5,0),COLOR0000CC;
STICKLINE(控盘>REF(控盘,3) AND 控盘>0,控盘,0,1,0),COLOR0000EE;
主力吸货:0,COLOR0000FF; STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,3.5,0),COLOR008800;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,2.5,0),COLOR00AA00;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,1.5,0),COLOR00CC00;
STICKLINE(控盘<REF(控盘,3) AND 控盘>0,控盘,0,1,0),COLOR00EE00;
STICKLINE(DDX<0,0,DDX,3.5,0),COLOR008800; STICKLINE(DDX<0,0,DDX,2.5,0),COLOR00AA00;
STICKLINE(DDX<0,0,DDX,1.5,0),COLOR00CC00; STICKLINE(DDX<0,0,DDX,1,0),COLOR00EE00;
主力减仓:0,COLOR00FF00; 底部:0,COLORYELLOW;
{短波段}
RSVA:=(CLOSE-LLV(LOW,7))/(HHV(HIGH,7)-LLV(LOW,7))*100;
短A:SMA(RSVA,3,1),COLORRED,LINETHICK1;
短B:SMA(短A,3,1),COLORYELLOW,LINETHICK1;
STICKLINE(短A<REF(短A,1),短A,短B,1,0),COLORGREEN;
STICKLINE(短A>=REF(短A,1),短A,短B,1,0),COLORRED;
{抢反弹}
A1:=HHV(HIGH,50)/LLV(LOW,100)>1.5;
A2:=(HHV(HIGH,50)-LOW)/(HHV(HIGH,50)-LLV(LOW,100));
A3:=(LOW-LLV(LOW,100))/(HHV(HIGH,50)-LLV(LOW,100));
A4:=HHVBARS(HIGH,50)<LLVBARS(LOW,100);
A5:=A1 AND A2>0.5 AND A3>0.3 AND A4;
A6:=COUNT(A5,20)=1;
TJ1:=A6 AND A5;
STICKLINE(TJ1,0,20,4,0),COLOR009999;
STICKLINE(TJ1,0,20,2,0),COLOR00BBBB;
STICKLINE(TJ1,0,20,1,0),COLOR00DDDD;
STICKLINE(TJ1,0,20,0.4,0),COLOR00FFFF;
DRAWTEXT(TJ1,22,'抢反弹'),COLOR00BBFF;
{★底}
VAR2W:=100-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
MW:=EMA(VAR2W,3);
VAR3W:=EMA(VAR2W,7);
M1:=EMA(VAR3W,5);
MB1:=CROSS(MW,M1) AND M1<20;
TJ2:=IF((MB1),20,0),LINETHICK1,COLORRED;
DRAWTEXT(CROSS(MW,M1) AND M1<20,22,'★底'),COLOR00FFFF;
{股价准备启动}
VAR11:=3;
VAR21:=(3)*(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100),5,1))-(2)*(SMA(SMA(((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27)))*(100),5,1),3,1));
股价准备启动:IF(CROSS(VAR21,VAR11),100,0),COLORRED,LINETHICK2;
{上升抄底}
Z:=MA(C,120);
VAR3:=(MA(C,5)-Z)/Z;
VAR4:=MA((CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100,3);
D1:DRAWTEXT(CLOSE>Z AND REF(VAR4,1)<30 AND VAR4>REF(VAR4,1) AND REF(VAR4,1)<REF(VAR4,2),10,'★B'),COLORRED;
D2:DRAWTEXT(REF(VAR4,1)<7 AND VAR4>REF(VAR4,1) AND REF(VAR4,1)<REF(VAR4,2) AND VAR3<-0.1,10,'★B'),COLORGREEN;
D3:DRAWTEXT(CROSS(VAR4,5) AND VAR3<-0.3,10,'★B'),COLORBLUE;
{黄金反弹}
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1),COLORWHITE;
D:=SMA(K,3,1),COLORYELLOW ;
BIAS1:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
A11:=CROSS(K,D) AND CROSS(K,D)<16 AND BIAS1<-6;
黄金反弹:IF(A11,30,0),COLORFF00FF;
{黑马一号}
AHC1:=CLOSE*VOL;
AHC22:=EMA((EXPMA(AHC1,23)/EXPMA(VOL,23)+EXPMA(AHC1,54)/EXPMA(VOL,54)+EXPMA(AHC1,108)/EXPMA(VOL,108)+EXPMA(AHC1,316)/EXPMA(VOL,316))/4,34);
通道:=1.0668*AHC22;
起爆:=CROSS(C,通道) AND REF(C,1)*1.05-C<0.008 AND C>O*0.5;
黑马一号:IF(起爆,35,0);
{黑马启动}
AC1:=ABS(((3.48*CLOSE+HIGH+LOW)/4-EMA(CLOSE,23))/EMA(CLOSE,23));
AC2:=DMA(((2.15*CLOSE+LOW+HIGH)/4),AC1);
金线王:=EMA(AC2,200)*1.118;
条件:=(C-REF(C,1))/REF(C,1)*100>8;
黑马启动:IF(CROSS(C,金线王) AND 条件,35,0);
{黑马必抓}
AA05:=MA(C,5);
AA30:=MA(C,30);
MA05:=MA(C,5);
MA10:=MA(C,13);
MA30:=MA(C,34);
速度5:=SMA(EMA((MA05-REF(MA05,1))/REF(MA05,1),3)*100,3,1);
加速度5:=EMA((速度5-REF(速度5,1)),3);
五日乖离率:=(C-AA05)/AA05*100;
三拾日乖离率:=(C-MA30)/MA30*100;
MR:=COUNT(CROSS(五日乖离率,0),3)>=1 AND 三拾日乖离率>REF(三拾日乖离率,1) AND AA05>REF(AA05,1) AND (C/REF(C,1)-1)*100>5 AND REF(C,1)<AA30;
黑马必抓:IF(FILTER(MR,10),35,0);
{拉升}
LS:=C/REF(C,1)>1.048 AND C=H AND BETWEEN(FORCAST(V,4),0.2*FORCAST(V,12),2.1*FORCAST(V,12));
拉升:IF(FILTER(LS,28),35,0);
{粉量}
VOLUME := VOL;
MAVOL1 := MA(VOLUME,5);
MAVOL2 := MA(VOLUME,34);
MAVOL3 := MA(VOLUME,135);
XG := IF(CROSS(0.6,((((1 / VOL) * 3000) > 0.01) AND (KDJ.J < 0)) AND (CCI.CCI < -100)),VOLUME * 5,0);
XGG := XG > 0;
AA := (VOL >= (REF(V,1) * 1.91)) AND (C > (REF(C,1) * 1.01));
AA1 := VOL < REF(LLV(VOL,13),1);
AA2 := VOL < REF(LLV(VOL,55),1);
AA3 := ((ABS(VOL - REF(VOL,1))) / REF(VOL,1)) <= 0.05;
A:= STICKLINE(AA1,0,V,1,0);
B:= STICKLINE(AA2,0,V,1,0);
绿量:= (A = 1) AND (COUNT(OPEN < CLOSE,1));
粉量:= B = 1;
地量: IF((XGG AND 绿量) OR (XGG AND 粉量),30,0);
{DPI选股}
DPI选股:=LAST((H-L)/REF(C,1)<0.1,20,0) AND VOL>REF(VOL,1)*2 AND C>REF(C,1)*1.03 AND "DMI.PDI">"DMI.MDI" AND CROSS("DMI.ADX","DMI.ADXR") AND"DMI.ADXR">"DMI.MDI" AND "DMI.PDI">"DMI.ADX" AND"KDJ.K">REF("KDJ.K",1);
启动:IF(DPI选股,60,0);
{奔牛}
奔牛A:=REF(C,BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1))+1)>C AND REF("RSI.RSI1"(6,12,24),BARSLAST(REF(CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1))+1)<"RSI.RSI1"(6,12,24) AND CROSS("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24))>0;
奔牛:IF(奔牛A,65,0);
{昔日重现}
VARB:=(CLOSE-MA(CLOSE,13))/MA(CLOSE,13)*(-100);
VARC:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
VARD:=SMA(VARC,3,2);
VARE:=SMA(VARD,3,2);
QQ:=SMA(VARE,5,1);
昔日重现:IF(REF(VARB,1)>=6 AND CROSS(VARE,QQ),50,0),COLORF00FF0;
{顶部雷达}
LC:=REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),4,1)/
SMA(ABS(CLOSE-LC),4,1)*100;
顶部雷达:IF(CROSS(80,RSI),70,100),LINETHICK2, COLORF0F000;
底部雷达:IF(CROSS(RSI,20),25,0),LINETHICK2, COLORRED;
{进入异动区}
VAR7:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
VAR8:=EMA(VAR7,30);
VAR9:=EMA(VAR8,30);
VAR10:=3*VAR8-2*VAR9;
势:=EMA(VAR10,5);
DRAWTEXT(CROSS(10,势),69,'进'),COLORYELLOW;
DRAWTEXT(CROSS(10,势),58,'入'),COLORFF00FF;
DRAWTEXT(CROSS(10,势),43,'异'),COLOR00C0FF;
DRAWTEXT(CROSS(10,势),31,'动[↓]'),COLORFFFF6F;
DRAWTEXT(CROSS(10,势),19,'区'), COLORB47DFF;
{长线持股}
A7:=C-REF(C,1);
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
SHORT:=7; LONG:=19;
RMA:=EMA(CLOSE,SHORT);
NMA:=EMA(CLOSE,LONG);
UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1),LLV
(L,BARSLAST(CROSS(NMA,RMA))+1),H=HHV
(H,BARSLAST(CROSS(RMA,NMA))+1),HHV
(H,BARSLAST(CROSS(RMA,NMA))+1),0);
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1),HHV
(H,BARSLAST(CROSS(RMA,NMA))+1),L=LLV
(L,BARSLAST(CROSS(NMA,RMA))+1),LLV
(L,BARSLAST(CROSS(NMA,RMA))+1),0);
买进:=(LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND
CROSS(A8,MA(A8,2))) AND REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1);
STICKLINE(买进,0,70,2,0),COLOR008888;
STICKLINE(买进,0,70,1.5,0),COLOR00AAAA;
STICKLINE(买进,0,70,0.8,0),COLOR00DDDD;
STICKLINE(买进,0,70,0.3,0),COLOR00FFFF;
DRAWTEXT(买进,70,'★长线持股'),COLORRED,LINETHICK1;
{极品寻底}
VSAR1:=EMA(HHV(HIGH,500),21);
VSAR2:=EMA(HHV(HIGH,250),21);
VSAR3:=EMA(HHV(HIGH,90),21);
VSAR4:=EMA(LLV(LOW,500),21);
VSAR5:=EMA(LLV(LOW,250),21);
VSAR6:=EMA(LLV(LOW,90),21);
VSAR7:=EMA((VSAR4*0.96+VSAR5*0.96+VSAR6*0.96+VSAR1*0.558+VSAR2*0.558+VSAR3*0.558)/6,21);
VSAR8:=EMA((VSAR4*1.25+VSAR5*1.23+VSAR6*1.2+VSAR1*0.55+VSAR2*0.55+VSAR3*0.65)/6,21);
VSAR9:=EMA((VSAR4*1.3+VSAR5*1.3+VSAR6*1.3+VSAR1*0.68+VSAR2*0.68+VSAR3*0.68)/6,21);
VSARA:=EMA((VSAR7*3+VSAR8*2+VSAR9)/6*1.738,21);
VSARB:=REF(LOW,1);
VSARC:=SMA(ABS(LOW-VSARB),3,1)/SMA(MAX(LOW-VSARB,0),3,1)*100;
VSARD:=EMA(IF(CLOSE*1.35<=VSARA,VSARC*10,VSARC/10),3);
VSARE:=LLV(LOW,30);
VSARF:=HHV(VSARD,30);
VSAR10:=IF(MA(CLOSE,58),1,0);
SS:=EMA(IF(LOW<=VSARE,(VSARD+VSARF*2)/2,0),3)/618*VSAR10;
极品底:IF((REF(SS,2)<REF(SS,1)AND SS>REF(SS,1))*SS,80,0),COLORYELLOW,LINETHICK2;
{强底}
AZ1:=3*SMA((C-LLV(L,60))/(HHV(H,60)-LLV(L,60))*100,5,1)-2*SMA((C-LLV(L,60))/(HHV(H,60)-LLV(L,60))*100,5,1);
AZ0:=EMA(AZ1,5),LINETHICK1,COLORFF6600;
AZ2:=(AZ0-REF(AZ0,1))/REF(AZ0,1)*100+10,COLORFF0099;
AZ3:=EMA(C,5);
AZ4:=((C-LLV(L,20))/(HHV(H,20)-LLV(L,20)))*100;
K20:=SMA(AZ4,6,1),LINETHICK1,COLOR33FF00;
强底:IF((AZ2<-3 OR LLV(K20,5)<10) AND (C=LLV(C,10) OR L=LLV(L,10)) AND C>REF(C,1)*0.905,30,0),LINETHICK2,COLORFFFFFF;
{获利}
中套:EMA(100*(1-WINNER(1.2*C)),1),COLORBROWN,NODRAW;
获利1:WINNER(C)*100,COLORBROWN,NODRAW;
获利5:MA(获利1,5),COLORBROWN,NODRAW;
获利:FILTER(CROSS(获利1,获利5) AND 获利5>80,5) AND 中套=0;
STICKLINE(CROSS(获利1,获利5),0,11,0.8,1),COLORWHITE;
DRAWTEXT(CROSS(获利1,获利5),11,'获'),COLORWHITE;
投机:100*(C-LLV(L,5))/(HHV(C,5)-LLV(L,5)),COLOR0080FF,NODRAW;
投机1:=100*(C-LLV(L,30))/(HHV(C,30)-LLV(L,30)),COLOR00FFFF,NODRAW;
STICKLINE(CROSS(投机,投机1),0,11,0.1,1),COLOR0080FF;
DRAWTEXT(CROSS(投机,投机1),4,'投'),COLOR0080FF;
{神奇抄底指标}
BN:=5;
BVAR1:=4*SMA((CLOSE-LLV(LOW,BN))/(HHV(HIGH,BN)-LLV(LOW,BN))*100,5,1)-
3*SMA(SMA((CLOSE-LLV(LOW,BN))/(HHV(HIGH,BN)-LLV(LOW,BN))*100,5,1),3.2,1);
BVAR2:=8,COLORGREEN,LINETHICK0;
杀庄:=BVAR1<=8;
PDTC:=((2)*(CLOSE) + HIGH + LOW + OPEN)/(5);
CCIDTC:=((PDTC - MA(PDTC,14))*(100))/((1.5)*(AVEDEV(PDTC,14)));
RSI1DTC:=((SMA(MAX(CLOSE - REF(CLOSE,1),0),6,1))/(SMA(ABS(CLOSE - REF(CLOSE,1)),6,1)))*(100);
黄底:=(CCIDTC < (-100));
蓝底:=(RSI1DTC < 25);
VAR1MMQZ:=((CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100+(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100+(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100)/3;
红底:=VAR1MMQZ<-9 AND VAR1MMQZ> REF(VAR1MMQZ,1);
底:=黄底 OR 蓝底 OR 红底;
抄底A:=7000000000000*MAX (杀庄,底)*DMA(EMA(C,60),SUM(V,60)/CAPITAL)/EXP(2*HIGH-LOW/3),COLORRED,LINETHICK2;
抄底:IF(抄底A,30,0),COLORRED,LINETHICK2;
{极品逃顶}
VAR1R:=(CLOSE-LLV(LOW,24))/(HHV(HIGH,24)-LLV(LOW,24))*100;
VAR2R:=SMA(VAR1R,3,1);
VAR3R:=SMA(VAR2R,3,1)*VAR1R,LINETHICK2,COLORRED;
VAR4R:=SMA(VAR3R,3,1),LINETHICK2,COLOR0099FF;
VAR9R:IF(CROSS(VAR4R,VAR3R) AND VAR3R>80,60,100);
{超级底部买进}
VARK21:=4*SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1)-3*SMA(SMA((CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100,5,1),3.2,1);
买底:IF(CROSS(VARK21,8),85,0),COLORRED;
{黑马}
DA1:=EMA(C,12)-EMA(C,25);
DA2:=EMA(DA1,6);
获利回吐:=(DA2>=0)*DA2,COLORWHITE,LINETHICK1;
大黑马:=(DA2<0)*DA2,COLORD4FF7F,LINETHICK1;
坚绝做空:=(DA1<0)*DA1,COLORB00058,LINETHICK1;
买入持股:=(DA1>=0)*DA1,COLORRED,LINETHICK1;
DVAR8:=VOL>2*MA(VOL,30);
DVAR9:="DMI.ADX"(12,6);
DVARA:="DMI.ADXR"(12,6);
DVARB:=CLOSE>MA(CLOSE,30) AND CLOSE<MA(CLOSE,30)*1.04;
DVARC:=MA(CLOSE,30)>REF(MA(CLOSE,30),1);
DVARD:=BARSLAST(CROSS(MA(CLOSE,5),MA(CLOSE,10)))<BARSLAST(CROSS(MA(CLOSE,10),MA(CLOSE,5)));
DVARF:=TROUGHBARS(3,15,1)<4;
DVAR10:=EMA(CLOSE,30)>REF(EMA(CLOSE,30),2);
DVAR11:=IF(DVARF=1,50,0);
多空:=EMA((CLOSE-MA((2*CLOSE+HIGH+LOW)/4,30))/MA((2*CLOSE+HIGH+LOW)/4,30)*100,3),COLORWHITE;0,COLORRED;
STICKLINE(FILTER(DVARF=1,5) AND 多空<-10,80,0,3,0),COLORF00FF0;
STICKLINE(FILTER(DVARF=1,5),60,0,3,0),COLORYELLOW;
|
