公式模型编写问题提交-文华转金字塔求助金字塔客服中心 - 专业程序化交易软件提供商

以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  文华转金字塔求助  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=171562)

--  作者：meng1111
--  发布时间：2019/8/9 14:12:57
--  文华转金字塔求助

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\');//带声音平仓，买平

--  作者：FireScript
--  发布时间：2019/8/9 14:37:50
--
VOLTIME 这个函数具体是什么意思？没搞明白哦。也没查到具体说明。

--  作者：meng1111
--  发布时间：2019/8/9 14:45:12
--

你好老师，改这个吧。

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\');//带声音平仓，买平

--  作者：FireScript
--  发布时间：2019/8/9 15:21:36
--

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编辑过]