以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (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=6694)

--  作者:剑神一笑
--  发布时间:2011/5/30 11:08:34
--  求助
我编了个简单的模型,请老师帮我看一下有没有问题。 RSV:= (CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K:=SMA(FASTK,3,1); D:=SMA(K,3,1); TJBK:=CROSS(K,D) AND D<20; TJSK:=CROSS(D,K) AND="AND" D="D" >80; TJBP:=CROSS(K,D); TJSP:=CROSS(D,K); IF TJBP THEN BEGIN SELLSHORT(HOLDING<0,0,MARKET); END IF TJSP="TJSP" THEN BEGIN SELL(HOLDING>0,O,MARKET); END IF TJBK THEN BEGIN BUY(HOLDING=0,1,MARKET); END IF TJSK THEN BEGIN BUYSHORT(HOLDING=0,1,MARKET); END 以上是KD线的图表模式
--  作者:剑神一笑
--  发布时间:2011/5/30 11:14:51
--  
又不能分行???
--  作者:董小球
--  发布时间:2011/5/30 11:15:02
--  


 RSV:= (CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K:=SMA(FASTK,3,1);
 D:=SMA(K,3,1); TJBK:=CROSS(K,D) AND D<20;
 TJSK:=CROSS(D,K) AND D=>80;
  TJBP:=CROSS(K,D);
 TJSP:=CROSS(D,K);
 IF TJBP THEN BEGIN SELLSHORT(HOLDING<0,0,MARKET);
 END
 IF TJSP="TJSP" THEN BEGIN SELL(HOLDING>0,O,MARKET);
 END
 IF TJBK THEN BEGIN BUY(HOLDING=0,1,MARKET);
  END
  IF TJSK THEN BEGIN BUYSHORT(HOLDING=0,1,MARKET);
  END

 

这样才对

你写的有点语法错误,至于模型是否是好坏,这个我没有看!


--  作者:剑神一笑
--  发布时间:2011/5/30 11:46:56
--  
谢谢谢谢 重要的是语法 其他无所谓
--  作者:剑神一笑
--  发布时间:2011/5/30 11:56:08
--  

 

[此贴子已经被作者于2011-5-30 11:57:26编辑过]

--  作者:剑神一笑
--  发布时间:2011/5/30 11:56:29
--  

 RSV:= (CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 K:=SMA(RSV,3,1);
 D:=SMA(K,3,1);

 

 TJBK:=CROSS(K,D) AND D=<20;
 TJSK:=CROSS(D,K) AND D=>80;
 TJBP:=CROSS(K,D);
 TJSP:=CROSS(D,K);
 
 IF TJBP="TJBP" THEN
 BEGIN
     SELLSHORT(HOLDING<0,0,MARKET);
 END
 
 IF TJSP="TJSP" THEN
 BEGIN
     SELL(HOLDING>0,O,MARKET);
 END

 

 IF TJBK="TJBK" THEN
 BEGIN
     BUY(HOLDING=0,1,MARKET);
 END
 
 IF TJSK="TJSK" THEN
 BEGIN
     BUYSHORT(HOLDING=0,1,MARKET);
 END

 

 

[此贴子已经被作者于2011-5-30 11:58:09编辑过]

--  作者:剑神一笑
--  发布时间:2011/5/30 11:57:03
--  
这样可以了吗?请老师再指点。
--  作者:剑神一笑
--  发布时间:2011/5/30 13:27:41
--  

我发现修改前是可以显示交易信号的,但不能发出交易指令。修改后既不能发出交易指令也不能发出图表信号


--  作者:剑神一笑
--  发布时间:2011/5/30 14:27:56
--  

按照群里朋友给的建议,我改成这样了

 

 RSV:= (CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 K:=SMA(RSV,3,1);
 D:=SMA(K,3,1);

 TJBK:=CROSS(K,D) AND (K-D)>1;
 TJSK:=CROSS(D,K) AND (D-K)>1;
 TJBP:=CROSS(K,D);
 TJSP:=CROSS(D,K);
 
 IF HOLDING<0 THEN BEGIN
   IF TJBP THEN
   BEGIN
     SELLSHORT(1,0,MARKET);
   END
 END
 
 IF HOLDING>0 THEN BEGIN
   IF TJSP THEN
   BEGIN
     SELL(1,0,MARKET);
   END
 END 
 

 IF HOLDING=0 THEN BEGIN
   IF TJBK THEN
   BEGIN
     BUY(1,1,MARKET);
   END
 END
 
 IF HOLDING=0 THEN BEGIN
   IF TJSK THEN
   BEGIN
     BUYSHORT(1,1,MARKET);
   END
 END
 

 

可还是只有图表信号,没有交易指令,会是哪里的问题?
--  作者:剑神一笑
--  发布时间:2011/5/30 14:35:00
--  

谢谢  解决了