DRAWTEXT_FIX(1,0.005,0,0,'所属风格:'),COLORYELLOW;
DRAWTEXT_FIX(1,0.06,0,0,FGBLOCK),COLORYELLOW;
DRAWTEXT_FIX(1,0.005,0.05,0,'所属概念:'),COLORMAGENTA;
DRAWTEXT_FIX(1,0.06,0.05,0,GNBLOCK),COLORYELLOW;
八戒1:=144;
八戒2:=169;
DEM144:2*EMA(CLOSE,144)-EMA(EMA(CLOSE,144),144),COLORRED;
DEM169:2*EMA(CLOSE,169)-EMA(EMA(CLOSE,169),169),COLORGREEN;
DRAWICON(CROSS(DEM144,DEM169),DEM144,5);
八戒3:=34;
八戒4:=3;
八戒5:=MAX(MAX(HIGH-LOW,ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
八戒6:=EMA(八戒5,八戒3);
八戒7:=(HIGH+LOW)/2;
八戒8:=八戒7+八戒6*八戒4;
八戒9:=八戒7-八戒6*八戒4;
八戒10:=BARSLAST(CLOSE>=REF(LLV(八戒7+八戒6*1.4,3),1));
八戒11:=BARSLAST(CLOSE<=REF(HHV(八戒7-八戒6*1.7,3),1));
八戒12:=BARSLAST(CLOSE>=REF(HHV(八戒7+EMA(八戒5,八戒3),3),1));
八戒13:=HHV(八戒7-八戒6*1.5,八戒12+1);
八戒14:=COUNT(CROSS(八戒13,CLOSE),3)>=1 AND 八戒11>八戒10;
八戒15:=CLOSE>八戒13 AND 八戒11>八戒10 OR (COUNT(CROSS(八戒13,CLOSE),3)>=1 AND 八戒11>八戒10);
IF(八戒15>0,HHV((HIGH+LOW)/2-八戒6*八戒4,10),DRAWNULL),COLORRED;
IF(八戒15=0,LLV((HIGH+LOW)/2+八戒6*八戒4,10),DRAWNULL),COLORGREEN;
B1:STICKLINE(八戒15>0 AND HIGH>MAX(CLOSE,OPEN),HIGH,MAX(CLOSE,OPEN),0,0),COLORRED;
B2:STICKLINE(八戒15>0 AND LOW
B3:STICKLINE(八戒15>0 AND CLOSE>=OPEN,CLOSE,OPEN,2,1),COLORRED;
B4:STICKLINE(八戒15>0 AND CLOSE<=OPEN,CLOSE,OPEN,2,0),COLORRED;
八戒16:=B1 OR B2 OR B3 OR B4;
S1:STICKLINE(八戒15=0 AND HIGH>MAX(CLOSE,OPEN),HIGH,MAX(CLOSE,OPEN),0,0),COLORGREEN;
S2:STICKLINE(八戒15=0 AND LOW
S3:STICKLINE(八戒15=0 AND CLOSE>=OPEN,CLOSE,OPEN,2,1),COLORGREEN;
S4:STICKLINE(八戒15=0 AND CLOSE<=OPEN,CLOSE,OPEN,2,0),COLORGREEN;
八戒17:=S1 OR S2 OR S3 OR S4;
八戒15>0;
八戒18:=HHV((HIGH+LOW)/2-八戒6*八戒4,10) AND CLOSE>DEM144 AND CLOSE>DEM169 AND 八戒16 AND DEM144>DEM169;
八戒15=0;
八戒19:=LLV((HIGH+LOW)/2+八戒6*八戒4,10) AND CLOSE
DRAWICON(八戒18,LOW*0.95,1);
DRAWICON(八戒19,HIGH*1.05,2);
DIFF:=EMA(C,8)-EMA(C,13);
DEA:=EMA(DIFF,5);
CTA1:=DIFF>DEA;
WU1:=(C-LLV(LOW,8))/(HHV(H,8)-LLV(LOW,8))*100;
K:=SMA(WU1,3,1);
D:=SMA(K,3,1);
CTA2:=K>D;
ZS:=REF(C,1);
NS1:=(SMA(MAX(C-ZS,0),5,1))/(SMA(ABS(C-ZS),5,1))*100;
NS2:=(SMA(MAX(C-ZS,0),13,1))/(SMA(ABS(C-ZS),13,1))*100;
CTA3:=NS1>NS2;
WU:=-(HHV(H,13)-C)/(HHV(H,13)-LLV(LOW,13))*100;
CTB5:=MA(C,5)DOTLINE;
CTB10:=MA(C,13)LINETHICK2;
主力突破1:=SMA(WU,3,1);
主力突破2:=SMA(主力突破1,3,1);
CTA4:=主力突破1>主力突破2;
BBI:=(MA(C,3)+MA(C,6)+MA(C,12)+MA(C,24))/4;
CTA5:=C>BBI;
擒牛:=C-REF(C,1);
擒牛J:=100*EMA(EMA(擒牛,5),3)/EMA(EMA(ABS(擒牛),5),3);
擒牛M:=100*EMA(EMA(擒牛,13),8)/EMA(EMA(ABS(擒牛),13),8);
CTA6:=擒牛J>擒牛M;
擒牛S:=(C*2+H+L)/4;
DT:=EMA(擒牛S,13)-EMA(擒牛S,34);
ZT:=EMA(DT,5);空头:=(-2*(DT-ZT))*3.8,COLORGREEN;
多头:=(2*(DT-ZT))*3.8,COLORRED;
CTA7:=多头>空头;MA11:=MA(C,5);
MA22:=REF(MA(C,5),1);
GZB2:=IF(MONTH<12,1,1);
GZB3:=(2*C+H+LOW)/4;
GZB4:=LLV(LOW,34);
GZB5:=HHV(H,34);
主力:=EMA((GZB3-GZB4)/(GZB5-GZB4)*100,13)*GZB2;
散户:=EMA(0.667*REF(主力,1)+0.333*主力,2);
CTA9:=主力>散户;
CTA10:=(多头>空头)AND(主力>散户);
CTA11:=(多头>空头)AND(主力>散户)AND(DIFF>DEA)AND(K>D)AND(NS1>NS2)AND(主力突破1>主力突破2)AND(C>BBI)AND(擒牛J>擒牛M);
量价主升:=BARSLASTCOUNT((CTA1 AND CTA2 AND CTA3 AND CTA4 AND CTA5 AND CTA6 AND CTA7 AND CTA9 AND CTA10 AND CTA11))=1;
DRAWICON((CTA1 AND CTA2 AND CTA3 AND CTA4 AND CTA5 AND CTA6 AND CTA7 AND CTA9 AND CTA10 AND CTA11),L,1);
STICKLINE((CTA1 AND CTA2 AND CTA3 AND CTA4 AND CTA5 AND CTA6 AND CTA7 AND CTA9 AND CTA10 AND CTA11),OPEN,C,2,0),COLORYELLOW;
STICKLINE((CTA1 AND CTA2 AND CTA3 AND CTA4 AND CTA5 AND CTA6 AND CTA7 AND CTA9 AND CTA10 AND CTA11),OPEN,C,1,0),COLORFF00FF;
DRAWICON(量价主升,L,25);DRAWTEXT(量价主升,L*0.96,'★量价主升'),COLORYELLOW;
{EXPMA价格均线}
EXP5:=EXPMA(CLOSE,5);
EXP12:=EXPMA(CLOSE,12);
EXP50:=EXPMA(CLOSE,50);
EXP250:=EXPMA(CLOSE,250);
{MACD日、周、月定义}
DDIF:=(EMA(C,12)-EMA(C,26));
DDEA:=EMA(DDIF,9);
WDIF:=(EMA(C,60)-EMA(C,130));
WDEA:=EMA(WDIF,45);
MDIF:=(EMA(C,240)-EMA(C,520));
MDEA:=EMA(MDIF,180);
MACD日:=(DDIF-DDEA)*2;
MACD周:=(WDIF-WDEA)*2;
MACD月:=(MDIF-MDEA)/2;
短周期稳定:=MACD日>REF(MACD日,1) AND MACD周>REF(MACD周,1) AND DDIF>REF(DDIF,1);
短周期危机:=(短周期稳定!=1);
中周期稳定:=MACD周>REF(MACD周,1) AND MACD月>REF(MACD月,1) AND DDEA>REF(DDEA,1);
中周期危机:=(中周期稳定!=1);
STICKLINE(中周期稳定,15,-12,2,1),COLORRED;{中周期稳定区域}
STICKLINE(中周期稳定,-12,-16,2,1),COLORRED;{中周期稳定区域}
DRAWTEXT(中周期稳定!=1,-10,'×'),COLORGREEN;
{中周期稳定前提下的MACD日能量变化}
DRAWTEXT(ISLASTBAR=1,10.5,'-------日能量');{日能量}
日能量稳定:=MACD日>REF(MACD日,1);
STICKLINE(日能量稳定,10,11,2,0),COLORMAGENTA;
日能量危机:=MACD日
[
]
STICKLINE(日能量危机,10,11,2,0),COLORRED;
{MACD日、周、月形态}
DRAWTEXT(ISLASTBAR=1,8.5,'-------日MACD');{MACD日}
MACD日稳定:=DDIF>DDEA AND DDIF>REF(DDIF,1) AND DDEA>REF(DDEA,1);
STICKLINE(MACD日稳定,8,9,2,0),COLORRED;
MACD日危机:=(MACD日稳定!=1);
STICKLINE(MACD日危机,8,9,2,0),COLORGREEN;
DRAWTEXT(ISLASTBAR=1,2.5,'-------周MACD');{MACD周}
MACD周稳定:=WDIF>WDEA AND WDIF>REF(WDIF,1) AND WDEA>REF(WDEA,1);
STICKLINE(MACD周稳定,2,3,2,0),COLORRED;
MACD周危机:=(MACD周稳定!=1);
STICKLINE(MACD周危机,2,3,2,0),COLORGREEN;
DRAWTEXT(ISLASTBAR=1,-3.5,'-------月MACD');{MACD月}
MACD月稳定:=MDIF>MDEA AND MDIF>REF(MDIF,1) AND MDEA>REF(MDEA,1);
STICKLINE(MACD月稳定,-4,-3,2,0),COLORRED;
MACD月危机:=(MACD月稳定!=1);
STICKLINE(MACD月危机,-4,-3,2,0),COLORGREEN;
{引用日SKDJ 周月KDJ参数定义}
日LOWV:=LLV(LOW,35);
日HIGHV:=HHV(HIGH,35);
日RSV:=EMA((CLOSE-日LOWV)/(日HIGHV-日LOWV)*100,3);
日K:=EMA(日RSV,3);
日D:=MA(日K,3);
N:=9;M1:=3;M2:=3;
周RSV:=(CLOSE-LLV(LOW,N*5))/(HHV(HIGH,N*5)-LLV(LOW,N*5))*100;
周K:=IFF(SMA(周RSV,M1*5,1)>=90,90,SMA(周RSV,M1*5,1));
周D:=IFF(SMA(周K,M2*5,1)>=80,80,SMA(周K,M2*5,1));
周J:=IFF((3*周K-2*周D)>=100,100,IFF((3*周K-2*周D)<0,0,(3*周K-2*周D)));
月RSV:=(CLOSE-LLV(LOW,N*22))/(HHV(HIGH,N*22)-LLV(LOW,N*22))*100;
月K:=IFF(SMA(月RSV,M1*22,1)>=90,90,SMA(月RSV,M1*22,1));
月D:=IFF(SMA(月K,M2*22,1)>=80,80,SMA(月K,M2*22,1));
月J:=IFF((3*月K-2*月D)>=100,100,IFF((3*月K-2*月D)<0,0,(3*月K-2*月D)));
DRAWTEXT(ISLASTBAR=1,6.5,'-------日SKDJ');{日SKDJ}
SKDJ日稳定:=日K>日D AND 日K>REF(日K,1) AND 日D>REF(日D,1);
STICKLINE(SKDJ日稳定,6,7,2,0),COLORRED;
SKDJ日危机:=(SKDJ日稳定!=1);
STICKLINE(SKDJ日危机,6,7,2,0),COLORGREEN;
DRAWTEXT(ISLASTBAR=1,0.5,'-------周KDJ');{KDJ}
KDJ周稳定:=周K>周D AND 周K>=REF(周K,1) AND 周D>=REF(周D,1) AND 周J>=REF(周J,1);
STICKLINE(KDJ周稳定,0,1,2,0),COLORRED;
KDJ周危机:=(KDJ周稳定!=1);
STICKLINE(KDJ周危机,0,1,2,0),COLORGREEN;
DRAWTEXT(ISLASTBAR=1,-5.5,'-------月KDJ');{KDJ}
KDJ月稳定:=月K>月D AND 月K>=REF(月K,1) AND 月D>=REF(月D,1) AND 月J>=REF(月J,1);
STICKLINE(KDJ月稳定,-6,-5,2,0),COLORRED;
KDJ月危机:=(KDJ月稳定!=1);
STICKLINE(KDJ月危机,-6,-5,2,0),COLORGREEN;
{引用CCI参数定义}
TYP:=(HIGH+LOW+CLOSE)/3;
日CCI:=(TYP-MA(TYP,14))/(0.015*AVEDEV(TYP,14));
CC2:=(TYP-MA(TYP,28))/(0.015*AVEDEV(TYP,28));
周CCI:=EMA(CC2,2);
CC3:=(TYP-MA(TYP,68))/(0.015*AVEDEV(TYP,68));
月CCI:=EMA(CC3,2);
DRAWTEXT(ISLASTBAR=1,4.5,'-------日CCI');{CCI}
CCI日稳定:=日CCI>=100 OR (日CCI<100 AND 日CCI>REF(日CCI,1));
STICKLINE(CCI日稳定,4,5,2,0),COLORRED;
CCI日危机:=(CCI日稳定!=1);
STICKLINE(CCI日危机,4,5,2,0),COLORGREEN;
DRAWTEXT(ISLASTBAR=1,-1.5,'-------周CCI');{CCI}
CCI周稳定:=周CCI>100 OR (周CCI<100 AND 周CCI>REF(周CCI,1));
STICKLINE(CCI周稳定,-2,-1,2,0),COLORRED;
CCI周危机:=(CCI周稳定!=1);
STICKLINE(CCI周危机,-2,-1,2,0),COLORGREEN;
DRAWTEXT(ISLASTBAR=1,-7.5,'-------月CCI');{CCI}
CCI月稳定:=月CCI>100 OR (月CCI<100 AND 月CCI>REF(月CCI,1));
STICKLINE(CCI月稳定,-8,-7,2,0),COLORRED;
CCI月危机:=(CCI月稳定!=1);
STICKLINE(CCI月危机,-8,-7,2,0),COLORGREEN;
{周周期共振趋势}
X0:=中周期稳定 AND 短周期稳定;
X1:=MACD日稳定;
X2:=MACD周稳定;
X3:=MACD月稳定;
X4:=SKDJ日稳定;
X5:=KDJ周稳定;
X6:=KDJ月稳定;
X7:=CCI日稳定;
X8:=CCI周稳定;
X9:=CCI月稳定;
日周共振趋势:=X0 AND X1 AND X2 AND X4 AND X5 AND X7 AND X8;
STICKLINE(日周共振趋势,-2,11,2,0),COLORWHITE;
DRAWTEXT(日周共振趋势,6.5,'★'),COLORRED;
DRAWTEXT(日周共振趋势,0.5,'★'),COLORRED;
日月共振趋势:=X0 AND X1 AND X3 AND X4 AND X6 AND X7 AND X9;
STICKLINE(日月共振趋势,-8,-3,2,0),COLORWHITE;
STICKLINE(日月共振趋势,4,11,2,0),COLORWHITE;
DRAWTEXT(日月共振趋势,6.5,'★'),COLORRED;
DRAWTEXT(日月共振趋势,-5.5,'★'),COLORRED;
日周月共振趋势:=X0 AND X1 AND X2 AND X3 AND X4 AND X5 AND X6 AND X7 AND X8 AND X9;
STICKLINE(日周月共振趋势,-8,11,2,0),COLORWHITE;
DRAWTEXT(日周月共振趋势,6.5,'★'),COLORRED;
DRAWTEXT(日周月共振趋势,0.5,'★'),COLORRED;
DRAWTEXT(日周月共振趋势,-5.5,'★'),COLORRED;
{支撑、前高画线}
VAR121:=ZIG(3,6)
[
=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
]
VAR141:=ZIG(3,22)
[
=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
]
VAR161:=ZIG(3,51)
[
=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
]
VAR181:=ZIG(3,72)
[
=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
]
QD4:=(VAR121+VAR141+VAR161+VAR181),LINETHICK2;
前高:=DRAWLINE(QD4,H,BARSLAST(QD4)>=1,REF(H,BARSLAST(QD4)),1);
前低:=LLV(L*1,250);
{冰火能量峰}
HSL:=EMA(VOL/CAPITAL,3);
ZDL:=HHV(HSL,240);
ZXL:=LLV(HSL,240);
偏离值 :=(CLOSE-FORCAST(CLOSE,20))/CLOSE*100;
主力筹码:=IF(偏离值>=0,偏离值,0);
散户筹码:=IF(偏离值<0,-偏离值,0);
TR1:= MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
ATR14:=(MA(TR1,30))/CLOSE*100;
控盘线:=ATR14*0.8,COLORRED;
浮筹:=EMA((ZDL-HSL)/HSL*XS,13);
IF(浮筹
[
]
IF(浮筹>REF(浮筹,1),浮筹,DRAWNULL),COLORGREEN,LINETHICK2,NODRAW;
{交易信号}
股价:=(C>前高 AND REF(C,1)
倍量:=V/REF(V,1)>=2;