今日所用代码
//------------------------------------------------------------------------
// 简称: test_0515_2025
// 名称:
// 类别: 策略应用
// 类型: 用户应用
// 输出: Void
//------------------------------------------------------------------------
Params
//此处添加参数
Vars
//此处添加变量
global array<Integer> order_id;
Global Numeric send_time;
Global Numeric a(0);
Defs
//此处添加策略函数
Numeric orderdel_auto(Numeric t_time,Numeric id, Numeric t_add)
{
if(timediff(t_time,CurrentTime) > 10)
{
A_DeleteOrder(id);
}
return 0;
}
Events
//此处实现事件函数
//初始化事件函数,策略运行期间,首先运行且只有一次
OnInit()
{
}
OnFill(FillRef ordFill)
{
}
//Bar更新事件函数,参数indexs表示变化的数据源图层ID数组
OnBar(ArrayRef<Integer> indexs)
{
//Commentary("time="+text(time));
//print("CurrentTime="+text(CurrentTime));
//print("TimeDiff="+text(TimeDiff(time,currenttime)));
Commentary("date="+text(date));
//Commentary("currentdate="+text(currentdate));
Commentary("TrueDate="+text(TrueDate));
//print("---------------------------");
//data1.Commentary("是否交易时间="+IIFstring(IsTradingTime(date+time),"有","无"));
data1.Commentary("isdata0trading="+IIFString(data0.IsTradingTime(data1.date+data1.time),"d0有效","d0无效") );
//print("d0isdata0trading="+IIFString(IsTradingTime(data0.Symbol,date+time),"d1有效","d0无效") );
if(BarStatus==2 and CurrentBar%5 == 0 and a == 0)
{
A_SendOrderEx(Symbol,Enum_Buy,Enum_Entry,1,open*0.98,order_id);
send_time = CurrentTime;
print("ggCurrentTime="+text(CurrentTime));
//Numeric i =0 ;
a = 1;
}
if( CurrentBar%5!=0 and a<>0)
{
a = 0;
}
orderdel_auto(send_time ,order_id[0],10);
}
//------------------------------------------------------------------------
// 编译版本 2025/5/15 101607
// 版权所有 wangkaiming
// 更改声明 TradeBlazer Software保留对TradeBlazer平台
// 每一版本的TradeBlazer策略修改和重写的权利
//------------------------------------------------------------------------