?
源代碼：
趨勢線:(3)*(SMA(((C-LLV(L,27))/(HHV(H,27)-LLV(L,27)))*(100),5,1))-(2)*(SMA(SMA(((C-LLV(L,27))/(HHV(H,27)-LLV(L,27)))*(95),5,1),3,1)),CoLorF0F000;
買點準備:IF((趨勢線<=10),12,0),Linethick2,CoLor0000FF;
V1:=MA(((100)*(C-LLV(C,34)))/(HHV(H,34)-LLV(L,34)),5)-20;
V2:=(2)*(ABS(V1));
V3:=100-100-(3)*(SMA(((C-LLV(L,55))/(HHV(H,55)-LLV(L,55)))*(100),20,1))+(2)*(SMA(SMA(((C-LLV(L,55))/(HHV(H,55)-LLV(L,55)))*(100),20,1),15,1));
V4:=100-100-(3)*(SMA(((O-LLV(L,55))/(HHV(H,55)-LLV(L,55)))*(100),20,1))+(2)*(SMA(SMA(((O-LLV(L,55))/(HHV(H,55)-LLV(L,55)))*(100),20,1),15,1));
V5:=(H+L+C)/(3);
V6:=(V5-MA(V5,10))/((0.015)*(AVEDEV(V5,10)));
V7:=(V5-MA(V5,30))/((0.015)*(AVEDEV(V5,30)));
V8:=IF((V6>=150) AND (V6<200) AND (V7>=150) AND (V7<200),10,0);
V9:=IF((V6<=(-150)) AND (V6>(-200)) AND (V7<=(-150)) AND (V7>(-200)),(-10),V8);
VA:=((C-MA(C,13))/(MA(C,13)))*(100);
VB:=100-ABS(VA);
VC:=(3)*(SMA(((INDEXC-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55)))*(100),20,1))-(2)*(SMA(SMA(((INDEXC-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55)))*(100),20,1),15,1));
VD:=(3)*(SMA(((INDEXO-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55)))*(100),20,1))-(2)*(SMA(SMA(((INDEXO-LLV(INDEXL,55))/(HHV(INDEXH,55)-LLV(INDEXL,55)))*(100),20,1),15,1));
VE:=(REF(L,1))*(0.9);
VF:=(L)*(0.9);
頂線:=IF((VB<90),VB,100);
多方:IF((V1>0),V1,0),LINESTICK,CoLorFF00FF;
空方:(-IF((V1<0),V2,0)),LINESTICK,CoLorF0F000;
預警系統:IF(((V7>=200) AND (V6>=150) or CROSS(65,多方)),15,IF((V7<=(-200)) AND (V6<=(-150)),(-15),V9))+65,CoLor000000;
大趨勢:=V3;
STICKLINE((V3<=REF(V4,1)),V3,V4,8,0),CoLor00FF00;
STICKLINE((V3>REF(V4,1)),V3,V4,8,0),CoLor0000FF;
T1:=(C>MA(C,20)) AND (MA(C,20)>=REF(MA(C,20),1));
T2:=C;
T3:=(多方>60) AND (預警系統>65) AND (頂線=100);
T4:=(多方>48) AND (預警系統>65) AND (頂線<100);
T5:=(空方<(-38)) AND (預警系統<65);
T7:=(V3>REF(V4,1)) AND (V>REF(V,1)) AND (C>REF(C,1));
T8:(V3<=REF(V4,1)) AND C AND (空方>=REF(空方,1)) AND VC,CoLorFF0000;
DRAWTEXT(T1 AND (COUNT(T1,30)=1),10,'上升通道!'),CoLor00FFFF;
下降通道:DRAWTEXT(T2 AND (COUNT(T2,30)=1),80,'下降通道'),CoLorFFFFFF;
上漲過急:DRAWTEXT(T3 AND (COUNT(T3,30)=1),80,'上漲過急'),CoLor00FF00;
資金進場:DRAWTEXT(T7 AND (COUNT(T7,30)=1),(-10),'資金進場'),CoLor00FFFF;
DRAWTEXT(T8 AND (COUNT(T8,30)=1),90,'見頂回落'),CoLorF0F000;
A1:=((HHV(H,50))/(LLV(L,100))>1.5);
A2:=(HHV(H,50)-L)/(HHV(H,50)-LLV(L,100));
A3:=(L-LLV(L,100))/(HHV(H,50)-LLV(L,100));
A4:=(HHVBARS(H,50)<LLVBARS(L,100));
A5:=A1 AND (A2>0.5) AND (A3>0.3) AND A4;
A6:=(COUNT(A5,20)=1);
搶反彈:IF(A6 AND A5,26,0),Stick,Linethick2,CoLor00FFFF;
DRAWTEXT(搶反彈,32,'搶反彈'),CoLor0099FF;
cxh2W:=100-((100)*(HHV(H,14)-C))/(HHV(H,14)-LLV(L,14));
MW:=EMA(cxh2W,3);
cxh3W:=EMA(cxh2W,7);
M1:=EMA(cxh3W,5);
MB1:=CROSS(MW,M1) AND (M1<20);
抄底:IF(MB1,40,0),Linethick2,CoLorFFFFFF;
DRAWTEXT(抄底,62,''),CoLor00FFFF;
DRAWTEXT(抄底,52,'抄底 '),CoLorFF00FF;
A11:=MA(C,5);
A12:=MA(C,10);
A13:=MA(C,20);
A14:=MA(C,30);
均線多頭排列:IF((A11>A12) AND (A12>A13) AND CROSS(A13,A14) AND ISUP,25,0),Stick,Linethick2,CoLor00BBFF;
DRAWTEXT((A11>A12) AND (A12>A13) AND CROSS(A13,A14) AND ISUP,35,'均線多頭'),CoLorBBFFFF;
{程序化交易 www.kzuj.com.cn }
{程序化交易 www.kzuj.com.cn }
?
公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】
?
打印本文
關閉窗口