杠上开花
★和千均班长一起摸爬滚打！和朋友们摸爬滚打了！公开源码。★
我的指标大部份都在使用中逐步完善。本次升级加了TDX(50输出)实用的
自动趋势画线。为防有人拿指标骗人，加密不限时。
因精选指标中有同名标。操作应删除原有的〈杠上开花〉重新启动TDX再
套入，
一，有朋友说上次发的指标好看，看不出实用价值。实际上我编的指标主要还
在实用上。就拿〈杠上开花〉来说吧：K线的变色上杠上的手示足以示明
未来可能的走势。看盘中趋势重要，价位也同等重要。有的朋友看见涨势
很好，不知在实键价位上，买了就调整。当然好股还会上来，在时间上，
末来的因素很多，就不好说了。因此上次增加了小箱体和比较重要的两条
价位线(长出图外的两条线)。
信号我一般不用文字表示，主要用图标。为使分钟图上好用，图标离K线
位置也不太远。开花实际上就就是CCI主图中的'成应'。其它还有两个买
进和一个走人信号。
二，〈同舟共舞〉三种不同的变形KD和MACD组成。共舞的含意就在其中了。
KD不用说，房子实际上就是正MACD。负MACD就是电杆，只是MACD增大才
有。最长的电杆就是MACD负值最大的地方，过零还用说吗？
三，〈50_DDX,〉是在DDX指标中组合进"波段转向"和"顶底背离"。只要注意
观查，零轴下的倒山和零轴上的正山含意有根本的区别
{杠上开花 飞狐}
input: N(8,1,100);
DRAWGBK(CLOSE>0,COLORRGB(95,95,95),COLORRGB(0,0,0),1);
A1:=REF(H,N)=HHV(H,2*N+1);
B1:=FILTER(A1,N);
C1:=BACKSET(B1,N+1);
D1:=FILTER(C1,N);{高点}
R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1); S11:=R11>REF(R11,1);
DRAWLINE(D1,H,S11,H,1),COLORBLUE;
A2:=REF(L,N)=LLV(L,2*N+1);
B2:=FILTER(A2,N);
C2:=BACKSET(B2,N+1);
D2:=FILTER(C2,N);{低点}
T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1); U11:=T11>REF(T11,1);
DRAWLINE(D2,L,U11,L,1),COLORBLUE;
M:=INTPART(3*N/5);
A12:=REF(H,M)=HHV(H,2*M+1);
B12:=FILTER(A12,M);
C12:=BACKSET(B12,M+1);
D12:=FILTER(C12,M);{高点}
R112:=BACKSET(ISLASTBAR,BARSLAST(D12)+1); S112:=R112>REF(R112,1);
DRAWLINE(D12,H,S112,H,1),COLORRED;
A22:=REF(L,M)=LLV(L,2*M+1);
B22:=FILTER(A22,M);
C22:=BACKSET(B22,M+1);
D22:=FILTER(C22,M);{低点}
T112:=BACKSET(ISLASTBAR,BARSLAST(D22)+1); U112:=T112>REF(T112,1);
DRAWLINE(D22,L,U112,L,1),COLORRED;
AA05:=MA(C,5),COLOR0099CC;
五日乖离率:=(C-AA05)/AA05*100;
BB05:=ATAN((AA05/REF(AA05,1)-1)*100)*180/3.1416;
速度5:=SMA(EMA((AA05-REF(AA05,1))/REF(AA05,1),3)*100,3,1);
加速度5:=EMA((速度5-REF(速度5,1)),3);
AA10:=MA(C,10);
AA20:=MA(C,20);BB10:=ATAN((AA10/REF(AA10,1)-1)*100)*180/3.1416;
AA30:=MA(C,30);
三拾日乖离率:=(C-AA30)/AA30*100;
VAR11:=(AA20-AA30)>REF((AA20-AA30),1)
AND AA20>REF(AA20,1) AND AA30>REF(AA30,1);
VAR22:=(AA30-AA20)<REF((AA30-AA20),1) AND AA20<REF(AA20,1) AND
AA30<REF(AA30,1);
BB30:=ATAN((AA30/REF(AA30,1)-1)*100)*180/3.1416;
强势狙击:=FILTER(BB30>30 AND BB10>45 AND
CROSS(BB05,60),10);
加仓:=FILTER(COUNT(CROSS(BB05,30),5)>=1 AND
AA05>REF(AA05,1) AND 三拾日乖离率>REF(三拾日乖离率,1) AND
AA10>REF(AA10,1)AND 加速度5>REF(加速度5,1) AND 速度5>REF(速度5,1) ,10) ;
清仓:=FILTER(COUNT(CROSS(30,BB05),5)>=1 AND (C>AA30 OR O>AA30) AND
AA05<REF(AA05,1) AND 三拾日乖离率<REF(三拾日乖离率,1) AND AA10<REF(AA10,1),10);
DRAWICON(加仓 ,LOW*0.99,8) ;
DRAWICON(清仓 ,HIGH*1.01,3),PXUP20;
DRAWICON(强势狙击 ,LOW*0.99,13);
VAR1111:=BACKSET(REF(HIGH,2)=HHV(HIGH,5),3);
VAR2222:=CROSS(VAR1111,0.9);
VAR3333:=BACKSET(REF(LOW,2)=LLV(LOW,5),3);
VAR4444:=CROSS(VAR3333,0.9);
压力: REF(HIGH,BARSLAST(Var2222)), POINTDOT,ColorEA91B5;
STICKLINE(CLOSE,REF(HIGH,BARSLAST(Var2222)),REF(HIGH,BARSLAST(Var2222)),5,0),ColorEA91B5;
支撑: REF(LOW,BARSLAST(Var4444)), POINTDOT,Color00b4ff;
STICKLINE(CLOSE,REF(LOW,BARSLAST(Var4444)),REF(LOW,BARSLAST(Var4444)),5,0),Color00b4ff;
下档线:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
aRSV:=SMA(下档线,3,1);
aK:=SMA(aRSV,3,1);
aD:=((3 * aRSV) - (2 * aK));
aJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);
aRSV24:=SMA(aJ12,3,1);
aK24:=SMA(aRSV24,3,1);
aD24:=((3 * aRSV24) - (2 * aK24));
撑压位:=IF(CROSS(aD24,aD),HIGH,REF(HIGH,BARSLAST(CROSS(aD24,aD))));
底:=LLV(HIGH,30);
STICKLINE(BARSTATUS=2 ,撑压位,撑压位,40,1),LINETHICK1,COLORFFFFFF;
DRAWTEXT(BARSTATUS=2 ,撑压位,' 撑压'),COLORFFFFFF;
STICKLINE(BARSTATUS=2 ,底,底,40,1),COLOR00FF00,LINETHICK1;
DRAWTEXT(BARSTATUS=2 ,底,' 底线'),COLOR00FF00;
TYP := (HIGH + LOW + CLOSE)/3;
CCI1:=(TYP-MA(TYP,6))/(0.015*AVEDEV(TYP,6));
差值1:=ABS(REF(CCI1,1)-CCI1);
CCI2:=(TYP-MA(TYP,10))/(0.015*AVEDEV(TYP,10));
差值2:=ABS(REF(CCI2,1)-CCI2);
CCI3:=(TYP-MA(TYP,20))/(0.015*AVEDEV(TYP,20));
差值3:=ABS(REF(CCI3,1)-CCI3);
CCI4:=(TYP-MA(TYP,30))/(0.015*AVEDEV(TYP,30));
差值4:=ABS(REF(CCI4,1)-CCI4);
CCI5:=(TYP-MA(TYP,60))/(0.015*AVEDEV(TYP,60));
差值5:=ABS(REF(CCI5,1)-CCI5);
CCI:=CCI1+CCI2+CCI3+CCI4+CCI5;
AAA:=(3*C+H+L+O)/6;
VAR1:=WMA(AAA,8);
VAR2:=(HHV(VAR1,5)+HHV(VAR1,10)+HHV(VAR1,20))/3;
VAR3:=(LLV(VAR1,5)+LLV(VAR1,10)+LLV(VAR1,20))/3;
VAR4:=(HHV(VAR2,5)+HHV(VAR2,10)+HHV(VAR2,20))/3;
VAR5:=(LLV(VAR3,5)+LLV(VAR3,10)+LLV(VAR3,20))/3;
VAR6:=(LLV(VAR1,2)+LLV(VAR1,4)+LLV(VAR1,6))/3;
短线:VAR1,COLORWHITE;
中线:VAR6,COLORYELLOW;
下跌:=IF(VAR1=VAR6,VAR6,0);
PARTLINE(下跌=VAR6,VAR6),COLOR00FF00;
{条件1}
TJ1:= CCI1>差值4;
立桩量:=TJ1;
TJ2:=IF(BARSLAST(立桩量)=1 ,1,IF(BARSLAST(立桩量)=2 ,1,
IF(BARSLAST(立桩量)=3 ,1,0)));
三天法则1:=TJ2=1;
成立1:=三天法则1;
条件成立1:=FILTER(成立1,5);
TJ11:= cci1<-差值4 ;
立桩量2:=TJ11;
TJ22:=IF(BARSLAST(立桩量2)=1 AND CLOSE>REF(HIGH,1),1,
IF(BARSLAST(立桩量2)=2 AND CLOSE>REF(HIGH,2),1,
IF(BARSLAST(立桩量2)=3 AND CLOSE>REF(HIGH,3),1,0)));
三天法则2:=TJ22=1;
成立2:=三天法则2;
条件成立2:=FILTER(成立2,5);
{条件2}
TJ111:=(ABS(CCI1)>CCI AND ABS( 差值1)> ABS(差值5));
立桩量3:=FILTER(TJ111,5);
TJ222:=IF(BARSLAST(立桩量3)=1 AND CLOSE>REF(HIGH,1),1,IF(BARSLAST(立桩量3)=2 AND CLOSE>REF(HIGH,2),1,IF(BARSLAST(立桩量3)=3 AND CLOSE>REF(HIGH,3),1,0)));
STICKLINE(CLOSE AND 下跌<>VAR6,REF(HIGH,BARSLAST(立桩量3)),REF(HIGH,BARSLAST(立桩量3)),10,0),COLORCYAN;
STICKLINE(CLOSE AND 下跌<> VAR6,REF(LOW,BARSLAST(立桩量3)),REF(LOW,BARSLAST(立桩量3)),10,0),COLORYELLOW;
三天法则:=TJ222=1;
成立:=三天法则;
条件成立:FILTER(成立,5),LINETHICK0,COLORYELLOW;
PARTLINE(条件成立 AND 下跌=0 ,H*1.03),CROSSDOT,LINETHICK6,COLORFF33FF;
PARTLINE(条件成立 AND 下跌=0 ,H*1.03),CIRCLEDOT,LINETHICK1,COLOR00CCFF;
DRAWICON(条件成立1,REF(HIGH,BARSLAST(立桩量3)),5),PXUP10;
DRAWICON(条件成立2,REF(LOW,BARSLAST(立桩量3)),4),PXUP10;STICKLINE(C>=O,L,H,0,0),COLORred;
STICKLINE(C<O,L,H,0,0),COLORFFFF00;
STICKLINE(1 and C>O,C,O,7,0),COLORred;
STICKLINE(1,C,O,6,0),COLOR454500;
STICKLINE(1,C,O,5,0),COLOR555500;
STICKLINE(1,C,O,4,0),COLOR656500;
STICKLINE(1,C,O,3,0),COLOR757500;
STICKLINE(1,C,O,2,0),COLOR858500;STICKLINE(TJ1,C,O,6,0),COLOR000065;
STICKLINE(TJ1,C,O,5,0),COLOR000085;
STICKLINE(TJ1,C,O,4,0),COLOR0000A5;
STICKLINE(TJ1,C,O,3,0),COLOR0000C5;
STICKLINE(TJ1,C,O,2,0),COLOR0000E5;公式有未来函数{点击看本软件截图： 58股票 公式网 http://www. 58gu. com 整理} |
