以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  帮我改下 。就是 K线变红 就 开多 。K线 变绿 就 平多  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=180620)

--  作者:qq代人发帖
--  发布时间:2020/6/16 14:29:13
--  帮我改下 。就是 K线变红 就 开多 。K线 变绿 就 平多
老师 好 帮我改下 。可以 开多。和 平多 的。就是 K线变红 就 开多 。K线 变绿 就 平多。感谢
 
VAR1:=(CLOSE+HIGH+LOW+OPEN)/4;
VAR2:=SUMBARS(VOL,CAPITAL);
VAR3:=HHV(VAR1,VAR2);
VAR4:=LLV(VAR1,VAR2);
VAR5:=(2*VAR1-VAR4-REF(VAR4,1))/(VAR3-VAR4);
VAR6:=(VAR1-VAR4)/(VAR3-VAR4);
VAR7:=IF(VAR1<=VAR4,VAR5*60,VAR6*60);
VAR8:=600*(EMA(CLOSE,3)-EMA(LOW,30))/EMA(LOW,30);
VAR9:=EMA(VAR8,7);
VARA:=(WINNER(120*CLOSE/100)-WINNER(100*CLOSE/100))*100;
VARB:=(-100)*(WINNER(120*CLOSE/100)-WINNER(100*CLOSE/100))+5;
VARC:=HHV(HIGH,9)-LLV(LOW,9);
VARD:=HHV(HIGH,9)-CLOSE;
VARE:=CLOSE-LLV(LOW,9);
VARF:=VARD/VARC*100-70;
VAR10:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
VAR11:=(2*CLOSE+HIGH+LOW)/4;
VAR12:=SMA(VARE/VARC*100,3,1);
VAR13:=LLV(LOW,34);
VAR14:=SMA(VAR12,3,1)-SMA(VARF,9,1);
VAR15:=IF(VAR14>100,VAR14-100,0);
VAR16:=HHV(HIGH,34);
VAR17:=EMA((VAR11-VAR13)/(VAR16-VAR13)*100,8);
VAR18:=EMA(VAR17,5);
STICKLINE(VAR17-VAR18>0,VAR17,VAR18,8,1), ,COLORRED ;
STICKLINE(VAR17-VAR18<0,VAR17,VAR18,8,1), ,COLORGREEN ; 

--  作者:FireScript
--  发布时间:2020/6/16 14:35:57
--  
 加2句代码在后面

if cross(VAR17,VAR18) then buy(holding=0,1,market);
if cross(VAR18,VAR17) then sell(holding>0,1,market);

--  作者:吉祥如意
--  发布时间:2020/6/16 14:43:33
--  
老师好。请问 如何 调用 60分钟 K线变红 ,在 5分钟里开仓


--  作者:吉祥如意
--  发布时间:2020/6/16 14:44:16
--  
如何 调用 60分钟 K线变 绿 ,在 5分钟里平

--  作者:FireScript
--  发布时间:2020/6/16 14:48:35
--  
 那这个得跨周期调用了。

你先参考下,看下能否自行实现。不行你再跟帖说下。

--  作者:吉祥如意
--  发布时间:2020/6/16 14:49:50
--  
老师 我实现 不了。请老师,帮我下
感谢


--  作者:吉祥如意
--  发布时间:2020/6/16 15:01:05
--  
if cross(VAR17,VAR18) then buy(holding=0,1,market);
if cross(VAR18,VAR17) then sell(holding>0,1,market);
开多:  >=REF(VAR17,VAR18,1);
开空:  <=REF(VAR17,VAR18,1);


老师 能帮我 改下吗。我就能 这个了。我想 这要 调 数据


--  作者:FireScript
--  发布时间:2020/6/16 15:02:50
--  
 新建一个指标A:
cd:c>o;

当前指标下调用:
cd:stkindi(\'\',\'A.cd\',0,5,0);

--  作者:吉祥如意
--  发布时间:2020/6/16 16:11:26
--  
666
感谢 老师