STICKLINE(CLOSE>=MA(CLOSE,10),REFDATE(HHV(H,0),DATE),REFDATE(LLV(L,0),DATE),6,0),COLOR220080;{多色柱}

STICKLINE(CLOSE

 

VAR1:=(2*CLOSE+HIGH+LOW)/4;

DRAWBAND(MA(VAR1,3),RGB(245,250,0),MA(VAR1,7),RGB(0,200,250));

买:=CROSS(MA(C,3),MA(C,7));

卖:=CROSS(MA(C,7),MA(C,3));

 

MA5:MA(CLOSE,5),COLORFF00FF,LINETHICK3;

绿降:IF(MA5<=REF(MA5,1),MA5,DRAWNULL),COLORGREEN,LINETHICK3;

DRAWICON((REF(MA5,1)REF(MA5,1)),LOW*0.999,11);{图标 黄食指向上}

DRAWICON((REF(MA5,1)>REF(MA5,2)) AND (MA5<=REF(MA5,1)),HIGH*1.001,12);{图标 黄食指向下}

 

X_54:=MA(CLOSE,5);{MA5角度取自量学太极线}

MA5角度:ATAN((X_54/REF(X_54,1)-1)*100)*180/3.1416,NODRAW;

 

{MA5乖离率:(C-MA5)/MA5*100,COLORWHITE,NODRAW;}

 

{黄蓝带 对照世基软件}

MA10:MA(C,10),COLORWHITE;

STICKLINE(C>=MA10,MA10,REF(MA10,1),5,0),COLOR00BBFF;

STICKLINE(C

DRAWICON(CROSS(C,MA10),LOW*0.99,34);{黄底勾向上}

DRAWICON(CROSS(MA10,C),HIGH*1.025,35);{绿底勾向下}

 

强弱界:MA(CLOSE,20),COLORCYAN,LINETHICK3;

上升趋势:IF(MA(CLOSE,20)>=REF(MA(CLOSE,20),1),MA(CLOSE,20),DRAWNULL),COLORYELLOW,LINETHICK3;

MA30:MA(C,30),COLORMAGENTA;

MA60:MA(C,60),COLORCYAN;

MA60平升:IF(MA(CLOSE,60)>=REF(MA(CLOSE,60),1),MA(CLOSE,60),DRAWNULL),COLORYELLOW;

MA120:MA(C,120),COLORBLUE;

MA250:MA(C,250),COLOR00FF00;

MA250升:IF(MA(C,250)>=REF(MA(C,250),1),MA(C,250),DRAWNULL),COLORRED;

{CYC∞}

JJJ:=IF(DYNAINFO(8)>0.01,0.01*DYNAINFO(10)/DYNAINFO(8),DYNAINFO(3));

DDD:=(DYNAINFO(5)<0.01 || DYNAINFO(6)<0.01);

JJJT:=IF(DDD,1,(JJJ<(DYNAINFO(5)+0.01) && JJJ>(DYNAINFO(6)-0.01)));

CYC∞:IF(JJJT,DMA(AMOUNT/(100*VOL),100*VOL/FINANCE(7)),EMA((HIGH+LOW+CLOSE)/3,120)),COLORYELLOW,CIRCLEDOT;

 

半分位:(REF(C,1)+REF(O,1))/2,COLORWHITE,DOTLINE;

STICKLINE(半分位,半分位,半分位,4,0),COLORWHITE;

 

{波段顶底，属未来，大马路123}

VAR111:=ZIG(3,10);

DRAWICON((REF(VAR111,2) > REF(VAR111,1)) AND (VAR111 > REF(VAR111,1)),LOW*0.95,5);{黄笑脸}

DRAWICON((REF(VAR111,2) < REF(VAR111,1)) AND (VAR111 < REF(VAR111,1)),HIGH*1.05,6);{蓝哭脸}

 

DRAWKLINE(H,O,L,C);{画K线}

{以下为资金情况}

换手率:VOL/CAPITAL*100,COLORRED,NODRAW;

预换手:IF(CURRBARSCOUNT=1 AND PERIOD=5,换手率*240/FROMOPEN,DRAWNULL),COLORWHITE,NODRAW;

量比:V/REF(MA(V,5),1),NODRAW,COLORWHITE;

{预量比:DYNAINFO(17),NODRAW,COLORWHITE;}

机构:(L2_VOL(0,0) - L2_VOL(0,1))*10000/FINANCE(7),NODRAW,COLORYELLOW;

大户:(L2_VOL(1,0) - L2_VOL(1,1))*10000/FINANCE(7),NODRAW,COLORRED;

中户:(L2_VOL(2,0) - L2_VOL(2,1))*10000/FINANCE(7),NODRAW,COLORMAGENTA;

散户:(L2_VOL(3,0) - L2_VOL(3,1))*10000/FINANCE(7),NODRAW,COLORGREEN;

主力:机构+大户,NODRAW,COLORYELLOW;

 

主力占比:主力/换手率*100,NODRAW,COLORMAGENTA;

 

三日主力:SUM(主力,3),COLORYELLOW,NODRAW;

五日主力:SUM(主力,5),COLORRED,NODRAW;

十日主力:SUM(主力,10),COLORMAGENTA,NODRAW;

廿日主力:SUM(主力,20),COLORWHITE,NODRAW;

 

STICKLINE(主力>0,O,C,2,1),COLORYELLOW;

STICKLINE(主力<0,O,C,2,1),COLORLIBLUE;

 

STICKLINE(机构>0,O,C,1,0),COLORYELLOW;

STICKLINE(机构<0,O,C,1,0),COLORBLUE;

STICKLINE(大户>0,O,(O+C)/2,1,0),COLORRED;

STICKLINE(大户<0,O,(O+C)/2,1,0),COLORGREEN;

 

DRAWTEXT(买=1,L,'←买'),COLORLIRED;{三日上穿7日}

DRAWTEXT(卖=1,H*1.01,'↓←卖'),COLORGREEN;{三日下穿7日}

 

DRAWNUMBER(ISLASTBAR  ,C,C),COLORFF00FF;

 

N1:=10;

N2:=10;

DISP:=2;

K1:=IF(PERIOD=5,1,{日}

IF(PERIOD=6,1,{周}

IF(PERIOD=7,1,{月}

IF(PERIOD=8,1,{多分钟}

IF(PERIOD=9,1,{多日}

IF(PERIOD=10,1,{季}

IF(PERIOD=11,2,{年}

IF(PERIOD=4,1,{60F}

 IF(PERIOD=3,1,{30F}

 IF(PERIOD=2,1,{15F}

 IF(PERIOD=1,1{5F},1{1F})))))))))))/10;

 P1:=PEAK(1,K1*N1,1);

 P2:=PEAK(1,K1*N1,2);

 WP1:=PEAKBARS(1,K1*N1,1);

 WP2:=PEAKBARS(1,K1*N1,2);

 T1:=TROUGH(2,K1*N2,1);

 T2:=TROUGH(2,K1*N2,2);

 WT1:=TROUGHBARS(2,K1*N2,1);

 WT2:=TROUGHBARS(2,K1*N2,2);

 TJ1:=P1>T1 AND P2>T2 ;

 ZD:=MAX(T1,T2);

 ZG:=MIN(P1,P2);

 LL:=MIN(T1,T2);

 HH:=MAX(P1,P2);

 TJ2:=FILTER(ZG>ZD,2);

 TJ3:=ZG=REF(ZG,BARSLAST(TJ2)) OR ZD=REF(ZD,BARSLAST(TJ2));

 TJ4:=TJ1&&TJ2&&NOT(TJ3);

 TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));

 TJ6:=BETWEEN(ZG,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));

 TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1))&&ZD

 TJ8:=TJ4&&NOT(TJ5 OR TJ6 OR TJ7);

 ZSD:=IF(TJ8,ZD,DRAWNULL);

 ZSG:=IF(TJ8,ZG,DRAWNULL);

 ZSH:=IF(TJ8,HH,DRAWNULL);

 ZSL:=IF(TJ8,LL,DRAWNULL);

 STICKLINE(TJ8,ZSH,ZSL,0,-1),COLORMAGENTA;

 STICKLINE(TJ8,ZSD,ZSG,IF(DISP=1,3,0),1),COLORMAGENTA;

