2013年7月20日 (六) 15:31 Coogle

2013-07-20T15:31:04Z

2013年6月20日 (四) 01:36 Foxar

2013-06-20T01:36:59Z

John: 以“金魔方智能交易攻略（8）-点数图突破交易策略作者：仁心慧能 //-------金魔方智能交易公式-------------- //例8_1 点数图...”为内容创建页面

2013-04-23T15:29:46Z

以“金魔方智能交易攻略（8）-点数图突破交易策略作者：仁心慧能 //-------金魔方智能交易公式-------------- //例8_1 点数图...”为内容创建页面

最新页面

金魔方智能交易攻略（8）-点数图突破交易策略

作者：仁心慧能

//-------金魔方智能交易公式--------------
//例8_1 点数图突破交易策略
{策略：
1.价格升破点数图最近几列的最高点时平空开多
2.价格跌破点数图最近几列的最低点时平多开空
***点数图的算法和画法请问度娘***
}
input:
格值(30),转向格(5),突破列数(3),偏移量(1);
const: 最大列数(10); //突破列数应小于此数
array: 极点值[最大列数](0); //上涨列为最高格值，下跌列为最低格值
variable: 转向价(0),涨跌方向(0),
突破买价(99999),突破卖价(0);//初始化

if BarPos <= 1 then begin
转向价 := Round(Close);
涨跌方向 := 0; //初始化为无方向
突破买价 := High + 偏移量;
突破卖价 := Low - 偏移量;
end

else begin
if 涨跌方向 = 0 then begin //尚未确定方向
if High >= 转向价 + 格值 * 转向格 then begin
极点值[0] := 转向价 + 格值 * 转向格;
涨跌方向 := 1; //上涨
end
else if Low <= 转向价 - 格值 * 转向格 then begin
极点值[0] := 转向价 - 格值 * 转向格;
涨跌方向 := -1; //下跌
end;
end

else if 涨跌方向 = 1 then begin //当前列为上涨
if High >= 极点值[0] + 格值 then begin //增加向上的X格子
while High >= 极点值[0] + 格值 do begin
极点值[0] := 极点值[0] + 格值;
转向价 := 极点值[0] - 格值 * 转向格; //抬高转向价
end;
end
else if Low <= 转向价 then begin //上涨转为下跌
for n = 0 to 最大列数-1 do begin //数组移位
极点值[最大列数-n] := 极点值[最大列数-n-1];
end;
//以下使点数图新增下跌列
极点值[0] := 转向价;
涨跌方向 := -1; //转为下跌
转向价 := 极点值[0] + 格值 * 转向格;
while Low <= 极点值[0] - 格值 do begin
极点值[0] := 极点值[0] - 格值;
转向价 := 极点值[0] + 格值 * 转向格;
end;
end;
end //当前列为上涨

else begin //当前列为下跌
if Low <= 极点值[0] - 格值 then begin //增加向下的O格子
while Low <= 极点值[0] - 格值 do begin
极点值[0] := 极点值[0] - 格值;
转向价 := 极点值[0] + 格值 * 转向格;
end;
end
else if High >= 转向价 then begin //下跌转为上涨
for n = 0 to 最大列数-1 do begin
极点值[最大列数-n] := 极点值[最大列数-n-1];
end;
极点值[0] := 转向价;
涨跌方向 := 1;
转向价 := 极点值[0] - 格值 * 转向格;
while High >= 极点值[0] + 格值 do begin
极点值[0] := 极点值[0] + 格值;
转向价 := 极点值[0] - 格值 * 转向格;
end;
end;
end; //当前列为下跌 //根据最近若干列的极点值计算突破价位
value1:= 0;
value2:= 99999;
for n = 1 to 突破列数 do begin
if 极点值[n] > value1 then value1 := 极点值[n];
if 极点值[n] < value2 then value2 := 极点值[n];
end;
突破买价 := value1 + 偏移量;
突破卖价 := value2 - 偏移量;
end;

Buy('', DEFAULT, 突破买价, -1, OT_STOP);
SellShort('', DEFAULT, 突破卖价, -1, OT_STOP);

买线: 突破买价, Precision0;
卖线: 突破卖价, Precision0;
盈利因子: -GrossProfit/GrossLoss, Precision2, LineThick0;
盈亏比: -(GrossProfit/NumWinTrades)/(GrossLoss/NumLosTrades), Precision2, LineThick0;
胜率%: PercentProfit, Precision2, LineThick0;
净利: NetProfit, Precision2,LineThick0;
当前连亏次数: NumConsecLosers, Precision0, LineThick0;
{注解：
1.用variable定义变量可增加可读性，在本例其实可以省略
2.Precision指定输出数值的小数位数
3.盈亏比=平均盈利/平均亏损，GrossLoss返回值为负数
}

如图所示：

[[Image:Dstp1.gif]]

点数图算法的代码比较复杂，如果每个涉及到点数图的公式都包含那么多代码会比较难看，

我们是否可以把它做成公共代码供其它公式调用呢？用传统的调用指标公式的方法不太好使，

而且一次调用只能返回一个结果，本例的点数图就需要返回“突破买价”和“突破卖价”两个结果，

用户能否自编函数，并且让这个函数能同时返回多个结果呢？

敬请关注本攻略！

@@ 第88行： / 第88行： @@
      end;
-     Buy('', DEFAULT, 突破买价, -1, OT_STOP);
+     Buy(' ', DEFAULT, 突破买价, -1, OT_STOP);
-     SellShort('', DEFAULT, 突破卖价, -1, OT_STOP);
+     SellShort(' ', DEFAULT, 突破卖价, -1, OT_STOP);
      买线: 突破买价, Precision0;

@@ 第1行： / 第1行： @@
-金魔方智能交易攻略（8）-点数图突破交易策略
+智能交易攻略（8）-点数图突破交易策略
 作者：仁心慧能
-     //-------金魔方智能交易公式--------------
+     //-------智能交易公式--------------
      //例8_1 点数图突破交易策略
      {策略：

点数图突破交易策略 - 版本历史

2013年7月20日 (六) 15:31 Coogle

2013年6月20日 (四) 01:36 Foxar

John: 以“金魔方智能交易攻略（8）-点数图突破交易策略 作者：仁心慧能 //-------金魔方智能交易公式-------------- //例8_1 点数图...”为内容创建页面

John: 以“金魔方智能交易攻略（8）-点数图突破交易策略作者：仁心慧能 //-------金魔方智能交易公式-------------- //例8_1 点数图...”为内容创建页面