
等级: 新手上路
- 注册:
- 2024-4-18
- 曾用名:
|
下面这个是文华的,麻烦老师帮我改成金字塔的,打算用于图表程序化交易,谢谢!
DK:=EMA(H,900)-EMA(L,900);
M3:=75;
D:=MA(C,M3);
MID:=D,NODRAW;
DRAWCOLORLINE(MID>REF(MID,1),MID,COLORRED,COLORGREEN),LINETHICK4;
TMP2:=STD(CLOSE,M3);
TOP:=MID+TMP2,COLORYELLOW,DOT;
BOTTOM:=MID-TMP2,COLORYELLOW,DOT;
LVDK:=LV((TOP-BOTTOM),M3),NODRAW;
TBDK:TOP-BOTTOM,COLORWHITE,NODRAW;
2风系:(TBDK-LVDK)/LVDK*100,NODRAW;//风险系数
TH:=TOP+DK/2;
TL:=TOP-DK/2;
BH:=BOTTOM+DK/2;
BL:=BOTTOM-DK/2;
S1:=CROSS(EVERY(C>TH,2),0.5);
X1:=CROSS(EVERY(CLOSE<BL,2),0.5);
WS1:=BARSLAST(S1)+1;
WX1:=BARSLAST(X1)+1;
DT2:=WS1<WX1;
KT2:=WS1>WX1;
SS1:=CROSS(SUM(S1,WX1),0.5);
XX1:=CROSS(SUM(X1,WS1),0.5);
//VERTLINE(SS1=1,COLORRED),LINETHICK3;
//VERTLINE(XX1=1,COLORGREEN),LINETHICK3;
//PLAYSOUND(SS1=1,'S');
//PLAYSOUND(XX1=1,'S');
//邮件预警
//SS1=1,NOTICE;
//XX1=1,NOTICE;
//解决了信号闪烁的问题
REF(SS1=1,1),NOTICE;
REF(XX1=1,1),NOTICE;
//指定日期选股
//VALUEWHEN(DATE=211208,SS1=1),SELECT;
|
|