{ DRAWTEXT(DISP=2,ZSH,'中枢'),COLORWHITE;不显示中枢二字}

{中枢高:PLOYLINE(DISP=2,REF(ZSD,BARSLAST(TJ8))),CIRCLEDOT,COLORLIRED;看不见折线段，停用

中枢低:PLOYLINE(DISP=2,REF(ZSG,BARSLAST(TJ8))),CIRCLEDOT,COLORLIGREEN;}

 {中枢最高:PLOYLINE(DISP=2,REF(ZSH,BARSLAST(TJ8))),POINTDOT,COLORRED;原来就没用

中枢最低:PLOYLINE(DISP=2,REF(ZSL,BARSLAST(TJ8))),POINTDOT,COLORGREEN;}

{趋势高:PLOYLINE(DISP=3,ZIG(1,K1*N1)),COLORLIBLUE;看不见折线段，停用

趋势低:PLOYLINE(DISP=3,ZIG(2,K1*N2)),COLORLIBLUE;}

局部低点预选A:=BACKSET(LLV(L,5)

局部低点预选B:=BACKSET(局部低点预选A=0 AND REF(局部低点预选A,1)=1,2);

局部低点预选C:=IF(局部低点预选B=1 AND REF(局部低点预选B,1)=0,-1,0);

局部高点预选A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);

