永发信息网

有没有公式高手,帮忙改下这个公式!谢谢

答案:1  悬赏:40  手机版
解决时间 2021-05-06 00:21

VARIABLE:dayCount=1,PositionCount=1,SellSign=0;
VARIABLE:EntAndExitSign=1,EntPoint=0,ExitPoint=0;
VARIABLE:N=0;

MA1:MA(C,5);
MA3:MA(C,10);

M:=MA(TR,20);
BUYHHV:=HHV(H,20);
SELLLLV:=LLV(L,10);

ss:n,linethick0;

IF BARPOS>=21 THEN BEGIN
IF BARPOS=21 THEN
N:=M;
IF DayCount=6 OR BARPOS=21 THEN BEGIN{5天调整N值}
N:=(19*N+TR)/20;{计算N值}
DayCount:=2;
END
DayCount:=DayCount+1;
EntPoint:=ENTERBARS+1;
IF EntPoint=EntAndExitSign THEN BEGIN{说明STOP指令买进头寸成功}
PositionCount:=PositionCount+1;{头寸计数}
SellSign:=True;{开始以STOP卖出,如果达到指定的价格}
END
IF PositionCount=1 THEN BEGIN{第一头寸}
HOW:=CASH(0)*0.01/N;{波动性百分比决定头寸规模}
开1:BUY(H>=BUYHHV,HOW,MARKET);{在20日新高STOP指令买进}
END
IF PositionCount=2 THEN BEGIN{如到第二头寸}
HOW:=CASH(0)*0.01/N;{波动性百分比决定头寸规模}
开2:BUY(H>=ENTERPRICE+0.5*N,HOW,MARKET);{在上头寸(即第一头寸)+0.5个N以STOP指令买进}
END
IF PositionCount=3 THEN BEGIN{如到第三头寸}
HOW:=CASH(0)*0.01/N;
开3:BUY(H>=ENTERPRICE+0.5*N,HOW,MARKET);{在上头寸(即第二头寸)+0.5个N以STOP指令买进}
END
IF PositionCount=4 THEN BEGIN
HOW:=CASH(0)*0.01/N;
开4:BUY(H>=ENTERPRICE+0.5*N,HOW,MARKET);
END
IF SellSign=True THEN BEGIN
    ExitPoint:=EXITBARS+1;
    IF ExitPoint=EntAndExitSign THEN BEGIN {说明卖出成功}
       PositionCount:=1;{头寸计算复原}
       SellSign:=False;
    END
    IF ENTERPRICE-2*N then SELL(L<=SELLLLV,100%,MARKET);{退出离盈利头寸}
    ELSE
    SELL(L<=ENTERPRICE-2*N,100%,MARKET);{退出亏损头寸}
    END
END;

 

 

这是期货金字塔决策系统用的公式,目前只能实现多的开平仓,想请高手帮改下,让它可实现空开仓和空平,而且在平多的时候同时开空仓,在平空的时候开多仓。谢谢了

最佳答案
首先第一句的颜色渐进有问题,我不知道这种方法在大智慧上显示的图形是怎样的?(理论上讲这种表述是没有显示的),如果这是一个完整的公式的话,那么应该是一个附图公式,做小量修改:做空95:HHV((HIGH+LOW+OPEN+2*CLOSE)/5+H-L,5),COLORBLUE;做空68:HHV((HIGH+LOW+OPEN+2*CLOSE)/5*2-L,5),COLORRED;平衡点:LLV((HIGH+LOW+OPEN+2*CLOSE)/5,3),COLORYELLOW,POINTDOT;做多68:LLV((HIGH+LOW+OPEN+2*CLOSE)/5*2-H,8),COLORGREEN;做多95:LLV((HIGH+LOW+OPEN+2*CLOSE)/5-H+L,8),COLORMAGENTA;F:=100*(C-REF(C,1))/REF(C,1);今小昨:=IF(C<REF(O,1) AND F<0,1,0);P1:=今小昨;今小前:=IF(C<REF(O,2) AND F<0,1,0);P2:=今小前;STICKLINE(P1=0 AND REF(P1,1)=1 AND P2=0 AND REF(P2,1)=1,OPEN,CLOSE,3,0),COLORMAGENTA;STICKLINE(P1=1 AND REF(P1,1)=0 AND P2=1 AND REF(P2,1)=0,OPEN,CLOSE,1.5,0),COLORGREEN;
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
半年内吃五次紧急避孕药会怎么样
不想秃废怎么办
哪里有要铲车维修工的?
为何说人不懂音乐是五音不全而不是七音
有什么比较萌的讲巫女的动漫。或者是女主角有
•问道600道刷到700用多久?
梦幻西游69DT全力加不带装备有多少伤害?
为什么世上有那么多事不公平?
风筝鲁迅句子赏析,药鲁迅赏析
新飞飞砸武器+7有+7笔了.还需要啥?
QQ空间手机回复留言 有手机留言注释吗
买家已经拍下我的游戏币 但是显示等待买家付
40如何升的快该去哪升
怎样才能交到好的朋友
配股发售是好还是不好
推荐资讯
合伙人协议书范文
感冒腰疼怎么缓解疼痛,一感冒就脸痛是怎么回
怎样才能更懂事儿阿,不粘人呢?
安然纳米汗蒸养生馆太仓万达店在什么地方啊,
“那呢”日语是什么意思?
香味园蒸包店我想知道这个在什么地方
由乃台词罗马音,求噬神者2rb中由乃唱的这首光
放入水杯中的回形针的数量与哪些因素有关?请
现在CF哪个版本的自雷者能用
诺基亚5800XM沈阳现在什么价格?
09情歌来几首?
有好的动漫推荐吗??
正方形一边上任一点到这个正方形两条对角线的
阴历怎么看 ?