SETTLE;
A:=ABS(C-O);//收盘-开盘的绝对值
B:=EMA(A,5);//A的加权平均
K:=IF(TNUMSEQLOSS>0,TNUMSEQLOSS+1,1);
VOLTIME<REF(VOLTIME,1)&&VOLTICK<REF(VOLTICK,1)&&C>REF(C,1)&&A>B&&C>SETTLE,BK(K);
VOLTIME<REF(VOLTIME,1)&&VOLTICK<REF(VOLTICK,1)&&C>REF(C,1)&&A>B,SOUND('A');
//当根量能周期形成的时间短于上一根量能周期形成的时间
//并且当根量能周期包含的TICK笔数少于上一根量能周期包含的TICK笔数并且价格上涨并且A>B
VOLTIME<REF(VOLTIME,1)&&VOLTICK<REF(VOLTICK,1)&&C<REF(C,1)&&A>B&&C<SETTLE,SK(K);
L<REF(LLV(L,1),1),SP(BKVOL);//当前最低价小于前面两根K线最低价,卖平
H>REF(HHV(H,1),1),BP(SKVOL);//当前最高价大于前面两根K线最高价,买平
VOLTIME<REF(VOLTIME,1)&&VOLTICK<REF(VOLTICK,1)&&C<REF(C,1)&&A>B,SOUND('B');
BKVOL>0&&PROFIT/BKVOL<-5000,SOUND('C');
SKVOL>0&&PROFIT/SKVOL<-5000,SOUND('C');
L<REF(LLV(L,1),1),SOUND('C');//带声音平仓,卖平
H>REF(HHV(H,1),1),SOUND('C');//带声音平仓,买平
你好老师,改这个吧。
SETTLE;
A:=ABS(C-O);//收盘-开盘的绝对值
B:=EMA(A,5);//A的加权平均
K:=IF(TNUMSEQLOSS>0,TNUMSEQLOSS+1,1);
MM:(HHV(V,N)+LLV(V,N))/2,NODRAW;
CROSS(V,MM)&&C>REF(C,2)&&A>B&&C>SETTLE,BK(K);
C>REF(C,1)&&A>B,SOUND('A');
CROSS(V,MM)&&C<REF(C,2)&&A>B&&C<SETTLE,SK(K);
BKVOL>0&&PROFIT/BKVOL<-5000,CLOSEOUT;
SKVOL>0&&PROFIT/SKVOL<-5000,CLOSEOUT;
L<REF(LLV(L,2),1),SP(BKVOL);//当前最低价小于前面两根K线最低价,卖平
H>REF(HHV(H,2),1),BP(SKVOL);//当前最高价大于前面两根K线最高价,买平
C<REF(C,1)&&A>B,SOUND('B');
L<REF(LLV(L,2),1),SOUND('C');//带声音平仓,卖平
H>REF(HHV(H,2),1),SOUND('C');//带声音平仓,买平
A:=ABS(C-O);//收盘-开盘的绝对值
B:=EMA(A,5);//A的加权平均
K:=IF(NUMSEQLOSS>0,NUMSEQLOSS+1,1);
MM:(HHV(V,N)+LLV(V,N))/2,NODRAW;
if CROSS(V,MM) and C>REF(C,2) and A>B and C>AvGENTERPRICE then buy(holding=0,k,market);
//
PLAYSOUND(C>REF(C,1) and A>B , );//这个函数我没补全参数,第二个参数是声音文件的路径所在。金字塔无法按照字母播放声音,只能播放指定的声音文件
if CROSS(V,MM) and C<REF(C,2) and A>B and C<AvGENTERPRICE then buyshort(holding=0,k,market);
if holding>0 and (c-AVGENTERPRICE)*MINDIFF<-5000 and time=CLOSETIME(0) then sell(1,holding,market);//收盘前平仓
if holding<0 and (AVGENTERPRICE-c)*MINDIFF<-5000 and time=CLOSETIME(0) then sellshort(1,holding,market);//收盘前平仓
sell(L<REF(LLV(L,2),1) and holding>0,holding,market);//当前最低价小于前面两根K线最低价,平多
sellshort(H>REF(HHV(H,2),1) and holding<0,holding,market);//当前最高价大于前面两根K线最高价,买平
//C<REF(C,1) and A>B,SOUND('B');
//L<REF(LLV(L,2),1),SOUND('C');//带声音平仓,卖平
//H>REF(HHV(H,2),1),SOUND('C');//带声音平仓,买平
播放声音的那个我提供了相应函数,上面红色标注的部分,但是并不是完全等效的。因此没完整处理。
[此贴子已经被作者于2019/8/9 15:21:54编辑过]