共10 条记录, 每页显示 10 条, 页签: [1]

标题：麻烦老师修改公式

1楼

haoyun896 发表于：2015/7/23 13:48:47

fc:=close,fh:=h,fl:=l,fcolor:=0,ft1:=0,fb1:=0,fi:=0,t[4]=0,b[4]=0,pt=1,pb=1;

if datacount<2 then exit;

for i=1 to 4 do begin t[i]:=i;b[i]:=1; end; for i=2 to datacount do begin

if fc[i]>fc[t[pt]] then begin

fh[i]:=fc[i];fl[i]:=fc[t[1]];fcolor[i]:=1; b[4]:=b[3];b[3]:=b[2];b[2]:=b[1];b[1]:=t[1]; t[4]:=t[3];t[3]:=t[2];t[2]:=t[1];t[1]:=i; pt:=1;

pb:=if(pb=3,3,pb+1); end;

else if fc[i]<fc[b[pb]] then begin

fh[i]:=fc[b[1]];fl[i]:=fc[i];fcolor[i]:=-1; t[4]:=t[3];t[3]:=t[2];t[2]:=t[1];t[1]:=b[1]; b[4]:=b[3];b[3]:=b[2];b[2]:=b[1];b[1]:=i; pb:=1;

pt:=if(pt=3,3,pt+1); end;

else if fc[i]<=fc[t[pt]] and fc[i]>=fc[b[pb]] then begin

fh[i]:=fh[i-1];fl[i]:=fl[i-1]; fcolor[i]:=fcolor[i-1]; end;

ft1[i]:=t[1];fb1[i]:=b[1];fi[i]:=i; end;

STICKLINE(fcolor=1,fh,fl,10,0) colorred; STICKLINE(fcolor=-1,fh,fl,10,0) colorgreen;

麻烦老师修改成金字塔的公式，谢谢

2楼

jinzhe 发表于：2015/7/23 13:52:43

fc:=close,fh:=h,fl:=l;fcolor:=0;ft1:=0;fb1:=0;fi:=0;t[4]:=0;b[4]:=0;pt:=1;pb:=1;

if datacount<2 then exit;

for i=1 to 4 do begin t[i]:=i;b[i]:=1; end; for i=2 to datacount do begin

if fc[i]>fc[t[pt]] then begin

fh[i]:=fc[i];fl[i]:=fc[t[1]];fcolor[i]:=1; b[4]:=b[3];b[3]:=b[2];b[2]:=b[1];b[1]:=t[1]; t[4]:=t[3];t[3]:=t[2];t[2]:=t[1];t[1]:=i; pt:=1;

pb:=if(pb=3,3,pb+1); end;

else if fc[i]<fc[b[pb]] then begin

fh[i]:=fc[b[1]];fl[i]:=fc[i];fcolor[i]:=-1; t[4]:=t[3];t[3]:=t[2];t[2]:=t[1];t[1]:=b[1]; b[4]:=b[3];b[3]:=b[2];b[2]:=b[1];b[1]:=i; pb:=1;

pt:=if(pt=3,3,pt+1); end;

else if fc[i]<=fc[t[pt]] and fc[i]>=fc[b[pb]] then begin

fh[i]:=fh[i-1];fl[i]:=fl[i-1]; fcolor[i]:=fcolor[i-1]; end;

ft1[i]:=t[1];fb1[i]:=b[1];fi[i]:=i; end;

STICKLINE(fcolor=1,fh,fl,10,0) colorred; STICKLINE(fcolor=-1,fh,fl,10,0) colorgreen;

3楼

haoyun896 发表于：2015/7/24 10:40:49

老师，你好，能不能把这个公式改成交易模型，出现红柱时做多，10个点止赢，5个点止损，出现绿柱时做空，也是10个点止赢，5个点止损，谢谢。

4楼

jinzhe 发表于：2015/7/24 10:41:39

红柱条件fcolor=1

绿柱条件fcolor=-1

请先尝试自行修改一下

5楼

haoyun896 发表于：2015/7/24 13:45:55

不好意思，老师，我试了一下，不行，还是麻烦老师给我编一下吧，谢谢

6楼

haoyun896 发表于：2015/7/24 13:51:23

公式有两种运行模式，而很多函数是用在逐K线计算下的，而这个公式是用在序列计算的。麻烦老师了。请问这个公式可以修改成序列计算模式的吗？请老师修改成交易策略，谢谢！

[此贴子已经被作者于2015/7/24 13:52:18编辑过]

7楼

jinzhe 发表于：2015/7/24 14:02:24

上面的公式不能用在逐k线模式下，

数组引用了未来的数据，能不能讲一下上面的代码是什么意思吗？

[此贴子已经被作者于2015/7/24 14:03:20编辑过]

8楼

jinzhe 发表于：2015/7/24 14:08:50

fc:=close,fh:=h,fl:=l;fcolor:=0;ft1:=0;fb1:=0;fi:=0;t[4]:=0;b[4]:=0;pt:=1;pb:=1;

if datacount<2 then exit;

for i=1 to 4 do begin t[i]:=i;b[i]:=1; end; for i=2 to datacount do begin

if fc[i]>fc[t[pt]] then begin

fh[i]:=fc[i];fl[i]:=fc[t[1]];fcolor[i]:=1; b[4]:=b[3];b[3]:=b[2];b[2]:=b[1];b[1]:=t[1]; t[4]:=t[3];t[3]:=t[2];t[2]:=t[1];t[1]:=i; pt:=1;

pb:=if(pb=3,3,pb+1); end;

else if fc[i]<fc[b[pb]] then begin

