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

以文本方式查看主题

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

--  作者：wjxkjs
--  发布时间：2009/11/20 22:53:50
--  继续求助

BK:=B-B1>0 AND TIME<144500;

SK:=B-B1<0 AND TIME<144500;

SP:=B-B1<0 OR TIME>=145000;

BP:=B-B1>0 OR TIME>=145000,

SELLSHORT(BP and HOLDING<0,HOLDING,MARKET);

BUY(BK,1,MARKET);

SELL(SP and HOLDING>0,HOLDING,MARKET);

BUYSHORT(SK,1,MARKET);

检测说SELLSHORT(BP and HOLDING<0,HOLDING,MARKET);少左括号？？？不明白了

--  作者：admin
--  发布时间：2009/11/20 23:00:05
--
你贴完整公式上来

--  作者：wjxkjs
--  发布时间：2009/11/20 23:07:56
--

VARA:=LLV(LOW,35);

VARB:=HHV(HIGH,30);

VARC:=EMA((CLOSE-VARA)/(VARB-VARA)*4,4)*25;

QS:= VARC,COLORGREEN;

STICKLINE(VARC<10 && 100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14))>97,0,25,COLORYELLOW,0);

STICKLINE(VARC>90,100,85,COLORRED,0);

VARD:=87.5;

VARE:=(VARC-LLV(VARC,4))/(HHV(VARC,4)-LLV(VARC,4))*4*25;

VAR6:=(2*CLOSE+HIGH+LOW)/4;

VAR8:=LLV(LOW,30);

VARAA:=HHV(HIGH,30);

B:=EMA((VAR6-VAR8)/(VARAA-VAR8)*100,8);

B1:=EMA(B,5);

V1:=(2*CLOSE+HIGH+LOW)/4; V2:=LLV(LOW,21);

VA:=HHV(HIGH,34);

FB:=EMA((V1-V2)/(VA-V2)*100,13);

FBB:=EMA((0.667*REF(FB,1)+0.333*FB),2);

BK:=B-B1>0 AND TIME<144500;

SK:=B-B1<0 AND TIME<144500;

SP:=B-B1<0 OR TIME>=145000;

BP:=B-B1>0 OR TIME>=145000,

SELLSHORT(BP and HOLDING<0,HOLDING,MARKET);

BUY(BK,1,MARKET);

SELL(SP and HOLDING>0,HOLDING,MARKET);

BUYSHORT(SK,1,MARKET);

老师辛苦了！！

--  作者：wjxkjs
--  发布时间：2009/11/20 23:09:49
--

知道了错的地方了

--  作者：admin
--  发布时间：2009/11/20 23:10:31
--
解决了？

--  作者：wjxkjs
--  发布时间：2009/11/20 23:12:09
--
不过在每个K线上都是开多的信号。我用http://www.weistock.com/bbs/dispbbs.asp?boardid=4&Id=162的方法解决一下。就不一样了。

--  作者：wjxkjs
--  发布时间：2009/11/20 23:16:56
--

{平多}
sell(holding>0 and sp,0,thisclose);   //测试时，需要跳变
Tsell(Tholding>0 and sp,0,lmt,c); //实战时，冒头就行，注意取值
{平空}
sellshort(holding<0 and bp,0,thisclose);
Tsellshort(Tholding<0 and bp,0,lmt,c);
{开多}
buy(holding=0 and bk ,intpart(asset*0.4/close),thisclose);
Tbuy(Tholding=0 and bk,intpart(Tasset*0.1/close),lmt,c);
{开空}
buyshort( holding=0 and sk,intpart(asset*0.4/close),thisclose);
Tbuyshort(Tholding=0 and sk,intpart(Tasset*0.1/close),lmt,c);

资产_control:asset,COLORCYAN,noaxis;
//持仓:holding,noaxis;

这里的0是什么意思？？开多开空时是按照资金的比率买入的呀！那么应该平全部仓位，缺省才对

--  作者：admin
--  发布时间：2009/11/20 23:18:42
--

平仓时，如果指定是0就表示全部平仓

--  作者：wjxkjs
--  发布时间：2009/11/20 23:27:41
--
老师，谢谢你！我将修改后的图发给你。你给我测试一下。我不懂为什么除了K线外还有另外一个线？？

--  作者：wjxkjs
--  发布时间：2009/11/20 23:28:49
--

VARA:=LLV(LOW,35);
VARB:=HHV(HIGH,30);
VARC:=EMA((CLOSE-VARA)/(VARB-VARA)*4,4)*25;
QS:= VARC,COLORGREEN;

VARD:=87.5;
VARE:=(VARC-LLV(VARC,4))/(HHV(VARC,4)-LLV(VARC,4))*4*25;

VAR6:=(2*CLOSE+HIGH+LOW)/4;
VAR8:=LLV(LOW,30);
VARAA:=HHV(HIGH,30);
B:=EMA((VAR6-VAR8)/(VARAA-VAR8)*100,8);
B1:=EMA(B,5);

V1:=(2*CLOSE+HIGH+LOW)/4; V2:=LLV(LOW,21);
VA:=HHV(HIGH,34);
FB:=EMA((V1-V2)/(VA-V2)*100,13);
FBB:=EMA((0.667*REF(FB,1)+0.333*FB),2);

BK:=B-B1>0 AND TIME<144500;
SK:=B-B1<0 AND TIME<144500;
SP:=B-B1<0 OR TIME>=145000;
BP:=B-B1>0 OR TIME>=145000;

{平多}
sell(holding>0 and sp,0,thisclose);   //测试时，需要跳变
Tsell(Tholding>0 and sp,0,lmt,c); //实战时，冒头就行，注意取值
{平空}
sellshort(holding<0 and bp,0,thisclose);
Tsellshort(Tholding<0 and bp,0,lmt,c);
{开多}
buy(holding=0 and bk ,intpart(asset*0.4/close),thisclose);
Tbuy(Tholding=0 and bk,intpart(Tasset*0.1/close),lmt,c);
{开空}
buyshort( holding=0 and sk,intpart(asset*0.4/close),thisclose);
Tbuyshort(Tholding=0 and sk,intpart(Tasset*0.1/close),lmt,c);

资产_control:asset,COLORCYAN,noaxis;
//持仓:holding,noaxis;