指標(biāo)代碼分析:

?

?

源碼：

M:=17;

P:=2;
N:=5;
大盤指數(shù):INDEXC,NODRAW,colorlimagenta ;
C3:=REF(C,1);//www.kzuj.com.cn
漲停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0);
STICKLINE(漲停,OPEN,CLOSE,2.5,0),coloryellow;
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);
STICKLINE(跌停,OPEN,CLOSE,2.5,0),colorblue;
EMA5:EMA(C,5),NODRAW;
操盤:=EMA(C,17);
PARTLINE(操盤,操盤<EMA5,colorred,操盤>EMA5,colorgreen),LINETHICK2;
KDJ_K:="KDJ.K"(9,3,3);KDJ_D:="KDJ.D"(9,3,3);KDJ_J:="KDJ.J"(9,3,3);
買1:=CROSS(KDJ_J,0) OR (CROSS(KDJ_J,KDJ_K) AND KDJ_D<26);
買3:=CROSS("MACD.DIF","MACD.DEA") OR CROSS("MACD.MACD",0);
買0:=買1+買3;
{買:=IF(買0>1,買0,0);};
DRAWICON(買0>1,L*0.98,16);
X6:=REF(CLOSE,1);
X7:=((SMA(MAX((CLOSE - X6),0),7,1) / SMA(ABS((CLOSE - X6)),7,1)) * 100);
X8:=CROSS(79,X7);
X9:=FILTER(X8,4);
DRAWTEXT(X9,(HIGH * 1.02),'●出貨'),COLOR9000F5;
上升壓力: 操盤 + P*STD(CLOSE,M),COLOR0099FF,LINETHICK2;
下跌支撐: 操盤 - P*STD(CLOSE,M),colormagenta,LINETHICK2;
{A1A:=EMA(CLOSE, 9);
A1B:=((A1A - EMA(CLOSE, 5)) < 0);
A1C:=((A1A - EMA(CLOSE, 5)) > 0);
A1D:=BARSLAST(A1B);
A1E:=BARSLAST(A1C);
A1F:=IF((A1E > 0),(CLOSE - REF(CLOSE, 1)) / REF(CLOSE, 1) * 100,0);
A20:=SUM(A1F,0);
A21:=IF((A1D > 0),(0 - 2),0);
A22:=IF((A1E > 0),SUM((CLOSE - REF(CLOSE, 1)) / REF(CLOSE, 1) * 100,A1E),0);
A23:=A22 / A1E;
A25:=EMA(EMA(EMA(CLOSE, 3), 3), 3); }
{DRAWICON(((REF(A21, 1) = (0 - 2)) AND (A21 = 0)),LOW, 5);
DRAWICON(((REF(A1E, 1) > 0) AND (A1E = 0)),HIGH, 6);}
DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:=EMA(DIF,9);//www.kzuj.com.cn
MACD1:=(DIF-DEA)*2,COLORSTICK;
A:=MA(CLOSE,5);
B:=MA(CLOSE,20);
TYP:=(HIGH+LOW+CLOSE)/3;
CCI:=(TYP-MA(TYP,84))/(0.015*AVEDEV(TYP,84));
BB:=BETWEEN(REF(CLOSE,1),A,B);
DRAWTEXT(CLOSE>A AND A>B AND B>REF(B,1) AND CROSS(CCI,100) AND MACD1>0 AND REF(MACD1,1)>0,B,'追'),coloryellow;
CBFB:=MA(C,2);
JL:=IF(C>CBFB,V,0);
CL:=IF(C<CBFB,V,0);
JLH:=SUM(JL,4);
CLH:=SUM(CL,4);
LHB:=CLH/JLH;
TJ1:=IF(HHV(LHB,5)>4 AND CROSS(2,LHB) AND C>=O,1,0);
DRAWICON(TJ1,L*0.96,9);
Z:=MA(C,120);
CXH3:=(MA(C,5)-Z)/Z;
CXH4:=MA((CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100,3);
CXH5:=(MA(AMOUNT,5)/MA(VOL,5)/100-MA(AMOUNT,120)/MA(VOL,120)/100)/(MA(AMOUNT,5)/MA(VOL,5)/100);
D1:DRAWTEXT(CLOSE>Z AND REF(CXH4,1)<30 AND CXH4>REF(CXH4,1) AND REF(CXH4,1)<REF(CXH4,2) ,LOW ,'B'),colorred;
D2:DRAWTEXT(REF(CXH5,1)<5 AND CXH5>REF(CXH5,1) AND REF(CXH5,1)<REF(CXH5,2) AND CXH3<-0.3,LOW ,'B'),COLORGREEN;//http://www.kzuj.com.cn
D3:DRAWTEXT(CROSS(CXH4,5) AND CXH3<-0.4,LOW ,'B'),colorblue;
Y:=MA(C,120);
CXH6:=(MA(C,5)-Y)/Y;
CXH7:=MA((CLOSE-LLV(LOW,10))/(HHV(HIGH,10)-LLV(LOW,10))*100,3);
CXH8:=(MA(AMOUNT,5)/MA(VOL,5)/100-MA(AMOUNT,120)/MA(VOL,120)/100)/(MA(AMOUNT,5)/MA(VOL,5)/100);
D4:DRAWTEXT(CLOSE<Y AND Y<REF(Y,1) AND REF(CXH7,1)>80 AND CXH7<REF(CXH7,1) AND REF(CXH7,1)>REF(CXH7,2),HIGH,'S'),coloryellow;
D5:DRAWTEXT(CROSS(90,CXH7) AND CXH8>0.2,HIGH,'S'),COLORGREEN;//http://www.kzuj.com.cn
D6:DRAWTEXT(CROSS(95,CXH7) AND CXH6>0.5,HIGH ,'S'),colorred;
MAA5:=MA(C,5),COLORFF00FF,LINETHICK2;
MAA10:=MA(C,10);//cxh99-com
MAA30:=MA(C,30),colorred;
KS:=IF(MAA10>MAA30,MAA10,MAA30),colorblue;
A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;
A4:=SMA(A3,3,1);
A5:=SMA(A4,3,1);
A6:=3*A4-2*A5;
A7:=C-REF(C,1);
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
買:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2));
DRAWTEXT(FILTER(買=1,5),LOW-0.05,'↖買進(jìn)'),coloryellow;
STICKLINE(買,OPEN,CLOSE,2,0),coloryellow;
X1:=(C+L+H)/3;
BB13:=ATAN(EMA(X1,13)-REF(EMA(X1,13),1))*3.1416*10;
EMA8:=EMA(C,8);
DRAWTEXT(FILTER(BB13>1 AND EMA(X1,13)>REF(EMA(X1,8),1),10),
EMA8,'∠45升'),colorwhite;
A01:=MA(CLOSE, 28);
A02:=MA(CLOSE, 66);
A03:=AMOUNT / VOL / 100.000;
A04:=SUMBARS(VOL,CAPITAL * 1.618);
A05:=IF((A04 > 100.000), 1.033,IF(((A04 <= 100.000) AND (A04 > 33.000)), 1.039, 1.05));
運(yùn)作成本:MA(A03, 10),NODRAW;
中線成本:EMA(A03, 34) * A05,NODRAW;
總體成本:DMA(中線成本,VOL / CAPITAL),NODRAW;
CXH12:=(2*CLOSE+HIGH+LOW)/4;
CXH13:=IF(YEAR>=2099 AND MONTH>2,0,1);
CXH14:=LLV(LOW,5); CXH15:=HHV(HIGH,4);
散戶:=EMA((CXH12-CXH14)/(CXH15-CXH14)*100,4)*CXH13;
莊家:=EMA(0.667*REF(散戶,1)+0.333*散戶,2)*CXH13;
DRAWTEXT(CROSS(散戶,莊家) AND 散戶<30,L-0.05,'←低吸'),colorlired;
DRAWTEXT(CROSS(莊家,散戶) AND 散戶>70,H+0.05,'←高拋'),COLORGREEN;//http://www.kzuj.com.cn
?

?

公式導(dǎo)入教程: 【通達(dá)信公式源碼導(dǎo)入方法教程】 【同花順公式源碼導(dǎo)入方法教程】 【大智慧新一代公式源碼導(dǎo)入方法教程】

?