文华财经T8自动化交易程序策略模型指标公式源码

文华财经T8自动化交易程序策略模型指标公式源码:

//定义变量

//资金管理与仓位控制

8CS:=INITMONEY;//初始资金

8QY:=MONEYTOT;//实际权益

8QY1:=MIN(MA(8QY,5*R),MA(8QY,2*R));

FXBL:=N1;

DBKS:8QY1*N1;//计算单笔允许亏损额度

BZDKS:=MAX(AA-BB,N*1T)*UNIT;

SZDKS:=MAX(BB-AA,N*1T)*UNIT;

BKKK:=DBKS/BZDKS;

SKKK:=DBKS/SZDKS;//计算手数

BKK:=IF(BKKK>=0.8,ROUND(BKKK,0),1);

SKK:=IF(SKKK>=0.8,ROUND(SKKK,0),1);

BKS:IF(X=0,1,IF(BKK>1&&((CJ&&(CLOSEMINUTE<120))||TNUMSEQWIN>5),ROUND(BKK/2,0),BKK));//确定开多仓手数

SKS:IF(X=0,1,IF(SKK>1&&((CJ&&(CLOSEMINUTE<120))||TNUMSEQWIN>5),ROUND(SKK/2,0),SKK));//确定开空仓手数

//持仓成本计算

BARSBK1:=IFELSE(BARSBK>=1,BARSBK,0);

BARSSK1:=IFELSE(BARSSK>=1,BARSSK,0);

BARSBP1:=IFELSE(BARSBP>=1,BARSBP,0);

BARSSP1:=IFELSE(BARSSP>=1,BARSSP,0);

BKJJ0:LOOP2(ISLASTBK&&COUNTSIG(LOWER_LONG,BARSBK+1)=0,LONG_AVPRICE ,LOOP2(ISLASTBK&&REF(VALUEWHEN(BKVOL<>REF(BKVOL,1),BKVOL<REF(BKVOL,1)),BARSBK1+1)&&BARSBK>BARSBK1&&COUNTSIG(LOWER_LONG,BARSBK+1)>0,(REF(LONG_AVPRICE,BARSSP1+1)*REF(BKVOL,BARSBK1+1)+BKPRICE*REF(BKVOL,BARSBK-1))/BKVOL,REF(BKJJ0,BARSBK1))),NODRAW;//向上取数据合约整数BK均价

SKJJ0:LOOP2(ISLASTSK&&COUNTSIG(LOWER_SHORT,BARSSK+1)=0,SHORT_AVPRICE,LOOP2(ISLASTSK&&REF(VALUEWHEN(SKVOL<>REF(SKVOL,1),SKVOL<REF(SKVOL,1)),BARSSK1+1)&&BARSSK>BARSSK1&&COUNTSIG(LOWER_SHORT,BARSSK+1)>0,(REF(SHORT_AVPRICE,BARSBP1+1)*REF(SKVOL,BARSSK1+1)+SKPRICE*REF(SKVOL,BARSSK-1))/SKVOL,REF(SKJJ0,BARSSK1))),NODRAW;//向下取数据合约整数SK均价

//开仓指令

ISLASTBK=0&&BKVOL=0&&BB1&&C<=BKJJ,BK;//开多指令

ISLASTSK=0&&SKVOL=0&&SS1&&C>=SKJJ,SK;//开空指令

//平仓指令

//通用清仓条件

QQ01:=(BKVOL>0||ISLASTBK)&&BARSBK1>0&&QB1;

QQ02:=(SKVOL>0||ISLASTSK)&&BARSSK1>0&&QS1;

QQ11:=(BKVOL>0||ISLASTBK)&&BARSBK1>0&&QB2;

QQ12:=(SKVOL>0||ISLASTSK)&&BARSSK1>0&&QS2;

QQ21:=(BKVOL>0||ISLASTBK)&&BARSBK1>0&&QB3;

QQ22:=(SKVOL>0||ISLASTSK)&&BARSSK1>0&&QS3;

//清仓指令

QQ01||QQ02,SP;

QQ11||QQ12,SP;

QQ21||QQ22,SP;

QQ01||QQ02,SP;

QQ11||QQ12,SP;

QQ21||QQ22,SP;

//平仓

(BKVOL>0||ISLASTBK)&&PB1,SP;

(SKVOL>0||ISLASTSK)&&PS1,BP;

(BKVOL>0||ISLASTBK)&&PB2,SP;

(SKVOL>0||ISLASTSK)&&PS2,BP;

(BKVOL>0||ISLASTBK)&&PB3,SP;

(SKVOL>0||ISLASTSK)&&PS3,BP;

//止盈减仓

ISLASTBK&&BKVOL>0&&ZYB1,LOWER_LONG(BKVOL*IF(BKVOL>WW,2/3,1/2));

ISLASTSK&&SKVOL>0&&ZYS1,LOWER_SHORT(SKVOL*IF(SKVOL>WW,2/3,1/2));

ISLASTBK&&BKVOL>0&&ZYB2,LOWER_LONG(BKVOL*1/2);

ISLASTSK&&SKVOL>0&&ZYS2,LOWER_SHORT(SKVOL*1/2);

BKVOL>0&&VALUEWHEN(BKVOL<>REF(BKVOL,1),BKVOL<REF(BKVOL,1))&&ZYB3,SP;

SKVOL>0&&VALUEWHEN(SKVOL<>REF(SKVOL,1),SKVOL<REF(SKVOL,1))&&ZYS3,BP;

(BKVOL>0||ISLASTBK)&&ZYB4,SP;

(SKVOL>0||ISLASTSK)&&ZYS4,BP;

//信号执行

T_COMMAND(IF(ISLASTBK=0&&BKVOL=0&&BB1&&C<=BKJJ,BKS,IF(ISLASTSK=0&&SKVOL=0&&SS1&&C>=SKJJ,SKS,NULL)));

SETSIGPRICETYPE(BK,CMPETITV_ORDER,CANCEL_ORDER);

SETSIGPRICETYPE(SK,CMPETITV_ORDER,CANCEL_ORDER);

TRACING_ORDER(BP,PASSIVE_ORDER,60);

TRACING_ORDER(SP,PASSIVE_ORDER,60);

AUTOFILTER;

相关推荐
学Linux的语莫11 分钟前
搭建服务器VPN,Linux客户端连接WireGuard,Windows客户端连接WireGuard
linux·运维·服务器
黑牛先生18 分钟前
【Linux】进程-PCB
linux·运维·服务器
Karoku06624 分钟前
【企业级分布式系统】ELK优化
运维·服务器·数据库·elk·elasticsearch
安迁岚2 小时前
【SQL Server】华中农业大学空间数据库实验报告 实验三 数据操作
运维·服务器·数据库·sql·mysql
打码人的日常分享2 小时前
商用密码应用安全性评估,密评整体方案,密评管理测评要求和指南,运维文档,软件项目安全设计相关文档合集(Word原件)
运维·安全·web安全·系统安全·规格说明书
追风赶月、3 小时前
【Linux】线程概念与线程控制
linux·运维·服务器
CP-DD3 小时前
Docker 容器化开发 应用
运维·docker·容器
努力的悟空4 小时前
国土变更调查拓扑错误自动化修复工具的研究
运维·自动化
周末不下雨6 小时前
win11+ubuntu22.04双系统 | 联想 24 y7000p | ubuntu 22.04 | 把ubuntu系统装到1T的移动固态硬盘上!!!
linux·运维·ubuntu
耗同学一米八6 小时前
2024 年河北省职业院校技能大赛网络建设与运维赛项样题四
运维·网络