局部高点预选B:=BACKSET(局部高点预选A=0 AND REF(局部高点预选A,1)=1,2);

局部高点预选C:=IF(局部高点预选B=1 AND REF(局部高点预选B,1)=0,1,0);

缺口判断:=IF(L>REF(H,1),1,IF(H

距前高天:=BARSLAST(局部高点预选C=1);

距前低天:=BARSLAST(局部低点预选C=-1);

小值周期:=LOWRANGE(L);

大值周期:=TOPRANGE(H);

低保留AA:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)

低保留AB:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR LLV(L,距前低天+2)

低保留S:=IF((低保留AA=-1 OR 低保留AB=-1) AND L

预判:=IF((距前低天<4 AND HHV(缺口判断,距前低天)!=1) OR REF(低保留S,距前低天)=0,1,0);

判断:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND 预判=1 AND 大值周期>REF(小值周期,距前低天+1) AND 大值周期>REF(小值周期,距前低天) AND 大值周期>REF(大值周期,距前高天),1,0);

高保留A:=IF(局部高点预选C=1 AND REF(距前低天,1)>REF(距前高天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0);

高保留B:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND REF(低保留S,距前低天)=-1 AND (距前低天>=4 OR HHV(缺口判断,距前低天)=1),1,0);

高保留:=IF((高保留A=1 OR 高保留B=1 OR 判断=1) AND H>REF(L,距前低天+1),1,0);

预判A:=IF((距前高天<4 AND HHV(缺口判断,距前高天)!=1) OR REF(高保留,距前高天)=0,1,0);

判断A:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND 预判A=1 AND 小值周期>REF(大值周期,距前高天+1) AND 小值周期>REF(大值周期,距前高天) AND 小值周期>REF(小值周期,距前低天),-1,0);

低保留A:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)

低保留B:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR 判断A=-1),-1,0);

低保留:=IF((低保留A=-1 OR 低保留B=-1) AND L

距前高天A:=BARSLAST(高保留=1);

距前低天A:=BARSLAST(低保留=-1);

预判X:=IF((距前低天A<4 AND HHV(缺口判断,距前低天A)!=1) OR REF(低保留,距前低天A)=0,1,0);

判断X:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND 预判X=1 AND 大值周期>REF(小值周期,距前低天A+1) AND 大值周期>REF(小值周期,距前低天A) AND 大值周期>REF(大值周期,距前高天A),1,0);

高保留XA:=IF(局部高点预选C=1 AND REF(距前低天A,1)>REF(距前高天A,1) AND HHV(H,距前低天A+1)>REF(HHV(H,距前低天A+1),1),1,0);

