通达信五福星短线公式 自编自用金钻级指标
源码
n:=120;m:=10;m1:=20;m2:=30;
J:=KDJ.J;T:=BARSLAST(J
KDJJ:MA((C-REF(C,T))/REF(C,T),1)*100 COLOR0000FF;
VO:=VOL.MAVOL1;
VT:=BARSLAST(VO =LLV(REF(VO,1),34));
VOL1:MA((C-REF(C,VT))/REF(C,VT),3)*100 LINETHICK2;
CI:=CCI.CCI;
CT:=BARSLAST(CI =LLV(REF(CI,1),34));
CII:MA((C-REF(C,CT))/REF(C,CT),1)*100 COLOR8000FF;
DIF:=MACD.DIF;
FT:=BARSLAST(DIF =LLV(REF(DIF,1),34));
MADIF:MA((C-REF(C,FT))/REF(C,FT)*100,3) COLOR408000;
BIA:=BIAS.BIAS1;
BT:=BARSLAST(BIA =LLV(REF(BIA,1),34));
BIAS1:MA((C-REF(C,BT))/REF(C,BT),1)*100 COLOR8000FF ;
VARA:=LLV(LOW,36);
VARB:=HHV(HIGH,30);
VARC:=EMA((CLOSE-VARA)/(VARB-VARA)*4,4)*25;
STICKLINE(VARC 91,HHV(BIAS1,60),HHV(BIAS1,60)+1,5,0),COLORWHITE;
STICKLINE(VARC 10,-8,-7,5,0),COLORRED;
短底:IF(KDJJ 0 AND VOL1 0 AND CII 0 AND MADIF 0 AND BIAS1 0,-8,DRAWNULL)STICK COLORGREEN LINETHICK3;
反弹:IF(KDJJ=0 AND CII=0 AND BIAS1=0,-7,DRAWNULL)STICK COLORYELLOW;
0 COLORBLUE;{www.9m8.cn}
JD:=IF(KDJJ =LLV(REF(KDJJ,1),20),2,0);
VD:=IF(VOL1 =LLV(REF(VOL1,1),20),2,0);
CD:=IF(CII =LLV(REF(CII,1),20),2,0);
MD:=IF(MADIF =LLV(REF(MADIF,1),20),2,0);
BD:=IF(BIAS1 =LLV(REF(BIAS1,1),20),2,0);
抄底:IF((JD+VD+CD+MD+BD) =6 AND VARC 10,-9,DRAWNULL)STICK COLORYELLOW LINETHICK2;
鞋底:=IF(EVERY(KDJJ 0 AND CII 0 AND BIAS1 0 AND MADIF=0,3),-13,DRAWNULL)STICK;
问D:=IF(KDJJ =0 AND VOL1 =0 AND CII =0 AND MADIF =0 AND BIAS1 =0,-5,DRAWNULL)STICK COLOR008080;
G:=HHV(C,N);GD:=HHV(H,N);D:=LLV(C,N);DD:=LLV(L,N);
LD:=LLV(AMOUNT,N);LG:=HHV(AMOUNT,N);
G1:=HHV(C,M);GD1:=HHV(H,M);D1:=LLV(C,M);DD1:=LLV(L,M);
LD1:=LLV(AMOUNT,M);LG1:=HHV(AMOUNT,M);
G11:=HHV(C,M1);GD11:=HHV(H,M1);D11:=LLV(C,M1);DD11:=LLV(L,M1);
LD11:=LLV(AMOUNT,M1);LG11:=HHV(AMOUNT,M1);
G111:=HHV(C,M2);GD111:=HHV(H,M2);D111:=LLV(C,M2);DD111:=LLV(L,M2);
LD111:=LLV(AMOUNT,M2);LG111:=HHV(AMOUNT,M2);
趋势:=EMA(C,5)COLOR00FF00;
新G120:IF(C =REF(G,1),C*1.1,DRAWNULL)STICK;
缩G120:IF(H =REF(GD,1) AND AMOUNT LG,C,DRAWNULL)STICK LINETHICK6;
新G:=IF(C =REF(G1,1),C,DRAWNULL)STICK;{新高}
缩G10:IF(H =REF(GD1,1) AND AMOUNT LG1,C*0.8,DRAWNULL)STICK LINETHICK7;{缩量新高}
XG11:=IF(C =REF(G11,1),C,DRAWNULL)STICK;
缩G20:IF(H =REF(GD11,1) AND AMOUNT LG11,C*0.5,DRAWNULL)STICK LINETHICK8;
缩G30:IF(H =REF(GD111,1) AND AMOUNT LG111,C*0.3,DRAWNULL)STICK LINETHICK9;
新D120:IF(C =REF(D,1),-C,DRAWNULL)STICK COLOR004000;
放D120:IF(L =REF(DD,1)AND AMOUNT =REF(LG1,1),C*-1.2,DRAWNULL)STICK;{放量新低}
放D10:IF(L =REF(DD1,1)AND AMOUNT =LG1/2,-C,DRAWNULL)STICK;
放D20:IF(L =REF(DD11,1)AND AMOUNT =LG1,C*-0.7,DRAWNULL)STICK;
放D30:IF(L =REF(DD111,1)AND AMOUNT =LG1,C*-0.5,DRAWNULL)STICK;
DRAWNUMBER_FIX(CURRBARSCOUNT=1 AND CLOSE 0.5,0.5,0.1,0,ROUND(INDEXC));
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND C 0.51,0.80,0.2,0,'量收益');
DRAWNUMBER_FIX(CURRBARSCOUNT=1 AND CLOSE 0.5,0.9,0.2,0,ROUND(VOL1));
DRAWTEXT_FIX(CURRBARSCOUNT=1 AND C 0.51,0.80,0.3,0,'CCI收益');
DRAWNUMBER_FIX(CURRBARSCOUNT=1 AND CLOSE 0.5,0.9,0.3,0,ROUND(CII));
