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

标题：请教：飞狐的这个公式如何调入金字塔？

1楼

zhangcharlie 发表于：2011/10/22 11:27:46

input:n(3);
fc:=close;
mhn:=ma(high,n);
mln:=ma(low,n);
hld:=0*close;
tmp:=setlbound(hld,n);
for i=n+1 to datacount do begin
if fc[i]>mhn[i-1] then
    hld[i]:=1
else if fc[i]<mln[i-1] then
    hld[i]:=-1;
else
    hld[i]:=hld[i-1];
end;
hilo:=if(hld=-1,ma(h,n),ma(l,n));
STICKLINE(HLd=1 and ref(HLd,1)=1, HiLo,ref(HiLo,1), 3,0), colorred, linethick3;
STICKLINE(HLd=1 and ref(HLd,1)=-1, HiLo,ref(MA(L,1),1), 3,0), colorred, linethick3;
STICKLINE(HLd=-1 and ref(HLd,1) = -1, HiLo,ref(HiLo,1), 3,0), colorgreen, linethick3;
STICKLINE(HLd=-1 and ref(HLd,1)=1, HiLo,ref(MA(H,3),1), 3,0), colorgreen, linethick3;

2楼

zhangcharlie 发表于：2011/10/22 11:28:17

飞狐的这个公式，金字塔里通不过。

3楼

王锋发表于：2011/10/22 12:35:54

语句末尾缺少一个分号

input:n(3);
fc:=close;
mhn:=ma(high,n);
mln:=ma(low,n);
hld:=0*close;
tmp:=setlbound(hld,n);
for i=n+1 to datacount do begin
if fc[i]>mhn[i-1] then
    hld[i]:=1;
else if fc[i]<mln[i-1] then
    hld[i]:=-1;
else
    hld[i]:=hld[i-1];
end;
hilo:=if(hld=-1,ma(h,n),ma(l,n));
STICKLINE(HLd=1 and ref(HLd,1)=1, HiLo,ref(HiLo,1), 3,0), colorred, linethick3;
STICKLINE(HLd=1 and ref(HLd,1)=-1, HiLo,ref(MA(L,1),1), 3,0), colorred, linethick3;
STICKLINE(HLd=-1 and ref(HLd,1) = -1, HiLo,ref(HiLo,1), 3,0), colorgreen, linethick3;
STICKLINE(HLd=-1 and ref(HLd,1)=1, HiLo,ref(MA(H,3),1), 3,0), colorgreen, linethick3;

4楼

zhangcharlie 发表于：2011/10/23 14:01:24

谢谢！

5楼

zhangcharlie 发表于：2011/10/25 16:04:51

再请斑竹出手：

如何把最后 4句 STICKLINE 画线去掉，变成红色的连在一起，绿色的连在一起的折线图？

偶对公式不通，请帮我写一下，先谢过了！

6楼

26327756l 发表于：2011/10/25 16:15:04

能具体说明一下连线的数据吗？

[此贴子已经被作者于2011-10-25 16:21:03编辑过]

7楼

fly 发表于：2011/10/25 16:56:04

//STICKLINE(HLd=1 and ref(HLd,1)=1, HiLo,ref(HiLo,1), 3,0), colorred, linethick3;
//STICKLINE(HLd=1 and ref(HLd,1)=-1, HiLo,ref(MA(L,1),1), 3,0), colorred, linethick3;
partline(HLd=1,HiLo,colorred);

//STICKLINE(HLd=-1 and ref(HLd,1) = -1, HiLo,ref(HiLo,1), 3,0), colorgreen, linethick3;
//STICKLINE(HLd=-1 and ref(HLd,1)=1, HiLo,ref(MA(H,3),1), 3,0), colorgreen, linethick3;
partline(HLd=-1,HiLo,colorgreen);

8楼

zhangcharlie 发表于：2011/10/25 17:41:17

感谢 FLY 版主和 263277561 朋友。

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