高保留XB:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND REF(低保留,距前低天A)=-1 AND (距前低天A>=4 OR HHV(缺口判断,距前低天A)=1),1,0);

高保留X:=IF((高保留XA=1 OR 高保留XB=1 OR 判断X=1) AND H>REF(L,距前低天A+1),1,0);

预判XA:=IF((距前高天A<4 AND HHV(缺口判断,距前高天A)!=1) OR REF(高保留XA,距前高天A)=0,1,0);

判断XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND 预判XA=1 AND 小值周期>REF(大值周期,距前高天A+1) AND 小值周期>REF(大值周期,距前高天A) AND 小值周期>REF(小值周期,距前低天A),-1,0);

低保留XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)>REF(距前低天A,1) AND LLV(L,距前高天A+1)

低保留XB:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND (距前高天A>=4 OR LLV(缺口判断,距前高天A)=-1 OR 判断XA=-1),-1,0);

低保留X:=IF((低保留XA=-1 OR 低保留XB=-1) AND L

距前高天YA:=BARSLAST(高保留X=1);

距前低天YA:=BARSLAST(低保留X=-1);

预判YX:=IF((距前低天YA<4 AND HHV(缺口判断,距前低天YA)!=1) OR REF(低保留X,距前低天YA)=0,1,0);

判断YX:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND 预判YX=1 AND 大值周期>REF(小值周期,距前低天YA+1) AND 大值周期>REF(小值周期,距前低天YA) AND 大值周期>REF(大值周期,距前高天YA),1,0);

高保留YXA:=IF(局部高点预选C=1 AND REF(距前低天YA,1)>REF(距前高天YA,1) AND HHV(H,距前低天YA+1)>REF(HHV(H,距前低天YA+1),1),1,0);

高保留YXB:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND REF(低保留X,距前低天YA)=-1 AND (距前低天YA>=4 OR HHV(缺口判断,距前低天YA)=1),1,0);

高保留YX:=IF((高保留YXA=1 OR 高保留YXB=1 OR 判断YX=1) AND H>REF(L,距前低天YA+1),1,0);

预判YXA:=IF((距前高天YA<4 AND HHV(缺口判断,距前高天YA)!=1) OR REF(高保留YXA,距前高天YA)=0,1,0);

判断YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND 预判YXA=1 AND 小值周期>REF(大值周期,距前高天YA+1) AND 小值周期>REF(大值周期,距前高天YA) AND 小值周期>REF(小值周期,距前低天YA),-1,0);

低保留YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)>REF(距前低天YA,1) AND LLV(L,距前高天YA+1)

低保留YXB:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND (距前高天YA>=4 OR LLV(缺口判断,距前高天YA)=-1 OR 判断YXA=-1),-1,0);

低保留YX:=IF((低保留YXA=-1 OR 低保留YXB=-1) AND L

 AAAD:=IF(高保留YX=1 AND 低保留YX=-1 AND H>REF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1 AND 低保留YX=-1 AND L

极点保留:=IF(AAAD=0,高保留YX+低保留YX,AAAD);

局部极点:IF(极点保留=-1,L,IF(极点保留=1,H,DRAWNULL)) CIRCLEDOT COLORYELLOW;

 DRAWLINE(极点保留=-1,局部极点,极点保留=1,局部极点,0),COLORCYAN;

 DRAWLINE(极点保留=1,局部极点,极点保留=-1,局部极点,0),COLORYELLOW;

 DD1:=BARSLAST(ABS(极点保留)!=1);

 DRAWTEXT(极点保留=1,局部极点*1.001,'↓卖'),COLORLIBLUE;

 STICKLINE(极点保留=1,局部极点,局部极点,30,1),COLORCYAN;

 DRAWNUMBER(极点保留=1,局部极点,局部极点)COLORCYAN;

 DRAWTEXT(极点保留=-1,局部极点*0.999,'↖买'),COLORYELLOW;

 STICKLINE(极点保留=-1,局部极点,局部极点,30,1),COLORRED;

 DRAWNUMBER(极点保留=-1,局部极点,局部极点)COLORRED;

{ZIG！

 注意：发现未来函数PEAK！

 注意：发现未来函数PEAKBARS！

 注意：发现未来函数TROUGH！

 注意：发现未来函数TROUGHBARS！

 注意：发现未来函数PEAK！

 注意：发现未来函数PEAKBARS！

 注意：发现未来函数TROUGH！

 注意：发现未来函数BACKSET！

 注意：发现未来函数DRAWLINE！

 注意：发现未来函数DRAWLINE！}{原文链接：HTTP://WWW.55188.COM/THREAD-7992925-1-1.HTML}

 

 

{K线形态解盘}

TT:=240/FROMOPEN;

比:=TT;

J12:=(HIGH - ((HIGH - LOW) / 3));

J23:=(LOW + ((HIGH - LOW) / 3));

T_1{早晨之星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1)

< REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.03 AND

CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2)),1,0));

