{智能KDJ}
130;
N:=9;
M1:=3;
M2:=3;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:=SMA(RSV,M1,1);
D:=SMA(K,M2,1);
J0:=3*K-2*D;
J:=MA(J0,2);
{K;
D;
J;}
J,DOTLINE,COLORRED;
MA(J,4),COLORBLUE;
{---------JM----------}
YMDF:=150228;
YMDF1:=3914;
YMDFZB:=22286;
ZBXH:=22;
YMD:=YMDF;
YMD1:=YMDF1;
YMD2:=YMDF1;
YMD3:=YMDF1;
YMDZB:=YMDFZB;
YC:=MOD((YMD/10000),100);
MC:=MOD((YMD/100),100);
DC:=MOD((YMD),100);
Y1:=POW(YC,2)*10+POW(MC,2)*10+POW(DC,2)*1+YC*MC*DC;
Y2:=20000+POW(YC,2)*100+POW(MC,2)*10+POW(DC,2)*1000+YC*MC*DC;
Y3:=30000+POW(YC,2)*10+POW(MC,2)*1000+POW(DC,2)*100+YC*MC*DC;
YZB:=POW(YC,2)*ZBXH+POW(MC,2)*ZBXH+POW(DC,2)*ZBXH;
YES1:=YMD1=Y1;
YES2:=YMD2=Y2;
YES3:=YMD3=Y3;
YESZB:=YMDZB=YZB;
{JMWZ1}
{JMWZ2 }
GQ0:=(DATE()<=(1000000+YC*10000+MC*100+DC))+POW(10,-5);
{GQ0*100000;}
GQ:=IF(GQ0 AND YES1 AND YESZB,1,DRAWNULL),NODRAW;
{JMWZ3}
GQ10:=IF(GQ=DRAWNULL AND CURRBARSCOUNT<10,DRAWNULL,1);
VGQ:=GQ+0.001;
VV2:=(VGQ-1)*1000*(GQ0>1);{-------------------}MA20:=MA(C,13);
平均涨速:=(MA20-REF(MA20,1))/MA20*100*(GQ10-0.001),NODRAW;
温和区:平均涨速<0.5 AND 平均涨速>-0.5,COLORLIRED;
上涨冲动区:平均涨速>=0.5,COLORMAGENTA;
下跌冲动区:平均涨速<=-0.5,COLORGREEN;
偏离值:(C/DKX-1)*100,COLORBLUE,NODRAW;
STICKLINE(温和区,0,平均涨速*10,3,0),COLORLIRED;
STICKLINE(上涨冲动区,0,3+(平均涨速-0.5)*10,3,0),COLORMAGENTA;
STICKLINE(下跌冲动区,0,-3+(平均涨速+0.5)*10,3,0),COLORGREEN;顶部0:=J>REF(J,1) AND J>REF(J,2) {AND J>REFX(J,1) AND J>REFX(J,2) AND J>REFX(J,4)} AND J>顶部J值 AND 偏离值>5;
底部0:=J<REF(J,1) AND J<REF(J,2) {AND J<REFX(J,1) AND J<REFX(J,2) AND J<REF(J,4)} AND J<底部J值;顶部:=顶部0 AND COUNT(顶部0,5)=1;
底部:=底部0 AND COUNT(底部0,5)=1;
STICKLINE(顶部,100,90,1,0),COLORGREEN;
STICKLINE(底部,0,10,1,0),COLORRED;顶部平均距离:=100/COUNT(顶部,100);
底部平均距离:=100/COUNT(底部,100);顶部距离:=BARSLAST(顶部)+1;
底部距离:=BARSLAST(底部)+1;准备卖0:=REF(顶部距离,1)>12 AND J>80 AND 偏离值>5;
准备买0:=EXIST(底部距离>15,3) AND J<20;准备卖:=准备卖0 AND COUNT(准备卖0,5)=1;
准备买:=准备买0 AND COUNT(准备买0,5)=1;DRAWTEXT(准备卖,105,'★准备卖'),COLORMAGENTA;
DRAWTEXT(准备买,20, '★准备买'),COLORRED;
顶部稳定:=顶部平均距离>=15;
底部稳定:=底部平均距离>=15;DRAWTEXT(顶部平均距离<=15 AND 顶部,95,' 可能新高'),COLORGREEN;
DRAWTEXT(顶部平均距离<=20 AND 顶部平均距离>15 AND 顶部,95,' △'),COLORBLUE;
DRAWTEXT(顶部平均距离>20 AND 顶部,115,'▲筑顶'),COLORRED;
DRAWTEXT(底部平均距离<=15 AND 底部,-5,' 可能新低'),COLORBLUE;
DRAWTEXT(底部平均距离<=20 AND 底部平均距离>15 AND 底部,-5,' △'),COLORBLUE;
DRAWTEXT(底部平均距离>20 AND 底部,-5,' ▲筑底'),COLORRED;{
DRAWTEXT( CURRBARSCOUNT=6 ,55,'KDJ智能判断'),COLORRED;
DRAWTEXT(顶部稳定 AND CURRBARSCOUNT=6 ,45,'△高位卖较准'),COLORRED;
DRAWTEXT(顶部稳定=0 AND CURRBARSCOUNT=6,45,'高位卖不准'),COLORGREEN;
DRAWTEXT(底部稳定 AND CURRBARSCOUNT=6 ,35,'△低位买较准'),COLORRED;
DRAWTEXT(底部稳定=0 AND CURRBARSCOUNT=6,35,'低位买不准'),COLORGREEN;
}{
DRAWTEXT_FIX(顶部稳定=1 ,0.65,0.0,1,'△高位卖较准'),COLORRED;
DRAWTEXT_FIX(顶部稳定=0,0.65,0.0,1,'高位卖不准'),COLORGREEN;
DRAWTEXT_FIX(底部稳定=1 ,0.75,0.0,1,'△低位买较准'),COLORRED;
DRAWTEXT_FIX(底部稳定=0 ,0.75,0.0,1,'低位买不准'),COLORGREEN;
}{上涨冲动区回调}
强势回调:=COUNT(上涨冲动区,10)>=8 AND 准备买*VV2;
就要大涨:=强势回调,COLORRED;
STICKLINE(强势回调,0,50,1,0),COLORRED;
DRAWTEXT(强势回调,40,' ★就要大涨'),COLORRED;
{挖坑结束}
挖坑结束0:=CROSS(C,MA(C,5)) AND EXIST(下跌冲动区,5)*VV2;
挖坑结束:=挖坑结束0 AND COUNT(挖坑结束0,15)=1;
STICKLINE(挖坑结束,0,30,1,0),COLORBLUE;
DRAWTEXT(挖坑结束,40,' ★挖坑结束'),COLORBLUE;低买:=J>REF(J,1) AND REF(J,1)<0 AND (REF(J,1)<REF(J,2))*VV2;
上3买:=低买,COLORBLUE;
DRAWICON(低买,0,11);
DRAWTEXT(低买,15,'上3买'),COLORBLUE;高卖0:=J<REF(J,1) AND REF(J,1)>80 AND (REF(J,1)>REF(J,2))*VV2;
高卖:=高卖0 AND COUNT(高卖0,6)=1;
破3卖:=高卖,COLORGREEN;
DRAWICON(高卖,90,12);
DRAWTEXT(高卖,90,' 破3卖'),COLORGREEN;
{DRAWNUMBER(高卖,J-10, 偏离值),COLORBLUE;}
DRAWTEXT(高卖,80, VARCAT('偏离值:',VAR2STR(偏离值,1))),COLORBLUE;{
STICKLINE(GQ=DRAWNULL AND CURRBARSCOUNT<10,LOCMIN,LOCMAX,4,1),COLORRED;
DRAWICON(SHQQ AND CURRBARSCOUNT=10,1.008*LOCMAX,20);
DRAWNUMBER(SHQQ AND QQOUT=1 AND CURRBARSCOUNT=9,REF(1.01*LOCMAX,1),7);
DRAWNUMBER(SHQQ AND QQOUT=1 AND CURRBARSCOUNT=8,REF(1.01*LOCMAX,2),9);
DRAWNUMBER(SHQQ AND QQOUT=1 AND CURRBARSCOUNT=7,REF(1.01*LOCMAX,3),2);
DRAWNUMBER(SHQQ AND QQOUT=1 AND CURRBARSCOUNT=6,REF(1.01*LOCMAX,4),5);
DRAWNUMBER(SHQQ AND QQOUT=1 AND CURRBARSCOUNT=5,REF(1.01*LOCMAX,5),7);
DRAWNUMBER(SHQQ AND QQOUT=1 AND CURRBARSCOUNT=4,REF(1.01*LOCMAX,6),3);
DRAWNUMBER(SHQQ AND QQOUT=1 AND CURRBARSCOUNT=3,REF(1.01*LOCMAX,7),5);
DRAWNUMBER(SHQQ AND QQOUT=1 AND CURRBARSCOUNT=2,REF(1.01*LOCMAX,8),5);
DRAWNUMBER(SHQQ AND QQOUT=1 AND CURRBARSCOUNT=1,REF(1.01*LOCMAX,9),4);
};参数
1顶部J值 80.00 120.00 90.00
2底部J值 0.00 20.00 20.00 |
