共52 条记录, 每页显示 10 条, 页签:
[1]
[2][3][4][5][6]
1楼
Mikewang 发表于:2016/1/19 11:19:39
标示红色K线做多,绿色K线做空。请帮助修改程序。

此主题相关图片如下:qq图片20160119111720.png

有关源码如下:
Q:=(3*CLOSE+HIGH+LOW+OPEN)/6;
AA10:=EMA(Q,13);
BB10:=ATAN((AA10-REF(AA10,1)))*180/3.1416;
STICKLINE(BB10>1 AND AA10>REF(AA10,1), AA10,REF(AA10,1),8,0),COLORRED;
STICKLINE(BB10<1 AND AA10<REF(AA10,1), AA10,REF(AA10,1),8,1),COLORGREEN;
DRAWNUMBER(ISLASTBAR,AA10,AA10,2),COLOR0000FF,ALIGN0;
AA20:=EMA(Q,34);
BB20:=ATAN((AA20-REF(AA20,1)))*180/3.1416;
STICKLINE(BB20>1,AA20,REF(AA20,1),8,0),COLORYELLOW;
STICKLINE(BB20<1,AA20,REF(AA20,1),8,1),COLORBBCCCC;
DRAWNUMBER(ISLASTBAR,AA20,AA20,2),COLOR00FFFF,ALIGN0;
DRAWTEXT(CROSS(AA10,AA20),AA20*0.99871,'多'),COLOR0000FF;
DRAWTEXT(CROSS(AA20,AA10),AA20*1.00239,'空'),COLOR00FF00;
2楼
jinzhe 发表于:2016/1/19 11:25:15
Q:=(3*CLOSE+HIGH+LOW+OPEN)/6;
AA10:=EMA(Q,13);
BB10:=ATAN((AA10-REF(AA10,1)))*180/3.1416;
STICKLINE(BB10>1 AND AA10>REF(AA10,1), AA10,REF(AA10,1),8,0),COLORRED;
STICKLINE(BB10<1 AND AA10<REF(AA10,1), AA10,REF(AA10,1),8,1),COLORGREEN;
DRAWNUMBER(ISLASTBAR,AA10,AA10,2),COLOR0000FF,ALIGN0;
AA20:=EMA(Q,34);
BB20:=ATAN((AA20-REF(AA20,1)))*180/3.1416;
STICKLINE(BB20>1,AA20,REF(AA20,1),8,0),COLORYELLOW;
STICKLINE(BB20<1,AA20,REF(AA20,1),8,1),COLORBBCCCC;
DRAWNUMBER(ISLASTBAR,AA20,AA20,2),COLOR00FFFF,ALIGN0;
DRAWTEXT(CROSS(AA10,AA20),AA20*0.99871,'多'),COLOR0000FF;
DRAWTEXT(CROSS(AA20,AA10),AA20*1.00239,'空'),COLOR00FF00;
if BB10>1 AND AA10>REF(AA10,1) then begin
sellshort(1,0,marketr);
buy(holding=0,1,marketr);
end
if BB20<1 AND AA10<REF(AA10,1) then begin
sell(1,0,marketr);
buyshort(holding=0,1,marketr);
end
3楼
jinzhe 发表于:2016/1/19 13:05:45
4楼
Mikewang 发表于:2016/1/19 13:45:57
如果是以收盘价开仓,平仓条件满足时以对手价,程序修改如下,是否正确?然而开不了仓了。
N:=BARSLAST(DATE<>REF(DATE,1))+1;
Q:=(3*CLOSE+HIGH+LOW+OPEN)/6;
AA10:=EMA(Q,13);
BB10:=ATAN((AA10-REF(AA10,1)))*180/3.1416;
STICKLINE(BB10>1 AND AA10>REF(AA10,1), AA10,REF(AA10,1),8,0),COLORRED;
STICKLINE(BB10<1 AND AA10<REF(AA10,1), AA10,REF(AA10,1),8,1),COLORGREEN;
DRAWNUMBER(ISLASTBAR,AA10,AA10,2),COLOR0000FF,ALIGN0;
平空:sellshort(BB10>1 AND AA10>REF(AA10,1) &&COUNT(enterbars=1,N)<25 ,0, marketr);
buy(BB10>1 AND AA10>REF(AA10,1) &&COUNT(ENTERBARS=1,N)<25 and holding=0,1, thisclose);
平多:sell(BB10<1 AND AA10<REF(AA10,1) &&COUNT(enterbars=1,N)<25,0,marketr);
buyshort(BB10<1 AND AA10<REF(AA10,1) &&COUNT(enterbars=1,N)<25 and holding=0,1,thisclose);
多止损:sell(C<ENTERPRICE-12*MINDIFF,holding,marketr);
空止损:sellshort(C>ENTERPRICE+12*MINDIFF,holding,marketr);
5楼
jinzhe 发表于:2016/1/19 13:50:28
平空:sellshort(BB10>1 AND AA10>REF(AA10,1) &&COUNT(enterbars=1,N)<25 ,0, marketr);
buy(BB10>1 AND AA10>REF(AA10,1) &&COUNT(ENTERBARS=1,N)<25 and holding=0,1, thisclose);
平多:sell(BB10<1 AND AA10<REF(AA10,1) &&COUNT(enterbars=1,N)<25,0,marketr);
buyshort(BB10<1 AND AA10<REF(AA10,1) &&COUNT(enterbars=1,N)<25 and holding=0,1,thisclose);
多止损:sell(C<ENTERPRICE-12*MINDIFF,holding,marketr);
空止损:sellshort(C>ENTERPRICE+12*MINDIFF,holding,marketr);
收盘价开仓:
buy(BB10>1 AND AA10>REF(AA10,1) &&COUNT(ENTERBARS=1,N)<25 and holding=0,1, limitr,close);
buyshort(BB10<1 AND AA10<REF(AA10,1) &&COUNT(enterbars=1,N)<25 and holding=0,1,limitr,close);
对手价平仓:
平空:sellshort(BB10>1 AND AA10>REF(AA10,1) &&COUNT(enterbars=1,N)<25 ,0, thisclose);
平多:sell(BB10<1 AND AA10<REF(AA10,1) &&COUNT(enterbars=1,N)<25,0,thisclose);
多止损:sell(C<ENTERPRICE-12*MINDIFF,holding,thisclose);
空止损:sellshort(C>ENTERPRICE+12*MINDIFF,holding,thisclose);
6楼
jinzhe 发表于:2016/1/19 13:51:12
开不了仓是一个笼统的现在,要分为:
1有没有信号
2有信号是否有触发
3有触发是否有报单
4有报单是否有成交
以上4点都是“开不了仓”
7楼
Mikewang 发表于:2016/1/19 14:03:54
6楼程序代入公式后thisclose 只能用在交易系统控制语句中
8楼
jinzhe 发表于:2016/1/19 14:11:10
以下是引用Mikewang在2016/1/19 14:03:54的发言:
6楼程序代入公式后thisclose 只能用在交易系统控制语句中
不太懂这个,请截图一下
9楼
Mikewang 发表于:2016/1/19 14:18:59
6楼程序代入公式后系统提示:thisclose 只能用在交易系统控制语句中
此主题相关图片如下:qq图片20160119141824.jpg

10楼
jinzhe 发表于:2016/1/19 14:23:41
共52 条记录, 每页显示 10 条, 页签:
[1]
[2][3][4][5][6]