T_2{黄昏之星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) > 1.03 AND REF(OPEN,1)

> REF(CLOSE,2) AND ABS(REF(OPEN,1)-REF(CLOSE,1))/REF(CLOSE,1)<0.02

AND CLOSE/OPEN<0.97 AND CLOSE

T3{长十字}:=CONST(IF((CLOSE=OPEN AND HIGH/LOW >1.03),1,0));

T4{垂死十字}:=CONST(IF((CLOSE=OPEN AND CLOSE=LOW AND CLOSE!=HIGH),1,0));

T5{早晨十字星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) < 0.95 AND REF(OPEN,1)

< REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND

CLOSE/OPEN>1.05 AND CLOSE>REF(CLOSE,2)),1,0));

T6{黄昏十字星}:=CONST(IF((REF(CLOSE,2)/REF(OPEN,2) > 1.05 AND REF(OPEN,1)

> REF(CLOSE,2) AND REF(OPEN,1)=REF(CLOSE,1) AND

CLOSE/OPEN<0.95 AND CLOSE

T7{射击之星}:=CONST(IF((MIN(OPEN,CLOSE)=LOW AND HIGH-LOW >

3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE > MA(CLOSE,5)),1,0));

T8{倒转锤头}:=CONST(IF((MIN(OPEN,CLOSE)=LOW AND HIGH-LOW >

3*(MAX(OPEN,CLOSE)-LOW) AND CLOSE < MA(CLOSE,5)),1,0));

T9{锤头}:=CONST(IF((HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW >

3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE < MA(CLOSE,5)),1,0));

T10{吊颈}:=CONST(IF((HIGH = MAX(OPEN,CLOSE) AND HIGH-LOW >

3*(HIGH-MIN(OPEN,CLOSE)) AND CLOSE>MA(CLOSE,5)),1,0));

T11{穿头破脚}:=CONST(IF(((REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.96

AND CLOSE

AND OPEN>REF(CLOSE,1))OR (REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.04

AND CLOSE>REF(OPEN,1) AND OPEN

T12{乌云盖顶}:=CONST(IF((REF(CLOSE,1)/REF(OPEN,1)>1.03 AND CLOSE/OPEN<0.97

AND OPEN>REF(CLOSE,1) AND CLOSE

T13{曙光初现}:=CONST(IF((REF(CLOSE,1)/REF(OPEN,1)<0.97 AND CLOSE/OPEN>1.03

AND OPENREF(CLOSE,1)),1,0));

T14{身怀六甲}:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04

AND ABS(CLOSE-OPEN)/CLOSE<0.005 AND

MAX(CLOSE,OPEN) < MAX(REF(CLOSE,1),REF(OPEN,1)) AND MIN(CLOSE,OPEN)

> MIN(REF(CLOSE,1),REF(OPEN,1))),1,0));

T15{十字胎}:=CONST(IF((ABS(REF(CLOSE,1)-REF(OPEN,1))/REF(CLOSE,1) > 0.04

AND CLOSE=OPEN AND

CLOSE < MAX(REF(CLOSE,1),REF(OPEN,1)) AND CLOSE > MIN(REF(CLOSE,1)

,REF(OPEN,1))),1,0));

T16{平顶}:=CONST(IF((ABS(HIGH-REF(HIGH,1))/HIGH<0.001),1,0))