fh[i]:=fc[b[1]];fl[i]:=fc[i];fcolor[i]:=-1; t[4]:=t[3];t[3]:=t[2];t[2]:=t[1];t[1]:=b[1]; b[4]:=b[3];b[3]:=b[2];b[2]:=b[1];b[1]:=i; pb:=1;

pt:=if(pt=3,3,pt+1); end;

else if fc[i]<=fc[t[pt]] and fc[i]>=fc[b[pb]] then begin

fh[i]:=fh[i-1];fl[i]:=fl[i-1]; fcolor[i]:=fcolor[i-1]; end;

ft1[i]:=t[1];fb1[i]:=b[1];fi[i]:=i; end;

STICKLINE(fcolor=1,fh,fl,10,0) colorred; STICKLINE(fcolor=-1,fh,fl,10,0) colorgreen;

exitshort:fcolor=1,tfilter;
enterlong:fcolor=1,tfilter;
exitlong:fcolor=-1,tfilter;
entershort:fcolor=-1,tfilter;

如果不能解释上面代码的含义，那么就推荐这段旧图表交易了，可以开平仓，止盈止损不能写在代码里面，需要金字塔自带的止盈止损功能实施

9楼

haoyun896 发表于：2015/7/27 16:15:01

老师，你好，上面公式代码是三线反转，又称三价线，是《股票K线战法》一书中记录的，日本证券界常用的股票价格线图的。

三线反转图是根据收盘价绘制，起始的价格称为“基准价格”。
范例：基准价格为135
绘制第一根线：
比较今天的收盘价与基准价格。
法则1
如果今天的收盘价高于基准价格，在基准价格到新高价格之间绘制一根白线。

或

法则2
如果今天的收盘价低于基准价格，在基准价格至新低价格之间绘制一根黑线。
或
法则3
如果今天的收盘价等于基准价格，不绘制任何图形。
我们的范例根据表6.1，第二个交易时段的收盘价为132，低于基准价格。所以，在132到135之间绘制一根黑线。

绘制第二根线：
比较今天的收盘价与第一根线形的高价与低价。当今天的收盘价超过第一根线形的价格区间时，才绘制第二根线形。
法则4
如果今天的收盘价高于第一根线形的高价，往右移一栏，在先前的高价（135）到新高价格之间绘制一根白线。
或
法则5
如果今天的收盘价低于第一根线形的低价，往右移一栏，在先前的低价（132）至新低价格之间绘制一根黑线。
或
法则6
如果今天的收盘价为于第一根线形的价格区间内，不绘制任何图形。
我们的范例第一根线形的价格区间为,所以今天的收盘价必须高于或低于才可以绘制新线形。第三个交易时段的收盘价为，所以往右移一栏，在先前的低价与新低价之间，绘制一条黑线。
绘制第三根线：
比较今天的收盘价与前两根线形的最高价与最低价。此处的观念与绘制第二根线形时相同，惟有价格创新高或新低，才绘制新的白线或黑线。以我们的范例来说，绘制黑线的价格必须低于128，绘制白线的价格必须高于135。
法则7
如果价格高于先前线形的最高价，往右移一栏，绘制白线以衔接新高价。
或
法则8
如果价格低于先前线形的最低价（换言之，价格创新低），往右移一栏，绘制黑线以衔接新低价。
或
法则9
如果价格位于先前线形的价格区间内，不绘制任何图形。以我们的范例来说，当价格介于先前的高价（135）与低价（128）之间，不绘制任何图形。

我们的范例第四个交易时段的收盘价为133。因为它位在前两根线形的价格区间内（128到135），所以不绘制新线形。这种情况维持到第九个交易时段，当时的价格创新高（139）。由于该价位高于先前的高价（135），所以往右移一栏，绘制一根白线衔接前一根线形的上端与新高价（139）。现在，线形的价格区间是128到139。直到第11个交易时段，价格才脱离128到139而创新高145。在这个时候，绘制一根白线衔接先前的高价139与新高价145。现在，我们有连续两根的白线，新的价格区间是128到145。在第12个交易时段，价格创新高（158）。所以，往右移一栏，在145与158之间绘制白线。这是一个重要的发展，请参考后文的讨论。
连续三根白线或黑线之后的绘图方法：
如果连续出现三根白线或黑线，可以分别确认多头或空头的趋势。请记住三线反转的规定，惟有随后的价格跌破三根连续白线的最低价，或向上穿越三根连续黑线的最高价，才可以绘制颜色反转的线形。
法则10
如果出现连续三根白线，只要价格继续创新高（即使是创一档的新高也是如此），仍然继续绘制新的白线。可是，在绘制反转的黑线时，价格必须跌破最近三根连续白线的最低价。这种反转的黑线称为反转黑线。反转黑线是衔接最近一根白线的底部与新低价。
法则11
如果出现连续三根黑线，只要价格继续创新低，便继续绘制新的黑线。可是，在绘制反转的白线时，价格必须向上穿越最近三根连续黑线的最高价。这种反转的白线称为反转白线。反转白线是衔接最近一根黑线的上端与高低价。后续的相关讨论，请参考表6.1与图6.1。
总之，如果当时有一根或两根白线或黑线，只要价格创新高或新低，便绘制新的线形。如果当时有三根或以上的连续白线，则价格必须跌破倒数第三根白线的低价，才可以绘制反转黑线。同理，如果当时有三根或以上的连续黑线，则价格必须向上超越倒数第三根黑线的高价，才可以绘制反转白线。

老师，根据这段话，能重新编写一下这个公式吗，谢谢！

10楼

jinzhe 发表于：2015/7/27 16:18:38

太复杂了，编不了，你可以贴出一个公告付费编码，看看有没有人愿意帮你

共10 条记录, 每页显示 10 条, 页签: [1]