以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  公式模型编写问题提交  (http://weistock.com/bbs/list.asp?boardid=4)
----  求助：  (http://weistock.com/bbs/dispbbs.asp?boardid=4&id=60737)
--  作者：qq代人发帖
--  发布时间：2014/1/8 11:20:31
--  求助：

求助：

1、符合条件：
   在1分或5分或15分下出现下列条件
   VAR2013系统自动买入做多 或 VAR2014系统自动买入做空。
   出场：人工手工平仓或平仓满足时自动平仓。

2、固定止损：3个点
   系统“自动移动止盈”：如果赚了2个点，自动设置止盈0.4，
                         如果赚了5个点，自动设置止盈：把0.4改为2，
                         如果赚了10个点，自动设置止盈：把2改为10，

3、能手工平仓。（由于程序可能有缺陷，不能在最高点平仓，自己认为是转折点时，人为手工平仓）
4、如果模拟盘与真实盘源代码不同时，需要标注提示一些。
5、把滑点控制在1个点之内。

 

MA5:=MA(CLOSE,5);
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARC1:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC1,1) AND VARD;
VAR2013:=VAR19 AND MA20>REF(MA20,1) AND MA5>REF(MA5,1);
VAR2014:=VAR1A AND MA20<REF(MA20,1) AND MA5<REF(MA5,1);
DRAWTEXT(VAR19,L-0.3,\'←买\'),COLOR33FFCC;
DRAWTEXT(VAR1A,H+0.3,\'←卖\'),COLORFF99FF;
DRAWTEXT(VAR2013,L-0.3,\'←买0\'),COLOR33FFCC;
DRAWTEXT(VAR2014,H+0.3,\'←卖0\'),COLORFF99FF;
EMA5:EMA(C,5),COLORMAGENTA,LINETHICK1;
DD:=EMA5<REF(EMA5,1);
IF(DD,EMA5,DRAWNULL),COLORBLUE,LINETHICK2;
--  作者：jinzhe
--  发布时间：2014/1/8 11:31:14
--  
手工干预？手工干预是不是只针对平仓的？开仓有没有？
--  作者：singgod
--  发布时间：2014/1/8 12:28:07
--  

只有平仓

 
--  作者：jinzhe
--  发布时间：2014/1/8 13:24:58
--  

手工处理要用后台系统，不然图表会依然按照图表信号进行处理，持仓判断上依然是按照有持仓的进行判断而不是判断为已经是平仓后的空仓状态。

 

请问用户有专业版账号吗？
--  作者：singgod
--  发布时间：2014/1/8 13:25:41
--  
手工干预

手工干预，只针对平仓。

 
--  作者：singgod
--  发布时间：2014/1/8 13:32:00
--  
正在申请中，请问怎么编写？
--  作者：jinzhe
--  发布时间：2014/1/8 13:42:52
--  

手工干预这点，图表就不行，图表实际持仓获取不了

请出示正式账号
--  作者：jinzhe
--  发布时间：2014/1/8 13:58:09
--  

需要写两个公式，1个公式用来引用，1个公式用来实际操作

公式2用来实际操作

 

公式1代码

runmode:0;
MA5:=MA(CLOSE,5);
ma20:=ma(c,20);
VAR1:=CLOSE>REF(CLOSE,1) AND CLOSE>REF(CLOSE,2);
VAR2:=REF(VAR1,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR3:=REF(VAR2,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR4:=REF(VAR3,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR5:=REF(VAR4,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR6:=REF(VAR5,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR7:=REF(VAR6,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR8:=REF(VAR7,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR9:=REF(VAR8,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARA:=REF(VAR9,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VARB:=REF(VARA,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARC1:=REF(VARB,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VARD:=CLOSE<REF(CLOSE,1) AND CLOSE<REF(CLOSE,2);
VARE:=REF(VARD,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VARF:=REF(VARE,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR10:=REF(VARF,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR11:=REF(VAR10,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR12:=REF(VAR11,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR13:=REF(VAR12,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR14:=REF(VAR13,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR15:=REF(VAR14,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR16:=REF(VAR15,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR17:=REF(VAR16,1) AND CLOSE<=REF(CLOSE,1) AND CLOSE>=REF(CLOSE,2);
VAR18:=REF(VAR17,1) AND CLOSE>=REF(CLOSE,1) AND CLOSE<=REF(CLOSE,2);
VAR19:=REF(VARD OR VARE OR VARF OR VAR10 OR VAR11 OR VAR12 OR VAR13 OR
VAR14 OR VAR15 OR VAR16 OR VAR17 OR VAR18,1) AND VAR1;
VAR1A:=REF(VAR1 OR VAR2 OR VAR3 OR VAR4 OR VAR5 OR VAR6 OR VAR7 OR VAR8 OR VAR9 OR VARA OR VARB OR VARC1,1) AND VARD;
VAR2013:VAR19 AND MA20>REF(MA20,1) AND MA5>REF(MA5,1);
VAR2014:VAR1A AND MA20<REF(MA20,1) AND MA5<REF(MA5,1);
DRAWTEXT(VAR19,L-0.3,\'←买\'),COLOR33FFCC;
DRAWTEXT(VAR1A,H+0.3,\'←卖\'),COLORFF99FF;
DRAWTEXT(VAR2013,L-0.3,\'←买0\'),COLOR33FFCC;
DRAWTEXT(VAR2014,H+0.3,\'←卖0\'),COLORFF99FF;
EMA5:EMA(C,5),COLORMAGENTA,LINETHICK1;
DD:=EMA5<REF(EMA5,1);
IF(DD,EMA5,DRAWNULL),COLORBLUE,LINETHICK2;

 

公式2代码

v_2013_min1:=stkindi(\'\',\'公式1.var2013\',0,1);
v_2013_min5:=stkindi(\'\',\'公式1.var2013\',0,2);
v_2013_min15:=stkindi(\'\',\'公式1.var2013\',0,3);
v_2014_min1:=stkindi(\'\',\'公式1.var2014\',0,1);
v_2014_min5:=stkindi(\'\',\'公式1.var2014\',0,2);
v_2014_min15:=stkindi(\'\',\'公式1.var2014\',0,3);
if v_2013_min1 or v_2013_min5 or v_2013_min15 then tbuy(tbuyholding(0)=0,1,mkt);
if v_2014_min1 or v_2014_min5 or v_2014_min15 then tbuyshort(tsellholding(0)=0,1,mkt);//满足任意一个条件后开仓

if tenterprice-dynainfo(7)>3 and tbuyholding(0)>0 then tsell(1,0,mkt);
if dynainfo(7)-tenterprice>3 and tsellholding(0)>0 then tsellshort(1,0,mkt);//固定止损

if hhv(h,tenterbars+1)-tenterprice>2 and hhv(h,tenterbars+1)-dynainfo(7)>=0.4 and tbuyholding(0)>0 then tsell(1,0,mkt);
if hhv(h,tenterbars+1)-tenterprice>5 and hhv(h,tenterbars+1)-dynainfo(7)>=2 and tbuyholding(0)>0 then tsell(1,0,mkt);
if hhv(h,tenterbars+1)-tenterprice>10 and hhv(h,tenterbars+1)-dynainfo(7)>=10 and tbuyholding(0)>0 then tsell(1,0,mkt);

if tenterprice-llv(l,tenterbars+1)>2 and dynainfo(7)-llv(l,tenterbars+1)>=0.4 and tsellholding(0)>0 then tsellshort(1,0,mkt);
if tenterprice-llv(l,tenterbars+1)>5 and dynainfo(7)-llv(l,tenterbars+1)>=2 and tsellholding(0)>0 then tsellshort(1,0,mkt);
if tenterprice-llv(l,tenterbars+1)>10 and dynainfo(7)-llv(l,tenterbars+1)>=10 and tsellholding(0)>0 then tsellshort(1,0,mkt);//移动止盈


图片点击可在新窗口打开查看此主题相关图片如下：1.png
图片点击可在新窗口打开查看
--  作者：singgod
--  发布时间：2014/1/8 13:58:51
--  

这是老板的思路，如果模拟没有问题，会马上买你们平台的帐号的。

请问这个模拟能不能做出来。看一些呀。

 
--  作者：singgod
--  发布时间：2014/1/8 14:13:06
--  

可以用模式帐户试一些可以用吗？