开拓者期货期权程序化系统交易论坛

标题: 三角形态代码，求转为TB代码 [打印本页]

作者: yebenli 时间: 2013-11-26 15:05:03 标题: 三角形态代码，求转为TB代码

inputs:
Length(20),
Strength(3),
MaximumSlope(10),
MaximumPivots(3);

variables:
FoundHighPivot(false),
FoundLowPivot(False),
N(0),M(0),
SH1(-1), SH2(-1),starBar(0),
SL1(-1), SL2(-1),
TH(-1), TL(-1),
highslope(0.0),lowslope(0.0),ProjectHigh(0.0),ProjectLow(0.0);

if date>date[1] then
starBar=BarNumber;

N=1;
SH1=PivotHighVSBar(N,high,strength,strength,Length);
if SH1<>-1 then begin
N=2;
FoundHighPivot=False;
while FoundHighPivot=False and N<=MaximumPivots begin
SH2=PivotHighVSBar(N,high,strength,strength,Length);
condition1= currentbar-SH2>=starBar;
if SH2<>-1 and high[SH1]<high[SH2] and condition1 then
FoundHighPivot=true;
N=N+1;
end;
end;

N=1;
SL1=PivotLowVSBar(N,low,strength,strength,Length);
if SL1<>-1 then begin
N=2;
FoundLowPivot=False;
while FoundLowPivot=False and N<=MaximumPivots begin
SL2=PivotLowVSBar(n,LOW,strength,strength,Length);
condition2= currentbar-SL2>=starBar;
if SL2<>-1 and Low[SL1]>Low[SL2] and condition2 then
FoundLowPivot=true;
N=N+1;
end;
end;

if FoundHighPivot and FoundLowPivot then begin

TH=tl_new(date,time[sh2],high[sh2],date,time[SH1],high[SH1]);

TL=tl_new(date,time[sl1],low[sl1],date,time[Sl2],low[Sl2]);

end;
[attach]17865[/attach]

作者: YLBZ 时间: 2013-11-29 16:25:00

请注明代码的含义

作者: sumvel 时间: 2013-12-5 22:05:22

程序化交流，请加群310499265，验证:TB论坛。

作者: jzhfj 时间: 2013-12-6 20:26:42

这应该是 Mc 下编的吧
TH=tl_new(date,time[sh2],high[sh2],date,time[SH1],high[SH1]);

TL=tl_new(date,time[sl1],low[sl1],date,time[Sl2],low[Sl2]);
TH=tl_new 和 TL=tl_new 不知是什么函数

highslope(0.0),lowslope(0.0),ProjectHigh(0.0),ProjectLow(0.0)这几个变量也没有用到

作者: win5ms 时间: 2016-12-2 15:16:56

mc的

欢迎光临开拓者期货期权程序化系统交易论坛 (http://bbs.tb18.net/)