这个主图是我拼装的.既有拿来也有新创.总之是个大杂烩.就因为是杂烩.才涵括我们炒股的需求.纯属自用.既然大家看好就发给大家.没办法又要用你的【币】了.
公式内有五项内容：---------------------
【1】漂亮的K线.满足你视觉的需要.清楚的看清涨跌.
【2】二九宽带就是用18天的高低做成的通道.类似于BOLL又不同于BOLL.他的上下线不会同时放大或缩小.【二九宽带有专题讨论】
【3】止盈止损线.可以及时的提醒你买卖.以设定天数内最高收盘价的百分之九十五为止损线.设定天数可调.按K线的波动改变来调整参数【GK】.
【4】用五个KDJ不同九的倍数.形成的合力找股价的顶低.并且标示在图上.清清楚楚的显示买卖点.【另有副图】
【5】用虚线标示出压力支撑线.而且自动完成.你只要调好参数【N】就可以划出一定范围.【远近期】的压力支撑线.明明白白的告诉你阻力位.和支撑位.使得你心中有数.这条线能不能突破当然很重要.所以炒股不能不看这两条线.
整个图都是用九的倍数遍制.我才叫它【J合力二九】能不能挣钱就看你怎么利用这个图形买卖了.本公式用于大智慧.发给你源码就把权力也交给你.你可根据你自己的需要改革它.如果你想改又有困难.需要帮忙.就请告诉一声.这里高人很多.会帮你实现你的愿望的.我们每天就在变化中求生存.不是吗.
{J合力二九}
INPUT:N(5,0,20),GK(5,0,20);
DRAWGBKlast(c>0,strip(RGB(40,0,40),RGB(0,0,100),0));
{1.K线JCJ}
STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),LOW,HIGH,0.1,0),colorred;
STICKLINE(CLOSE>OPEN or CLOSE=OPEN and CLOSE>REF(CLOSE,1),OPEN,CLOSE,8,0),colorred;
STICKLINE(CLOSE<OPEN or CLOSE=OPEN and CLOSE<=REF(CLOSE,1),LOW,HIGH,0.1,0),colorcyan;
STICKLINE(CLOSE<OPEN or CLOSE=OPEN and CLOSE<=REF(CLOSE,1),OPEN,CLOSE,8,0),colorcyan;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,8,0 ),COLOR008800;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,7,0 ),COLOR009900;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,6,0 ),COLOR00AA00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,5,0 ),COLOR00BB00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,4,0 ),COLOR00CC00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,3,0 ),COLOR00DD00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,2,0 ),COLOR00EE00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,1,0 ),COLOR00FF00;
STICKLINE(OPEN>=CLOSE ,CLOSE ,OPEN,0,0 ),COLOR00FF00;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,8,0) ,COLOR000066;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,7,0) ,COLOR000088;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,6,0) ,COLOR0000AA;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,5,0) ,COLOR0000BB;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,4,0) ,COLOR0000CC;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,3,0) ,COLOR0000DD;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,2,0) ,COLOR0000EE;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,1,0) ,COLOR0000FF;
STICKLINE(CLOSE>OPEN,CLOSE,OPEN,0,0) ,COLOR0000FF;
LC:=REF(C,1);
RSI:=SMA(MAX(CLOSE-LC,0),18,1)/SMA(ABS(CLOSE-LC),18,1)*100;
金:=EMA(EMA(EMA(RSI,3),6),9);
DRAWTEXT(CROSS(ref(金,1),金) ,high*1.06,'RSI'),COLOR00ffFF,ALIGN1,LINETHICK3;
DRAWTEXT(CROSS(ref(金,1),金) ,high*1.04,'↓'),COLOR00ffFF,ALIGN1,LINETHICK3;
{2.二九宽带}
上18H:WMA(SMA(hhv(HIGH,18),9/2,1),3),COLOR00FF00;
下18L:WMA(SMA(llv(LOW,18),9/2,1),3),COLOR009900;
通道:(上18H+下18L)/2,COLOR0598FF,DOTLINE;
FILLRGN(上18H,通道,上18H>通道,RGB(0,0,255)),LAYER7;
FILLRGN(下18L,通道,下18L<通道,RGB(50,50,50)),LAYER7;
中18C:WMA(SMA(C,18,1),3),COLORFF9900;
{MA9}
MA9:WMA(C,9),COLOR00FF00,DOTLINE;
PARTLINE(MA9 ,(MA9>REF(MA9,1)),rgb(255,55,0) ),linethick2,LAYER0;
{3止盈止损}
STICKLINE(BARSTATUS=2,HHV(C,GK),HHV(C,GK),218,1),COLOR00ffff,LINETHICK2;
STICKLINE(BARSTATUS=2,HHV(C,GK)*0.95,HHV(C,GK)*0.95,218,1),COLORRED,LINETHICK2;
DRAWTEXT(barstatus=2 ,HHV(C,GK),'【C'+GK+'='+NUMTOSTRN(HHV(C,GK),2)+'】'),ALIGN1,Color00FFFF,linethick2,LAYER0;
DRAWTEXT(barstatus=2 ,HHV(C,GK)*0.95,'【C'+GK+'-5%='+NUMTOSTRN(HHV(C,GK)*0.95,2)+'】'),ALIGN1,Color0077FF,linethick2,LAYER0;
{4.J合力}
J9:EMA("KDJ.J"(9,3,3),5) ,COLOR0000FF,LINETHICK0;
J18:EMA("KDJ.J"(18,3,3),5) ,COLOR00FFFF,DOTLINE,LINETHICK0;
J27:EMA("KDJ.J"(27,3,3),5) ,COLOR00FF00,DOTLINE,LINETHICK0;
J36:EMA("KDJ.J"(36,3,3),5) ,COLOR0077FF,DOTLINE,LINETHICK0;
J45:EMA("KDJ.J"(45,3,3),5) ,COLORFF9900,LINETHICK0;
J54:EMA("KDJ.J"(54,3,3),5) ,COLORFF9900,LINETHICK0;
J合力:(3*J9+2*J18+J27+J36+J45+J54)/9,COLOR00FFCC,LINETHICK0;
合力顶:=J合力>85 ;
合力低:=J合力<15;
DRAWTEXT(CROSS(0,合力顶) ,H*1.04,'【顶】'),ALIGN1,COLOR00FFFF,LINETHICK3,LAYER3;
DRAWTEXT(CROSS(0,合力低) ,L*0.97,'【低】'),ALIGN1,COLOR0077FF,LINETHICK3,LAYER0;
{低部}
DIBU:= "KDJ.K"(9,3,3)<15 AND "KDJ.D"(9,3,3)<15 AND "KDJ.K"(18,3,3)<15 AND "KDJ.D"(18,3,3)<15
AND "KDJ.K"(27,3,3)<20 AND "KDJ.D"(27,3,3)<20 AND "KDJ.D"(36,3,3)<20 AND "KDJ.D"(54,3,3)<20;
DRAWTEXT(CROSS(0,DIBU) ,L*0.95,'【买】'),ALIGN1,COLOR00ffff,LINETHICK2,LAYER3;{5.压力支撑}
AG1:=ref(h,N)=hhv(h,2*N+1);
BB1:=filter(AG1,N);
CB1:=backset(BB1,N+1);
DB1:=filter(CB1,n);{高点}
AG2:=ref(l,N)=llv(l,2*N+1);
BB2:=filter(AG2,N);
CB2:=backset(BB2,N+1);
DB2:=filter(CB2,N);{低点}
E1:=(ref(llv(l,2*N),1)+ref(hhv(h,2*N),1))/2; E2:=(h+l)/2;{高低点出现在同一K线上时可作取舍}
H1:=(DB1 AND not(DB2 AND E1>=E2)) OR barstatus=2 OR barscount(c)=1;
L1:=(DB2 AND not(DB1 AND E1<E2)); H2:=DB1 AND not(DB2 AND E1>=E2);
X1:=ref(barslast(H1),1)+1; F1:=backset(H1 AND count(L1,X1)>0,llvbars
(if(L1,l,10000),X1));
G1:=F1>ref(F1,1); I1:=backset(G1,2); LD:=I1>ref(I1,1);{过滤后低点}
L2:=LD OR barstatus=2 OR barscount(c)=1;
X2:=ref(barslast(L2),1)+1; F2:=backset(L2 AND count(H2,X2)>0,hhvbars
(if(H2,h,0),X2));
G2:=F2>ref(F2,1); I2:=backset(G2,2); HD:=I2>ref(I2,1);{过滤后高点}
R1:=backset(barstatus=2,barslast(HD)+1);
S1:=R1>ref(R1,1); {前一高}
T1:=backset(barstatus=2,barslast(LD)+1);
U1:=T1>ref(T1,1); {前一低}
R2:=backset(S1,ref(barslast(HD),1)+2);
S2:=R2>ref(R2,1); {前二高}
T2:=backset(U1,ref(barslast(LD),1)+2);
U2:=T2>ref(T2,1); {前二低}
短期压力:drawline(S2,h,S1,h,1),Color0000ff,DOTLINE;
短期支撑:drawline(U2,l,U1,l,1),Colorgreen,DOTLINE; |
